From bdffe1a4c1c157f23eb8c50cc5682d72daf59901 Mon Sep 17 00:00:00 2001 From: Augustin Degomme Date: Fri, 5 Jul 2013 17:42:00 +0200 Subject: [PATCH 1/1] fix tracing issue with some communicators --- src/smpi/smpi_base.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/smpi/smpi_base.c b/src/smpi/smpi_base.c index d7b67c078e..17328f3b97 100644 --- a/src/smpi/smpi_base.c +++ b/src/smpi/smpi_base.c @@ -588,7 +588,7 @@ static void finish_wait(MPI_Request * request, MPI_Status * status) if (TRACE_smpi_view_internals()) { if(req->flags & RECV){ int rank = smpi_process_index(); - int src_traced = smpi_group_index(smpi_comm_group(req->comm), req->src == MPI_ANY_SOURCE ? req->real_src : req->src); + int src_traced = (req->src == MPI_ANY_SOURCE ? req->real_src : req->src); TRACE_smpi_recv(rank, src_traced, rank); } } -- 2.30.2