]> https://gitweb.dealii.org/ - dealii.git/commitdiff
do not free MPI_COMM_NULL communicator in ProcessGrid
authorBenjamin Brands <benjamin.brands@fau.de>
Wed, 10 Jan 2018 10:46:27 +0000 (11:46 +0100)
committerBenjamin Brands <benjamin.brands@fau.de>
Wed, 10 Jan 2018 10:46:27 +0000 (11:46 +0100)
source/base/process_grid.cc

index 8aa2ea9eb4118c3b984b6c6df5c953274f291d2c..69741b9046639592a23cb31fb1adf01fd57d772e 100644 (file)
@@ -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);
     }
 
 

In the beginning the Universe was created. This has made a lot of people very angry and has been widely regarded as a bad move.

Douglas Adams


Typeset in Trocchi and Trocchi Bold Sans Serif.