mirror/hdf5
2
0
Fork 0
mirror of https://github.com/HDFGroup/hdf5.git synced 2025-01-30 15:32:37 +08:00
Code Issues Packages Projects Releases Wiki Activity

[svn-r13374] Enabled multi-file driver test since it was fixed in C library

Browse Source 
Platforms tested: kagiso, smirom, linew
This commit is contained in:
Elena Pourmal 2007-02-21 17:33:52 -05:00
parent f610f3161b
commit 2468b8aa1c
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fortran/test/fortranlib_test.f90
View File

@ -238,11 +238,11 @@
write(*, fmt = e_format) error_string
total_error = total_error + external_total_error
! error_string = failure
error_string = skip
error_string = failure
! error_string = skip
cleanup = .FALSE.
! CALL multi_file_test(cleanup, multi_file_total_error)
! IF (multi_file_total_error == 0) error_string = success
CALL multi_file_test(cleanup, multi_file_total_error)
IF (multi_file_total_error == 0) error_string = success
write(*, fmt = '(23a)', advance = 'no') ' Multi file driver test'
write(*, fmt = '(47x,a)', advance = 'no') ' '
write(*, fmt = e_format) error_string