[svn-r16796] Changed

H5D_CHUNK_CACHE_NSLOTS_DEFAULT_F
H5D_CHUNK_CACHE_NBYTES_DEFAULT_F
H5D_CHUNK_CACHE_W0_DEFAULT_F

to

H5D_CHUNK_CACHE_NSLOTS_DFLT_F
H5D_CHUNK_CACHE_NBYTES_DFLT_F
H5D_CHUNK_CACHE_W0_DFLT_F

to get under the 31 limit for variable names
This commit is contained in:
Scot Breitenfeld 2009-04-20 10:59:21 -05:00
parent bc36a358d1
commit 2414c3e600
2 changed files with 12 additions and 9 deletions

View File

@ -7042,9 +7042,9 @@
! Once set, these values will override the values in the file access
! property list. Each of these values can be individually unset
! (or not set at all) by passing the macros:
! H5D_CHUNK_CACHE_NSLOTS_DEFAULT,
! H5D_CHUNK_CACHE_NBYTES_DEFAULT, and/or
! H5D_CHUNK_CACHE_W0_DEFAULT
! H5D_CHUNK_CACHE_NSLOTS_DFLT_F,
! H5D_CHUNK_CACHE_NBYTES_DFLT_F, and/or
! H5D_CHUNK_CACHE_W0_DFLT_F
! as appropriate.
!
! The RDCC_W0 value should be between 0 and 1 inclusive and

View File

@ -348,9 +348,12 @@ MODULE H5GLOBAL
INTEGER :: H5D_FILL_VALUE_DEFAULT_F
INTEGER :: H5D_FILL_VALUE_USER_DEFINED_F
INTEGER :: H5D_CHUNK_CACHE_NSLOTS_DEFAULT_F
INTEGER :: H5D_CHUNK_CACHE_NBYTES_DEFAULT_F
INTEGER :: H5D_CHUNK_CACHE_W0_DEFAULT_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)
@ -376,9 +379,9 @@ MODULE H5GLOBAL
EQUIVALENCE(H5D_flags(18), H5D_FILL_VALUE_DEFAULT_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)
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