X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/d9347ab3e960f0f098338c88a79724dbcf4a58bb..187ba0c05f9fbe51175179b9f637b6554f947468:/src/smpi/smpi_base.c diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c index 29b8eb7645..a53491001b 100644 --- a/src/smpi/smpi_base.c +++ b/src/smpi/smpi_base.c @@ -5,7 +5,7 @@ * under the terms of the license (GNU LGPL) which comes with this package. */ #include "private.h" -#include "xbt/time.h" +#include "xbt/virtu.h" #include "mc/mc.h" #include "xbt/replay.h" #include @@ -461,10 +461,8 @@ void smpi_mpi_iprobe(int source, int tag, MPI_Comm comm, int* flag, MPI_Status* if(status != MPI_STATUS_IGNORE) { status->MPI_SOURCE = req->src; status->MPI_TAG = req->tag; - if(req->size == request->size) - status->MPI_ERROR = MPI_SUCCESS; - else status->MPI_ERROR = MPI_ERR_TRUNCATE; - status->count = request->size; + status->MPI_ERROR = MPI_SUCCESS; + status->count = req->size; } } else *flag = 0;