diff options
author | Allen Byrne <50328838+byrnHDF@users.noreply.github.com> | 2021-02-17 14:54:58 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2021-02-17 14:54:58 (GMT) |
commit | 9fced482f2079c5379bc2d8302bc65e1a4358012 (patch) | |
tree | 4de3c42e73549279a6b59f1c2cd01bf8ce16f56c /hl/fortran/examples/ex_ds1.f90 | |
parent | 58fd5053bf65be1856c36a638604c509a210a18e (diff) | |
download | hdf5-9fced482f2079c5379bc2d8302bc65e1a4358012.zip hdf5-9fced482f2079c5379bc2d8302bc65e1a4358012.tar.gz hdf5-9fced482f2079c5379bc2d8302bc65e1a4358012.tar.bz2 |
1 12 merge recent changes from develop (#344)
* OESS-98 fix tools test for plugins
* sync fork
* Merge of changes from dev
* Move problem option to bottom of the list until fixed
* HDFFV-11106 - fix parsing optional args
* HDFFV-11106 add note
* grammer fix
* Whitespace after clang formatting
* Undo format version 11 changes
* Update check to working version
* Merge workflow and minor changes from develop
* Update supported platforms
* PR#3 merge from develop
* Merge gcc 10 diagnostics option from develop
* Merge #318 OSX changes from develop
* Merge serval small changes from dev
* fix typo
Diffstat (limited to 'hl/fortran/examples/ex_ds1.f90')
-rw-r--r-- | hl/fortran/examples/ex_ds1.f90 | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/hl/fortran/examples/ex_ds1.f90 b/hl/fortran/examples/ex_ds1.f90 index b31ac8e..3e0048a 100644 --- a/hl/fortran/examples/ex_ds1.f90 +++ b/hl/fortran/examples/ex_ds1.f90 @@ -180,8 +180,9 @@ PROGRAM example_ds WRITE(*,'(/,5X,A,I0,2A,/)') 'Dimension Scale Label for dimension ', DIM2, ' is ... ', label(1:label_len) - ! close DS id + ! close DS ids CALL H5Dclose_f(dsid, err) + CALL H5Dclose_f(did, err) ! close file CALL H5Fclose_f(fid, err) |