diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-10-13 19:23:16 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-10-13 19:23:16 (GMT) |
| commit | 145839e8cf5506b3607b73fa27ebec94acd682d5 (patch) | |
| tree | b5539a6baf005afd66c72db4ed02ef49de2ff164 /fortran | |
| parent | 6dbba8d7afa20657d8eae7023a3cf5fc92e56636 (diff) | |
| download | hdf5-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')
| -rw-r--r-- | fortran/test/fortranlib_test.f90 | 2 |
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) |