From 13740de42770668cb6c9468aa031190817f5c712 Mon Sep 17 00:00:00 2001
From: mattijs <mattijs>
Date: Thu, 15 Jul 2021 11:23:39 +0100
Subject: [PATCH] BUG: mpi: use group-local communicator allocation. Fixes
#2158
---
src/Pstream/mpi/UPstream.C | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/src/Pstream/mpi/UPstream.C b/src/Pstream/mpi/UPstream.C
index 7a5332ce810..07f3765528a 100644
--- a/src/Pstream/mpi/UPstream.C
+++ b/src/Pstream/mpi/UPstream.C
@@ -1091,11 +1091,12 @@ void Foam::UPstream::allocatePstreamCommunicator
&PstreamGlobals::MPIGroups_[index]
);
- // Create new communicator
- MPI_Comm_create
+ // Create new communicator for this group
+ MPI_Comm_create_group
(
PstreamGlobals::MPICommunicators_[parentIndex],
PstreamGlobals::MPIGroups_[index],
+ Pstream::msgType(),
&PstreamGlobals::MPICommunicators_[index]
);
--
GitLab