X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/7d8a6180b3769b53adbe4600df95074763141495..efaf3faf8b1d61621c2e9253f853ab0733f6eba3:/src/smpi/smpi_base.c diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c index 91cb5993e4..39859d8ba0 100644 --- a/src/smpi/smpi_base.c +++ b/src/smpi/smpi_base.c @@ -63,6 +63,11 @@ static MPI_Request build_request(void *buf, int count, return request; } +static void smpi_mpi_request_free_voidp(void* request) +{ + smpi_mpi_request_free(request); +} + /* MPI Low level calls */ MPI_Request smpi_mpi_send_init(void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm) @@ -115,7 +120,7 @@ void smpi_mpi_start(MPI_Request request) SIMIX_req_comm_isend(mailbox, request->size, -1.0, request->buf, request->size, &match_send, - &smpi_mpi_request_free, // how to free the userdata if a detached send fails + &smpi_mpi_request_free_voidp, // how to free the userdata if a detached send fails request, // detach if msg size < eager/rdv switch limit detached);