summaryrefslogtreecommitdiff
path: root/app-shells/mpibash/files/mpi-3.patch
blob: 7b7e1ec820de26ff078104d4892cdab2c9c8a0a2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
From 0b396b62ac314ae509ac3ca5fa9d5119e862be51 Mon Sep 17 00:00:00 2001
From: Scott Pakin <pakin@lanl.gov>
Date: Wed, 19 Feb 2020 13:43:40 -0700
Subject: [PATCH] Replace deprecated MPI_Errhandler_set with newer
 MPI_Comm_set_errhandler

Resolves #17.
---
 src/init.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/init.c b/src/init.c
index cd070a7..46b1127 100644
--- a/src/init.c
+++ b/src/init.c
@@ -77,7 +77,7 @@ mpi_init_builtin (WORD_LIST *list)
 
   /* Make MPI errors return instead of crash.  Also, store our rank
    * and number of ranks. */
-  MPI_Errhandler_set (MPI_COMM_WORLD, MPI_ERRORS_RETURN);
+  MPI_Comm_set_errhandler (MPI_COMM_WORLD, MPI_ERRORS_RETURN);
   MPI_Comm_rank (MPI_COMM_WORLD, &mpibash_rank);
   MPI_Comm_size (MPI_COMM_WORLD, &mpibash_num_ranks);