diff options
author | jhendersonHDF <jhenderson@hdfgroup.org> | 2021-02-17 12:37:23 (GMT) |
---|---|---|
committer | GitHub <noreply@github.com> | 2021-02-17 12:37:23 (GMT) |
commit | afdb7903c644ef8eab44a66248b85ce9bed60db8 (patch) | |
tree | f93fb1f558ad2cc972b81345f4bd8fbe45dbbb20 /src/H5mpi.c | |
parent | 2359a9b020761efd83b8a493b12f40b8a9696000 (diff) | |
download | hdf5-afdb7903c644ef8eab44a66248b85ce9bed60db8.zip hdf5-afdb7903c644ef8eab44a66248b85ce9bed60db8.tar.gz hdf5-afdb7903c644ef8eab44a66248b85ce9bed60db8.tar.bz2 |
Fix for HDFFV-11109 - Copy MPI comm and info object into output FAPL from H5F_get_access_plist (#342)
* Avoid freeing MPI_COMM_WORLD in H5_mpi_comm_free
* Copy MPI Comm and Info to new FAPL in H5F_get_access_plist
Diffstat (limited to 'src/H5mpi.c')
-rw-r--r-- | src/H5mpi.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/H5mpi.c b/src/H5mpi.c index 613a4bf..1c2d3b7 100644 --- a/src/H5mpi.c +++ b/src/H5mpi.c @@ -210,7 +210,7 @@ H5_mpi_comm_free(MPI_Comm *comm) HGOTO_ERROR(H5E_INTERNAL, H5E_BADVALUE, FAIL, "comm pointer cannot be NULL") /* Free the communicator */ - if (MPI_COMM_NULL != *comm) + if (MPI_COMM_WORLD != *comm && MPI_COMM_NULL != *comm) MPI_Comm_free(comm); *comm = MPI_COMM_NULL; |