X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/18c57b27dd71ee7839c6a90368c845886a87d638..bacbeb57f1e9eae6aa69a8f2fa5f455d7f4d1dac:/src/smpi/smpi_base.c

diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c
index d06a471653..e897b2ee15 100644
--- a/src/smpi/smpi_base.c
+++ b/src/smpi/smpi_base.c
@@ -65,7 +65,8 @@ static MPI_Request build_request(void *buf, int count,
 
 static void smpi_mpi_request_free_voidp(void* request)
 {
-  smpi_mpi_request_free(request);
+  MPI_Request req = request;
+  smpi_mpi_request_free(&req);
 }
 
 /* MPI Low level calls */
@@ -126,7 +127,9 @@ void smpi_mpi_start(MPI_Request request)
 				    detached);
 
 #ifdef HAVE_TRACING
-    simcall_set_category (request->action, TRACE_internal_smpi_get_category());
+    /* FIXME: detached sends are not traceable (request->action == NULL) */
+    if (request->action)
+      simcall_set_category(request->action, TRACE_internal_smpi_get_category());
 #endif
   }
 }