From 7401c7c65dabf9e88e19280ea91ef4d698f7db2d Mon Sep 17 00:00:00 2001 From: Augustin Degomme Date: Fri, 2 Apr 2021 11:34:18 +0200 Subject: [PATCH] we need to check comm is not null before trying for the rank, duh.. --- src/smpi/bindings/smpi_pmpi_request.cpp | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/smpi/bindings/smpi_pmpi_request.cpp b/src/smpi/bindings/smpi_pmpi_request.cpp index 9ef11e6a84..9e2dc56095 100644 --- a/src/smpi/bindings/smpi_pmpi_request.cpp +++ b/src/smpi/bindings/smpi_pmpi_request.cpp @@ -22,10 +22,10 @@ static int getPid(MPI_Comm comm, int id) CHECK_BUFFER(1, buf, count)\ CHECK_COUNT(2, count)\ CHECK_TYPE(3, datatype)\ + CHECK_COMM(6)\ if(dst!= MPI_PROC_NULL)\ CHECK_RANK(4, dst, comm)\ - CHECK_TAG(5, tag)\ - CHECK_COMM(6)\ + CHECK_TAG(5, tag) #define CHECK_ISEND_INPUTS\ CHECK_REQUEST(7)\ @@ -38,10 +38,10 @@ static int getPid(MPI_Comm comm, int id) CHECK_BUFFER(1, buf, count)\ CHECK_COUNT(2, count)\ CHECK_TYPE(3, datatype)\ + CHECK_COMM(6)\ if(src!=MPI_ANY_SOURCE && src!=MPI_PROC_NULL)\ CHECK_RANK(4, src, comm)\ - CHECK_TAG(5, tag)\ - CHECK_COMM(6) + CHECK_TAG(5, tag) /* PMPI User level calls */ int PMPI_Send_init(const void *buf, int count, MPI_Datatype datatype, int dst, int tag, MPI_Comm comm, MPI_Request * request) -- 2.20.1