summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2011-08-19 19:08:17 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2011-08-19 19:08:17 (GMT)
commit84afb3d0698e5aed6c44840b60dc987e4f36f8b0 (patch)
treed704617df92d85e5749abdc84d89d161836b14d3
parent23c7adeca8de60ecd79742cdd16e26802d47d16c (diff)
downloadhdf5-84afb3d0698e5aed6c44840b60dc987e4f36f8b0.zip
hdf5-84afb3d0698e5aed6c44840b60dc987e4f36f8b0.tar.gz
hdf5-84afb3d0698e5aed6c44840b60dc987e4f36f8b0.tar.bz2
[svn-r21271] Fixed Windows $DEC! declaration for H5close_f, added missing entry in hdf5_fortrandll.dif
-rw-r--r--fortran/src/H5Off.f902
-rw-r--r--fortran/src/hdf5_fortrandll.def1
2 files changed, 2 insertions, 1 deletions
diff --git a/fortran/src/H5Off.f90 b/fortran/src/H5Off.f90
index f29671d..e69fdb5 100644
--- a/fortran/src/H5Off.f90
+++ b/fortran/src/H5Off.f90
@@ -197,7 +197,7 @@ CONTAINS
INTEGER FUNCTION h5oclose_c(object_id)
USE H5GLOBAL
!DEC$IF DEFINED(HDF5F90_WINDOWS)
- !DEC$OBJECTIBUTES C,reference,decorate,alias:'H5OCLOSE_C'::h5oclose_c
+ !DEC$ATTRIBUTES C,reference,decorate,alias:'H5OCLOSE_C'::h5oclose_c
!DEC$ENDIF
INTEGER(HID_T), INTENT(IN) :: object_id
END FUNCTION h5oclose_c
diff --git a/fortran/src/hdf5_fortrandll.def b/fortran/src/hdf5_fortrandll.def
index 5f45350..5355a3c 100644
--- a/fortran/src/hdf5_fortrandll.def
+++ b/fortran/src/hdf5_fortrandll.def
@@ -284,6 +284,7 @@ H5L_mp_H5LIS_REGISTERED_F
H5L_mp_H5LMOVE_F
H5L_mp_H5LGET_NAME_BY_IDX_F
; H5O
+H5O_mp_CLOSE_F
H5O_mp_H5OLINK_F
H5O_mp_H5OOPEN_F
H5O_mp_H5OOPEN_BY_ADDR_F