diff options
Diffstat (limited to 'fortran/test/tH5G.f90')
| -rw-r--r-- | fortran/test/tH5G.f90 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/fortran/test/tH5G.f90 b/fortran/test/tH5G.f90 index 40263d6..437970f 100644 --- a/fortran/test/tH5G.f90 +++ b/fortran/test/tH5G.f90 @@ -151,6 +151,7 @@ ! ! CALL h5gget_obj_info_idx_f(file_id, linkname1, 2, name, obj_type, error) ! CALL check("h5gget_obj_info_idx_f", error, total_error) +! XXX: Fix problems with H5G_LINK_F! - QAK ! if (obj_type .ne. H5G_LINK_F) then ! write(*,*) "got object ", name, " type error ", obj_type ! total_error = total_error +1 |