From 4336eea98e1283fc3e32a1166bfdff30aa26c004 Mon Sep 17 00:00:00 2001 From: Scot Breitenfeld Date: Mon, 20 Apr 2009 11:00:09 -0500 Subject: [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 --- fortran/test/fortranlib_test_1_8.f90 | 2 ++ fortran/test/tH5P.f90 | 6 +++--- 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) -- cgit v0.12