Multi-Node rocshmem_finalize() bug (#138)

src/backend_bc.cpp

@@ -86,18 +86,7 @@ Backend::Backend(MPI_Comm comm) : heap{comm} {
 }
 
 void Backend::init_mpi_once(MPI_Comm comm) {
-  int init_done{};
-  NET_CHECK(MPI_Initialized(&init_done));
-
-  int provided{};
-  if (!init_done) {
-    NET_CHECK(MPI_Init_thread(0, 0, MPI_THREAD_MULTIPLE, &provided));
-    if (provided != MPI_THREAD_MULTIPLE) {
-      fprintf(stderr, "MPI_THREAD_MULTIPLE support disabled.\n");
-    }
-  }
   if (comm == MPI_COMM_NULL) comm = MPI_COMM_WORLD;
-
   NET_CHECK(MPI_Comm_dup(comm, &backend_comm));
   NET_CHECK(MPI_Comm_size(backend_comm, &num_pes));
   NET_CHECK(MPI_Comm_rank(backend_comm, &my_pe));