summaryrefslogtreecommitdiffstats
path: root/fortran/src/H5f90global.f90
diff options
context:
space:
mode:
Diffstat (limited to 'fortran/src/H5f90global.f90')
-rw-r--r--fortran/src/H5f90global.f9055
1 files changed, 33 insertions, 22 deletions
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90
index c8e6649..e037d12 100644
--- a/fortran/src/H5f90global.f90
+++ b/fortran/src/H5f90global.f90
@@ -158,7 +158,7 @@ MODULE H5GLOBAL
! H5T_STD_REF_OBJ, &
! H5T_STD_REF_DSETREG
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /PREDEFINED_TYPES/
+ !DEC$ATTRIBUTES DLLEXPORT :: /PREDEFINED_TYPES/
!DEC$endif
COMMON /PREDEFINED_TYPES/ predef_types
@@ -167,7 +167,7 @@ MODULE H5GLOBAL
! H5T_IEEE_F64BE, &
! H5T_IEEE_F64LE
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /FLOATING_TYPES/
+ !DEC$ATTRIBUTES DLLEXPORT :: /FLOATING_TYPES/
!DEC$endif
COMMON /FLOATING_TYPES/ floating_types
!
@@ -188,7 +188,7 @@ MODULE H5GLOBAL
! H5T_STD_U64BE, &
! H5T_STD_U64LE
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /INTEGER_TYPES/
+ !DEC$ATTRIBUTES DLLEXPORT :: /INTEGER_TYPES/
!DEC$endif
COMMON /INTEGER_TYPES/ integer_types
!
@@ -202,7 +202,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5F_FLAGS_LEN = 19
INTEGER H5F_flags(H5F_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5F_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5F_FLAGS/
!DEC$endif
COMMON /H5F_FLAGS/ H5F_flags
@@ -249,7 +249,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5generic_FLAGS_LEN = 9
INTEGER H5generic_flags(H5generic_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5generic_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5generic_FLAGS/
!DEC$endif
COMMON /H5generic_FLAGS/ H5generic_flags
@@ -280,7 +280,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5G_FLAGS_LEN = 12
INTEGER H5G_flags(H5G_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5G_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5G_FLAGS/
!DEC$endif
COMMON /H5G_FLAGS/ H5G_flags
@@ -317,10 +317,10 @@ MODULE H5GLOBAL
! H5D flags declaration
!
- INTEGER, PARAMETER :: H5D_FLAGS_LEN = 19
+ INTEGER, PARAMETER :: H5D_FLAGS_LEN = 22
INTEGER H5D_flags(H5D_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5D_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5D_FLAGS/
!DEC$endif
COMMON /H5D_FLAGS/ H5D_flags
@@ -348,6 +348,13 @@ MODULE H5GLOBAL
INTEGER :: H5D_FILL_VALUE_DEFAULT_F
INTEGER :: H5D_FILL_VALUE_USER_DEFINED_F
+! shortened "_DEFAULT" to "_DFLT" to satisfy the limit of 31
+! characters for variable names in Fortran.
+
+ INTEGER :: H5D_CHUNK_CACHE_NSLOTS_DFLT_F
+ INTEGER :: H5D_CHUNK_CACHE_NBYTES_DFLT_F
+ INTEGER :: H5D_CHUNK_CACHE_W0_DFLT_F
+
EQUIVALENCE(H5D_flags(1), H5D_COMPACT_F)
EQUIVALENCE(H5D_flags(2), H5D_CONTIGUOUS_F)
EQUIVALENCE(H5D_flags(3), H5D_CHUNKED_F)
@@ -370,7 +377,11 @@ MODULE H5GLOBAL
EQUIVALENCE(H5D_flags(16), H5D_FILL_VALUE_ERROR_F)
EQUIVALENCE(H5D_flags(17), H5D_FILL_VALUE_UNDEFINED_F)
EQUIVALENCE(H5D_flags(18), H5D_FILL_VALUE_DEFAULT_F)
- EQUIVALENCE(H5D_flags(19), H5D_FILL_VALUE_USER_DEFINED_F)
+ EQUIVALENCE(H5D_flags(19), H5D_FILL_VALUE_USER_DEFINED_F)
+
+ EQUIVALENCE(H5D_flags(20), H5D_CHUNK_CACHE_NSLOTS_DFLT_F)
+ EQUIVALENCE(H5D_flags(21), H5D_CHUNK_CACHE_NBYTES_DFLT_F)
+ EQUIVALENCE(H5D_flags(22), H5D_CHUNK_CACHE_W0_DFLT_F)
!
! H5FD flags declaration
@@ -378,7 +389,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5FD_FLAGS_LEN = 11
INTEGER H5FD_flags(H5FD_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5FD_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5FD_FLAGS/
!DEC$endif
COMMON /H5FD_FLAGS/ H5FD_flags
@@ -411,7 +422,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5FD_HID_FLAGS_LEN = 7
INTEGER(HID_T) H5FD_hid_flags(H5FD_HID_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5FD_HID_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5FD_HID_FLAGS/
!DEC$endif
COMMON /H5FD_HID_FLAGS/ H5FD_hid_flags
@@ -437,7 +448,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5I_FLAGS_LEN = 7
INTEGER H5I_flags(H5I_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5I_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5I_FLAGS/
!DEC$endif
COMMON /H5I_FLAGS/ H5I_flags
@@ -470,7 +481,7 @@ MODULE H5GLOBAL
INTEGER :: H5L_LINK_CLASS_T_VERS_F
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5L_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5L_FLAGS/
!DEC$endif
COMMON /H5L_FLAGS/ H5L_flags
@@ -486,7 +497,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5O_FLAGS_LEN = 22
INTEGER :: H5o_flags(H5O_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5O_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5O_FLAGS/
!DEC$endif
COMMON /H5O_FLAGS/ H5O_flags
@@ -542,7 +553,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5P_FLAGS_LEN = 18
INTEGER(HID_T) H5P_flags(H5P_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5P_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5P_FLAGS/
!DEC$endif
COMMON /H5P_FLAGS/ H5P_flags
@@ -590,7 +601,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5P_FLAGS_INT_LEN = 2
INTEGER H5P_flags_int(H5P_FLAGS_INT_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5P_FLAGS_INT/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5P_FLAGS_INT/
!DEC$endif
COMMON /H5P_FLAGS_INT/ H5P_flags_int
INTEGER :: H5P_CRT_ORDER_INDEXED_F
@@ -603,7 +614,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5R_FLAGS_LEN = 2
INTEGER H5R_flags(H5R_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5R_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5R_FLAGS/
!DEC$endif
COMMON /H5R_FLAGS/ H5R_flags
@@ -619,7 +630,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5S_FLAGS_LEN = 20
INTEGER H5S_flags(H5S_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5S_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5S_FLAGS/
!DEC$endif
COMMON /H5S_FLAGS/ H5S_flags
@@ -679,7 +690,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5T_FLAGS_LEN = 33
INTEGER H5T_flags(H5T_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5T_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5T_FLAGS/
!DEC$endif
COMMON /H5T_FLAGS/ H5T_flags
@@ -757,7 +768,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5Z_FLAGS_LEN = 14
INTEGER H5Z_flags(H5Z_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5Z_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5Z_FLAGS/
!DEC$endif
COMMON /H5Z_FLAGS/ H5Z_flags
@@ -798,7 +809,7 @@ MODULE H5GLOBAL
INTEGER, PARAMETER :: H5LIB_FLAGS_LEN = 2
INTEGER :: H5LIB_flags(H5LIB_FLAGS_LEN)
!DEC$if defined(BUILD_HDF5_DLL)
- !DEC$ ATTRIBUTES DLLEXPORT :: /H5LIB_FLAGS/
+ !DEC$ATTRIBUTES DLLEXPORT :: /H5LIB_FLAGS/
!DEC$endif
COMMON /H5LIB_FLAGS/ H5LIB_flags
INTEGER :: H5_SZIP_EC_OM_F
@@ -813,7 +824,7 @@ MODULE H5GLOBAL
!!$ INTEGER, PARAMETER :: H5_FLAGS_LEN = 2
!!$ INTEGER H5_flags(H5_FLAGS_LEN)
!!$!DEC$if defined(BUILD_HDF5_DLL)
-!!$!DEC$ ATTRIBUTES DLLEXPORT :: /H5_FLAGS/
+!!$!DEC$ATTRIBUTES DLLEXPORT :: /H5_FLAGS/
!!$!DEC$endif
!!$ COMMON /H5_FLAGS/ H5_flags
!!$