From 00d6988283aff4d0c20c870cb97c9a3c30fcfb75 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Jakub=20Klinkovsk=C3=BD?= <klinkovsky@mmg.fjfi.cvut.cz>
Date: Thu, 24 Mar 2022 17:52:46 +0100
Subject: [PATCH] Simplified MPI::getRankOnNode with MPI_INFO_NULL
---
src/TNL/MPI/Utils.h | 6 +-----
1 file changed, 1 insertion(+), 5 deletions(-)
diff --git a/src/TNL/MPI/Utils.h b/src/TNL/MPI/Utils.h
index 3f6f08a9c0..3355f08fb5 100644
--- a/src/TNL/MPI/Utils.h
+++ b/src/TNL/MPI/Utils.h
@@ -56,16 +56,12 @@ getRankOnNode( MPI_Comm communicator = MPI_COMM_WORLD )
#ifdef HAVE_MPI
const int rank = GetRank( communicator );
- MPI_Info info;
- MPI_Info_create( &info );
-
MPI_Comm local_comm;
- MPI_Comm_split_type( communicator, MPI_COMM_TYPE_SHARED, rank, info, &local_comm );
+ MPI_Comm_split_type( communicator, MPI_COMM_TYPE_SHARED, rank, MPI_INFO_NULL, &local_comm );
const int local_rank = GetRank( local_comm );
MPI_Comm_free( &local_comm );
- MPI_Info_free( &info );
return local_rank;
#else
--
GitLab