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);
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]);
// 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();