summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5Off.f90
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2012-10-03 00:53:21 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2012-10-03 00:53:21 (GMT)
commit3e59374ccd0c7cbb671dc72c34ec1a6a9123bc5b (patch)
tree41023f4827cb254156451092cd4e43ab16fd85f4 /fortran/src/H5Off.f90
parent7648354b80e5e914f99cb6dece5d38d354c5c736 (diff)
downloadhdf5-3e59374ccd0c7cbb671dc72c34ec1a6a9123bc5b.zip
hdf5-3e59374ccd0c7cbb671dc72c34ec1a6a9123bc5b.tar.gz
hdf5-3e59374ccd0c7cbb671dc72c34ec1a6a9123bc5b.tar.bz2
[svn-r22854] Fixed issues with default 8-byte real and default 8-byte integers and the new H5O routines.
Tested: jam (gcc,intel)
Diffstat (limited to 'fortran/src/H5Off.f90')
-rw-r--r--fortran/src/H5Off.f902
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Off.f90 b/fortran/src/H5Off.f90
index 2d8509f..ce8c55c 100644
--- a/fortran/src/H5Off.f90
+++ b/fortran/src/H5Off.f90
@@ -647,7 +647,7 @@ CONTAINS
INTEGER , INTENT(IN) :: index_type
INTEGER , INTENT(IN) :: order
INTEGER(HSIZE_T), INTENT(IN) :: n
- INTEGER(HID_T) , INTENT(IN) :: obj_id
+ INTEGER(HID_T) , INTENT(OUT) :: obj_id
INTEGER(HID_T) , INTENT(IN) :: lapl_id_default
END FUNCTION h5oopen_by_idx_c