Changeset 1525 for XIOS/dev/branch_openmp/extern/ep_dev/ep_init.cpp

Timestamp:

06/07/18 19:39:07 (6 years ago)

Author:

yushan

Message:

save dev : intercomm_create via intracomm. To do : modif related intercomm communication routines, barrier, free, rank, size...

File:

• XIOS/dev/branch_openmp/extern/ep_dev/ep_init.cpp (modified) (2 diffs)

XIOS/dev/branch_openmp/extern/ep_dev/ep_init.cpp

@@ -2 +2 @@
 #include <mpi.h>
 #include "ep_declaration.hpp"
+#include "ep_mpi.hpp"
 
+extern MPI_Group MPI_GROUP_WORLD;
 
 namespace ep_lib
@@ -16 +18 @@
     {
       ::MPI_Init_thread(argc, argv, required, provided);
+      ::MPI_Comm_group(to_mpi_comm(MPI_COMM_WORLD->mpi_comm), &MPI_GROUP_WORLD);
     }
   }