diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2003-06-18 20:52:54 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2003-06-18 20:52:54 (GMT) |
| commit | 1aeaa7fbb1072d18a533b7bbf8f996f6b194de73 (patch) | |
| tree | 989cbf236bb9ed1bde75baa631a803eb75f7ee4e /fortran/test/tH5F.f90 | |
| parent | b6fca58d925dd2e8287b746b3deb81f71fc6e75f (diff) | |
| download | hdf5-1aeaa7fbb1072d18a533b7bbf8f996f6b194de73.zip hdf5-1aeaa7fbb1072d18a533b7bbf8f996f6b194de73.tar.gz hdf5-1aeaa7fbb1072d18a533b7bbf8f996f6b194de73.tar.bz2 | |
[svn-r7059] Purpose:
Refactoring
Description:
Track changes to H5Fget_obj_<foo> API functions.
Platforms tested:
FreeBSD 4.8 (sleipnir)
h5committest
Diffstat (limited to 'fortran/test/tH5F.f90')
| -rw-r--r-- | fortran/test/tH5F.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/test/tH5F.f90 b/fortran/test/tH5F.f90 index 6aa796d..e8f933a 100644 --- a/fortran/test/tH5F.f90 +++ b/fortran/test/tH5F.f90 @@ -638,7 +638,7 @@ write(*,*) "Wrong number of open objects reported, error" endif allocate(obj_ids(obj_countf), stat = error) - CALL h5fget_obj_ids_f(fid, H5F_OBJ_FILE_F, obj_ids, error) + CALL h5fget_obj_ids_f(fid, H5F_OBJ_FILE_F, -1, obj_ids, error) CALL check("h5fget_obj_ids_f",error,total_error) if(error .eq. 0) then do i = 1, obj_countf |