Merge Pull Request #12983 from gsjaardema/Trilinos/SEACAS-make_spawnable

Automatically Merged using Trilinos Pull Request AutoTester PR Title: b'SLICE: Make easier for sparc to spawn slice' PR Author: gsjaardema
trilinos · May 2, 2024 · d915dea · d915dea
2 parents 8fb65ea + 97c15eb
commit d915dea
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/packages/seacas/applications/slice/Slice.C b/packages/seacas/applications/slice/Slice.C
@@ -408,6 +408,12 @@ int main(int argc, char *argv[])
   }
 
 #ifdef SEACAS_HAVE_MPI
+  MPI_Comm parentcomm;
+  MPI_Comm_get_parent(&parentcomm);
+  if (parentcomm != MPI_COMM_NULL) {
+    int istatus = EXIT_SUCCESS;
+    MPI_Send(&istatus, 1, MPI_INT, 0, 0, parentcomm);
+  }
   MPI_Finalize();
 #endif
   fmt::print(stderr, "\nHigh-Water Memory Use: {} bytes\n",