From: Arnaud Giersch Date: Mon, 18 Feb 2013 20:39:29 +0000 (+0100) Subject: Check status also with MC. X-Git-Tag: v3_9_90~491^2~3 X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/commitdiff_plain/c6cb5a5160dfee6fbc85503a97eb59408853e494 Check status also with MC. --- diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c index 150cdfb0e5..8cb1cc8420 100644 --- a/src/smpi/smpi_base.c +++ b/src/smpi/smpi_base.c @@ -780,19 +780,18 @@ int smpi_mpi_waitall(int count, MPI_Request requests[], } } for(c = 0; c < count; c++) { - if(MC_is_active()) { - smpi_mpi_wait(&requests[c], pstat); - index = c; - } else { - index = smpi_mpi_waitany(count, requests, pstat); - if(index == MPI_UNDEFINED) { - break; - } - if (status != MPI_STATUSES_IGNORE) { - status[index] = *pstat; - if (status[index].MPI_ERROR == MPI_ERR_TRUNCATE) - retvalue = MPI_ERR_IN_STATUS; - } + if (MC_is_active()) { + smpi_mpi_wait(&requests[c], pstat); + index = c; + } else { + index = smpi_mpi_waitany(count, requests, pstat); + if (index == MPI_UNDEFINED) + break; + } + if (status != MPI_STATUSES_IGNORE) { + status[index] = *pstat; + if (status[index].MPI_ERROR == MPI_ERR_TRUNCATE) + retvalue = MPI_ERR_IN_STATUS; } }