From 28df942f24971393bc65b4f9fdde3dff0fb8b3fd Mon Sep 17 00:00:00 2001
From: Augustin Degomme <degomme@idpann.imag.fr>
Date: Mon, 5 Nov 2012 11:18:29 +0100
Subject: [PATCH] as MPI_Iprobe always use a 0-sized request, do not check if
 this size is different from the sent one, and do not answer MPI_ERR_TRUNCATE

---
 src/smpi/smpi_base.c | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c
index 29b8eb7645..4d58f246ba 100644
--- a/src/smpi/smpi_base.c
+++ b/src/smpi/smpi_base.c
@@ -461,10 +461,8 @@ void smpi_mpi_iprobe(int source, int tag, MPI_Comm comm, int* flag, MPI_Status*
     if(status != MPI_STATUS_IGNORE) {
       status->MPI_SOURCE = req->src;
       status->MPI_TAG = req->tag;
-      if(req->size == request->size)
-        status->MPI_ERROR = MPI_SUCCESS;
-      else status->MPI_ERROR = MPI_ERR_TRUNCATE;
-      status->count = request->size;
+      status->MPI_ERROR = MPI_SUCCESS;
+      status->count = req->size;
     }
   }
   else *flag = 0;
-- 
2.20.1