diff options
author | Wei-keng Liao <wkliao@users.noreply.github.com> | 2022-04-15 15:22:01 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2022-04-15 15:22:01 (GMT) |
commit | ea26955d18aa8f92918080c1ef7b00c0867cef29 (patch) | |
tree | e135fe5739b834bac68cbd36eee471496c1c9e45 /testpar/t_prop.c | |
parent | 852ed69f4fd807597fb24bd59d22117ce5f966f8 (diff) | |
download | hdf5-ea26955d18aa8f92918080c1ef7b00c0867cef29.zip hdf5-ea26955d18aa8f92918080c1ef7b00c0867cef29.tar.gz hdf5-ea26955d18aa8f92918080c1ef7b00c0867cef29.tar.bz2 |
not depend on doIO to free an MPI_Comm object (#1642)
Diffstat (limited to 'testpar/t_prop.c')
-rw-r--r-- | testpar/t_prop.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/testpar/t_prop.c b/testpar/t_prop.c index 606e100..930b895 100644 --- a/testpar/t_prop.c +++ b/testpar/t_prop.c @@ -535,10 +535,10 @@ external_links(void) for (i = 0; i < 2; i++) { - if (i == 0) { + comm = MPI_COMM_WORLD; + + if (i == 0) doIO = 1; - comm = MPI_COMM_WORLD; - } else { doIO = mpi_rank % 2; mrc = MPI_Comm_split(MPI_COMM_WORLD, doIO, mpi_rank, &comm); @@ -614,11 +614,11 @@ external_links(void) ret = H5Fclose(fid); VRFY((ret >= 0), "H5Fclose succeeded"); + } - if (i == 1) { - mrc = MPI_Comm_free(&comm); - VRFY((mrc == MPI_SUCCESS), "MPI_Comm_free succeeded"); - } + if (comm != MPI_COMM_WORLD) { + mrc = MPI_Comm_free(&comm); + VRFY((mrc == MPI_SUCCESS), "MPI_Comm_free succeeded"); } } |