From 0a4387ec35b12f20127ab6467e032fc6dfd930cb Mon Sep 17 00:00:00 2001 From: edoapra Date: Mon, 13 Mar 2023 18:21:57 -0700 Subject: [PATCH] fix rank.ne.0 return code --- src/util/util_checkmpirun.c | 14 ++++++-------- 1 file changed, 6 insertions(+), 8 deletions(-) diff --git a/src/util/util_checkmpirun.c b/src/util/util_checkmpirun.c index 74c8d63415..2352c07391 100644 --- a/src/util/util_checkmpirun.c +++ b/src/util/util_checkmpirun.c @@ -131,14 +131,12 @@ void FATR util_checkmpirun_(Integer *ok_out){ } } - if (rank == 0) { - if (incompatible) { - printf("%d MPI-related incompatibilities were detected!\n", incompatible); - *ok_out = (Integer) 0; - }else{ - *ok_out = (Integer) 1; - - } + if (incompatible) { + if (rank == 0) printf("%d MPI-related incompatibilities were detected!\n", incompatible); + *ok_out = (Integer) 0; + }else{ + *ok_out = (Integer) 1; + }