X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/149c63f36e15b8500b1e826bda5138318ff7ba2b..8dd3206354d72d10fed1f3df1cf834573d9c0d9d:/src/smpi/colls/allgather/allgather-NTSLR-NB.cpp diff --git a/src/smpi/colls/allgather/allgather-NTSLR-NB.cpp b/src/smpi/colls/allgather/allgather-NTSLR-NB.cpp index 77b8723318..0c400bc51b 100644 --- a/src/smpi/colls/allgather/allgather-NTSLR-NB.cpp +++ b/src/smpi/colls/allgather/allgather-NTSLR-NB.cpp @@ -1,4 +1,4 @@ -/* Copyright (c) 2013-2020. The SimGrid Team. +/* Copyright (c) 2013-2021. The SimGrid Team. * All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it @@ -25,12 +25,9 @@ allgather__NTSLR_NB(const void *sbuf, int scount, MPI_Datatype stype, size = comm->size(); rextent = rtype->get_extent(); sextent = stype->get_extent(); - MPI_Request* rrequest_array = new MPI_Request[size]; - MPI_Request* srequest_array = new MPI_Request[size]; - // irregular case use default MPI fucntions if (scount * sextent != rcount * rextent) { - XBT_WARN("MPI_allgather_NTSLR_NB use default MPI_allgather."); + XBT_INFO("MPI_allgather_NTSLR_NB: irregular case, use default MPI_allgather."); allgather__default(sbuf, scount, stype, rbuf, rcount, rtype, comm); return MPI_SUCCESS; } @@ -49,6 +46,9 @@ allgather__NTSLR_NB(const void *sbuf, int scount, MPI_Datatype stype, //start sending logical ring message int increment = scount * sextent; + auto* rrequest_array = new MPI_Request[size]; + auto* srequest_array = new MPI_Request[size]; + //post all irecv first for (i = 0; i < size - 1; i++) { recv_offset = ((rank - i - 1 + size) % size) * increment;