summaryrefslogtreecommitdiffstats
path: root/fortran
diff options
context:
space:
mode:
authorScot Breitenfeld <brtnfld@hdfgroup.org>2009-04-20 16:00:09 (GMT)
committerScot Breitenfeld <brtnfld@hdfgroup.org>2009-04-20 16:00:09 (GMT)
commit4336eea98e1283fc3e32a1166bfdff30aa26c004 (patch)
tree2fa675a89a452a9615b43561ce4b856b7914d884 /fortran
parent2414c3e60087074d46afa5dfbf8648381aa13c28 (diff)
downloadhdf5-4336eea98e1283fc3e32a1166bfdff30aa26c004.zip
hdf5-4336eea98e1283fc3e32a1166bfdff30aa26c004.tar.gz
hdf5-4336eea98e1283fc3e32a1166bfdff30aa26c004.tar.bz2
[svn-r16797] 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
Diffstat (limited to 'fortran')
-rw-r--r--fortran/test/fortranlib_test_1_8.f902
-rw-r--r--fortran/test/tH5P.f906
2 files changed, 5 insertions, 3 deletions
diff --git a/fortran/test/fortranlib_test_1_8.f90 b/fortran/test/fortranlib_test_1_8.f90
index 49835b0..6158c16 100644
--- a/fortran/test/fortranlib_test_1_8.f90
+++ b/fortran/test/fortranlib_test_1_8.f90
@@ -92,6 +92,8 @@ PROGRAM fortranlibtest
' Testing dataspace encoding and decoding', &
total_error)
+
+
! CALL test_hard_query(group_total_error)
WRITE(*,*)
diff --git a/fortran/test/tH5P.f90 b/fortran/test/tH5P.f90
index cfa6f9b..3063842 100644
--- a/fortran/test/tH5P.f90
+++ b/fortran/test/tH5P.f90
@@ -531,7 +531,7 @@ SUBROUTINE test_chunk_cache(cleanup, total_error)
! property will override this setting
nslots_3 = nslots_2 * 2
- nbytes_3 = H5D_CHUNK_CACHE_NBYTES_DEFAULT_F
+ nbytes_3 = H5D_CHUNK_CACHE_NBYTES_DFLT_F
w0_3 = w0_2 / 2
CALL H5Pset_chunk_cache_f(dapl1, nslots_3, nbytes_3, w0_3, error)
@@ -628,8 +628,8 @@ SUBROUTINE test_chunk_cache(cleanup, total_error)
ENDIF
! Test H5D_CHUNK_CACHE_NSLOTS_DEFAULT and H5D_CHUNK_CACHE_W0_DEFAULT
- nslots_2 = H5D_CHUNK_CACHE_NSLOTS_DEFAULT_F
- w0_2 = H5D_CHUNK_CACHE_W0_DEFAULT_F
+ nslots_2 = H5D_CHUNK_CACHE_NSLOTS_DFLT_F
+ w0_2 = H5D_CHUNK_CACHE_W0_DFLT_F
CALL H5Pset_chunk_cache_f(dapl2, nslots_2, nbytes_2, w0_2, error)
CALL check("H5Pset_chunk_cache_f", error, total_error)