diff options
author | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2008-04-30 19:23:26 (GMT) |
---|---|---|
committer | Scot Breitenfeld <brtnfld@hdfgroup.org> | 2008-04-30 19:23:26 (GMT) |
commit | 5773fd34bc5adf59b4530d95ac9f0c0585902803 (patch) | |
tree | 456ad239799382e1f083fb7fc74399e43b471912 /test/cmpd_dset.c | |
parent | 0138995d1ce2068db1f790503435a2121132d3ad (diff) | |
download | hdf5-5773fd34bc5adf59b4530d95ac9f0c0585902803.zip hdf5-5773fd34bc5adf59b4530d95ac9f0c0585902803.tar.gz hdf5-5773fd34bc5adf59b4530d95ac9f0c0585902803.tar.bz2 |
[svn-r14902] Merged fortran_1_8 branch changes r14505:14901 into the trunk. New fortran wrappers added.
Diffstat (limited to 'test/cmpd_dset.c')
-rw-r--r-- | test/cmpd_dset.c | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/test/cmpd_dset.c b/test/cmpd_dset.c index a03d37e..66993e0 100644 --- a/test/cmpd_dset.c +++ b/test/cmpd_dset.c @@ -1421,32 +1421,32 @@ test_hdf5_src_subset(char *filename, hid_t fapl) /* Create xfer properties to preserve initialized data */ if((dxpl = H5Pcreate(H5P_DATASET_XFER)) < 0) - FAIL_STACK_ERROR + goto error; if(H5Pset_preserve(dxpl, TRUE) < 0) - FAIL_STACK_ERROR + goto error; /* Rewrite contiguous data set */ if((dataset = H5Dopen2(file, DSET_NAME[0], H5P_DEFAULT)) < 0) - FAIL_STACK_ERROR + goto error; /* Write the data to the dataset */ if(H5Dwrite(dataset, rew_tid, H5S_ALL, H5S_ALL, dxpl, rew_buf) < 0) - FAIL_STACK_ERROR + goto error; if(H5Dclose(dataset) < 0) - FAIL_STACK_ERROR + goto error; /* Rewrite chunked data set */ if((dataset = H5Dopen2(file, DSET_NAME[1], H5P_DEFAULT)) < 0) - FAIL_STACK_ERROR + goto error; /* Write the data to the dataset */ if(H5Dwrite(dataset, rew_tid, H5S_ALL, H5S_ALL, dxpl, rew_buf) < 0) - FAIL_STACK_ERROR + goto error; if(H5Dclose(dataset) < 0) - FAIL_STACK_ERROR + goto error; PASSED(); @@ -1458,48 +1458,48 @@ test_hdf5_src_subset(char *filename, hid_t fapl) /* Check contiguous data set */ if((dataset = H5Dopen2(file, DSET_NAME[0], H5P_DEFAULT)) < 0) - FAIL_STACK_ERROR + goto error; if(H5Dread(dataset, dst_tid, H5S_ALL, H5S_ALL, dxpl, rbuf) < 0) - FAIL_STACK_ERROR + goto error; if(compare_data(orig, rbuf, TRUE) < 0) - TEST_ERROR + goto error; if(H5Dclose(dataset) < 0) - FAIL_STACK_ERROR + goto error; /* Check chunked data set */ if((dataset = H5Dopen2(file, DSET_NAME[1], H5P_DEFAULT)) < 0) - FAIL_STACK_ERROR + goto error; if(H5Dread(dataset, dst_tid, H5S_ALL, H5S_ALL, dxpl, rbuf) < 0) - FAIL_STACK_ERROR + goto error; if(compare_data(orig, rbuf, TRUE) < 0) - TEST_ERROR + goto error; if(H5Dclose(dataset) < 0) - FAIL_STACK_ERROR + goto error; /* Finishing test and release resources */ if(H5Sclose(space) < 0) - FAIL_STACK_ERROR + goto error; if(H5Pclose(dcpl) < 0) - FAIL_STACK_ERROR + goto error; if(H5Pclose(dxpl) < 0) - FAIL_STACK_ERROR + goto error; if(H5Tclose(src_tid) < 0) - FAIL_STACK_ERROR + goto error; if(H5Tclose(dst_tid) < 0) - FAIL_STACK_ERROR + goto error; if(H5Tclose(rew_tid) < 0) - FAIL_STACK_ERROR + goto error; if(H5Fclose(file) < 0) - FAIL_STACK_ERROR + goto error; free(orig); free(rbuf); |