-/* Copyright (c) 2013-2022. The SimGrid Team.
+/* Copyright (c) 2013-2023. The SimGrid Team.
* All rights reserved. */
/* This program is free software; you can redistribute it and/or modify it
print_buffer_int(sdispls, size, "sdisp:", rank);
print_buffer_int(rdispls, size, "rdisp:", rank);
- MPI_Alltoallv(sbuf, sendcounts, sdispls, MPI_INT, rbuf, recvcounts, rdispls, MPI_INT, comm);
+ status = MPI_Alltoallv(sbuf, sendcounts, sdispls, MPI_INT, rbuf, recvcounts, rdispls, MPI_INT, comm);
+ if (status != MPI_SUCCESS)
+ printf("MPI_Alltoallv did not return MPI_SUCCESS\n");
print_buffer_int(rbuf, size2, "rbuf:", rank);