From a319837a4fd95c29e6754593264c1429deaa506b Mon Sep 17 00:00:00 2001
From: Quincey Koziol <koziol@hdfgroup.org>
Date: Thu, 25 Jan 2001 12:03:29 -0500
Subject: [svn-r3326] Purpose:     Clean up warnings Description:     The
 "FAILED" macro is defined by Windows and is causing warnings and    
 potential errors when compiled on that platform. Solution:     Change our
 macro from FAILED to H5_FAILED. Platforms tested:     FreeBSD 4.2 (hawkwind)

---
 test/big.c       |   2 +-
 test/bittests.c  |  80 ++++++++++++++++++-------------------
 test/cmpd_dset.c |  30 +++++++-------
 test/dsets.c     |  24 +++++------
 test/dtypes.c    | 118 +++++++++++++++++++++++++++----------------------------
 test/enum.c      |   6 +--
 test/extend.c    |   2 +-
 test/external.c  |  30 +++++++-------
 test/fillval.c   |  24 +++++------
 test/flush2.c    |   2 +-
 test/gheap.c     |  30 +++++++-------
 test/h5test.c    |   2 +-
 test/h5test.h    |   8 ++--
 test/istore.c    |  24 +++++------
 test/lheap.c     |  12 +++---
 test/links.c     |  22 +++++------
 test/mount.c     |  30 +++++++-------
 test/mtime.c     |   4 +-
 test/ohdr.c      |  48 +++++++++++-----------
 test/stab.c      |   2 +-
 test/unlink.c    |   2 +-
 21 files changed, 251 insertions(+), 251 deletions(-)

diff --git a/test/big.c b/test/big.c
index e123a3d..0cc1f12 100644
--- a/test/big.c
+++ b/test/big.c
@@ -311,7 +311,7 @@ reader (hid_t fapl)
 	    else if (buf[j]!=i+1) wrong++;
 	}
 	if (zero) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    %d zero%s\n", zero, 1==zero?"":"s");
 	} else if (wrong) {
 	    SKIPPED();
diff --git a/test/bittests.c b/test/bittests.c
index 2c8daef..a8b8471 100644
--- a/test/bittests.c
+++ b/test/bittests.c
@@ -46,13 +46,13 @@ test_find (void)
     memset (v1, 0xaa, sizeof v1);
     n = H5T_bit_find (v1, 0, 0, H5T_BIT_LSB, TRUE);
     if (-1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Zero length test failed (lsb)!");
 	goto failed;
     }
     n = H5T_bit_find (v1, 0, 0, H5T_BIT_MSB, TRUE);
     if (-1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Zero length test failed (msb)!");
 	goto failed;
     }
@@ -62,13 +62,13 @@ test_find (void)
     memset (v1, 0, sizeof v1);
     n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_LSB, TRUE);
     if (-1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Zero buffer test failed (lsb)!");
 	goto failed;
     }
     n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_MSB, TRUE);
     if (-1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Zero buffer test failed (msb)!");
 	goto failed;
     }
@@ -79,13 +79,13 @@ test_find (void)
 	v1[i/8] = 1<<(i%8);
 	n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_LSB, TRUE);
 	if ((ssize_t)i!=n) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Test for set bit %d failed (lsb)!\n", i);
 	    goto failed;
 	}
 	n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_MSB, TRUE);
 	if ((ssize_t)i!=n) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Test for set bit %d failed (msb)!\n", i);
 	    goto failed;
 	}
@@ -95,13 +95,13 @@ test_find (void)
     memset (v1, 0xff, sizeof v1);
     n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_LSB, FALSE);
     if (-1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts ("    One buffer test failed (lsb)!");
 	goto failed;
     }
     n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_MSB, FALSE);
     if (-1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts ("    One buffer test failed (msb)!");
 	goto failed;
     }
@@ -112,13 +112,13 @@ test_find (void)
 	v1[i/8] &= ~(1<<(i%8));
 	n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_LSB, FALSE);
 	if ((ssize_t)i!=n) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Test for clear bit %d failed (lsb)!\n", i);
 	    goto failed;
 	}
 	n = H5T_bit_find (v1, 0, 8*sizeof(v1), H5T_BIT_MSB, FALSE);
 	if ((ssize_t)i!=n) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Test for clear bit %d failed (lsb)!\n", i);
 	    goto failed;
 	}
@@ -174,12 +174,12 @@ test_copy (void)
 	H5T_bit_copy (v2, d_offset, v1, s_offset, size);
 	for (j=0; j<(intn)sizeof(v2); j++) if (v2[j]) break;
 	if (size>0 && j>=(intn)sizeof(v2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Unabled to find copied region in destination");
 	    goto failed;
 	}
 	if (0==size && j<(intn)sizeof(v2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found copied bits when we shouldn't have");
 	    goto failed;
 	}
@@ -188,25 +188,25 @@ test_copy (void)
 	/* Look for the zeros and ones */
 	n = H5T_bit_find (v2, 0, 8*sizeof(v2), H5T_BIT_LSB, 1);
 	if (size>0 && n!=(ssize_t)d_offset) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find first copied bit in destination "
 		    "(n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==size && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found copied bits and shouldn't have!");
 	    goto failed;
 	}
 	n = H5T_bit_find (v2, d_offset, 8*sizeof(v2)-d_offset, H5T_BIT_LSB, 0);
 	if (d_offset+size<8*sizeof(v2) && n!=(ssize_t)size) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find last copied bit in destination "
 		    "(n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (d_offset+size==8*sizeof(v2) && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    High-order zeros are present and shouldn't be!");
 	    goto failed;
 	}
@@ -217,25 +217,25 @@ test_copy (void)
 	 */
 	n = H5T_bit_find (v2, 0, 8*sizeof(v2), H5T_BIT_MSB, 1);
 	if (size>0 && (size_t)(n+1)!=d_offset+size) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find last copied bit in destination "
 		    "(reverse, n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==size && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found copied bits but shouldn't have (reverse)!");
 	    goto failed;
 	}
 	n = H5T_bit_find (v2, 0, d_offset+size, H5T_BIT_MSB, 0);
 	if (d_offset>0 && n+1!=(ssize_t)d_offset) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find beginning of copied data "
 		    "(reverse, n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==d_offset && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found leading original data but shouldn't have!");
 	    goto failed;
 	}
@@ -294,12 +294,12 @@ test_set (void)
 	H5T_bit_set (v2, d_offset, size, TRUE);
 	for (j=0; j<(intn)sizeof(v2); j++) if (v2[j]) break;
 	if (size>0 && j>=(intn)sizeof(v2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Unabled to find set region in buffer");
 	    goto failed;
 	}
 	if (0==size && j<(intn)sizeof(v2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found set bits when we shouldn't have");
 	    goto failed;
 	}
@@ -308,25 +308,25 @@ test_set (void)
 	/* Look for the zeros and ones */
 	n = H5T_bit_find (v2, 0, 8*sizeof(v2), H5T_BIT_LSB, 1);
 	if (size>0 && n!=(ssize_t)d_offset) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find first set bit in destination "
 		    "(n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==size && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found set bits and shouldn't have!");
 	    goto failed;
 	}
 	n = H5T_bit_find (v2, d_offset, 8*sizeof(v2)-d_offset, H5T_BIT_LSB, 0);
 	if (d_offset+size<8*sizeof(v2) && n!=(ssize_t)size) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find last set bit in destination "
 		    "(n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (d_offset+size==8*sizeof(v2) && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    High-order zeros are present and shouldn't be!");
 	    goto failed;
 	}
@@ -337,25 +337,25 @@ test_set (void)
 	 */
 	n = H5T_bit_find (v2, 0, 8*sizeof(v2), H5T_BIT_MSB, 1);
 	if (size>0 && (size_t)(n+1)!=d_offset+size) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find last set bit in destination "
 		    "(reverse, n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==size && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found set bits but shouldn't have (reverse)!");
 	    goto failed;
 	}
 	n = H5T_bit_find (v2, 0, d_offset+size, H5T_BIT_MSB, 0);
 	if (d_offset>0 && n+1!=(ssize_t)d_offset) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find beginning of set bit region "
 		    "(reverse, n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==d_offset && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found leading zeros but shouldn't have!");
 	    goto failed;
 	}
@@ -411,12 +411,12 @@ test_clear (void)
 	H5T_bit_set (v2, d_offset, size, FALSE);
 	for (j=0; j<(intn)sizeof(v2); j++) if (0xff!=v2[j]) break;
 	if (size>0 && j>=(intn)sizeof(v2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Unabled to find cleared region in buffer");
 	    goto failed;
 	}
 	if (0==size && j<(intn)sizeof(v2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found cleared bits when we shouldn't have");
 	    goto failed;
 	}
@@ -425,25 +425,25 @@ test_clear (void)
 	/* Look for the zeros and ones */
 	n = H5T_bit_find (v2, 0, 8*sizeof(v2), H5T_BIT_LSB, 0);
 	if (size>0 && n!=(ssize_t)d_offset) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find first cleared bit in destination "
 		    "(n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==size && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found cleared bits and shouldn't have!");
 	    goto failed;
 	}
 	n = H5T_bit_find (v2, d_offset, 8*sizeof(v2)-d_offset, H5T_BIT_LSB, 1);
 	if (d_offset+size<8*sizeof(v2) && n!=(ssize_t)size) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find last cleared bit in destination "
 		    "(n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (d_offset+size==8*sizeof(v2) && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    High-order ones are present and shouldn't be!");
 	    goto failed;
 	}
@@ -454,25 +454,25 @@ test_clear (void)
 	 */
 	n = H5T_bit_find (v2, 0, 8*sizeof(v2), H5T_BIT_MSB, 0);
 	if (size>0 && (size_t)(n+1)!=d_offset+size) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find last cleared bit in destination "
 		    "(reverse, n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==size && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found cleared bits but shouldn't have (reverse)!");
 	    goto failed;
 	}
 	n = H5T_bit_find (v2, 0, d_offset+size, H5T_BIT_MSB, 1);
 	if (d_offset>0 && n+1!=(ssize_t)d_offset) {
-	    FAILED();
+	    H5_FAILED();
 	    printf ("    Unable to find beginning of cleared bit region "
 		    "(reverse, n=%d)\n", (int)n);
 	    goto failed;
 	}
 	if (0==d_offset && n>=0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("    Found leading ones but shouldn't have!");
 	    goto failed;
 	}
diff --git a/test/cmpd_dset.c b/test/cmpd_dset.c
index 6f63ef0..4b0eb69 100644
--- a/test/cmpd_dset.c
+++ b/test/cmpd_dset.c
@@ -236,7 +236,7 @@ main (int argc, char *argv[])
 	    s1[i].c[3]!=s2[i].c[3] ||
 	    s1[i].d!=s2[i].d ||
 	    s1[i].e!=s2[i].e) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect values read from the file");
 	    goto error;
 	}
@@ -278,7 +278,7 @@ main (int argc, char *argv[])
 	    s1[i].c[3]!=s3[i].c[3] ||
 	    s1[i].d!=s3[i].d ||
 	    s1[i].e!=s3[i].e) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect values read from the file");
 	    goto error;
 	}
@@ -306,7 +306,7 @@ main (int argc, char *argv[])
     for (i=0; i<NX*NY; i++) {
 	if (s1[i].b!=s4[i].b ||
 	    s1[i].d!=s4[i].d) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect values read from the file");
 	    goto error;
 	}
@@ -355,7 +355,7 @@ main (int argc, char *argv[])
 	    s1[i].c[3]!=s5[i].c[3] ||
 	    s1[i].d!=s5[i].d ||
 	    s1[i].e!=s5[i].e) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect values read from the file");
 	    goto error;
 	}
@@ -367,7 +367,7 @@ main (int argc, char *argv[])
 	    s5[i].mid1 != 1001+4*i ||
 	    s5[i].mid2 != 1002+4*i ||
 	    s5[i].post != 1003+4*i) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Memory values were clobbered");
 	    goto error;
 	}
@@ -408,7 +408,7 @@ main (int argc, char *argv[])
 	    s1[i].c[3] != 8*i+5 ||
 	    s1[i].d != 8*i+6 ||
 	    s1[i].e != 8*i+7) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    i==%u, row=%u, col=%u\n", i, i/NY, i%NY);
 	    printf("    got: {%7d,%7d,[%7d,%7d,%7d,%7d],%7d,%7d}\n",
 		   s1[i].a, s1[i].b, s1[i].c[0], s1[i].c[1], s1[i].c[2],
@@ -446,7 +446,7 @@ main (int argc, char *argv[])
 	    s2[i].c[3] != s1[i].c[3] ||
 	    s2[i].d != s1[i].d ||
 	    s2[i].e != s1[i].e) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect values read from file");
 	    goto error;
 	}
@@ -494,7 +494,7 @@ main (int argc, char *argv[])
 		ps8->c[3] != ps1->c[3] ||
 		ps8->d != ps1->d ||
 		ps8->e != ps1->e) {
-		FAILED();
+		H5_FAILED();
 		puts("    Incorrect values read from file");
 		goto error;
 	    }
@@ -541,7 +541,7 @@ main (int argc, char *argv[])
 		    ps2->c[3] != ps1->c[3] ||
 		    ps2->d != ps1->d ||
 		    ps2->e != ps1->e) {
-		    FAILED();
+		    H5_FAILED();
 		    puts("    Memory values clobbered");
 		    goto error;
 		}
@@ -554,7 +554,7 @@ main (int argc, char *argv[])
 		    ps2->c[3] != (unsigned)(-1) ||
 		    ps2->d != (unsigned)(-1) ||
 		    ps2->e != (unsigned)(-1)) {
-		    FAILED();
+		    H5_FAILED();
 		    puts("    Incorrect values read from file");
 		    goto error;
 		}
@@ -603,7 +603,7 @@ main (int argc, char *argv[])
 		    ps5->d != ps1->d ||
 		    ps5->e != ps1->e ||
 		    ps5->post != (unsigned)(-1)) {
-		    FAILED();
+		    H5_FAILED();
 		    puts("    Memory values clobbered");
 		    goto error;
 		}
@@ -620,7 +620,7 @@ main (int argc, char *argv[])
 		    ps5->d != (unsigned)(-1) ||
 		    ps5->e != (unsigned)(-1) ||
 		    ps5->post != (unsigned)(-1)) {
-		    FAILED();
+		    H5_FAILED();
 		    puts("    Incorrect values read from file");
 		    goto error;
 		}
@@ -672,7 +672,7 @@ main (int argc, char *argv[])
 		ps1->c[2] != 8*(i*NY+j)+4 ||
 		ps1->c[3] != 8*(i*NY+j)+5 ||
 		ps1->e != 8*(i*NY+j)+7) {
-		FAILED();
+		H5_FAILED();
 		puts("    Write clobbered values");
 		goto error;
 	    }
@@ -683,14 +683,14 @@ main (int argc, char *argv[])
 		(hsize_t)j<f_offset[1]+h_size[1]) {
 		if (ps1->b != (unsigned)(-1) ||
 		    ps1->d != (unsigned)(-1)) {
-		    FAILED();
+		    H5_FAILED();
 		    puts("    Wrong values written or read");
 		    goto error;
 		}
 	    } else {
 		if (ps1->b != 8*(i*NY+j)+1 ||
 		    ps1->d != 8*(i*NY+j)+6) {
-		    FAILED();
+		    H5_FAILED();
 		    puts("    Write clobbered values");
 		    goto error;
 		}
diff --git a/test/dsets.c b/test/dsets.c
index 824e000..8653718 100644
--- a/test/dsets.c
+++ b/test/dsets.c
@@ -82,7 +82,7 @@ test_create(hid_t file)
 			    H5P_DEFAULT);
     } H5E_END_TRY;
     if (dataset >= 0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Library allowed overwrite of existing dataset.");
 	goto error;
     }
@@ -103,7 +103,7 @@ test_create(hid_t file)
 	dataset = H5Dopen(file, "does_not_exist");
     } H5E_END_TRY;
     if (dataset >= 0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Opened a non-existent dataset.");
 	goto error;
     }
@@ -125,7 +125,7 @@ test_create(hid_t file)
 			create_parms);
     } H5E_END_TRY;
     if (dataset >= 0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Opened a dataset with incorrect chunking parameters.");
 	goto error;
     }
@@ -216,7 +216,7 @@ test_simple_io(hid_t file)
     for (i = 0; i < 100; i++) {
 	for (j = 0; j < 200; j++) {
 	    if (points[i][j] != check[i][j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read different values than written.\n");
 		printf("    At index %d,%d\n", i, j);
 		goto error;
@@ -295,7 +295,7 @@ test_tconv(hid_t file)
 	    in[4*i+1]!=out[4*i+2] ||
 	    in[4*i+2]!=out[4*i+1] ||
 	    in[4*i+3]!=out[4*i+0]) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Read with byte order conversion failed.");
 	    goto error;
 	}
@@ -413,7 +413,7 @@ test_compression(hid_t file)
     for (i=0; i<size[0]; i++) {
 	for (j=0; j<size[1]; j++) {
 	    if (0!=check[i][j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read a non-zero value.\n");
 		printf("    At index %lu,%lu\n",
 		       (unsigned long)i, (unsigned long)j);
@@ -464,7 +464,7 @@ test_compression(hid_t file)
     for (i=0; i<size[0]; i++) {
 	for (j=0; j<size[1]; j++) {
 	    if (points[i][j] != check[i][j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read different values than written.\n");
 		printf("    At index %lu,%lu\n",
 		       (unsigned long)i, (unsigned long)j);
@@ -504,7 +504,7 @@ test_compression(hid_t file)
     for (i=0; i<size[0]; i++) {
 	for (j=0; j<size[1]; j++) {
 	    if (points[i][j] != check[i][j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read different values than written.\n");
 		printf("    At index %lu,%lu\n",
 		       (unsigned long)i, (unsigned long)j);
@@ -536,7 +536,7 @@ test_compression(hid_t file)
     for (i=0; i<size[0]; i++) {
 	for (j=0; j<size[1]; j++) {
 	    if (points[i][j] != check[i][j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read different values than written.\n");
 		printf("    At index %lu,%lu\n",
 		       (unsigned long)i, (unsigned long)j);
@@ -577,7 +577,7 @@ test_compression(hid_t file)
 	for (j=0; j<hs_size[1]; j++) {
 	    if (points[hs_offset[0]+i][hs_offset[1]+j] !=
 		check[hs_offset[0]+i][hs_offset[1]+j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read different values than written.\n");
 		printf("    At index %lu,%lu\n",
 		       (unsigned long)(hs_offset[0]+i),
@@ -620,7 +620,7 @@ test_compression(hid_t file)
     for (i=0; i<size[0]; i++) {
 	for (j=0; j<size[1]; j++) {
 	    if (points[i][j] != check[i][j]) {
-		FAILED();
+		H5_FAILED();
 		printf("    Read different values than written.\n");
 		printf("    At index %lu,%lu\n",
 		       (unsigned long)i, (unsigned long)j);
@@ -693,7 +693,7 @@ test_multiopen (hid_t file)
     if ((space = H5Dget_space (dset2))<0) goto error;
     if (H5Sget_simple_extent_dims (space, tmp_size, NULL)<0) goto error;
     if (cur_size[0]!=tmp_size[0]) {
-	FAILED();
+	H5_FAILED();
 	printf ("    Got %d instead of %d!\n",
 		(int)tmp_size[0], (int)cur_size[0]);
 	goto error;
diff --git a/test/dtypes.c b/test/dtypes.c
index 77bf585..5cfb08b 100644
--- a/test/dtypes.c
+++ b/test/dtypes.c
@@ -306,13 +306,13 @@ test_classes(void)
 
     if ((tcls=H5Tget_class(H5T_NATIVE_INT))<0) goto error;
     if (H5T_INTEGER!=tcls) {
-	FAILED();
+	H5_FAILED();
         puts("    Invalid type class for H5T_NATIVE_INT");
         goto error;
     }
     if ((tcls=H5Tget_class(H5T_NATIVE_DOUBLE))<0) goto error;
     if (H5T_FLOAT!=tcls) {
-	FAILED();
+	H5_FAILED();
 	puts("    Invalid type class for H5T_NATIVE_DOUBLE");
         goto error;
     }
@@ -356,7 +356,7 @@ test_copy(void)
 	status = H5Tclose (H5T_NATIVE_SCHAR);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Should not be able to close a predefined type!");
 	goto error;
     }
@@ -501,7 +501,7 @@ test_compound_2(void)
 	    s_ptr->c[3] != d_ptr->c[3] ||
 	    s_ptr->d    != d_ptr->d    ||
 	    s_ptr->e    != d_ptr->e) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    i=%d\n", i);
 	    printf("    src={a=%d, b=%d, c=[%d,%d,%d,%d], d=%d, e=%d\n",
 		   s_ptr->a, s_ptr->b, s_ptr->c[0], s_ptr->c[1], s_ptr->c[2],
@@ -615,7 +615,7 @@ test_compound_3(void)
 	    s_ptr->c[2] != d_ptr->c[2] ||
 	    s_ptr->c[3] != d_ptr->c[3] ||
 	    s_ptr->e    != d_ptr->e) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    i=%d\n", i);
 	    printf("    src={a=%d, b=%d, c=[%d,%d,%d,%d], d=%d, e=%d\n",
 		   s_ptr->a, s_ptr->b, s_ptr->c[0], s_ptr->c[1], s_ptr->c[2],
@@ -737,7 +737,7 @@ test_compound_4(void)
 	    s_ptr->c[3] != d_ptr->c[3] ||
 	    s_ptr->d    != d_ptr->d    ||
 	    s_ptr->e    != d_ptr->e) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    i=%d\n", i);
 	    printf("    src={a=%d, b=%d, c=[%d,%d,%d,%d], d=%d, e=%d\n",
 		   s_ptr->a, s_ptr->b, s_ptr->c[0], s_ptr->c[1], s_ptr->c[2],
@@ -862,7 +862,7 @@ test_compound_5(void)
         src[1].coll_ids[1]!=dst[1].coll_ids[1] ||
         src[1].coll_ids[2]!=dst[1].coll_ids[2] ||
         src[1].coll_ids[3]!=dst[1].coll_ids[3]) {
-        FAILED();
+        H5_FAILED();
         return 1;
     }
 
@@ -944,7 +944,7 @@ test_compound_6(void)
 	d_ptr = ((struct dt*)buf)  + i;
 	if (s_ptr->b    != d_ptr->b    ||
 	    s_ptr->d    != d_ptr->d) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    i=%d\n", i);
 	    printf("    src={b=%d, d=%d\n",
            (int)s_ptr->b, (int)s_ptr->d);
@@ -1006,7 +1006,7 @@ test_transient (hid_t fapl)
 	status = H5Tset_precision (H5T_NATIVE_INT, 256);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Predefined types should not be modifiable!");
 	goto error;
     }
@@ -1014,7 +1014,7 @@ test_transient (hid_t fapl)
 	status = H5Tclose (H5T_NATIVE_INT);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Predefined types should not be closable!");
 	goto error;
     }
@@ -1028,7 +1028,7 @@ test_transient (hid_t fapl)
 	status = H5Acreate (type, "attr1", H5T_NATIVE_INT, space, H5P_DEFAULT);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Attributes should not be allowed for transient types!");
 	goto error;
     }
@@ -1045,7 +1045,7 @@ test_transient (hid_t fapl)
 	status = H5Tset_precision (t2, 256);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Dataset data types should not be modifiable!");
 	goto error;
     }
@@ -1062,7 +1062,7 @@ test_transient (hid_t fapl)
 	status = H5Tset_precision (t2, 256);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Dataset data types should not be modifiable!");
 	goto error;
     }
@@ -1136,7 +1136,7 @@ test_named (hid_t fapl)
 			    H5T_NATIVE_INT);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Predefined types should not be committable!");
 	goto error;
     }
@@ -1146,7 +1146,7 @@ test_named (hid_t fapl)
     if (H5Tcommit (file, "native-int", type)<0) goto error;
     if ((status=H5Tcommitted (type))<0) goto error;
     if (0==status) {
-	FAILED();
+	H5_FAILED();
 	puts ("    H5Tcommitted() returned false!");
 	goto error;
     }
@@ -1156,7 +1156,7 @@ test_named (hid_t fapl)
 	status = H5Tset_precision (type, 256);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Committed type is not constant!");
 	goto error;
     }
@@ -1166,7 +1166,7 @@ test_named (hid_t fapl)
 	status = H5Tcommit(file, "test_named_2 (should not exist)", type);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Committed types should not be recommitted!");
 	goto error;
     }
@@ -1185,7 +1185,7 @@ test_named (hid_t fapl)
     if ((t2 = H5Tcopy (type))<0) goto error;
     if ((status=H5Tcommitted (t2))<0) goto error;
     if (status) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Copying a named type should result in a transient type!");
 	goto error;
     }
@@ -1199,7 +1199,7 @@ test_named (hid_t fapl)
     if ((type=H5Topen (file, "native-int"))<0) goto error;
     if ((status=H5Tcommitted (type))<0) goto error;
     if (!status) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Opened named types should be named types!");
 	goto error;
     }
@@ -1213,7 +1213,7 @@ test_named (hid_t fapl)
     if ((t2 = H5Dget_type (dset))<0) goto error;
     if ((status=H5Tcommitted (t2))<0) goto error;
     if (!status) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Dataset type should be a named type!");
 	goto error;
     }
@@ -1227,7 +1227,7 @@ test_named (hid_t fapl)
     if ((t2 = H5Dget_type (dset))<0) goto error;
     if ((status=H5Tcommitted (t2))<0) goto error;
     if (!status) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Dataset type should be a named type!");
 	goto error;
     }
@@ -1248,7 +1248,7 @@ test_named (hid_t fapl)
     if ((t2 = H5Dget_type (dset))<0) goto error;
     if ((status=H5Tcommitted (t2))<0) goto error;
     if (!status) {
-	FAILED();
+	H5_FAILED();
 	puts ("    Dataset type should be a named type!");
 	goto error;
     }
@@ -1344,13 +1344,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghi\0abcdefghi\0", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd\0abcd\0abcdefghi\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Truncated C-string test failed");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd\0\0\0\0\0\0abcd\0\0\0\0\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Extended C-string test failed");
 	goto error;
     }
@@ -1367,13 +1367,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghijabcdefghij", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdeabcdeabcdefghij", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Truncated C buffer test failed");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcde\0\0\0\0\0abcde\0\0\0\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Extended C buffer test failed");
 	goto error;
     }
@@ -1390,13 +1390,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghijabcdefghij", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdeabcdeabcdefghij", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Truncated Fortran-string test failed");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcde     abcde     ", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Extended Fortran-string test failed");
 	goto error;
     }
@@ -1416,7 +1416,7 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghijabcdefghij", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdefghijabcdefghij", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Non-terminated string test 1");
 	goto error;
     }
@@ -1425,14 +1425,14 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghijabcdefghij", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd\0abcd\0abcdefghij", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Non-terminated string test 2");
 	goto error;
     }
     memcpy(buf, "abcdeabcdexxxxxxxxxx", 20);
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcde\0\0\0\0\0abcde\0\0\0\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Non-terminated string test 2");
 	goto error;
     }
@@ -1449,13 +1449,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghi\0abcdefghi\0", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdefghi abcdefghi ", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    C string to Fortran test 1");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdefghi\0abcdefghi\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Fortran to C string test 1");
 	goto error;
     }
@@ -1464,13 +1464,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefgh\0\0abcdefgh\0\0", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdeabcdeabcdefgh\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    C string to Fortran test 2");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcde\0\0\0\0\0abcde\0\0\0\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Fortran to C string test 2");
 	goto error;
     }
@@ -1481,13 +1481,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcd\0abcd\0xxxxxxxxxx", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd      abcd      ", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    C string to Fortran test 3");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd\0abcd\0abcd      ", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Fortran to C string test 3");
 	goto error;
     }
@@ -1504,13 +1504,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefghijabcdefghij", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdefghijabcdefghij", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    C buffer to Fortran test 1");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdefghijabcdefghij", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Fortran to C buffer test 1");
 	goto error;
     }
@@ -1519,13 +1519,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcdefgh\0\0abcdefgh\0\0", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcdeabcdeabcdefgh\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    C buffer to Fortran test 2");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcde\0\0\0\0\0abcde\0\0\0\0\0", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Fortran to C buffer test 2");
 	goto error;
     }
@@ -1536,13 +1536,13 @@ test_conv_str_1(void)
     memcpy(buf, "abcd\0abcd\0xxxxxxxxxx", 20);
     if (H5Tconvert(src_type, dst_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd      abcd      ", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    C buffer to Fortran test 3");
 	goto error;
     }
     if (H5Tconvert(dst_type, src_type, (hsize_t)2, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (memcmp(buf, "abcd\0abcd\0abcd      ", 20)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Fortran to C buffer test 3");
 	goto error;
     }
@@ -1733,7 +1733,7 @@ test_conv_bitfield(void)
     buf[2] = buf[3] = 0x55; /*irrelevant*/
     if (H5Tconvert(st, dt, (hsize_t)1, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (buf[0]!=0xAA || buf[1]!=0xAA || buf[2]!=0 || buf[3]!=0) {
-	FAILED();
+	H5_FAILED();
 	printf("    s=0xaaaa, d=0x%02x%02x%02x%02x (test 1)\n",
 	       buf[3], buf[2], buf[1], buf[0]);
 	goto error;
@@ -1752,7 +1752,7 @@ test_conv_bitfield(void)
     buf[0] = 0xA8; buf[1] = 0x2A; buf[2] = buf[3] = 0;
     if (H5Tconvert(st, dt, (hsize_t)1, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (buf[0]!=0 || buf[1]!=0xA8 || buf[2]!=0x2A || buf[3]!=0) {
-	FAILED();
+	H5_FAILED();
 	printf("    s=0x2AA8 d=0x%02x%02x%02x%02x (test 2)\n",
 	       buf[3], buf[2], buf[1], buf[0]);
 	goto error;
@@ -1766,7 +1766,7 @@ test_conv_bitfield(void)
     buf[0] = 0xA8; buf[1] = 0x2A; buf[2] = buf[3] = 0;
     if (H5Tconvert(st, dt, (hsize_t)1, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (buf[0]!=0xff || buf[1]!=0xAB || buf[2]!=0xEA || buf[3]!=0xff) {
-	FAILED();
+	H5_FAILED();
 	printf("    s=0x2AA8 d=0x%02x%02x%02x%02x (test 3)\n",
 	       buf[3], buf[2], buf[1], buf[0]);
 	goto error;
@@ -1851,7 +1851,7 @@ test_opaque(void)
 	status = H5Tconvert(st, dt, (hsize_t)OPAQUE_NELMTS, buf, NULL, H5P_DEFAULT);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	printf("    opaque conversion should have failed but succeeded\n");
 	goto error;
     }
@@ -1863,7 +1863,7 @@ test_opaque(void)
     /* Try the conversion again, this time it should work */
     if (H5Tconvert(st, dt, (hsize_t)OPAQUE_NELMTS, buf, NULL, H5P_DEFAULT)<0) goto error;
     if (saved+1 != num_opaque_conversions_g) {
-	FAILED();
+	H5_FAILED();
 	printf("    unexpected number of opaque conversions\n");
 	goto error;
     }
@@ -1876,7 +1876,7 @@ test_opaque(void)
  error:
     if (st>0) H5Tclose(st);
     if (dt>0) H5Tclose(dt);
-    FAILED();
+    H5_FAILED();
     return 1;
 }
 
@@ -1915,7 +1915,7 @@ test_conv_int (void)
 	goto error;
     }
     if (byte[0]!=0xff || byte[1]!=0xff) {
-	FAILED();
+	H5_FAILED();
 	printf("    src: 0x80000000 unsigned\n");
 	printf("    dst: 0x%02x%02x     unsigned\n", byte[1], byte[0]);
 	printf("    ans: 0xffff     unsigned\n");
@@ -1928,7 +1928,7 @@ test_conv_int (void)
 	goto error;
     }
     if (byte[0]!=0xff || byte[1]!=0x7f) {
-	FAILED();
+	H5_FAILED();
 	printf("    src: 0xffffffff unsigned\n");
 	printf("    dst: 0x%02x%02x     signed\n", byte[1], byte[0]);
 	printf("    ans: 0x7fff     signed\n");
@@ -1941,7 +1941,7 @@ test_conv_int (void)
 	goto error;
     }
     if (byte[0]!=0x00 || byte[1]!=0x00) {
-	FAILED();
+	H5_FAILED();
 	printf("    src: 0xffffffff signed\n");
 	printf("    dst: 0x%02x%02x     unsigned\n", byte[1], byte[0]);
 	printf("    ans: 0x0000     unsigned\n");
@@ -1955,7 +1955,7 @@ test_conv_int (void)
 	goto error;
     }
     if (byte[0]!=0xff || byte[1]!=0xff) {
-	FAILED();
+	H5_FAILED();
 	printf("    src: 0x7fffffff signed\n");
 	printf("    dst: 0x%02x%02x     unsigned\n", byte[1], byte[0]);
 	printf("    ans: 0xffff     unsigned\n");
@@ -1969,7 +1969,7 @@ test_conv_int (void)
 	goto error;
     }
     if (byte[0]!=0xff || byte[1]!=0x7f) {
-	FAILED();
+	H5_FAILED();
 	printf("    src: 0x7fffffff signed\n");
 	printf("    dst: 0x%02x%02x     signed\n", byte[1], byte[0]);
 	printf("    ans: 0x7fff     signed\n");
@@ -1983,7 +1983,7 @@ test_conv_int (void)
 	goto error;
     }
     if (byte[0]!=0x00 || byte[1]!=0x80) {
-	FAILED();
+	H5_FAILED();
 	printf("    src: 0xbfffffff signed\n");
 	printf("    dst: 0x%02x%02x     signed\n", byte[1], byte[0]);
 	printf("    ans: 0x8000     signed\n");
@@ -2135,7 +2135,7 @@ test_conv_int_1(const char *name, hid_t src, hid_t dst)
 	sprintf(str, "Testing random %s %s -> %s conversions",
 		name, src_type_name, dst_type_name);
 	printf("%-70s", str);
-	FAILED();
+	H5_FAILED();
 	puts("    Unknown data type.");
 	goto error;
     }
@@ -2851,7 +2851,7 @@ test_conv_int_1(const char *name, hid_t src, hid_t dst)
 	    }
 
 	    /* Print errors */
-	    if (0==fails_this_test++) FAILED();
+	    if (0==fails_this_test++) H5_FAILED();
 	    printf("    test %u elmt %u\n", (unsigned)i+1, (unsigned)j);
 
 	    printf("        src = ");
@@ -3273,7 +3273,7 @@ test_conv_flt_1 (const char *name, hid_t src, hid_t dst)
 	sprintf(str, "Testing random %s %s -> %s conversions",
 		name, src_type_name, dst_type_name);
 	printf("%-70s", str);
-	FAILED();
+	H5_FAILED();
 	puts("    Unknown data type.");
 	goto error;
     }
@@ -3476,7 +3476,7 @@ test_conv_flt_1 (const char *name, hid_t src, hid_t dst)
 	    }
 #endif
 
-	    if (0==fails_this_test++) FAILED();
+	    if (0==fails_this_test++) H5_FAILED();
 	    printf("    test %u, elmt %u\n", (unsigned)i+1, (unsigned)j);
 	    
 	    printf("        src =");
diff --git a/test/enum.c b/test/enum.c
index dce0fa8..5921ef1 100644
--- a/test/enum.c
+++ b/test/enum.c
@@ -141,7 +141,7 @@ test_noconv(hid_t file)
 
     for (i=0; i<ds_size[0]; i++) {
 	if (data1[i]!=data2[i]) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    data1[%lu]=%d, data2[%lu]=%d (should be same)\n",
 		   (unsigned long)i, (int)(data1[i]),
 		   (unsigned long)i, (int)(data2[i]));
@@ -223,7 +223,7 @@ test_tr1(hid_t file)
 
     for (i=0; i<ds_size[0]; i++) {
 	if (data1[i]!=data2[i]) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    data1[%lu]=%d, data2[%lu]=%d (should be same)\n",
 		   (unsigned long)i, (int)(data1[i]),
 		   (unsigned long)i, (int)(data2[i]));
@@ -303,7 +303,7 @@ test_tr2(hid_t file)
 
     for (i=0; i<ds_size[0]; i++) {
 	if (data1[i]!=data2[i]) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    data1[%lu]=%d, data2[%lu]=%d (should be same)\n",
 		   (unsigned long)i, (int)(data1[i]),
 		   (unsigned long)i, (int)(data2[i]));
diff --git a/test/extend.c b/test/extend.c
index ae9fee0..e344370 100644
--- a/test/extend.c
+++ b/test/extend.c
@@ -119,7 +119,7 @@ main (void)
 	    for (k=0; k<NX/2; k++) {
 		for (m=0; m<NY/2; m++) {
 		    if (buf2[k][m]!=buf1[(i%2)*NX/2+k][(j%2)*NY/2+m]) {
-			FAILED();
+			H5_FAILED();
 			printf("    i=%d, j=%d, k=%d, m=%d\n", i, j, k, m);
 			goto error;
 		    }
diff --git a/test/external.c b/test/external.c
index 810d5b8..d7a4899 100644
--- a/test/external.c
+++ b/test/external.c
@@ -112,7 +112,7 @@ test_1a(hid_t file)
     if ((dcpl = H5Dget_create_plist (dset))<0) goto error;
     if ((n=H5Pget_external_count (dcpl))<0) goto error;
     if (1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts("    Returned external count is wrong.");
 	printf("   got: %d\n    ans: 1\n", n);
 	goto error;
@@ -121,13 +121,13 @@ test_1a(hid_t file)
     if (H5Pget_external (dcpl, 0, sizeof(name)-4, name, &file_offset,
 			 &file_size)<0) goto error;
     if (file_offset!=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Wrong file offset.");
 	printf("    got: %lu\n    ans: 0\n", (unsigned long)file_offset);
 	goto error;
     }
     if (file_size!=(max_size[0]*sizeof(int))) {
-	FAILED();
+	H5_FAILED();
 	puts("    Wrong file size.");
 	printf("    got: %lu\n    ans: %lu\n", (unsigned long)file_size,
 		(unsigned long)max_size[0]*sizeof(int));
@@ -184,7 +184,7 @@ test_1b(hid_t file)
 	dset = H5Dcreate (file, "dset2", H5T_NATIVE_INT, space, dcpl);
     } H5E_END_TRY;
     if (dset>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Small external file succeeded instead of failing.");
 	goto error;
     }
@@ -292,7 +292,7 @@ test_1d(hid_t file)
 	dset = H5Dcreate (file, "dset4", H5T_NATIVE_INT, space, dcpl);
     } H5E_END_TRY;
     if (dset>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Small external file succeeded instead of failing.");
 	goto error;
     }
@@ -360,7 +360,7 @@ test_1e(hid_t file)
     if ((dcpl = H5Dget_create_plist (dset))<0) goto error;
     if ((n = H5Pget_external_count (dcpl))<0) goto error;
     if (1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts("    Returned external count is wrong.");
 	printf("    got: %d\n    ans: 1\n", n);
 	goto error;
@@ -369,13 +369,13 @@ test_1e(hid_t file)
     if (H5Pget_external (dcpl, 0, sizeof(name)-4, name, &file_offset,
 			 &file_size)<0) goto error;
     if (file_offset!=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Wrong file offset.");
 	printf("    got: %lu\n    ans: 0\n", (unsigned long)file_offset);
 	goto error;
     }
     if (H5F_UNLIMITED!=file_size) {
-	FAILED();
+	H5_FAILED();
 	puts("    Wrong file size.");
 	printf("    got: %lu\n    ans: INF\n", (unsigned long)file_size);
 	goto error;
@@ -481,13 +481,13 @@ test_1g(void)
 	status = H5Pset_external(dcpl, "ext2.data", (off_t)0, (hsize_t)100);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts ("    H5Pset_external() succeeded when it should have failed.");
 	goto error;
     }
     if ((n = H5Pget_external_count(dcpl))<0) goto error;
     if (1!=n) {
-	FAILED();
+	H5_FAILED();
 	puts("    Wrong external file count returned.");
 	goto error;
     }
@@ -533,7 +533,7 @@ test_1h(void)
 	status = H5Pset_external(dcpl, "ext2.data", (off_t)0, (hsize_t)100);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5Pset_external() succeeded when it should have failed.");
 	goto error;
     }
@@ -635,7 +635,7 @@ test_2 (hid_t fapl)
 	goto error;
     for (i=0; i<100; i++) {
 	if (whole[i]!=(signed)i) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect value(s) read.");
 	    goto error;
 	}
@@ -653,7 +653,7 @@ test_2 (hid_t fapl)
     if (H5Sclose (hs_space)<0) goto error;
     for (i=hs_start; i<hs_start+hs_count; i++) {
 	if (whole[i]!=(signed)i) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Incorrect value(s) read.");
 	    goto error;
 	}
@@ -731,7 +731,7 @@ test_3 (hid_t fapl)
     for (i=1; i<=4; i++) {
 	sprintf(filename, "extern_%db.raw", i);
 	if ((fd= open(filename, O_RDWR|O_CREAT|O_TRUNC, 0666))<0) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    cannot open %s: %s\n", filename, strerror(errno));
 	    goto error;
 	}
@@ -755,7 +755,7 @@ test_3 (hid_t fapl)
 	sprintf (name1, "extern_%da.raw", i+1);
 	sprintf (name2, "extern_%db.raw", i+1);
 	if (!same_contents (name1, name2)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts ("   Output differs from expected value.");
 	    goto error;
 	}
diff --git a/test/fillval.c b/test/fillval.c
index 86fa6a7..3e71ad0 100644
--- a/test/fillval.c
+++ b/test/fillval.c
@@ -89,7 +89,7 @@ test_getset(void)
 	status = H5Pget_fill_value(dcpl, H5T_NATIVE_INT, &fill_i);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5Pget_fill_value() should have been negative");
 	goto error;
     }
@@ -106,7 +106,7 @@ test_getset(void)
      */
     if (H5Pget_fill_value(dcpl, type_ss, &fill_ss_rd)<0) goto error;
     if (fill_ss.v1!=fill_ss_rd.v1 || fill_ss.v2!=fill_ss_rd.v2) {
-	FAILED();
+	H5_FAILED();
 	puts("    Failed to get fill value using same data type that was ");
 	puts("    used to set the fill value.");
 	goto error;
@@ -117,7 +117,7 @@ test_getset(void)
      */
     if (H5Pget_fill_value(dcpl, type_si, &fill_si)<0) goto error;
     if (fill_ss.v1!=fill_si.v1 || fill_ss.v2!=fill_si.v2) {
-	FAILED();
+	H5_FAILED();
 	puts("    Failed to get fill value using a data type other than what");
 	puts("    was used to set the fill value.");
 	goto error;
@@ -129,7 +129,7 @@ test_getset(void)
     if (H5Pset_fill_value(dcpl, type_si, &fill_si)<0) goto error;
     if (H5Pget_fill_value(dcpl, type_ss, &fill_ss)<0) goto error;
     if (fill_si.v1!=fill_ss.v1 || fill_si.v2!=fill_ss.v2) {
-	FAILED();
+	H5_FAILED();
 	puts("    Resetting the fill value was unsuccessful.");
 	goto error;
     }
@@ -237,7 +237,7 @@ test_create(hid_t fapl, const char *base_name, H5D_layout_t layout)
 #ifndef NO_FILLING
     if (H5Pget_fill_value(dcpl, H5T_NATIVE_SHORT, &rd_s)<0) goto error;
     if (rd_s!=fill_s) {
-	FAILED();
+	H5_FAILED();
 	puts("    Got a different fill value than what was set.");
 	printf("    Got %d, set %d\n", rd_s, fill_s);
 	goto error;
@@ -252,7 +252,7 @@ test_create(hid_t fapl, const char *base_name, H5D_layout_t layout)
 #ifndef NO_FILLING
     if (H5Pget_fill_value(dcpl, H5T_NATIVE_LONG, &rd_l)<0) goto error;
     if (rd_l!=fill_l) {
-	FAILED();
+	H5_FAILED();
 	puts("    Got a different fill value than what was set.");
 	printf("    Got %ld, set %ld\n", rd_l, fill_l);
 	goto error;
@@ -267,7 +267,7 @@ test_create(hid_t fapl, const char *base_name, H5D_layout_t layout)
 #ifndef NO_FILLING
     if (H5Pget_fill_value(dcpl, H5T_NATIVE_LONG, &rd_l)<0) goto error;
     if (rd_l!=fill_l) {
-	FAILED();
+	H5_FAILED();
 	puts("    Got a different fill value than what was set.");
 	printf("    Got %ld, set %ld\n", rd_l, fill_l);
 	goto error;
@@ -360,7 +360,7 @@ test_rdwr(hid_t fapl, const char *base_name, H5D_layout_t layout)
 	if (H5Dread(dset, H5T_NATIVE_INT, mspace, fspace, H5P_DEFAULT,
 		    &val_rd)<0) goto error;
 	if (val_rd!=fillval) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read was not a fill value.");
 	    printf("    Elmt={%ld,%ld,%ld,%ld,%ld}, read: %u, "
 		   "Fill value: %u\n",
@@ -405,7 +405,7 @@ test_rdwr(hid_t fapl, const char *base_name, H5D_layout_t layout)
 		    &val_rd)<0) goto error;
 
 	if (val_rd!=should_be) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read was not correct.");
 	    printf("    Elmt={%ld,%ld,%ld,%ld,%ld}, read: %u, "
 		   "should be: %u\n",
@@ -558,7 +558,7 @@ test_extend(hid_t fapl, const char *base_name, H5D_layout_t layout)
 	if (H5Dread(dset, H5T_NATIVE_INT, mspace, fspace, H5P_DEFAULT,
 		    &val_rd)<0) goto error;
 	if (val_rd!=fillval) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read was not a fill value.");
 	    printf("    Elmt={%ld,%ld,%ld,%ld,%ld}, read: %u, "
 		   "Fill value: %u\n",
@@ -603,7 +603,7 @@ test_extend(hid_t fapl, const char *base_name, H5D_layout_t layout)
 		    &val_rd)<0) goto error;
 
 	if (val_rd!=should_be) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read was not correct.");
 	    printf("    Elmt={%ld,%ld,%ld,%ld,%ld}, read: %u, "
 		   "should be: %u\n",
@@ -639,7 +639,7 @@ test_extend(hid_t fapl, const char *base_name, H5D_layout_t layout)
 		    &val_rd)<0) goto error;
 
 	if (val_rd!=should_be) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read was not correct.");
 	    printf("    Elmt={%ld,%ld,%ld,%ld,%ld}, read: %u, "
 		   "should be: %u\n",
diff --git a/test/flush2.c b/test/flush2.c
index ffdae59..8e7fb24 100644
--- a/test/flush2.c
+++ b/test/flush2.c
@@ -69,7 +69,7 @@ main(void)
 	     */
 	    error = fabs(the_data[i][j]-(double)(hssize_t)i/((hssize_t)j+1));
 	    if (error>0.0001) {
-		FAILED();
+		H5_FAILED();
 		printf("    dset[%lu][%lu] = %g\n",
 		       (unsigned long)i, (unsigned long)j, the_data[i][j]);
 		printf("    should be %g\n",
diff --git a/test/gheap.c b/test/gheap.c
index 85e09be..7d651e5 100644
--- a/test/gheap.c
+++ b/test/gheap.c
@@ -65,7 +65,7 @@ test_1 (hid_t fapl)
     if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0)
 	goto error;
     if (NULL==(f=H5I_object(file))) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unable to create file");
 	goto error;
     }
@@ -81,11 +81,11 @@ test_1 (hid_t fapl)
 	H5Eclear ();
 	status = H5HG_insert (f, size, out, obj+i);
 	if (status<0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to insert object into global heap");
 	    nerrors++;
 	} else if (i && H5F_addr_gt (obj[i-1].addr, obj[i].addr)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Collection addresses are not monotonically increasing");
 	    nerrors++;
 	}
@@ -99,11 +99,11 @@ test_1 (hid_t fapl)
 	memset (out, 'A'+i%26, size);
 	H5Eclear ();
 	if (NULL==H5HG_read (f, obj+i, in)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to read object");
 	    nerrors++;
 	} else if (memcmp (in, out, size)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read doesn't match value written");
 	    nerrors++;
 	}
@@ -159,7 +159,7 @@ test_2 (hid_t fapl)
     if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0)
 	goto error;
     if (NULL==(f=H5I_object(file))) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unable to create file");
 	goto error;
     }
@@ -172,7 +172,7 @@ test_2 (hid_t fapl)
 	memset (out, 'A'+i%26, size);
 	H5Eclear ();
 	if (H5HG_insert (f, size, out, obj+i)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to insert object into global heap");
 	    nerrors++;
 	}
@@ -186,11 +186,11 @@ test_2 (hid_t fapl)
 	memset (out, 'A'+i%26, size);
 	H5Eclear ();
 	if (NULL==H5HG_read (f, obj+i, in)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to read object");
 	    nerrors++;
 	} else if (memcmp (in, out, size)) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Value read doesn't match value written");
 	    nerrors++;
 	}
@@ -246,7 +246,7 @@ test_3 (hid_t fapl)
     if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0)
 	goto error;
     if (NULL==(f=H5I_object(file))) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unable to create file");
 	goto error;
     }
@@ -258,7 +258,7 @@ test_3 (hid_t fapl)
 	H5Eclear ();
 	status = H5HG_insert (f, size, out, obj+i);
 	if (status<0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to insert object into global heap");
 	    nerrors++;
 	}
@@ -268,7 +268,7 @@ test_3 (hid_t fapl)
     for (i=0; i<1024; i++) {
 	status = H5HG_remove (f, obj+i);
 	if (status<0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to remove object");
 	    nerrors++;
 	}
@@ -325,7 +325,7 @@ test_4 (hid_t fapl)
     if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0)
 	goto error;
     if (NULL==(f=H5I_object(file))) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unable to create file");
 	goto error;
     }
@@ -337,7 +337,7 @@ test_4 (hid_t fapl)
 	H5Eclear ();
 	status = H5HG_insert (f, size, out, obj+i);
 	if (status<0) {
-	    FAILED();
+	    H5_FAILED();
 	    puts("    Unable to insert object into global heap");
 	    nerrors++;
 	}
@@ -351,7 +351,7 @@ test_4 (hid_t fapl)
 	    H5Eclear ();
 	    status = H5HG_remove (f, obj+i-1);
 	    if (status<0) {
-		FAILED();
+		H5_FAILED();
 		puts("    Unable to remove object");
 		nerrors++;
 	    }
diff --git a/test/h5test.c b/test/h5test.c
index db4d59d..ac834bf 100644
--- a/test/h5test.c
+++ b/test/h5test.c
@@ -90,7 +90,7 @@ static const char *multi_letters = "msbrglo";
 herr_t
 h5_errors(void UNUSED *client_data)
 {
-    FAILED();
+    H5_FAILED();
     H5Eprint (stdout);
     return 0;
 }
diff --git a/test/h5test.h b/test/h5test.h
index 1dc00c6..325d1f8 100644
--- a/test/h5test.h
+++ b/test/h5test.h
@@ -31,15 +31,15 @@ extern char *paraprefix;
 /*
  * The name of the test is printed by saying TESTING("something") which will
  * result in the string `Testing something' being flushed to standard output.
- * If a test passes, fails, or is skipped then the PASSED(), FAILED(), or
- * SKIPPED() macro should be called.  After FAILED() or SKIPPED() the caller
+ * If a test passes, fails, or is skipped then the PASSED(), H5_FAILED(), or
+ * SKIPPED() macro should be called.  After H5_FAILED() or SKIPPED() the caller
  * should print additional information to stdout indented by at least four
  * spaces.  If the h5_errors() is used for automatic error handling then
- * the FAILED() macro is invoked automatically when an API function fails.
+ * the H5_FAILED() macro is invoked automatically when an API function fails.
  */
 #define TESTING(WHAT)	{printf("%-70s", "Testing " WHAT); fflush(stdout);}
 #define PASSED()	{puts(" PASSED");fflush(stdout);}
-#define FAILED()	{puts("*FAILED*");fflush(stdout);}
+#define H5_FAILED()	{puts("*FAILED*");fflush(stdout);}
 #define SKIPPED()	{puts(" -SKIP-");fflush(stdout);}
 
 /*
diff --git a/test/istore.c b/test/istore.c
index f706d60..92941f3 100644
--- a/test/istore.c
+++ b/test/istore.c
@@ -99,7 +99,7 @@ new_object(H5F_t *f, const char *name, uintn ndims, H5G_entry_t *ent/*out*/)
 
     /* Create the object header */
     if (H5O_create(f, 64, ent)) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5O_create() = NULL");
 	goto error;
     }
@@ -116,14 +116,14 @@ new_object(H5F_t *f, const char *name, uintn ndims, H5G_entry_t *ent/*out*/)
     }
     H5F_arr_create(f, &layout/*in,out*/);
     if (H5O_modify(ent, H5O_LAYOUT, H5O_NEW_MESG, 0, &layout) < 0) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5O_modify istore message failure.");
 	goto error;
     }
 
     /* Give the object header a name */
     if (H5G_insert(H5G_entof(H5G_rootof(f)), name, ent) < 0) {
-	FAILED();
+	H5_FAILED();
 	printf("    H5G_insert(f, name=\"%s\", ent) failed\n", name);
 	goto error;
     }
@@ -237,12 +237,12 @@ test_extend(H5F_t *f, const char *prefix,
 	goto error;
     }
     if (NULL == H5O_read(&handle, H5O_LAYOUT, 0, &layout)) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unable to read istore message.");
 	goto error;
     }
     if (ndims != layout.ndims) {
-	FAILED();
+	H5_FAILED();
 	printf("    Header read error: istore.ndims != %d\n", ndims);
 	goto error;
     }
@@ -301,7 +301,7 @@ test_extend(H5F_t *f, const char *prefix,
 	/* Write to disk */
 	if (H5F_arr_write(f, H5P_DEFAULT, &layout, NULL, NULL, NULL, size,
 			  size, zero, offset, buf)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    Write failed: ctr=%lu\n", (unsigned long)ctr);
 	    goto error;
 	}
@@ -310,12 +310,12 @@ test_extend(H5F_t *f, const char *prefix,
 	memset(check, 0xff, (size_t)nelmts);
 	if (H5F_arr_read(f, H5P_DEFAULT, &layout, NULL, NULL, NULL, size,
 			 size, zero, offset, check)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    Read failed: ctr=%lu\n", (unsigned long)ctr);
 	    goto error;
 	}
 	if (memcmp(buf, check, (size_t)nelmts)) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    Read check failed: ctr=%lu\n", (unsigned long)ctr);
 	    printf("    Wrote:\n");
 	    print_array(buf, (size_t)size[0], (size_t)size[1],
@@ -341,7 +341,7 @@ test_extend(H5F_t *f, const char *prefix,
     memset(buf, 0xff, nx * ny * nz);
     if (H5F_arr_read(f, H5P_DEFAULT, &layout, NULL, NULL, NULL, whole_size,
 		     whole_size, zero, zero, buf)<0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Read failed for whole array.");
 	goto error;
     }
@@ -349,7 +349,7 @@ test_extend(H5F_t *f, const char *prefix,
 	for (j=0; j<ny; j++) {
 	    for (k=0; k<nz; k++) {
 		if (whole[i*ny*nz + j*nz + k] != buf[i*ny*nz + j*nz + k]) {
-		    FAILED();
+		    H5_FAILED();
 		    printf("    Check failed at i=%lu", (unsigned long)i);
 		    if (ndims > 1) {
 			printf(", j=%lu", (unsigned long)j);
@@ -438,7 +438,7 @@ test_sparse(H5F_t *f, const char *prefix, size_t nblocks,
 	goto error;
     }
     if (NULL == H5O_read(&handle, H5O_LAYOUT, 0, &layout)) {
-	FAILED();
+	H5_FAILED();
 	printf("    Unable to read istore message\n");
 	goto error;
     }
@@ -454,7 +454,7 @@ test_sparse(H5F_t *f, const char *prefix, size_t nblocks,
 	/* write to disk */
 	if (H5F_arr_write(f, H5P_DEFAULT, &layout, NULL, NULL, NULL, size,
 			  size, zero, offset, buf)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    Write failed: ctr=%lu\n", (unsigned long)ctr);
 	    printf("    offset=(%lu", (unsigned long) (offset[0]));
 	    if (ndims > 1)
diff --git a/test/lheap.c b/test/lheap.c
index a92b066..fc1780b 100644
--- a/test/lheap.c
+++ b/test/lheap.c
@@ -62,12 +62,12 @@ main(void)
     if ((file=H5Fcreate(filename, H5F_ACC_TRUNC, H5P_DEFAULT, fapl))<0)
 	goto error;
     if (NULL==(f=H5I_object(file))) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5HL_create(f, 0, &heap_addr/*out*/)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
@@ -78,7 +78,7 @@ main(void)
 
         if ((size_t)(-1)==(obj[i]=H5HL_insert(f, heap_addr, strlen(buf)+1,
 					      buf))) {
-	    FAILED();
+	    H5_FAILED();
 	    H5Eprint(stdout);
 	    goto error;
 	}
@@ -93,7 +93,7 @@ main(void)
     h5_fixname(FILENAME[0], fapl, filename, sizeof filename);
     if ((file=H5Fopen(filename, H5F_ACC_RDONLY, fapl))<0) goto error;
     if (NULL==(f=H5I_object(file))) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
@@ -102,12 +102,12 @@ main(void)
         for (j=4; j<i; j++) buf[j] = '0' + j%10;
         if (j>4) buf[j] = '\0';
         if (NULL==(s=H5HL_peek(f, heap_addr, obj[i]))) {
-	    FAILED();
+	    H5_FAILED();
 	    H5Eprint(stdout);
 	    goto error;
 	}
 	if (strcmp(s, buf)) {
-	    FAILED();
+	    H5_FAILED();
 	    printf("    i=%d, heap offset=%lu\n", i, (unsigned long)(obj[i]));
 	    printf("    got: \"%s\"\n", s);
 	    printf("    ans: \"%s\"\n", buf);
diff --git a/test/links.c b/test/links.c
index 3a1d659..04a9e27 100644
--- a/test/links.c
+++ b/test/links.c
@@ -122,12 +122,12 @@ cklinks(hid_t fapl)
     if (H5Gget_objinfo(file, "d1", TRUE, &sb1)<0) goto error;
     if (H5Gget_objinfo(file, "grp1/hard", TRUE, &sb2)<0) goto error;
     if (H5G_DATASET!=sb2.type) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unexpected object type should have been a dataset");
 	goto error;
     }
     if (sb1.objno[0]!=sb2.objno[0] || sb1.objno[1]!=sb2.objno[1]) {
-	FAILED();
+	H5_FAILED();
 	puts("    Hard link test failed. Link seems not to point to the ");
 	puts("    expected file location.");
 	goto error;
@@ -136,12 +136,12 @@ cklinks(hid_t fapl)
     /* Symbolic link */
     if (H5Gget_objinfo(file, "grp1/soft", TRUE, &sb2)<0) goto error;
     if (H5G_DATASET!=sb2.type) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unexpected object type should have been a dataset");
 	goto error;
     }
     if (sb1.objno[0]!=sb2.objno[0] || sb1.objno[1]!=sb2.objno[1]) {
-	FAILED();
+	H5_FAILED();
 	puts("    Soft link test failed. Link seems not to point to the ");
 	puts("    expected file location.");
 	goto error;
@@ -150,7 +150,7 @@ cklinks(hid_t fapl)
 	goto error;
     }
     if (strcmp(linkval, "/d1")) {
-	FAILED();
+	H5_FAILED();
 	puts("    Soft link test failed. Wrong link value");
 	goto error;
     }
@@ -160,13 +160,13 @@ cklinks(hid_t fapl)
 	status = H5Gget_objinfo(file, "grp1/dangle", TRUE, &sb2);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5Gget_objinfo() should have failed for a dangling link.");
 	goto error;
     }
     if (H5Gget_objinfo(file, "grp1/dangle", FALSE, &sb2)<0) goto error;
     if (H5G_LINK!=sb2.type) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unexpected object type should have been a symbolic link");
 	goto error;
     }
@@ -174,7 +174,7 @@ cklinks(hid_t fapl)
 	goto error;
     }
     if (strcmp(linkval, "foobar")) {
-	FAILED();
+	H5_FAILED();
 	puts("    Dangling link test failed. Wrong link value");
 	goto error;
     }
@@ -184,13 +184,13 @@ cklinks(hid_t fapl)
 	status = H5Gget_objinfo(file, "grp1/recursive", TRUE, &sb2);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5Gget_objinfo() should have failed for a recursive link.");
 	goto error;
     }
     if (H5Gget_objinfo(file, "grp1/recursive", FALSE, &sb2)<0) goto error;
     if (H5G_LINK!=sb2.type) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unexpected object type should have been a symbolic link");
 	goto error;
     }
@@ -198,7 +198,7 @@ cklinks(hid_t fapl)
 	goto error;
     }
     if (strcmp(linkval, "/grp1/recursive")) {
-	FAILED();
+	H5_FAILED();
 	puts("   Recursive link test failed. Wrong link value");
 	goto error;
     }
diff --git a/test/mount.c b/test/mount.c
index de06d65..caaf466 100644
--- a/test/mount.c
+++ b/test/mount.c
@@ -167,7 +167,7 @@ test_illegal(hid_t fapl)
 	status = H5Fmount(file1, "/mnt1", file1, H5P_DEFAULT);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Mounting a file on itself should have failed.");
 	goto error;
     }
@@ -183,7 +183,7 @@ test_illegal(hid_t fapl)
 	status = H5Fmount(mnt, ".", file3, H5P_DEFAULT);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Mounting two files at one mount point should have failed.");
 	goto error;
     }
@@ -253,7 +253,7 @@ test_hide(hid_t fapl)
 	grp = H5Gopen(file1, "/mnt1/file1");
     } H5E_END_TRY;
     if (grp>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Name is still accessible under mount point.");
 	goto error;
     }
@@ -265,7 +265,7 @@ test_hide(hid_t fapl)
     if (H5Gget_objinfo(file1, "/file1", TRUE, &sb2)<0) goto error;
     if (sb1.fileno[0]!=sb2.fileno[0] || sb1.fileno[1]!=sb2.fileno[1] ||
 	sb1.objno[0]!=sb2.objno[0] || sb1.objno[1]!=sb2.objno[1]) {
-	FAILED();
+	H5_FAILED();
 	puts("    Hard link failed for hidden object.");
 	goto error;
     }
@@ -333,7 +333,7 @@ test_assoc(hid_t fapl)
     if (H5Gget_objinfo(file1, "/mnt1", TRUE, &sb2)<0) goto error;
     if (sb1.fileno[0]!=sb2.fileno[0] || sb1.fileno[1]!=sb2.fileno[1] ||
 	sb1.objno[0]!=sb2.objno[0] || sb1.objno[1]!=sb2.objno[1]) {
-	FAILED();
+	H5_FAILED();
 	puts("    Association failed.");
 	goto error;
     }
@@ -456,7 +456,7 @@ test_move(hid_t fapl)
 	status = H5Gmove(file1, "/mnt1/rename_b/y",  "/y");
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Moving an object across files should't have been possible");
 	goto error;
     }
@@ -656,7 +656,7 @@ test_unlink(hid_t fapl)
 	status = H5Gget_objinfo(mnt, "file2", TRUE, NULL);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Incorrect traversal from mount point!");
 	goto error;
     }
@@ -673,7 +673,7 @@ test_unlink(hid_t fapl)
 	status = H5Gget_objinfo(mnt, "file2", TRUE, NULL);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Traversal through mount point should not have worked!");
 	goto error;
     }
@@ -681,7 +681,7 @@ test_unlink(hid_t fapl)
 	status = H5Gget_objinfo(file2, "/mnt_unlink/file2", TRUE, NULL);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Traversal through mount point should not have worked!");
 	goto error;
     }
@@ -695,7 +695,7 @@ test_unlink(hid_t fapl)
 	status = H5Funmount(file1, "/mnt_unlink");
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unmount by name should not have been allowed!");
 	goto error;
     }
@@ -703,7 +703,7 @@ test_unlink(hid_t fapl)
 	status = H5Funmount(file2, "/");
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unmount by name should not have been allowed!");
 	goto error;
     }
@@ -821,7 +821,7 @@ test_interlink(hid_t fapl)
 	status = H5Glink(file1, H5G_LINK_HARD, "/mnt1/file2",  "/file2");
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Interfile hard link should not have been allowed!");
 	goto error;
     }
@@ -831,7 +831,7 @@ test_interlink(hid_t fapl)
 	status = H5Gmove(file1, "/mnt1/file2", "/file2");
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Interfile renaming should not have been allowed!");
 	goto error;
     }
@@ -844,7 +844,7 @@ test_interlink(hid_t fapl)
 	dset = H5Dcreate(file1, "/mnt1/file2/dset", type, space, H5P_DEFAULT);
     } H5E_END_TRY;
     if (dset>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Dataset and shared type must be in the same file!");
 	goto error;
     }
@@ -976,7 +976,7 @@ test_close(hid_t fapl)
 	status = H5Gget_objinfo(file2, "/mnt1", TRUE, NULL);
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    File1 contents are still accessible!");
 	goto error;
     }
diff --git a/test/mtime.c b/test/mtime.c
index 5c5992b..a579d93 100644
--- a/test/mtime.c
+++ b/test/mtime.c
@@ -78,7 +78,7 @@ main(void)
     /* Compare times from the two ways of calling H5Gget_objinfo() */
     if (sb1.objno[0]!=sb2.objno[0] || sb1.objno[1]!=sb2.objno[1] ||
 	sb1.mtime!=sb2.mtime) {
-	FAILED();
+	H5_FAILED();
 	puts("    Calling H5Gget_objinfo() with the dataset ID returned");
 	puts("    different values than calling it with a file and dataset");
 	puts("    name.");
@@ -93,7 +93,7 @@ main(void)
 	puts("    cannot be queried on this system.  See H5O_mtime_decode().");
 	return 0;
     } else if (fabs(HDdifftime(now, sb1.mtime))>60.0) {
-	FAILED();
+	H5_FAILED();
 	tm = localtime(&(sb1.mtime));
 	strftime((char*)buf1, sizeof buf1, "%Y-%m-%d %H:%M:%S", tm);
 	tm = localtime(&now);
diff --git a/test/ohdr.c b/test/ohdr.c
index 114ac02..8cc61d1 100644
--- a/test/ohdr.c
+++ b/test/ohdr.c
@@ -63,7 +63,7 @@ main(void)
      */
     TESTING("object header creation");
     if (H5O_create(f, 64, &oh_ent/*out*/)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
@@ -74,23 +74,23 @@ main(void)
     stab.btree_addr = 11111111;
     stab.heap_addr = 22222222;
     if (H5O_modify(&oh_ent, H5O_STAB, H5O_NEW_MESG, 0, &stab)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5AC_flush(f, NULL, HADDR_UNDEF, TRUE)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (NULL==H5O_read(&oh_ent, H5O_STAB, 0, &ro)) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5F_addr_ne(ro.btree_addr, stab.btree_addr) ||
 	H5F_addr_ne(ro.heap_addr, stab.heap_addr)) {
-	FAILED();
+	H5_FAILED();
 	HDfprintf(stdout, "    got: {%a, %a}\n",
 		  ro.btree_addr, ro.heap_addr);
 	HDfprintf(stdout, "    ans: {%a, %a}\n",
@@ -106,23 +106,23 @@ main(void)
     stab.btree_addr = 33333333;
     stab.heap_addr = 44444444;
     if (H5O_modify(&oh_ent, H5O_STAB, 0, 0, &stab)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5AC_flush(f, NULL, HADDR_UNDEF, TRUE)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (NULL==H5O_read(&oh_ent, H5O_STAB, 0, &ro)) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5F_addr_ne(ro.btree_addr, stab.btree_addr) ||
 	H5F_addr_ne(ro.heap_addr, stab.heap_addr)) {
-	FAILED();
+	H5_FAILED();
 	HDfprintf(stdout, "    got: {%a, %a}\n",
 		  ro.btree_addr, ro.heap_addr);
 	HDfprintf(stdout, "    ans: {%a, %a}\n",
@@ -139,23 +139,23 @@ main(void)
     stab.btree_addr = 55555555;
     stab.heap_addr = 66666666;
     if (H5O_modify(&oh_ent, H5O_STAB, H5O_NEW_MESG, 0, &stab)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5AC_flush(f, NULL, HADDR_UNDEF, TRUE)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (NULL==H5O_read(&oh_ent, H5O_STAB, 1, &ro)) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5F_addr_ne(ro.btree_addr, stab.btree_addr) ||
 	H5F_addr_ne(ro.heap_addr, stab.heap_addr)) {
-	FAILED();
+	H5_FAILED();
 	HDfprintf(stdout, "    got: {%a, %a}\n",
 		  ro.btree_addr, ro.heap_addr);
 	HDfprintf(stdout, "    ans: {%a, %a}\n",
@@ -171,23 +171,23 @@ main(void)
     stab.btree_addr = 77777777;
     stab.heap_addr = 88888888;
     if (H5O_modify(&oh_ent, H5O_STAB, 1, 0, &stab)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5AC_flush(f, NULL, HADDR_UNDEF, TRUE)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (NULL==H5O_read(&oh_ent, H5O_STAB, 1, &ro)) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5F_addr_ne(ro.btree_addr, stab.btree_addr) ||
 	H5F_addr_ne(ro.heap_addr, stab.heap_addr)) {
-	FAILED();
+	H5_FAILED();
 	HDfprintf(stdout, "    got: {%a, %a}\n",
 		  ro.btree_addr, ro.heap_addr);
 	HDfprintf(stdout, "    ans: {%a, %a}\n",
@@ -205,13 +205,13 @@ main(void)
         stab.btree_addr = (i+1)*1000+1;
         stab.heap_addr = (i+1)*1000+2;
         if (H5O_modify(&oh_ent, H5O_STAB, H5O_NEW_MESG, 0, &stab)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    H5Eprint(stdout);
 	    goto error;
 	}
     }
     if (H5AC_flush(f, NULL, HADDR_UNDEF, TRUE)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
@@ -226,12 +226,12 @@ main(void)
         stab.btree_addr = (i + 1) * 1000 + 10;
         stab.heap_addr = (i + 1) * 1000 + 20;
         if (H5O_modify(&oh_ent, H5O_STAB, H5O_NEW_MESG, 0, &stab)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    H5Eprint(stdout);
 	    goto error;
 	}
         if (H5AC_flush(f, NULL, HADDR_UNDEF, TRUE)<0) {
-	    FAILED();
+	    H5_FAILED();
 	    H5Eprint(stdout);
 	    goto error;
 	}
@@ -243,12 +243,12 @@ main(void)
      */
     TESTING("message deletion");
     if (H5O_remove(&oh_ent, H5O_STAB, H5O_ALL)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
     if (H5O_read(&oh_ent, H5O_STAB, 0, &ro)) {
-	FAILED();
+	H5_FAILED();
 	puts("    H5O_read() should have failed but didn't");
 	H5Eclear();
 	goto error;
@@ -259,7 +259,7 @@ main(void)
     /* release resources */
     TESTING("object header closing");
     if (H5O_close(&oh_ent)<0) {
-	FAILED();
+	H5_FAILED();
 	H5Eprint(stdout);
 	goto error;
     }
diff --git a/test/stab.c b/test/stab.c
index 46c9ca9..4517930 100644
--- a/test/stab.c
+++ b/test/stab.c
@@ -66,7 +66,7 @@ test_misc(hid_t fapl)
     if ((g3=H5Gopen(file, "/test_1b"))<0) goto error;
     if (H5Gget_comment(g3, "././.", sizeof comment, comment)<0) goto error;
     if (strcmp(comment, "hello world")) {
-	FAILED();
+	H5_FAILED();
 	puts("    Read the wrong comment string from the group.");
 	printf("    got: \"%s\"\n    ans: \"hello world\"\n", comment);
 	goto error;
diff --git a/test/unlink.c b/test/unlink.c
index 84802b3..fbf9f99 100644
--- a/test/unlink.c
+++ b/test/unlink.c
@@ -64,7 +64,7 @@ test_one(hid_t file)
 	status = H5Gunlink(grp, ".");
     } H5E_END_TRY;
     if (status>=0) {
-	FAILED();
+	H5_FAILED();
 	puts("    Unlinking object w/o a name should have failed.");
 	goto error;
     }
-- 
cgit v0.12