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 /fortran/test | |
parent | 4242753848c44ab3b5d226e66225eac2f64db314 (diff) | |
download | hdf5-1ccdb2e23f1c55835aee315e92736c6aed06faf8.zip hdf5-1ccdb2e23f1c55835aee315e92736c6aed06faf8.tar.gz hdf5-1ccdb2e23f1c55835aee315e92736c6aed06faf8.tar.bz2 |
fixed check output string to match test
Diffstat (limited to 'fortran/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" |