summaryrefslogtreecommitdiffstats
path: root/test/btree2.c
diff options
context:
space:
mode:
Diffstat (limited to 'test/btree2.c')
-rw-r--r--test/btree2.c916
1 files changed, 417 insertions, 499 deletions
diff --git a/test/btree2.c b/test/btree2.c
index 9ac6571..dfb024a 100644
--- a/test/btree2.c
+++ b/test/btree2.c
@@ -54,8 +54,6 @@ const char *FILENAME[] = {
* Programmer: Quincey Koziol
* Wednesday, February 16, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -84,8 +82,6 @@ iter_cb(const void *_record, void *_op_data)
* Programmer: Quincey Koziol
* Thursday, February 24, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -113,8 +109,6 @@ find_cb(const void *_record, void *_op_data)
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -141,8 +135,6 @@ neighbor_cb(const void *_record, void *_op_data)
* Programmer: Quincey Koziol
* Friday, March 10, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -170,52 +162,47 @@ modify_cb(void *_record, void *_op_data, hbool_t *changed)
* Programmer: Quincey Koziol
* Thursday, February 3, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
test_insert_basic(hid_t fapl)
{
- hid_t file=-1;
- char filename[1024];
- H5F_t *f=NULL;
+ hid_t file = -1; /* File ID */
+ char filename[1024]; /* Filename to use */
+ H5F_t *f = NULL; /* Internal file object pointer */
hsize_t record; /* Record to insert into tree */
hsize_t idx; /* Index within B-tree, for iterator */
haddr_t bt2_addr; /* Address of B-tree created */
herr_t ret; /* Generic error return value */
- h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
+ /* Set the filename to use for this test (dependent on fapl) */
+ h5_fixname(FILENAME[0], fapl, filename, sizeof(filename));
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if((file = H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl)) < 0)
+ TEST_ERROR
/* Get a pointer to the internal file object */
- if (NULL==(f=H5I_object(file))) {
- H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
- }
+ if(NULL == (f = H5I_object(file)))
+ STACK_ERROR
/*
* Test v2 B-tree creation
*/
TESTING("B-tree creation");
- if (H5B2_create(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, 512, 8, 100, 40, &bt2_addr/*out*/)<0) {
- H5_FAILED();
- H5Eprint_stack(H5E_DEFAULT, stdout);
- goto error;
- }
+ if(H5B2_create(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, 512, 8, 100, 40, &bt2_addr/*out*/) < 0)
+ FAIL_STACK_ERROR
+ if(!H5F_addr_defined(bt2_addr))
+ FAIL_STACK_ERROR
PASSED();
/* Attempt to iterate over a B-tree with no records */
idx = 0;
- if(H5B2_iterate(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, iter_cb, &idx)<0) {
- H5_FAILED();
- H5Eprint_stack(H5E_DEFAULT, stdout);
- goto error;
- }
+ if(H5B2_iterate(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, iter_cb, &idx) < 0)
+ FAIL_STACK_ERROR
/* Make certain that the index hasn't changed */
- if(idx != 0) TEST_ERROR;
+ if(idx != 0)
+ TEST_ERROR
/* Attempt to find record in B-tree with no records */
idx = 0;
@@ -223,7 +210,8 @@ test_insert_basic(hid_t fapl)
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/* Attempt to index record in B-tree with no records */
idx = 0;
@@ -231,18 +219,16 @@ test_insert_basic(hid_t fapl)
ret = H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/*
* Test inserting record into v2 B-tree
*/
TESTING("B-tree insert: several records");
- record=42;
- if (H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
- H5_FAILED();
- H5Eprint_stack(H5E_DEFAULT, stdout);
- goto error;
- }
+ record = 42;
+ if(H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record) < 0)
+ FAIL_STACK_ERROR
/* Attempt to find non-existant record in B-tree with 1 record */
idx = 41;
@@ -250,21 +236,25 @@ test_insert_basic(hid_t fapl)
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/* Try again with NULL 'op' */
H5E_BEGIN_TRY {
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, NULL, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/* Attempt to find existant record in B-tree with 1 record */
idx = 42;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0)
+ TEST_ERROR
/* Try again with NULL 'op' */
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, NULL, NULL)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, NULL, NULL)<0)
+ TEST_ERROR
/* Attempt to index non-existant record in B-tree with 1 record */
idx = 0;
@@ -272,41 +262,34 @@ test_insert_basic(hid_t fapl)
ret = H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)1, find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/* Attempt to index existing record in B-tree with 1 record */
idx = 42;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, &idx)<0)
+ TEST_ERROR
/*
* Test inserting second record into v2 B-tree, before all other records
*/
- record=34;
- if (H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
- H5_FAILED();
- H5Eprint_stack(H5E_DEFAULT, stdout);
- goto error;
- }
+ record = 34;
+ if(H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record) < 0)
+ FAIL_STACK_ERROR
/*
* Test inserting third record into v2 B-tree, after all other records
*/
- record=56;
- if (H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
- H5_FAILED();
- H5Eprint_stack(H5E_DEFAULT, stdout);
- goto error;
- }
+ record = 56;
+ if(H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record) < 0)
+ FAIL_STACK_ERROR
/*
* Test inserting fourth record into v2 B-tree, in the middle of other records
*/
- record=38;
- if (H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
- H5_FAILED();
- H5Eprint_stack(H5E_DEFAULT, stdout);
- goto error;
- }
+ record = 38;
+ if(H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record) < 0)
+ FAIL_STACK_ERROR
/* Attempt to find non-existant record in level-0 B-tree with several records */
idx = 41;
@@ -314,11 +297,13 @@ test_insert_basic(hid_t fapl)
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/* Attempt to find existant record in level-0 B-tree with several record */
idx = 56;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0)
+ TEST_ERROR
/* Attempt to index non-existant record in B-tree with several records */
idx = 0;
@@ -326,29 +311,37 @@ test_insert_basic(hid_t fapl)
ret = H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)4, find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL)
+ TEST_ERROR
/* Attempt to index existing record in B-tree with several records */
idx = 34;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, &idx)<0)
+ TEST_ERROR
idx = 38;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)1, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)1, find_cb, &idx)<0)
+ TEST_ERROR
idx = 42;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)2, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)2, find_cb, &idx)<0)
+ TEST_ERROR
idx = 56;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)3, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)3, find_cb, &idx)<0)
+ TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ /* Close the file */
+ if(H5Fclose(file)<0)
+ TEST_ERROR
- return 0;
+ /* All tests passed */
+ return(0);
error:
H5E_BEGIN_TRY {
H5Fclose(file);
} H5E_END_TRY;
- return 1;
+ return(1);
} /* test_insert_basic() */
@@ -367,8 +360,6 @@ error:
* Programmer: Quincey Koziol
* Thursday, February 3, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -386,7 +377,7 @@ test_insert_split_root(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -438,7 +429,7 @@ test_insert_split_root(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC+2)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC+2)) TEST_ERROR
/* Attempt to find non-existant record in level-1 B-tree */
idx = INSERT_SPLIT_ROOT_NREC + 10;
@@ -446,15 +437,15 @@ test_insert_split_root(hid_t fapl)
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Attempt to find existant record in root of level-1 B-tree */
idx = 33;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR
/* Attempt to find existant record in leaf of level-1 B-tree */
idx = 56;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR
/* Attempt to index non-existant record in level-1 B-tree */
idx = 0;
@@ -462,23 +453,23 @@ test_insert_split_root(hid_t fapl)
ret = H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)(INSERT_SPLIT_ROOT_NREC+2), find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Attempt to index existing record in root of level-1 B-tree */
idx = 33;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)33, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)33, find_cb, &idx)<0) TEST_ERROR
/* Attempt to index existing record in left leaf of level-1 B-tree */
idx = 0;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)0, find_cb, &idx)<0) TEST_ERROR
/* Attempt to index existing record in right leaf of level-1 B-tree */
idx = 50;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)50, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)50, find_cb, &idx)<0) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -506,8 +497,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, February 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -523,7 +512,7 @@ test_insert_level1_2leaf_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -601,7 +590,7 @@ test_insert_level1_2leaf_redistrib(hid_t fapl)
}
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -629,8 +618,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, February 9, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -646,7 +633,7 @@ test_insert_level1_2leaf_split(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -724,7 +711,7 @@ test_insert_level1_2leaf_split(hid_t fapl)
}
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -753,8 +740,6 @@ error:
* Programmer: Quincey Koziol
* Thursday, February 10, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -771,7 +756,7 @@ test_insert_level1_3leaf_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -822,11 +807,11 @@ test_insert_level1_3leaf_redistrib(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -855,8 +840,6 @@ error:
* Programmer: Quincey Koziol
* Thursday, February 10, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -872,7 +855,7 @@ test_insert_level1_3leaf_split(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -915,7 +898,7 @@ test_insert_level1_3leaf_split(hid_t fapl)
}
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -940,8 +923,6 @@ error:
* Programmer: Quincey Koziol
* Friday, February 11, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -959,7 +940,7 @@ test_insert_make_level2(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1037,7 +1018,7 @@ test_insert_make_level2(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*11)+4) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*11)+4) TEST_ERROR
/* Attempt to find non-existant record in level-1 B-tree */
idx = INSERT_SPLIT_ROOT_NREC*12;
@@ -1045,19 +1026,19 @@ test_insert_make_level2(hid_t fapl)
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Attempt to find existant record in root of level-2 B-tree */
idx = 433;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR
/* Attempt to find existant record in internal node of level-2 B-tree */
idx = 259;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR
/* Attempt to find existant record in leaf of level-2 B-tree */
idx = 346;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR
/* Attempt to index non-existant record in level-1 B-tree */
idx = 0;
@@ -1065,23 +1046,23 @@ test_insert_make_level2(hid_t fapl)
ret = H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)(INSERT_SPLIT_ROOT_NREC*12), find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Attempt to index existing record in root of level-2 B-tree */
idx = 433;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)433, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)433, find_cb, &idx)<0) TEST_ERROR
/* Attempt to index existing record in internal node of level-2 B-tree */
idx = 734;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)734, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)734, find_cb, &idx)<0) TEST_ERROR
/* Attempt to index existing record in leaf of level-2 B-tree */
idx = 883;
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)883, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)883, find_cb, &idx)<0) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1107,8 +1088,6 @@ error:
* Programmer: Quincey Koziol
* Thursday, February 17, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1125,7 +1104,7 @@ test_insert_level2_leaf_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1203,11 +1182,11 @@ test_insert_level2_leaf_redistrib(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*12)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*12)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1233,8 +1212,6 @@ error:
* Programmer: Quincey Koziol
* Thursday, February 17, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1251,7 +1228,7 @@ test_insert_level2_leaf_split(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1329,11 +1306,11 @@ test_insert_level2_leaf_split(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*14)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*14)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1360,8 +1337,6 @@ error:
* Programmer: Quincey Koziol
* Friday, February 18, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1378,7 +1353,7 @@ test_insert_level2_2internal_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1434,11 +1409,11 @@ test_insert_level2_2internal_redistrib(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*19)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*19)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1465,8 +1440,6 @@ error:
* Programmer: Quincey Koziol
* Friday, February 18, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1483,7 +1456,7 @@ test_insert_level2_2internal_split(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1539,11 +1512,11 @@ test_insert_level2_2internal_split(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*29)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*29)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1571,8 +1544,6 @@ error:
* Programmer: Quincey Koziol
* Saturday, February 19, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1589,7 +1560,7 @@ test_insert_level2_3internal_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1642,11 +1613,11 @@ test_insert_level2_3internal_redistrib(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*34)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*34)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1674,8 +1645,6 @@ error:
* Programmer: Quincey Koziol
* Saturday, February 19, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1692,7 +1661,7 @@ test_insert_level2_3internal_split(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1745,11 +1714,11 @@ test_insert_level2_3internal_split(hid_t fapl)
}
/* Make certain that the index is correct */
- if(idx != (INSERT_SPLIT_ROOT_NREC*41)) TEST_ERROR;
+ if(idx != (INSERT_SPLIT_ROOT_NREC*41)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -1774,8 +1743,6 @@ error:
* Programmer: Quincey Koziol
* Saturday, February 19, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1804,7 +1771,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
HDsrandom((unsigned long)curr_time);
/* Allocate space for the records */
- if((records = HDmalloc(sizeof(hsize_t)*INSERT_MANY))==NULL) TEST_ERROR;
+ if((records = HDmalloc(sizeof(hsize_t)*INSERT_MANY))==NULL) TEST_ERROR
/* Initialize record #'s */
for(u=0; u<INSERT_MANY; u++)
@@ -1821,7 +1788,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -1868,7 +1835,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
}
/* Make certain that the index is correct */
- if(idx != INSERT_MANY) TEST_ERROR;
+ if(idx != INSERT_MANY) TEST_ERROR
/* Attempt to find non-existant record in level-4 B-tree */
idx = INSERT_MANY*2;
@@ -1876,7 +1843,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
ret = H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Find random records */
for(u=0; u<FIND_MANY; u++) {
@@ -1884,7 +1851,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
idx = (hsize_t)(HDrandom()%INSERT_MANY);
/* Attempt to find existant record in root of level-4 B-tree */
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &idx, find_cb, &idx)<0) TEST_ERROR
} /* end for */
/* Attempt to index non-existant record in level-4 B-tree */
@@ -1893,7 +1860,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
ret = H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, (hsize_t)(INSERT_MANY*3), find_cb, NULL);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Find random records */
for(u=0; u<FIND_MANY; u++) {
@@ -1901,7 +1868,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
idx = (hsize_t)(HDrandom()%INSERT_MANY);
/* Attempt to find existant record in root of level-4 B-tree */
- if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, idx, find_cb, &idx)<0) TEST_ERROR;
+ if(H5B2_index(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, idx, find_cb, &idx)<0) TEST_ERROR
} /* end for */
PASSED();
@@ -1913,7 +1880,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
ret = H5B2_insert(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -1923,11 +1890,11 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != INSERT_MANY) TEST_ERROR;
+ if(nrec != INSERT_MANY) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
HDfree(records);
@@ -1954,8 +1921,6 @@ error:
* Programmer: Quincey Koziol
* Friday, February 25, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -1973,12 +1938,12 @@ test_remove_basic(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -1998,7 +1963,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 0) TEST_ERROR;
+ if(nrec != 0) TEST_ERROR
/* Attempt to remove a record from a B-tree with no records */
TESTING("B-tree remove: record from empty B-tree");
@@ -2007,7 +1972,7 @@ test_remove_basic(hid_t fapl)
ret = H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
PASSED();
@@ -2027,17 +1992,17 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 1) TEST_ERROR;
+ if(nrec != 1) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove a non-existant record from a B-tree with 1 record */
TESTING("B-tree remove: non-existant record from 1 record B-tree");
@@ -2046,7 +2011,7 @@ test_remove_basic(hid_t fapl)
ret = H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
PASSED();
@@ -2060,7 +2025,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 42) TEST_ERROR;
+ if(record != 42) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2070,17 +2035,17 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 0) TEST_ERROR;
+ if(nrec != 0) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the root node has been freed */
- if(H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(H5F_addr_defined(root_addr)) TEST_ERROR
PASSED();
@@ -2120,7 +2085,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 4) TEST_ERROR;
+ if(nrec != 4) TEST_ERROR
PASSED();
@@ -2131,7 +2096,7 @@ test_remove_basic(hid_t fapl)
ret = H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
PASSED();
@@ -2145,7 +2110,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 42) TEST_ERROR;
+ if(record != 42) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2155,17 +2120,17 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 3) TEST_ERROR;
+ if(nrec != 3) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the root node has not been freed */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
record = 34;
if(H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
@@ -2175,7 +2140,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 34) TEST_ERROR;
+ if(record != 34) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2185,17 +2150,17 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 2) TEST_ERROR;
+ if(nrec != 2) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the root node has not been freed */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
record = 56;
if(H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
@@ -2205,7 +2170,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 56) TEST_ERROR;
+ if(record != 56) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2215,17 +2180,17 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 1) TEST_ERROR;
+ if(nrec != 1) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the root node has not been freed */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
record = 38;
if(H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
@@ -2235,7 +2200,7 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 38) TEST_ERROR;
+ if(record != 38) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2245,21 +2210,21 @@ test_remove_basic(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != 0) TEST_ERROR;
+ if(nrec != 0) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the root node has been freed */
- if(H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(H5F_addr_defined(root_addr)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -2283,8 +2248,6 @@ error:
* Programmer: Quincey Koziol
* Friday, February 25, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -2303,12 +2266,12 @@ test_remove_level1_noredistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -2338,17 +2301,17 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove a non-existant record from a B-tree with 1 record */
TESTING("B-tree remove: non-existant record from level-1 B-tree");
@@ -2357,7 +2320,7 @@ test_remove_level1_noredistrib(hid_t fapl)
ret = H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2367,7 +2330,7 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
PASSED();
@@ -2381,7 +2344,7 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*2)-2)) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*2)-2)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2391,7 +2354,7 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-1)) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-1)) TEST_ERROR
PASSED();
@@ -2405,7 +2368,7 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 0) TEST_ERROR;
+ if(record != 0) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2415,7 +2378,7 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-2)) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-2)) TEST_ERROR
PASSED();
@@ -2429,7 +2392,7 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != INSERT_SPLIT_ROOT_NREC) TEST_ERROR;
+ if(record != INSERT_SPLIT_ROOT_NREC) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2439,11 +2402,11 @@ test_remove_level1_noredistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-3)) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-3)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -2467,8 +2430,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -2486,12 +2447,12 @@ test_remove_level1_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -2521,17 +2482,17 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove enough records from right leaf of a level-1 B-tree to force redistribution */
TESTING("B-tree remove: redistribute 2 leaves in level-1 B-tree (r->l)");
@@ -2544,7 +2505,7 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2554,7 +2515,7 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
@@ -2570,7 +2531,7 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != u) TEST_ERROR;
+ if(record != u) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2580,7 +2541,7 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (((INSERT_SPLIT_ROOT_NREC*2)-(INSERT_SPLIT_ROOT_NREC/2))-(u+1))) TEST_ERROR;
+ if(nrec != (((INSERT_SPLIT_ROOT_NREC*2)-(INSERT_SPLIT_ROOT_NREC/2))-(u+1))) TEST_ERROR
} /* end for */
PASSED();
@@ -2596,7 +2557,7 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (((INSERT_SPLIT_ROOT_NREC/4)*3) + u)) TEST_ERROR;
+ if(record != (((INSERT_SPLIT_ROOT_NREC/4)*3) + u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2606,12 +2567,12 @@ test_remove_level1_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (((INSERT_SPLIT_ROOT_NREC*2)-(3*(INSERT_SPLIT_ROOT_NREC/4)))-(u+1))) TEST_ERROR;
+ if(nrec != (((INSERT_SPLIT_ROOT_NREC*2)-(3*(INSERT_SPLIT_ROOT_NREC/4)))-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -2635,8 +2596,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -2654,12 +2613,12 @@ test_remove_level1_2leaf_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -2689,17 +2648,17 @@ test_remove_level1_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove enough records from right leaf of a level-1 B-tree to force redistribution */
TESTING("B-tree remove: merge 2 leaves to 1 in level-1 B-tree (r->l)");
@@ -2712,7 +2671,7 @@ test_remove_level1_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2722,7 +2681,7 @@ test_remove_level1_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
@@ -2750,7 +2709,7 @@ test_remove_level1_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != u) TEST_ERROR;
+ if(record != u) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2760,12 +2719,12 @@ test_remove_level1_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -2789,8 +2748,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -2808,12 +2765,12 @@ test_remove_level1_3leaf_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -2843,17 +2800,17 @@ test_remove_level1_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove enough records from middle leaf of a level-1 B-tree to force merge */
TESTING("B-tree remove: merge 3 leaves to 2 in level-1 B-tree");
@@ -2866,7 +2823,7 @@ test_remove_level1_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC/2)+3+u)) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC/2)+3+u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2876,12 +2833,12 @@ test_remove_level1_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -2905,8 +2862,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -2924,12 +2879,12 @@ test_remove_level1_promote(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -2959,17 +2914,17 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*3)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*3)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from root node of a level-1 B-tree to force promotion from right leaf */
TESTING("B-tree remove: promote from right leaf of level-1 B-tree");
@@ -2981,7 +2936,7 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 181) TEST_ERROR;
+ if(record != 181) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -2991,7 +2946,7 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*3)-1) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*3)-1) TEST_ERROR
PASSED();
@@ -3005,7 +2960,7 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 42) TEST_ERROR;
+ if(record != 42) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3015,7 +2970,7 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*3)-2) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*3)-2) TEST_ERROR
PASSED();
@@ -3029,7 +2984,7 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 85) TEST_ERROR;
+ if(record != 85) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3039,11 +2994,11 @@ test_remove_level1_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*3)-3) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*3)-3) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3067,8 +3022,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3086,12 +3039,12 @@ test_remove_level1_promote_2leaf_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3121,17 +3074,17 @@ test_remove_level1_promote_2leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from root node of a level-1 B-tree to force promotion from right leaf */
TESTING("B-tree remove: promote from leaf of level-1 B-tree w/2 node redistrib");
@@ -3146,7 +3099,7 @@ test_remove_level1_promote_2leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3156,7 +3109,7 @@ test_remove_level1_promote_2leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
record = 101;
@@ -3167,7 +3120,7 @@ test_remove_level1_promote_2leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 101) TEST_ERROR;
+ if(record != 101) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3177,11 +3130,11 @@ test_remove_level1_promote_2leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-34) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-34) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3205,8 +3158,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3224,12 +3175,12 @@ test_remove_level1_promote_3leaf_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3259,17 +3210,17 @@ test_remove_level1_promote_3leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from root node of a level-1 B-tree to force promotion from middle leaf */
TESTING("B-tree remove: promote from leaf of level-1 B-tree w/3 node redistrib");
@@ -3284,7 +3235,7 @@ test_remove_level1_promote_3leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (43 + u)) TEST_ERROR;
+ if(record != (43 + u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3294,7 +3245,7 @@ test_remove_level1_promote_3leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
record = 42;
@@ -3305,7 +3256,7 @@ test_remove_level1_promote_3leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 42) TEST_ERROR;
+ if(record != 42) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3315,11 +3266,11 @@ test_remove_level1_promote_3leaf_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-34) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-34) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3343,8 +3294,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3362,12 +3311,12 @@ test_remove_level1_promote_2leaf_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3397,17 +3346,17 @@ test_remove_level1_promote_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from root node of a level-1 B-tree to force promotion from right leaf */
TESTING("B-tree remove: promote from leaf of level-1 B-tree w/2->1 merge");
@@ -3422,7 +3371,7 @@ test_remove_level1_promote_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3432,7 +3381,7 @@ test_remove_level1_promote_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
record = 68;
@@ -3443,7 +3392,7 @@ test_remove_level1_promote_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 68) TEST_ERROR;
+ if(record != 68) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3453,11 +3402,11 @@ test_remove_level1_promote_2leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-67) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-67) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3481,8 +3430,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3500,12 +3447,12 @@ test_remove_level1_promote_3leaf_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3535,17 +3482,17 @@ test_remove_level1_promote_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from root node of a level-1 B-tree to force promotion from middle leaf */
TESTING("B-tree remove: promote from leaf of level-1 B-tree w/3->2 merge");
@@ -3560,7 +3507,7 @@ test_remove_level1_promote_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (43 + u)) TEST_ERROR;
+ if(record != (43 + u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3570,7 +3517,7 @@ test_remove_level1_promote_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*2)-(u+1))) TEST_ERROR
} /* end for */
record = 26;
@@ -3581,7 +3528,7 @@ test_remove_level1_promote_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 26) TEST_ERROR;
+ if(record != 26) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3591,11 +3538,11 @@ test_remove_level1_promote_3leaf_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-82) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*2)-82) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3619,8 +3566,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3638,12 +3583,12 @@ test_remove_level1_collapse(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3673,17 +3618,17 @@ test_remove_level1_collapse(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove records from B-tree to force a single leaf for the B-tree */
TESTING("B-tree remove: collapse level-1 B-tree back to level-0");
@@ -3696,7 +3641,7 @@ test_remove_level1_collapse(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (INSERT_SPLIT_ROOT_NREC - (u+1))) TEST_ERROR;
+ if(record != (INSERT_SPLIT_ROOT_NREC - (u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3706,12 +3651,12 @@ test_remove_level1_collapse(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC-(u+1))) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3735,8 +3680,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 4, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3754,12 +3697,12 @@ test_remove_level2_promote(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3789,17 +3732,17 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from right internal node of a level-2 B-tree to force promotion */
TESTING("B-tree remove: promote from right internal of level-2 B-tree");
@@ -3811,7 +3754,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 1632) TEST_ERROR;
+ if(record != 1632) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3821,7 +3764,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-1) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-1) TEST_ERROR
PASSED();
@@ -3835,7 +3778,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 1117) TEST_ERROR;
+ if(record != 1117) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3845,7 +3788,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-2) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-2) TEST_ERROR
PASSED();
@@ -3859,7 +3802,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 1246) TEST_ERROR;
+ if(record != 1246) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3869,7 +3812,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-3) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-3) TEST_ERROR
PASSED();
@@ -3883,7 +3826,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 1074) TEST_ERROR;
+ if(record != 1074) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3893,7 +3836,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-4) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-4) TEST_ERROR
record = 558;
if(H5B2_remove(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record)<0) {
@@ -3903,7 +3846,7 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 558) TEST_ERROR;
+ if(record != 558) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -3913,11 +3856,11 @@ test_remove_level2_promote(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-5) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-5) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -3941,8 +3884,6 @@ error:
* Programmer: Quincey Koziol
* Monday, March 7, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -3960,12 +3901,12 @@ test_remove_level2_promote_2internal_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -3995,17 +3936,17 @@ test_remove_level2_promote_2internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from right internal node of a level-2 B-tree to force promotion w/redistribution */
TESTING("B-tree remove: promote from right internal of level-2 B-tree w/redistrib");
@@ -4018,7 +3959,7 @@ test_remove_level2_promote_2internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*21) - (u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*21) - (u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4028,7 +3969,7 @@ test_remove_level2_promote_2internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
record = 1632;
@@ -4039,7 +3980,7 @@ test_remove_level2_promote_2internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 1632) TEST_ERROR;
+ if(record != 1632) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4049,11 +3990,11 @@ test_remove_level2_promote_2internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-23) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-23) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4077,8 +4018,6 @@ error:
* Programmer: Quincey Koziol
* Monday, March 7, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4096,12 +4035,12 @@ test_remove_level2_promote_3internal_redistrib(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4131,17 +4070,17 @@ test_remove_level2_promote_3internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from right internal node of a level-2 B-tree to force promotion w/redistribution */
TESTING("B-tree remove: promote from right internal of level-2 B-tree w/redistrib");
@@ -4154,7 +4093,7 @@ test_remove_level2_promote_3internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (43 + u)) TEST_ERROR;
+ if(record != (43 + u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4164,7 +4103,7 @@ test_remove_level2_promote_3internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
record = 42;
@@ -4175,7 +4114,7 @@ test_remove_level2_promote_3internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 42) TEST_ERROR;
+ if(record != 42) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4185,11 +4124,11 @@ test_remove_level2_promote_3internal_redistrib(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-18) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-18) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4213,8 +4152,6 @@ error:
* Programmer: Quincey Koziol
* Monday, March 7, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4232,12 +4169,12 @@ test_remove_level2_promote_2internal_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4267,17 +4204,17 @@ test_remove_level2_promote_2internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from right internal node of a level-2 B-tree to force promotion w/redistribution */
TESTING("B-tree remove: promote from right internal of level-2 B-tree w/redistrib");
@@ -4290,7 +4227,7 @@ test_remove_level2_promote_2internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*21) - (u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*21) - (u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4300,7 +4237,7 @@ test_remove_level2_promote_2internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
record = 1616;
@@ -4311,7 +4248,7 @@ test_remove_level2_promote_2internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 1616) TEST_ERROR;
+ if(record != 1616) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4321,11 +4258,11 @@ test_remove_level2_promote_2internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-39) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-39) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4349,8 +4286,6 @@ error:
* Programmer: Quincey Koziol
* Monday, March 7, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4368,12 +4303,12 @@ test_remove_level2_promote_3internal_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4403,17 +4338,17 @@ test_remove_level2_promote_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from right internal node of a level-2 B-tree to force promotion w/redistribution */
TESTING("B-tree remove: promote from right internal of level-2 B-tree w/redistrib");
@@ -4426,7 +4361,7 @@ test_remove_level2_promote_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (43 + u)) TEST_ERROR;
+ if(record != (43 + u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4436,7 +4371,7 @@ test_remove_level2_promote_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
record = 26;
@@ -4447,7 +4382,7 @@ test_remove_level2_promote_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != 26) TEST_ERROR;
+ if(record != 26) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4457,11 +4392,11 @@ test_remove_level2_promote_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-50) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)-50) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4485,8 +4420,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4504,12 +4437,12 @@ test_remove_level2_2internal_merge_left(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4539,17 +4472,17 @@ test_remove_level2_2internal_merge_left(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove records from a level-2 B-tree to force 2 internal nodes to merge */
TESTING("B-tree remove: merge 2 internal nodes to 1 in level-2 B-tree (l->r)");
@@ -4562,7 +4495,7 @@ test_remove_level2_2internal_merge_left(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != u) TEST_ERROR;
+ if(record != u) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4572,12 +4505,12 @@ test_remove_level2_2internal_merge_left(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4601,8 +4534,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4620,12 +4551,12 @@ test_remove_level2_2internal_merge_right(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4655,17 +4586,17 @@ test_remove_level2_2internal_merge_right(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove records from a level-2 B-tree to force 2 internal nodes to merge */
TESTING("B-tree remove: merge 2 internal nodes to 1 in level-2 B-tree (r->l)");
@@ -4678,7 +4609,7 @@ test_remove_level2_2internal_merge_right(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*21) - (u + 1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*21) - (u + 1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4688,12 +4619,12 @@ test_remove_level2_2internal_merge_right(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4717,8 +4648,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4736,12 +4665,12 @@ test_remove_level2_3internal_merge(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4771,17 +4700,17 @@ test_remove_level2_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove record from right internal node of a level-2 B-tree to force promotion w/redistribution */
TESTING("B-tree remove: merge 3 internal nodes to 2 in level-2 B-tree");
@@ -4794,7 +4723,7 @@ test_remove_level2_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != (559 + u)) TEST_ERROR;
+ if(record != (559 + u)) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4804,12 +4733,12 @@ test_remove_level2_3internal_merge(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4833,8 +4762,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4852,12 +4779,12 @@ test_remove_level2_collapse_right(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
H5Eprint_stack(H5E_DEFAULT, stdout);
- TEST_ERROR;
+ TEST_ERROR
}
/*
@@ -4887,17 +4814,17 @@ test_remove_level2_collapse_right(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR;
+ if(nrec != (INSERT_SPLIT_ROOT_NREC*21)) TEST_ERROR
/* Query the address of the root node in the B-tree */
- if (H5B2_get_root_addr(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
+ if (H5B2_get_root_addr_test(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &root_addr)<0) {
H5_FAILED();
H5Eprint_stack(H5E_DEFAULT, stdout);
goto error;
} /* end if */
/* Make certain that the address of the root node is defined */
- if(!H5F_addr_defined(root_addr)) TEST_ERROR;
+ if(!H5F_addr_defined(root_addr)) TEST_ERROR
/* Attempt to remove records from a level-2 B-tree to force back to level-1 */
TESTING("B-tree remove: collapse level-1 B-tree back to level-0 (r->l)");
@@ -4910,7 +4837,7 @@ test_remove_level2_collapse_right(hid_t fapl)
} /* end if */
/* Make certain that the record value is correct */
- if(record != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(record != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -4920,12 +4847,12 @@ test_remove_level2_collapse_right(hid_t fapl)
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR;
+ if(nrec != ((INSERT_SPLIT_ROOT_NREC*21)-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -4951,8 +4878,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -4979,7 +4904,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
HDsrandom((unsigned long)curr_time);
/* Allocate space for the records */
- if((records = HDmalloc(sizeof(hsize_t)*INSERT_MANY))==NULL) TEST_ERROR;
+ if((records = HDmalloc(sizeof(hsize_t)*INSERT_MANY))==NULL) TEST_ERROR
/* Initialize record #'s */
for(u=0; u<INSERT_MANY; u++)
@@ -4996,7 +4921,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5049,7 +4974,7 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
} /* end if */
/* Make certain that the record value is correct */
- if(record != records[u]) TEST_ERROR;
+ if(record != records[u]) TEST_ERROR
/* Query the number of records in the B-tree */
if (H5B2_get_nrec(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &nrec)<0) {
@@ -5059,12 +4984,12 @@ HDfprintf(stderr,"curr_time=%lu\n",(unsigned long)curr_time);
} /* end if */
/* Make certain that the # of records is correct */
- if(nrec != (INSERT_MANY-(u+1))) TEST_ERROR;
+ if(nrec != (INSERT_MANY-(u+1))) TEST_ERROR
} /* end for */
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
HDfree(records);
@@ -5092,8 +5017,6 @@ error:
* Programmer: Quincey Koziol
* Tuesday, March 8, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -5110,7 +5033,7 @@ test_find_neighbor(hid_t fapl)
herr_t ret; /* Generic error return value */
/* Allocate space for the records */
- if((records = HDmalloc(sizeof(hsize_t)*FIND_NEIGHBOR))==NULL) TEST_ERROR;
+ if((records = HDmalloc(sizeof(hsize_t)*FIND_NEIGHBOR))==NULL) TEST_ERROR
/* Initialize record #'s */
for(u=0; u<FIND_NEIGHBOR; u++)
@@ -5119,7 +5042,7 @@ test_find_neighbor(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5157,37 +5080,37 @@ test_find_neighbor(hid_t fapl)
ret = H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
search = 1;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 0) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 0) TEST_ERROR
search = 2;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 0) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 0) TEST_ERROR
search = 3;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 2) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 2) TEST_ERROR
search = 4;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 2) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 2) TEST_ERROR
/* Neighbor is in internal node */
search = 85;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 84) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 84) TEST_ERROR
/* Neighbor is in root node */
search = 859;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 858) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 858) TEST_ERROR
search = (FIND_NEIGHBOR * 2) + 1;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != ((FIND_NEIGHBOR-1)*2)) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_LESS, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != ((FIND_NEIGHBOR-1)*2)) TEST_ERROR
PASSED();
@@ -5202,41 +5125,41 @@ test_find_neighbor(hid_t fapl)
ret = H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
search = 0;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 2) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 2) TEST_ERROR
search = 1;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 2) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 2) TEST_ERROR
search = 2;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 4) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 4) TEST_ERROR
search = 3;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 4) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 4) TEST_ERROR
/* Neighbor is in internal node */
search = 599;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 600) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 600) TEST_ERROR
/* Neighbor is in root node */
search = 857;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != 858) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != 858) TEST_ERROR
search = ((FIND_NEIGHBOR-1) * 2) - 1;
- if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR;
- if(record != ((FIND_NEIGHBOR-1)*2)) TEST_ERROR;
+ if(H5B2_neighbor(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, H5B2_COMPARE_GREATER, &search, neighbor_cb, &record)<0) TEST_ERROR
+ if(record != ((FIND_NEIGHBOR-1)*2)) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
HDfree(records);
@@ -5264,8 +5187,6 @@ error:
* Programmer: Quincey Koziol
* Wednesday, March 9, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -5285,19 +5206,19 @@ test_delete(hid_t fapl)
/* Create empty file for size comparisons later */
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Close file */
- if(H5Fclose(file)<0) TEST_ERROR;
+ if(H5Fclose(file)<0) TEST_ERROR
/* Get the size of an empty file */
- if((empty_size=h5_get_file_size(filename))==0) TEST_ERROR;
+ if((empty_size=h5_get_file_size(filename))==0) TEST_ERROR
/* Attempt to delete empty B-tree */
TESTING("B-tree delete: delete empty B-tree");
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5323,13 +5244,13 @@ test_delete(hid_t fapl)
goto error;
} /* end if */
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
/* Get the size of the file */
- if((file_size=h5_get_file_size(filename))==0) TEST_ERROR;
+ if((file_size=h5_get_file_size(filename))==0) TEST_ERROR
/* Verify the file is correct size */
- if(file_size!=empty_size) TEST_ERROR;
+ if(file_size!=empty_size) TEST_ERROR
PASSED();
@@ -5337,7 +5258,7 @@ test_delete(hid_t fapl)
TESTING("B-tree delete: delete level-0 B-tree");
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5373,13 +5294,13 @@ test_delete(hid_t fapl)
goto error;
} /* end if */
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
/* Get the size of the file */
- if((file_size=h5_get_file_size(filename))==0) TEST_ERROR;
+ if((file_size=h5_get_file_size(filename))==0) TEST_ERROR
/* Verify the file is correct size */
- if(file_size!=empty_size) TEST_ERROR;
+ if(file_size!=empty_size) TEST_ERROR
PASSED();
@@ -5387,7 +5308,7 @@ test_delete(hid_t fapl)
TESTING("B-tree delete: delete level-1 B-tree");
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5423,13 +5344,13 @@ test_delete(hid_t fapl)
goto error;
} /* end if */
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
/* Get the size of the file */
- if((file_size=h5_get_file_size(filename))==0) TEST_ERROR;
+ if((file_size=h5_get_file_size(filename))==0) TEST_ERROR
/* Verify the file is correct size */
- if(file_size!=empty_size) TEST_ERROR;
+ if(file_size!=empty_size) TEST_ERROR
PASSED();
@@ -5437,7 +5358,7 @@ test_delete(hid_t fapl)
TESTING("B-tree delete: delete level-2 B-tree");
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5473,13 +5394,13 @@ test_delete(hid_t fapl)
goto error;
} /* end if */
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
/* Get the size of the file */
- if((file_size=h5_get_file_size(filename))==0) TEST_ERROR;
+ if((file_size=h5_get_file_size(filename))==0) TEST_ERROR
/* Verify the file is correct size */
- if(file_size!=empty_size) TEST_ERROR;
+ if(file_size!=empty_size) TEST_ERROR
PASSED();
@@ -5506,8 +5427,6 @@ error:
* Programmer: Quincey Koziol
* Friday, March 10, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
static int
@@ -5526,7 +5445,7 @@ test_modify(hid_t fapl)
h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
/* Create the file to work on */
- if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR;
+ if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0) TEST_ERROR
/* Get a pointer to the internal file object */
if (NULL==(f=H5I_object(file))) {
@@ -5565,7 +5484,7 @@ test_modify(hid_t fapl)
ret = H5B2_modify(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, modify_cb, &modify);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
PASSED();
@@ -5583,8 +5502,8 @@ test_modify(hid_t fapl)
/* Attempt to find modified record */
record = 131;
found = 131;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, find_cb, &found)<0) TEST_ERROR;
- if(found != 131) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, find_cb, &found)<0) TEST_ERROR
+ if(found != 131) TEST_ERROR
/* Attempt to find original record */
record = 130;
@@ -5593,7 +5512,7 @@ test_modify(hid_t fapl)
ret = H5B2_modify(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, modify_cb, &modify);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
PASSED();
@@ -5611,8 +5530,8 @@ test_modify(hid_t fapl)
/* Attempt to find modified record */
record = 237;
found = 237;
- if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, find_cb, &found)<0) TEST_ERROR;
- if(found != 237) TEST_ERROR;
+ if(H5B2_find(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, find_cb, &found)<0) TEST_ERROR
+ if(found != 237) TEST_ERROR
/* Attempt to find original record */
record = 235;
@@ -5621,11 +5540,11 @@ test_modify(hid_t fapl)
ret = H5B2_modify(f, H5P_DATASET_XFER_DEFAULT, H5B2_TEST, bt2_addr, &record, modify_cb, &modify);
} H5E_END_TRY;
/* Should fail */
- if(ret != FAIL) TEST_ERROR;
+ if(ret != FAIL) TEST_ERROR
PASSED();
- if (H5Fclose(file)<0) TEST_ERROR;
+ if (H5Fclose(file)<0) TEST_ERROR
return 0;
@@ -5649,15 +5568,13 @@ error:
* Programmer: Quincey Koziol
* Tuesday, February 1, 2005
*
- * Modifications:
- *
*-------------------------------------------------------------------------
*/
int
main(void)
{
- hid_t fapl=-1;
- int nerrors=0;
+ hid_t fapl = -1; /* File access property list for data files */
+ unsigned nerrors = 0; /* Cumulative error count */
/* Reset library */
h5_reset();
@@ -5713,7 +5630,8 @@ main(void)
/* Test modifying B-tree records */
nerrors += test_modify(fapl);
- if (nerrors) goto error;
+ if(nerrors)
+ goto error;
puts("All v2 B-tree tests passed.");
h5_cleanup(FILENAME, fapl);
return 0;
@@ -5724,5 +5642,5 @@ error:
H5Pclose(fapl);
} H5E_END_TRY;
return 1;
-}
+} /* end main() */