From: Benjamin Brands Date: Wed, 10 Jan 2018 10:46:27 +0000 (+0100) Subject: do not free MPI_COMM_NULL communicator in ProcessGrid X-Git-Tag: v9.0.0-rc1~574^2~1 X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=1df94bba1127d5d1561301e447ca9521d29dc7a2;p=dealii.git do not free MPI_COMM_NULL communicator in ProcessGrid --- diff --git a/source/base/process_grid.cc b/source/base/process_grid.cc index 8aa2ea9eb4..69741b9046 100644 --- a/source/base/process_grid.cc +++ b/source/base/process_grid.cc @@ -217,7 +217,8 @@ namespace Utilities if (mpi_process_is_active) Cblacs_gridexit(blacs_context); - MPI_Comm_free(&mpi_communicator_inactive_with_root); + if (mpi_communicator_inactive_with_root != MPI_COMM_NULL) + MPI_Comm_free(&mpi_communicator_inactive_with_root); }