#1014: runtime: check MPI_Comm for use during component startup

DARMA-tasking · Sep 18, 2020 · 90901af · 90901af
1 parent 6f78475
commit 90901af
Showing 1 changed file with 9 additions and 1 deletion.
diff --git a/src/vt/runtime/runtime.cc b/src/vt/runtime/runtime.cc
@@ -439,7 +439,15 @@ bool Runtime::finalize(bool const force_now) {
 }
 
 void Runtime::sync() {
-  MPI_Barrier(communicator_);
+  MPI_Comm comm = communicator_;
+  if (comm == MPI_COMM_NULL and theContext != nullptr) {
+    comm = theContext->getComm();
+  }
+  if (comm == MPI_COMM_NULL) {
+    vtAbort("Trying to sync runtime while the communicator is not available");
+  } else {
+    MPI_Barrier(comm);
+  }
 }
 
 void Runtime::runScheduler() {