summaryrefslogtreecommitdiffstats
path: root/fortran/test/fortranlib_test.f90
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>2003-10-13 19:23:16 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>2003-10-13 19:23:16 (GMT)
commit145839e8cf5506b3607b73fa27ebec94acd682d5 (patch)
treeb5539a6baf005afd66c72db4ed02ef49de2ff164 /fortran/test/fortranlib_test.f90
parent6dbba8d7afa20657d8eae7023a3cf5fc92e56636 (diff)
downloadhdf5-145839e8cf5506b3607b73fa27ebec94acd682d5.zip
hdf5-145839e8cf5506b3607b73fa27ebec94acd682d5.tar.gz
hdf5-145839e8cf5506b3607b73fa27ebec94acd682d5.tar.bz2
[svn-r7613] Purpose:
Bug fix Description: "group" errors were not being included in the total # of errors Platforms tested: FreeBSD 4.9 (sleipnir) Linux 2.4 (verbena) w/FORTRAN too minor for h5committest
Diffstat (limited to 'fortran/test/fortranlib_test.f90')
-rw-r--r--fortran/test/fortranlib_test.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/test/fortranlib_test.f90 b/fortran/test/fortranlib_test.f90
index a244f53..4fa9c99 100644
--- a/fortran/test/fortranlib_test.f90
+++ b/fortran/test/fortranlib_test.f90
@@ -306,7 +306,7 @@
write(*, fmt = '(11a)', advance = 'no') ' Group test'
write(*, fmt = '(59x,a)', advance = 'no') ' '
write(*, fmt = e_format) error_string
- total_error = total_error + identifier_total_error
+ total_error = total_error + group_total_error
error_string = failure
CALL error_report_test(cleanup, error_total_error)