summaryrefslogtreecommitdiffstats
path: root/test/th5d.c
diff options
context:
space:
mode:
authorQuincey Koziol <koziol@hdfgroup.org>1997-09-24 16:18:50 (GMT)
committerQuincey Koziol <koziol@hdfgroup.org>1997-09-24 16:18:50 (GMT)
commitef094d25b6c10e024d56f7557d7d092ba03c4aee (patch)
tree3f80f17fc44a805f703aa85619b0777159790eb7 /test/th5d.c
parentde68722fb97bdbd063224bcbb984bed32ba8c27e (diff)
downloadhdf5-ef094d25b6c10e024d56f7557d7d092ba03c4aee.zip
hdf5-ef094d25b6c10e024d56f7557d7d092ba03c4aee.tar.gz
hdf5-ef094d25b6c10e024d56f7557d7d092ba03c4aee.tar.bz2
[svn-r109] Initialized test datasets better and cleaned up a few typos.
Diffstat (limited to 'test/th5d.c')
-rw-r--r--test/th5d.c35
1 files changed, 23 insertions, 12 deletions
diff --git a/test/th5d.c b/test/th5d.c
index 7cf2b39..39e0f35 100644
--- a/test/th5d.c
+++ b/test/th5d.c
@@ -48,7 +48,7 @@ static char RcsId[] = "$Revision$";
/* 3-d 32-bit integer dataset */
#define DATA1_NAME "Data1"
-int32 data1[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3]={1,2,3,4,5,6};
+int32 data1[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3];
/* 4-D dataset with fixed dimensions */
#define SPACE2_NAME "Space2"
@@ -66,8 +66,25 @@ int32 data1[SPACE1_DIM1][SPACE1_DIM2][SPACE1_DIM3]={1,2,3,4,5,6};
/* 4-d 64-bit floating-point dataset */
#define DATA2_NAME "Data2"
-float64 data2[SPACE2_DIM1][SPACE2_DIM2][SPACE2_DIM3][SPACE2_DIM4]=
- {0.5,1.0,2.0,4.0,8.0,16.0,32.0};
+float64 data2[SPACE2_DIM1][SPACE2_DIM2][SPACE2_DIM3][SPACE2_DIM4];
+
+/****************************************************************
+**
+** init_data(): Initialize data arrays.
+**
+****************************************************************/
+static void init_data(void)
+{
+ int32 *ip;
+ float64 *fp;
+ uintn u;
+
+ for(ip=(int32 *)data1, u=0; u<(SPACE1_DIM1*SPACE1_DIM2*SPACE1_DIM3); u++)
+ *ip++=(int32)u*2;
+
+ for(fp=(float64 *)data2, u=0; u<(SPACE2_DIM1*SPACE2_DIM2*SPACE2_DIM3*SPACE2_DIM4); u++)
+ *fp++=((float64)u/4.0);
+}
/****************************************************************
**
@@ -121,6 +138,7 @@ static void test_h5d_basic_write(void)
ret=H5Mrelease(tid1);
CHECK(ret,FAIL,"H5Mrelease");
+ /* Write second dataset out */
sid2=H5Mcreate(fid1,H5_DATASPACE,SPACE2_NAME);
CHECK(sid1,FAIL,"H5Mcreate");
@@ -187,19 +205,11 @@ static void test_h5d_basic_read(void)
fid1=H5Fopen(FILE,0,0);
CHECK(fid1,FAIL,"H5Fopen");
-#if 0
- oid1=H5Mfind_name(fid1,H5_DATASET,DATA1_NAME);
- CHECK(oid1,FAIL,"H5Mfind_name");
-
- did1=H5Maccess(oid1);
- CHECK(did1,FAIL,"H5Maccess");
-#else
did1 = H5Mfind_name (fid1, H5_DATASET, DATA1_NAME);
CHECK (did1, FAIL, "H5Mfind_name");
-#endif
ret=H5Dget_info(did1,&tid1,&sid1);
- CHECK(ret,FAIL,"H5Pset_space");
+ CHECK(ret,FAIL,"H5Pget_info");
ret=H5Tis_atomic(tid1);
VERIFY(ret,BTRUE,"H5Tis_atomic");
@@ -246,6 +256,7 @@ void test_h5d(void)
/* Output message about test being performed */
MESSAGE(5, ("Testing datasets\n"));
+ init_data(); /* initialize data arrays */
test_h5d_basic_write(); /* Test basic H5D writing code */
test_h5d_basic_read(); /* Test basic H5D reading code */
} /* test_h5d() */