portelli/Grid
1
0
Fork 0
mirror of https://github.com/paboyle/Grid.git synced 2025-04-17 01:05:55 +01:00
Code Releases Activity

QedFVol: Patch to fix MPI communicators error

Browse Source
This commit is contained in:
James Harrison 2017-11-06 16:34:55 +00:00
parent 95af55128e
commit 840814c776
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/communicator/Communicator_mpi.cc
View File

@ -55,9 +55,9 @@ void CartesianCommunicator::Init(int *argc, char ***argv) {
CartesianCommunicator::~CartesianCommunicator() CartesianCommunicator::~CartesianCommunicator()
{ {
int MPI_is_finalised; // int MPI_is_finalised;
MPI_Finalized(&MPI_is_finalised); // MPI_Finalized(&MPI_is_finalised);
if (communicator && MPI_is_finalised) if (communicator && !MPI::Is_finalized())
MPI_Comm_free(&communicator); MPI_Comm_free(&communicator);
} }