diff options
| author | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2017-06-09 17:19:50 (GMT) |
|---|---|---|
| committer | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2017-06-09 17:19:50 (GMT) |
| commit | 1ccdb2e23f1c55835aee315e92736c6aed06faf8 (patch) | |
| tree | 177f96b435fe83a322a07684007352e4ffd4ff81 | |
| parent | 4242753848c44ab3b5d226e66225eac2f64db314 (diff) | |
| download | hdf5-1ccdb2e23f1c55835aee315e92736c6aed06faf8.zip hdf5-1ccdb2e23f1c55835aee315e92736c6aed06faf8.tar.gz hdf5-1ccdb2e23f1c55835aee315e92736c6aed06faf8.tar.bz2 | |
fixed check output string to match test
| -rw-r--r-- | fortran/test/tH5P_F03.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/test/tH5P_F03.F90 b/fortran/test/tH5P_F03.F90 index 69d493b..b44540b 100644 --- a/fortran/test/tH5P_F03.F90 +++ b/fortran/test/tH5P_F03.F90 @@ -972,7 +972,7 @@ SUBROUTINE test_vds(total_error) ! Get source file name CALL H5Pget_virtual_filename_f(dcpl, INT(i-1, size_t), SRC_FILE_LEN_EXACT, error, nsize) - CALL check("H5Pget_virtual_count_f", error, total_error) + CALL check("H5Pget_virtual_filename_f", error, total_error) IF(nsize.NE.LEN(SRC_FILE_LEN_EXACT))THEN PRINT*,"virtual filenname size is incorrect" |