vprotocol/pessimist: use internal ompi_* insted of MPI_*

ggouaillardet · ggouaillardet · commit 32e469553ac6 · 2015-11-20T13:51:20.000+09:00
(cherry picked from commit open-mpi/ompi@561e7f6)
diff --git a/ompi/mca/vprotocol/pessimist/vprotocol_pessimist_eventlog.c b/ompi/mca/vprotocol/pessimist/vprotocol_pessimist_eventlog.c
@@ -47,7 +47,7 @@ int vprotocol_pessimist_event_logger_connect(int el_rank, ompi_communicator_t **
     }
 
     /* Send Rank, receive max buffer size and max_clock back */
-    MPI_Comm_rank(MPI_COMM_WORLD, &rank);
+    rank = ompi_comm_rank(&ompi_mpi_comm_world.comm);
     rc = mca_pml_v.host_pml.pml_send(&rank, 1, MPI_INTEGER, 0,
                                      VPROTOCOL_PESSIMIST_EVENTLOG_NEW_CLIENT_CMD,
                                      MCA_PML_BASE_SEND_STANDARD,

Original file line number	Diff line number	Diff line change
`@@ -47,7 +47,7 @@ int vprotocol_pessimist_event_logger_connect(int el_rank, ompi_communicator_t **`
`47`	`47`	`}`
`48`	`48`
`49`	`49`	`/* Send Rank, receive max buffer size and max_clock back */`
`50`		`- MPI_Comm_rank(MPI_COMM_WORLD, &rank);`
	`50`	`+ rank = ompi_comm_rank(&ompi_mpi_comm_world.comm);`
`51`	`51`	`rc = mca_pml_v.host_pml.pml_send(&rank, 1, MPI_INTEGER, 0,`
`52`	`52`	`VPROTOCOL_PESSIMIST_EVENTLOG_NEW_CLIENT_CMD,`
`53`	`53`	`MCA_PML_BASE_SEND_STANDARD,`