Skip to content

Commit d7b7326

Browse files
committed
correct asserts for c_to_f values
Signed-off-by: Howard Pritchard <howardp@lanl.gov>
1 parent 9f00382 commit d7b7326

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

ompi/communicator/comm_init.c

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -183,7 +183,7 @@ int ompi_comm_init_mpi3 (void)
183183

184184
/* Setup MPI_COMM_WORLD */
185185
OBJ_CONSTRUCT(&ompi_mpi_comm_world, ompi_communicator_t);
186-
assert(ompi_mpi_comm_world.comm.c_f_to_c_index == 1);
186+
assert(ompi_mpi_comm_world.comm.c_f_to_c_index == OMPI_MPI_COMM_WORLD);
187187

188188
ret = ompi_group_from_pset (ompi_mpi_instance_default, "mpi://world", &group);
189189
if (OPAL_UNLIKELY(OMPI_SUCCESS != ret)) {
@@ -237,7 +237,7 @@ int ompi_comm_init_mpi3 (void)
237237
}
238238
/* Setup MPI_COMM_SELF */
239239
OBJ_CONSTRUCT(&ompi_mpi_comm_self, ompi_communicator_t);
240-
assert(ompi_mpi_comm_self.comm.c_f_to_c_index == 2);
240+
assert(ompi_mpi_comm_self.comm.c_f_to_c_index == OMPI_MPI_COMM_SELF);
241241

242242
ret = ompi_group_from_pset (ompi_mpi_instance_default, "mpi://self", &group);
243243
if (OPAL_UNLIKELY(OMPI_SUCCESS != ret)) {

0 commit comments

Comments
 (0)