diff options
author | Elena Pourmal <epourmal@hdfgroup.org> | 2006-12-20 21:10:06 (GMT) |
---|---|---|
committer | Elena Pourmal <epourmal@hdfgroup.org> | 2006-12-20 21:10:06 (GMT) |
commit | 79c17d54cc2f66f57f51f578681a35140e2b580e (patch) | |
tree | 6bfebf0d680cedb500e4b3b6cae526766c80c542 /test/tsohm.c | |
parent | 36e1d514c443bda81d9473e8a476f68738783df2 (diff) | |
download | hdf5-79c17d54cc2f66f57f51f578681a35140e2b580e.zip hdf5-79c17d54cc2f66f57f51f578681a35140e2b580e.tar.gz hdf5-79c17d54cc2f66f57f51f578681a35140e2b580e.tar.bz2 |
[svn-r13083] Description:
VMS maintenance: updated command file with the new source files;
sohm test was failing on VMS due to upper case/lower case letters in
constant and variable names (i.e. FILENAME vs. filename); modified the test
to avoid confusion.
Platforms tested:
VMS server, kagiso
Diffstat (limited to 'test/tsohm.c')
-rw-r--r-- | test/tsohm.c | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/test/tsohm.c b/test/tsohm.c index 77a475f..9274ed4 100644 --- a/test/tsohm.c +++ b/test/tsohm.c @@ -206,8 +206,7 @@ static void test_sohm_fcpl(void) /* Create a file with this fcpl and make sure that all the values can be * retrieved. */ - h5_fixname(FILENAME, H5P_DEFAULT, filename, sizeof filename); - fid = H5Fcreate(filename, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); + fid = H5Fcreate(FILENAME, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); CHECK_I(fid, "H5Fcreate"); fcpl2_id = H5Fget_create_plist(fid); @@ -224,7 +223,7 @@ static void test_sohm_fcpl(void) */ ret = H5Fclose(fid); CHECK_I(ret, "H5Fclose"); - fid = H5Fopen(filename, H5F_ACC_RDWR, H5P_DEFAULT); + fid = H5Fopen(FILENAME, H5F_ACC_RDWR, H5P_DEFAULT); CHECK_I(fid, "H5Fopen"); fcpl2_id = H5Fget_create_plist(fid); @@ -261,7 +260,7 @@ static void test_sohm_fcpl(void) check_fcpl_values(fcpl_id, TEST_NUM_INDEXES, test_type_flags, test_minsizes, TEST_L2B, TEST_B2L); /* Use the fcpl to create a file and get it back again */ - fid = H5Fcreate(filename, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); + fid = H5Fcreate(FILENAME, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); CHECK_I(fid, "H5Fcreate"); fcpl2_id = H5Fget_create_plist(fid); CHECK_I(fcpl2_id, "H5Fcreate"); @@ -277,7 +276,7 @@ static void test_sohm_fcpl(void) */ ret = H5Fclose(fid); CHECK_I(ret, "H5Fclose"); - fid = H5Fopen(filename, H5F_ACC_RDWR, H5P_DEFAULT); + fid = H5Fopen(FILENAME, H5F_ACC_RDWR, H5P_DEFAULT); CHECK_I(fid, "H5Fopen"); fcpl2_id = H5Fget_create_plist(fid); @@ -313,11 +312,11 @@ static void test_sohm_fcpl(void) CHECK_I(ret, "H5Pset_shared_mesg_index"); ret = H5Pset_shared_mesg_index(fcpl_id, 2, H5O_MESG_FILL_FLAG, 15 /* JAMES */); CHECK_I(ret, "H5Pset_shared_mesg_index"); - fid = H5Fcreate(filename, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); + fid = H5Fcreate(FILENAME, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); VERIFY(fid, -1, "H5Fcreate"); ret = H5Pset_shared_mesg_index(fcpl_id, 2, H5O_MESG_DTYPE_FLAG | H5O_MESG_FILL_FLAG, 15 /* JAMES */); CHECK_I(ret, "H5Pset_shared_mesg_index"); - fid = H5Fcreate(filename, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); + fid = H5Fcreate(FILENAME, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); VERIFY(fid, -1, "H5Fcreate"); /* Test list/btree cutoffs. We can set these to any positive value, @@ -337,7 +336,7 @@ static void test_sohm_fcpl(void) CHECK_I(ret, "H5Pset_shared_mesg_index"); ret = H5Pset_shared_mesg_phase_change(fcpl_id, 10, 11); CHECK_I(ret, "H5Pset_shared_mesg_phase_change"); - fid = H5Fcreate(filename, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); + fid = H5Fcreate(FILENAME, H5F_ACC_TRUNC, fcpl_id, H5P_DEFAULT); CHECK_I(fid, "H5Fcreate"); /* Clean up */ |