diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2008-12-15 19:17:49 (GMT) |
---|---|---|
committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2008-12-15 19:17:49 (GMT) |
commit | 41245b50b68c9f5469cf715006f099cc9b00a6c3 (patch) | |
tree | 7b3fff0818ffea46462c17b093c66d1e466d37ed /fortran/test/fortranlib_test.f90 | |
parent | 327484d5031e566b9c4c12a26e6d5576b32262d6 (diff) | |
download | hdf5-41245b50b68c9f5469cf715006f099cc9b00a6c3.zip hdf5-41245b50b68c9f5469cf715006f099cc9b00a6c3.tar.gz hdf5-41245b50b68c9f5469cf715006f099cc9b00a6c3.tar.bz2 |
[svn-r16197] Maintenance: Merged trunk into the hdf5_1_8 branch
(used svn merge -r 15741:16196 http://svn.hdfgroup.uiuc.edu/hdf5/trunk/fortran).
Diffstat (limited to 'fortran/test/fortranlib_test.f90')
-rw-r--r-- | fortran/test/fortranlib_test.f90 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/fortran/test/fortranlib_test.f90 b/fortran/test/fortranlib_test.f90 index 697a9f6..12c3af8 100644 --- a/fortran/test/fortranlib_test.f90 +++ b/fortran/test/fortranlib_test.f90 @@ -50,11 +50,11 @@ PROGRAM fortranlibtest total_error = total_error + 1 ENDIF WRITE(*,*) + ! CALL h5check_version_f(1,4,4,total_error) ! write(*,*) '=========================================' ! write(*,*) 'Testing FILE Interface ' ! write(*,*) '=========================================' - ret_total_error = 0 CALL mountingtest(cleanup, ret_total_error) @@ -153,7 +153,7 @@ PROGRAM fortranlibtest ret_total_error = 0 CALL compoundtest(cleanup, ret_total_error) CALL write_test_status(ret_total_error, ' Compound datatype test', total_error) - + ret_total_error = 0 CALL enumtest(cleanup, ret_total_error) CALL write_test_status(ret_total_error, ' Enum datatype test', total_error) @@ -224,7 +224,7 @@ PROGRAM fortranlibtest CALL vl_test_real(cleanup, ret_total_error) CALL vl_test_string(cleanup, ret_total_error) CALL write_test_status(ret_total_error, ' VL test', total_error) - + WRITE(*,*) WRITE(*,*) ' ============================================ ' |