X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/04cb8833befbe07b6b94ff0cae98bc17b78724e3..c7755270750cf39ac2b73cda0e05ecf375a53562:/examples/smpi/smpi_msg_masterslave/masterslave_mailbox_smpi.c diff --git a/examples/smpi/smpi_msg_masterslave/masterslave_mailbox_smpi.c b/examples/smpi/smpi_msg_masterslave/masterslave_mailbox_smpi.c index 51cc923511..2ea6b1bcf4 100644 --- a/examples/smpi/smpi_msg_masterslave/masterslave_mailbox_smpi.c +++ b/examples/smpi/smpi_msg_masterslave/masterslave_mailbox_smpi.c @@ -72,7 +72,7 @@ static int alltoall_mpi(int argc, char *argv[]) XBT_INFO("alltoall for rank %d", rank); int* out=malloc(1000*size*sizeof(int)); int* in=malloc(1000*size*sizeof(int)); - MPI_Alltoall(out, 1000, MPI_INT,in, 1000, MPI_INT, MPI_COMM_WORLD); + MPI_Alltoall(out, 1000, MPI_INT,in, 1000, MPI_INT, MPI_COMM_WORLD); XBT_INFO("after alltoall %d", rank); free(out); @@ -116,6 +116,7 @@ int main(int argc, char *argv[]) msg_error_t res; MSG_init(&argc, argv); + SMPI_init(); xbt_assert(argc > 2,"Usage: %s platform_file deployment_file\n" "\nexample: %s msg_platform.xml msg_deployment.xml\n", argv[0], argv[0]); @@ -129,7 +130,6 @@ int main(int argc, char *argv[]) // the second performing an alltoall on 4 nodes SMPI_app_instance_register("alltoall_mpi", alltoall_mpi,4); MSG_launch_application(argv[2]); - SMPI_init(); res = MSG_main();