summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2009-04-16 21:41:47 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2009-04-16 21:41:47 (GMT)
commit7cb785674ed597083005ecb6045dcf2c7c91b183 (patch)
tree142320dff534885c03bc45d80c4dea91d9032eea /fortran
parentb04489e6ceb9f8df7d6b1e06cc292c6c1525ef8f (diff)
downloadhdf5-7cb785674ed597083005ecb6045dcf2c7c91b183.zip
hdf5-7cb785674ed597083005ecb6045dcf2c7c91b183.tar.gz
hdf5-7cb785674ed597083005ecb6045dcf2c7c91b183.tar.bz2
[svn-r16768] Added definitions
H5D_CHUNK_CACHE_NSLOTS_DEFAULT_F H5D_CHUNK_CACHE_NBYTES_DEFAULT_F H5D_CHUNK_CACHE_W0_DEFAULT_F used in cache/chunk functions.
Diffstat (limited to 'fortran')
-rw-r--r--fortran/src/H5_f.c3
-rw-r--r--fortran/src/H5f90global.f908
2 files changed, 9 insertions, 2 deletions
diff --git a/fortran/src/H5_f.c b/fortran/src/H5_f.c
index d7bb3d8..a8b2d95 100644
--- a/fortran/src/H5_f.c
+++ b/fortran/src/H5_f.c
@@ -338,6 +338,9 @@ nh5init_flags_c( int_f *h5d_flags, int_f *h5f_flags,
h5d_flags[16] = (int_f)H5D_FILL_VALUE_UNDEFINED;
h5d_flags[17] = (int_f)H5D_FILL_VALUE_DEFAULT;
h5d_flags[18] = (int_f)H5D_FILL_VALUE_USER_DEFINED;
+ h5d_flags[19] = (int_f)H5D_CHUNK_CACHE_NSLOTS_DEFAULT;
+ h5d_flags[20] = (int_f)H5D_CHUNK_CACHE_NBYTES_DEFAULT;
+ h5d_flags[21] = (int_f)H5D_CHUNK_CACHE_W0_DEFAULT;
/*
* H5F flags
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90
index 2d50f4f..53eeb5c 100644
--- a/fortran/src/H5f90global.f90
+++ b/fortran/src/H5f90global.f90
@@ -317,7 +317,7 @@ 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/
@@ -370,7 +370,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_DEFAULT_F)
+ EQUIVALENCE(H5D_flags(21), H5D_CHUNK_CACHE_NBYTES_DEFAULT_F)
+ EQUIVALENCE(H5D_flags(22), H5D_CHUNK_CACHE_W0_DEFAULT_F)
!
! H5FD flags declaration