[mpich2-commits] r7665 - mpich2/trunk/src/mpid/ch3/src

[buntinas at mcs.anl.gov]

Author: buntinas
Date: 2011-01-05 15:38:47 -0600 (Wed, 05 Jan 2011)
New Revision: 7665

Modified:
   mpich2/trunk/src/mpid/ch3/src/mpid_irecv.c
   mpich2/trunk/src/mpid/ch3/src/mpid_recv.c
Log:
Fix error reporting for bad message type.  No reviewer.

Modified: mpich2/trunk/src/mpid/ch3/src/mpid_irecv.c
===================================================================
--- mpich2/trunk/src/mpid/ch3/src/mpid_irecv.c	2011-01-04 21:48:54 UTC (rev 7664)
+++ mpich2/trunk/src/mpid/ch3/src/mpid_irecv.c	2011-01-05 21:38:47 UTC (rev 7665)
@@ -136,10 +136,11 @@
 	else
 	{
 	    /* --BEGIN ERROR HANDLING-- */
-	    MPID_Request_release(rreq);
+            int msg_type = MPIDI_Request_get_msg_type(rreq);
+            MPID_Request_release(rreq);
 	    rreq = NULL;
 	    MPIU_ERR_SETANDJUMP1(mpi_errno,MPI_ERR_INTERN, "**ch3|badmsgtype",
-		      "**ch3|badmsgtype %d", MPIDI_Request_get_msg_type(rreq));
+                                 "**ch3|badmsgtype %d", msg_type);
 	    /* --END ERROR HANDLING-- */
 	}
     }

Modified: mpich2/trunk/src/mpid/ch3/src/mpid_recv.c
===================================================================
--- mpich2/trunk/src/mpid/ch3/src/mpid_recv.c	2011-01-04 21:48:54 UTC (rev 7664)
+++ mpich2/trunk/src/mpid/ch3/src/mpid_recv.c	2011-01-05 21:38:47 UTC (rev 7665)
@@ -139,10 +139,11 @@
 	else
 	{
 	    /* --BEGIN ERROR HANDLING-- */
-	    MPID_Request_release(rreq);
+            int msg_type = MPIDI_Request_get_msg_type(rreq);
+            MPID_Request_release(rreq);
 	    rreq = NULL;
 	    MPIU_ERR_SETANDJUMP1(mpi_errno,MPI_ERR_INTERN, "**ch3|badmsgtype",
-		      "**ch3|badmsgtype %d", MPIDI_Request_get_msg_type(rreq));
+                                 "**ch3|badmsgtype %d", msg_type);
 	    /* --END ERROR HANDLING-- */
 	}
     }