X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/41f201dce67effdcae5bf02d142e5cbe113b1d3a..1b47d369792c9dcc53eb1212353fe944cb697201:/src/smpi/smpi_base.c diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c index 51b0d9afff..8a02def723 100644 --- a/src/smpi/smpi_base.c +++ b/src/smpi/smpi_base.c @@ -84,12 +84,6 @@ MPI_Request smpi_mpi_recv_init(void *buf, int count, MPI_Datatype datatype, return request; } -static void myfree(void *d) { - xbt_backtrace_display_current(); - XBT_INFO("myfree called on %p",d); - free(d); -} - void smpi_mpi_start(MPI_Request request) { smx_rdv_t mailbox; @@ -113,14 +107,14 @@ void smpi_mpi_start(MPI_Request request) detached = 1; request->buf = malloc(request->size); memcpy(request->buf,oldbuf,request->size); - XBT_INFO("Send request %p is detached; buf %p copied into %p",request,oldbuf,request->buf); + XBT_DEBUG("Send request %p is detached; buf %p copied into %p",request,oldbuf,request->buf); } else { XBT_DEBUG("Send request %p is not detached (buf: %p)",request,request->buf); } request->action = SIMIX_req_comm_isend(mailbox, request->size, -1.0, request->buf, request->size, - &match_send,myfree, // cleanup using a simple free() FIXME: that may not be sufficient + &match_send,free, // a simple free is used to free the buffer request, // detach if msg size < eager/rdv switch limit detached);