X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/ae0ea7b8ffeac5625e3d3a745af03707c67dd341..dadb783835c77b9af0262d3a93a0815538b17a96:/src/smpi/smpi_base.c diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c index b545e49192..823a5eb253 100644 --- a/src/smpi/smpi_base.c +++ b/src/smpi/smpi_base.c @@ -234,11 +234,13 @@ static MPI_Request build_request(void *buf, int count, } -void smpi_empty_status(MPI_Status * status) { +void smpi_empty_status(MPI_Status * status) +{ if(status != MPI_STATUS_IGNORE) { - status->MPI_SOURCE=MPI_ANY_SOURCE; - status->MPI_TAG=MPI_ANY_TAG; - status->count=0; + status->MPI_SOURCE = MPI_ANY_SOURCE; + status->MPI_TAG = MPI_ANY_TAG; + status->MPI_ERROR = MPI_SUCCESS; + status->count=0; } }