diff options
Diffstat (limited to 'fortran/test/tH5G_1_8.F90')
-rw-r--r-- | fortran/test/tH5G_1_8.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/test/tH5G_1_8.F90 b/fortran/test/tH5G_1_8.F90 index 222ba9d..bdecd8d 100644 --- a/fortran/test/tH5G_1_8.F90 +++ b/fortran/test/tH5G_1_8.F90 @@ -1923,7 +1923,7 @@ SUBROUTINE lapl_nlinks( fapl, total_error) ! Open file CALL h5fopen_f(FileName, H5F_ACC_RDWR_F, fid, error, fapl) - CALL check("h5open_f",error,total_error) + CALL check("h5fopen_f",error,total_error) ! Create LAPL with higher-than-usual nlinks value ! Create a non-default lapl with udata set to point to the first group |