summaryrefslogtreecommitdiffstats
path: root/fortran/test/tH5O.f90
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2013-04-11 19:40:57 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2013-04-11 19:40:57 (GMT)
commit337242feeae4517e4ebec867391681471375a1c1 (patch)
tree5cc30e17140f155abaa074830a619328f82f523c /fortran/test/tH5O.f90
parentdd577725d157522e554d4cec04723f751209f335 (diff)
downloadhdf5-337242feeae4517e4ebec867391681471375a1c1.zip
hdf5-337242feeae4517e4ebec867391681471375a1c1.tar.gz
hdf5-337242feeae4517e4ebec867391681471375a1c1.tar.bz2
[svn-r23576] added missing argument in check call.
tested: jam (g95,gcc))
Diffstat (limited to 'fortran/test/tH5O.f90')
-rw-r--r--fortran/test/tH5O.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/test/tH5O.f90 b/fortran/test/tH5O.f90
index b68e7ca..ea91631 100644
--- a/fortran/test/tH5O.f90
+++ b/fortran/test/tH5O.f90
@@ -535,7 +535,7 @@ SUBROUTINE test_h5o_link(total_error)
! close the datatype
CALL h5tclose_f(tid, error)
- CALL check("h5tclose_f",error)
+ CALL check("h5tclose_f",error, total_error)
CALL h5ocopy_f(file_id, NAME_DATATYPE_SIMPLE, file_id, NAME_DATATYPE_SIMPLE2, error)
CALL check("h5ocopy_f",error,total_error)