diff options
Diffstat (limited to 'fortran/test/fortranlib_test_F03.F90')
| -rw-r--r-- | fortran/test/fortranlib_test_F03.F90 | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/fortran/test/fortranlib_test_F03.F90 b/fortran/test/fortranlib_test_F03.F90 index b310bfe..42abae1 100644 --- a/fortran/test/fortranlib_test_F03.F90 +++ b/fortran/test/fortranlib_test_F03.F90 @@ -151,6 +151,10 @@ PROGRAM fortranlibtest_F03 CALL test_h5p_file_image(ret_total_error) CALL write_test_status(ret_total_error, ' Testing h5pset/get file image', total_error) + ret_total_error = 0 + CALL multiple_dset_rw(ret_total_error) + CALL write_test_status(ret_total_error, ' Testing multi-dataset reads and writes', total_error) + ! write(*,*) ! write(*,*) '=========================================' ! write(*,*) 'Testing OBJECT interface ' |