[mpich2-commits] r9553 - in mpich2/trunk/src: mpi/pt2pt mpid/ch3/src

[goodell at mcs.anl.gov]

Author: goodell
Date: 2012-02-29 11:27:23 -0600 (Wed, 29 Feb 2012)
New Revision: 9553

Modified:
   mpich2/trunk/src/mpi/pt2pt/imrecv.c
   mpich2/trunk/src/mpid/ch3/src/mpid_mrecv.c
Log:
minor mprobe fixes (segfault, missing handle conversion)

Looks like I broke this functionality and then somehow missed the final
testing pass, since this test was passing late in the development
process.

No reviewer.

Modified: mpich2/trunk/src/mpi/pt2pt/imrecv.c
===================================================================
--- mpich2/trunk/src/mpi/pt2pt/imrecv.c	2012-02-29 02:11:15 UTC (rev 9552)
+++ mpich2/trunk/src/mpi/pt2pt/imrecv.c	2012-02-29 17:27:23 UTC (rev 9553)
@@ -75,6 +75,7 @@
 #   endif /* HAVE_ERROR_CHECKING */
 
     /* Convert MPI object handles to object pointers */
+    MPID_Request_get_ptr(*message, msgp);
 
     /* Validate parameters and objects (post conversion) */
 #   ifdef HAVE_ERROR_CHECKING

Modified: mpich2/trunk/src/mpid/ch3/src/mpid_mrecv.c
===================================================================
--- mpich2/trunk/src/mpid/ch3/src/mpid_mrecv.c	2012-02-29 02:11:15 UTC (rev 9552)
+++ mpich2/trunk/src/mpid/ch3/src/mpid_mrecv.c	2012-02-29 17:27:23 UTC (rev 9553)
@@ -16,14 +16,13 @@
     int mpi_errno = MPI_SUCCESS;
     MPI_Request req_handle; /* dummy for MPIR_Request_complete */
     int active_flag; /* dummy for MPIR_Request_complete */
-    MPID_Request *msgp = NULL;
     MPID_Request *rreq = NULL;
 
     /* There is no optimized MPID_Mrecv at this time because there is no real
      * optimization potential in that case.  MPID_Recv exists to prevent
      * creating a request unnecessarily for messages that are already present
      * and eligible for immediate completion. */
-    mpi_errno = MPID_Imrecv(buf, count, datatype, msgp, &rreq);
+    mpi_errno = MPID_Imrecv(buf, count, datatype, message, &rreq);
     if (mpi_errno) MPIU_ERR_POP(mpi_errno);
 
     if (!MPID_Request_is_complete(rreq)) {