summaryrefslogtreecommitdiffstats
path: root/testpar/t_pread.c
diff options
context:
space:
mode:
authorDana Robinson <43805+derobins@users.noreply.github.com>2023-06-28 15:31:32 (GMT)
committerGitHub <noreply@github.com>2023-06-28 15:31:32 (GMT)
commit187ea8a9ae1405b5b46ca47a32fb1fb9e2686c98 (patch)
treebaffa167d0796786241aef6b0ce76d4adec3b66e /testpar/t_pread.c
parent7a44581a84778a1346a2fd5b6cca7d9db905a321 (diff)
downloadhdf5-187ea8a9ae1405b5b46ca47a32fb1fb9e2686c98.zip
hdf5-187ea8a9ae1405b5b46ca47a32fb1fb9e2686c98.tar.gz
hdf5-187ea8a9ae1405b5b46ca47a32fb1fb9e2686c98.tar.bz2
Rename HD(f)printf() to (f)printf() (#3194)
Diffstat (limited to 'testpar/t_pread.c')
-rw-r--r--testpar/t_pread.c54
1 files changed, 27 insertions, 27 deletions
diff --git a/testpar/t_pread.c b/testpar/t_pread.c
index f408b71..d0bc09b 100644
--- a/testpar/t_pread.c
+++ b/testpar/t_pread.c
@@ -125,7 +125,7 @@ generate_test_file(MPI_Comm comm, int mpi_rank, int group_id)
if (mpi_rank == 0) {
- HDfprintf(stdout, "Constructing test files...");
+ fprintf(stdout, "Constructing test files...");
}
/* Setup the file names
@@ -429,11 +429,11 @@ generate_test_file(MPI_Comm comm, int mpi_rank, int group_id)
/* report results */
if (mpi_rank == 0) {
if (pass) {
- HDfprintf(stdout, "Done.\n");
+ fprintf(stdout, "Done.\n");
}
else {
- HDfprintf(stdout, "FAILED.\n");
- HDfprintf(stdout, "%s: failure_mssg = \"%s\"\n", fcn_name, failure_mssg);
+ fprintf(stdout, "FAILED.\n");
+ fprintf(stdout, "%s: failure_mssg = \"%s\"\n", fcn_name, failure_mssg);
}
}
@@ -1023,7 +1023,7 @@ test_parallel_read(MPI_Comm comm, int mpi_rank, int mpi_size, int group_id)
}
else {
H5_FAILED();
- HDfprintf(stdout, "%s: failure_mssg = \"%s\"\n", fcn_name, failure_mssg);
+ fprintf(stdout, "%s: failure_mssg = \"%s\"\n", fcn_name, failure_mssg);
}
HDremove(reloc_data_filename);
}
@@ -1077,34 +1077,34 @@ main(int argc, char **argv)
test_argv0 = HDstrdup(argv[0]);
if ((MPI_Init(&argc, &argv)) != MPI_SUCCESS) {
- HDfprintf(stderr, "FATAL: Unable to initialize MPI\n");
+ fprintf(stderr, "FATAL: Unable to initialize MPI\n");
HDexit(EXIT_FAILURE);
}
if ((MPI_Comm_rank(MPI_COMM_WORLD, &mpi_rank)) != MPI_SUCCESS) {
- HDfprintf(stderr, "FATAL: MPI_Comm_rank returned an error\n");
+ fprintf(stderr, "FATAL: MPI_Comm_rank returned an error\n");
HDexit(EXIT_FAILURE);
}
if ((MPI_Comm_size(MPI_COMM_WORLD, &mpi_size)) != MPI_SUCCESS) {
- HDfprintf(stderr, "FATAL: MPI_Comm_size returned an error\n");
+ fprintf(stderr, "FATAL: MPI_Comm_size returned an error\n");
HDexit(EXIT_FAILURE);
}
H5open();
if (mpi_rank == 0) {
- HDfprintf(stdout, "========================================\n");
- HDfprintf(stdout, "Collective file open optimization tests\n");
- HDfprintf(stdout, " mpi_size = %d\n", mpi_size);
- HDfprintf(stdout, "========================================\n");
+ fprintf(stdout, "========================================\n");
+ fprintf(stdout, "Collective file open optimization tests\n");
+ fprintf(stdout, " mpi_size = %d\n", mpi_size);
+ fprintf(stdout, "========================================\n");
}
if (mpi_size < 3) {
if (mpi_rank == 0) {
- HDprintf(" Need at least 3 processes. Exiting.\n");
+ printf(" Need at least 3 processes. Exiting.\n");
}
goto finish;
}
@@ -1121,7 +1121,7 @@ main(int argc, char **argv)
if ((MPI_Comm_split(MPI_COMM_WORLD, which_group, 0, &group_comm)) != MPI_SUCCESS) {
- HDfprintf(stderr, "FATAL: MPI_Comm_split returned an error\n");
+ fprintf(stderr, "FATAL: MPI_Comm_split returned an error\n");
HDexit(EXIT_FAILURE);
}
@@ -1132,7 +1132,7 @@ main(int argc, char **argv)
if (nerrs > 0) {
if (mpi_rank == 0) {
- HDprintf(" Test(1) file construction failed -- skipping tests.\n");
+ printf(" Test(1) file construction failed -- skipping tests.\n");
}
goto finish;
}
@@ -1142,7 +1142,7 @@ main(int argc, char **argv)
if (nerrs > 0) {
if (mpi_rank == 0) {
- HDprintf(" Test(2) file construction failed -- skipping tests.\n");
+ printf(" Test(2) file construction failed -- skipping tests.\n");
}
goto finish;
}
@@ -1152,15 +1152,15 @@ main(int argc, char **argv)
if (nerrs > 0) {
if (mpi_rank == 0) {
- HDprintf(" Parallel read test(1) failed -- skipping tests.\n");
+ printf(" Parallel read test(1) failed -- skipping tests.\n");
}
goto finish;
}
/* Update the user on our progress so far. */
if (mpi_rank == 0) {
- HDprintf(" Test 1 of 2 succeeded\n");
- HDprintf(" -- Starting multi-group parallel read test.\n");
+ printf(" Test 1 of 2 succeeded\n");
+ printf(" -- Starting multi-group parallel read test.\n");
}
/* run the 2nd set of tests */
@@ -1168,19 +1168,19 @@ main(int argc, char **argv)
if (nerrs > 0) {
if (mpi_rank == 0) {
- HDprintf(" Multi-group read test(2) failed\n");
+ printf(" Multi-group read test(2) failed\n");
}
goto finish;
}
if (mpi_rank == 0) {
- HDprintf(" Test 2 of 2 succeeded\n");
+ printf(" Test 2 of 2 succeeded\n");
}
finish:
if ((group_comm != MPI_COMM_NULL) && (MPI_Comm_free(&group_comm)) != MPI_SUCCESS) {
- HDfprintf(stderr, "MPI_Comm_free failed!\n");
+ fprintf(stderr, "MPI_Comm_free failed!\n");
}
/* make sure all processes are finished before final report, cleanup
@@ -1191,19 +1191,19 @@ finish:
if (mpi_rank == 0) { /* only process 0 reports */
const char *header = "Collective file open optimization tests";
- HDfprintf(stdout, "===================================\n");
+ fprintf(stdout, "===================================\n");
if (nerrs > 0) {
- HDfprintf(stdout, "***%s detected %d failures***\n", header, nerrs);
+ fprintf(stdout, "***%s detected %d failures***\n", header, nerrs);
}
else {
- HDfprintf(stdout, "%s finished with no failures\n", header);
+ fprintf(stdout, "%s finished with no failures\n", header);
}
- HDfprintf(stdout, "===================================\n");
+ fprintf(stdout, "===================================\n");
}
/* close HDF5 library */
if (H5close() != SUCCEED) {
- HDfprintf(stdout, "H5close() failed. (Ignoring)\n");
+ fprintf(stdout, "H5close() failed. (Ignoring)\n");
}
/* MPI_Finalize must be called AFTER H5close which may use MPI calls */