// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
*len = 5;
} else {
*len = snprintf(name, MPI_MAX_NAME_STRING, "%p", this);
*len = 5;
} else {
*len = snprintf(name, MPI_MAX_NAME_STRING, "%p", this);
Comm::unref(intra_comm_);
if (leaders_comm_ != MPI_COMM_NULL)
Comm::unref(leaders_comm_);
Comm::unref(intra_comm_);
if (leaders_comm_ != MPI_COMM_NULL)
Comm::unref(leaders_comm_);
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
Coll_allgather_mpich::allgather(&leader, 1, MPI_INT , leaders_map, 1, MPI_INT, this);
Coll_allgather_mpich::allgather(&leader, 1, MPI_INT , leaders_map, 1, MPI_INT, this);
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
}
Coll_bcast_mpich::bcast(&(is_uniform_),1, MPI_INT, 0, comm_intra );
}
Coll_bcast_mpich::bcast(&(is_uniform_),1, MPI_INT, 0, comm_intra );
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}
// we need to switch as the called function may silently touch global variables
smpi_switch_data_segment(simgrid::s4u::Actor::self());
}