diff options
-rw-r--r-- | test/th5s.c | 5 | ||||
-rw-r--r-- | test/tselect.c | 5 |
2 files changed, 10 insertions, 0 deletions
diff --git a/test/th5s.c b/test/th5s.c index 000ca2f..6b4a66c 100644 --- a/test/th5s.c +++ b/test/th5s.c @@ -161,6 +161,7 @@ test_h5s_scalar_write(void) unsigned rank; /* Logical rank of dataspace */ hsize_t tdims[4]; /* Dimension array to test with */ size_t n; /* Number of dataspace elements */ + H5S_class_t ext_type; /* Extent type */ herr_t ret; /* Generic return value */ /* Output message about test being performed */ @@ -185,6 +186,10 @@ test_h5s_scalar_write(void) ret = H5Sextent_dims(sid1, tdims, NULL); VERIFY(ret, 0, "H5Sextent_dims"); + /* Verify extent type */ + ext_type = H5Sextent_class(sid1); + VERIFY(ext_type, H5S_SCALAR, "H5Sextent_class"); + /* Create a dataset */ dataset=H5Dcreate(fid1,"Dataset1",H5T_NATIVE_UINT,sid1,H5P_DEFAULT); CHECK(dataset, FAIL, "H5Dcreate"); diff --git a/test/tselect.c b/test/tselect.c index 39ebaa2..d61dae8 100644 --- a/test/tselect.c +++ b/test/tselect.c @@ -80,6 +80,7 @@ test_select_hyper(void) *tbuf2; /* temporary buffer pointer */ intn i,j; /* Counters */ herr_t ret; /* Generic return value */ + H5S_class_t ext_type; /* Extent type */ /* Output message about test being performed */ MESSAGE(5, ("Testing Hyperslab Selection Functions\n")); @@ -105,6 +106,10 @@ test_select_hyper(void) sid2 = H5Screate_simple(SPACE2_RANK, dims2, NULL); CHECK(sid2, FAIL, "H5Screate_simple"); + /* Verify extent type */ + ext_type = H5Sextent_class(sid1); + VERIFY(ext_type, H5S_SIMPLE, "H5Sextent_class"); + /* Select 2x15x13 hyperslab for disk dataset */ start[0]=1; start[1]=0; start[2]=0; stride[0]=1; stride[1]=1; stride[2]=1; |