summaryrefslogtreecommitdiffstats
path: root/hl/fortran
diff options
context:
space:
mode:
authorAllen Byrne <50328838+byrnHDF@users.noreply.github.com>2021-02-17 14:54:58 (GMT)
committerGitHub <noreply@github.com>2021-02-17 14:54:58 (GMT)
commit9fced482f2079c5379bc2d8302bc65e1a4358012 (patch)
tree4de3c42e73549279a6b59f1c2cd01bf8ce16f56c /hl/fortran
parent58fd5053bf65be1856c36a638604c509a210a18e (diff)
downloadhdf5-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')
-rw-r--r--hl/fortran/examples/ex_ds1.f903
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)