Process::~Process()
{
+ if (comm_self_ != MPI_COMM_NULL)
+ simgrid::smpi::Comm::destroy(comm_self_);
+ if (comm_intra_ != MPI_COMM_NULL)
+ simgrid::smpi::Comm::destroy(comm_intra_);
xbt_os_timer_free(timer_);
xbt_mutex_destroy(mailboxes_mutex_);
}
argv_ = argv;
// set the process attached to the mailbox
mailbox_small_->setReceiver(process_);
- XBT_DEBUG("<%lu> New process in the game: %p", process_->getPid(), process_.get());
+ XBT_DEBUG("<%lu> SMPI process has been initialized: %p", process_->getPid(), process_.get());
}
/** @brief Prepares the current process for termination. */