Changeset 2578

Timestamp:

09/22/23 18:18:33 (8 months ago)

Author:

ymipsl

Message:

tracking unfreed communicators. Do not include MPI_COMM_NULL in the list.
YM

File:

• XIOS3/trunk/src/mpi_tools.cpp (modified) (1 diff)

XIOS3/trunk/src/mpi_tools.cpp

@@ -11 +11 @@
   void CCommTrack::registerComm(const MPI_Comm& comm)
   {
-    auto it = commTrack_.find(comm) ;
-    if (it == commTrack_.end())  commTrack_[comm] = MemTrack::backTrace(3);
-    else ERROR("CCommtrack::registerComm", << "Communicator already allocated : " << endl<<it->second)
+    if (comm!=MPI_COMM_NULL)
+    {
+      auto it = commTrack_.find(comm) ;
+      if (it == commTrack_.end())  commTrack_[comm] = MemTrack::backTrace(3);
+      else ERROR("CCommtrack::registerComm", << "Communicator already allocated : " << endl<<it->second)
+    }
   }