From 260f2a2c974962ed4844533ec8518b1463e7c281 Mon Sep 17 00:00:00 2001 From: Arnaud Giersch Date: Fri, 16 Sep 2022 16:48:30 +0200 Subject: [PATCH] Also check result for last call of MPI_Alltoallv in this example. --- teshsuite/smpi/coll-alltoallv/coll-alltoallv.c | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/teshsuite/smpi/coll-alltoallv/coll-alltoallv.c b/teshsuite/smpi/coll-alltoallv/coll-alltoallv.c index 9e74d4b7aa..09fa811cff 100644 --- a/teshsuite/smpi/coll-alltoallv/coll-alltoallv.c +++ b/teshsuite/smpi/coll-alltoallv/coll-alltoallv.c @@ -134,7 +134,9 @@ int main(int argc, char **argv) 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); -- 2.20.1