smpi_process_data_t smpi_process_remote_data(int index);
void smpi_process_set_user_data(void *);
void* smpi_process_get_user_data(void);
-int smpi_process_get_win_id();
-void smpi_process_set_win_id(int);
int smpi_process_count(void);
MPI_Comm smpi_process_comm_world(void);
smx_rdv_t smpi_process_mailbox(void);
char state;
int sampling; /* inside an SMPI_SAMPLE_ block? */
char* instance_id;
- int nb_wins;
xbt_bar_t finalization_barrier;
} s_smpi_process_data_t;
(*argc)-=2;
data->argc = argc;
data->argv = argv;
- data->nb_wins=0;
// set the process attached to the mailbox
simcall_rdv_set_receiver(data->mailbox_small, proc);
XBT_DEBUG("<%d> New process in the game: %p", index, proc);
return process_data->data;
}
-
-int smpi_process_get_win_id()
-{
- smpi_process_data_t process_data = smpi_process_data();
- return process_data->nb_wins;
-}
-
-void smpi_process_set_win_id(int id)
-{
- smpi_process_data_t process_data = smpi_process_data();
- process_data->nb_wins = id;
-}
-
-
int smpi_process_count(void)
{
return process_count;