-/* Copyright (c) 2013-2018. The SimGrid Team.
+/* Copyright (c) 2013-2020. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
namespace simgrid{
namespace smpi{
-int Coll_barrier_mpich_smp::barrier(MPI_Comm comm)
+int barrier__mpich_smp(MPI_Comm comm)
{
int mpi_errno = MPI_SUCCESS;
int mpi_errno_ret = MPI_SUCCESS;
local_rank = shmem_comm->rank();
/* do the intranode barrier on all nodes */
if (shmem_comm != NULL) {
- mpi_errno = Coll_barrier_mpich::barrier(shmem_comm);
+ mpi_errno = barrier__mpich(shmem_comm);
if (mpi_errno) {
mpi_errno_ret+=mpi_errno;
}
leader_comm = comm->get_leaders_comm();
/* do the barrier across roots of all nodes */
if (leader_comm != NULL && local_rank == 0) {
- mpi_errno = Coll_barrier_mpich::barrier(leader_comm);
+ mpi_errno = barrier__mpich(leader_comm);
if (mpi_errno) {
mpi_errno_ret+=mpi_errno;
}
* anything) */
if (shmem_comm != NULL) {
int i = 0;
- mpi_errno = Coll_bcast_mpich::bcast(&i, 1, MPI_BYTE, 0, shmem_comm);
+ mpi_errno = bcast__mpich(&i, 1, MPI_BYTE, 0, shmem_comm);
if (mpi_errno) {
mpi_errno_ret+=mpi_errno;
}