Make sure we trigger the PERUSE event before releasing the request.

This commit was SVN r11879.

ompi/mca/pml/ob1/pml_ob1_recvreq.c

@@ -61,13 +61,14 @@ static int mca_pml_ob1_recv_request_free(struct ompi_request_t** request)
 
     OPAL_THREAD_LOCK(&ompi_request_lock);
     recvreq->req_recv.req_base.req_free_called = true;
-    if( true == recvreq->req_recv.req_base.req_pml_complete ) {
-        MCA_PML_OB1_RECV_REQUEST_RETURN( recvreq );
-    }
 
     PERUSE_TRACE_COMM_EVENT( PERUSE_COMM_REQ_NOTIFY,
                              &(recvreq->req_recv.req_base), PERUSE_RECV );
 
+    if( true == recvreq->req_recv.req_base.req_pml_complete ) {
+        MCA_PML_OB1_RECV_REQUEST_RETURN( recvreq );
+    }
+
     OPAL_THREAD_UNLOCK(&ompi_request_lock);
 
     *request = MPI_REQUEST_NULL;

ompi/mca/pml/ob1/pml_ob1_sendreq.c

@@ -89,13 +89,14 @@ static int mca_pml_ob1_send_request_free(struct ompi_request_t** request)
 
     OPAL_THREAD_LOCK(&ompi_request_lock);
     sendreq->req_send.req_base.req_free_called = true;
-    if( true == sendreq->req_send.req_base.req_pml_complete ) {
-        MCA_PML_OB1_SEND_REQUEST_RETURN( sendreq );
-    }
 
     PERUSE_TRACE_COMM_EVENT( PERUSE_COMM_REQ_NOTIFY,
                              &(sendreq->req_send.req_base), PERUSE_SEND );
 
+    if( true == sendreq->req_send.req_base.req_pml_complete ) {
+        MCA_PML_OB1_SEND_REQUEST_RETURN( sendreq );
+    }
+
     OPAL_THREAD_UNLOCK(&ompi_request_lock);
 
     *request = MPI_REQUEST_NULL;