1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
/*
* Copyright (C) by Argonne National Laboratory
* See COPYRIGHT in top-level directory
*/
#include <stdio.h>
#include "mpi.h"
void ChkMsg(int, int, const char[]);
/*
* This routine is used to check the message associated with an error
* code. Currently, it uses MPI_Error_string to get the corresponding
* message for a code, and prints out the corresponding class and original
* message.
*
* Eventually, we should also access the generic anc specific messages
* separately.
*/
void ChkMsg(int err, int msgclass, const char msg[])
{
char errmsg[MPI_MAX_ERROR_STRING];
int len;
MPI_Error_string(err, errmsg, &len);
fprintf(stdout, "[0x%08x] %2d %s \tgives %s\n", err, msgclass, msg, errmsg);
}
|
