FEI
Version of the Day
Main Page
Related Pages
Files
File List
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Groups
Pages
base
fei_chk_mpi.hpp
1
2
#ifndef _fei_chk_mpi_hpp_
3
#define _fei_chk_mpi_hpp_
4
5
/*--------------------------------------------------------------------*/
6
/* Copyright 2005 Sandia Corporation. */
7
/* Under the terms of Contract DE-AC04-94AL85000, there is a */
8
/* non-exclusive license for use of this work by or on behalf */
9
/* of the U.S. Government. Export of this program may require */
10
/* a license from the United States Government. */
11
/*--------------------------------------------------------------------*/
12
13
#include <fei_mpi.h>
14
15
#ifdef CHK_MPI
16
#undef CHK_MPI
17
#endif
18
19
static
const
char
fei_mpi_file[] = __FILE__;
20
21
#define CHK_MPI(a) { int snl_fei_mpiErrorCode = a; \
22
if (snl_fei_mpiErrorCode != MPI_SUCCESS) {\
23
fei::console_out() << fei_mpi_file << ", line " << __LINE__ \
24
<<" MPI ERROR " << FEI_ENDL; \
25
return(snl_fei_mpiErrorCode); \
26
} }
27
#endif
28
Generated on Fri Sep 1 2023 07:58:41 for FEI by
1.8.5