fixes Huge overhead of IPM nerscadmin#29

paklui · Apr 8, 2022 · 68ada46 · 68ada46
1 parent 02f0cdc
commit 68ada46
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/include/mod_mpi.h b/include/mod_mpi.h
@@ -27,9 +27,7 @@ extern MPI_Group ipm_world_group;
 
 #define IPM_MPI_MAP_RANK(rank_out_, rank_in_, comm_) \
   do { \
-    int comm_cmp_; \
-    PMPI_Comm_compare(MPI_COMM_WORLD, comm_, &comm_cmp_); \
-    if (comm_cmp_ == MPI_IDENT || rank_in_ == MPI_ANY_SOURCE) { \
+    if (comm_ == MPI_COMM_WORLD || rank_in_ == MPI_ANY_SOURCE) { \
       rank_out_=rank_in_; \
     } else { \
       MPI_Group group_; \