ESyS-Particle  4.0.1
MpiWrap.h
1 
2 // //
3 // Copyright (c) 2003-2011 by The University of Queensland //
4 // Earth Systems Science Computational Centre (ESSCC) //
5 // http://www.uq.edu.au/esscc //
6 // //
7 // Primary Business: Brisbane, Queensland, Australia //
8 // Licensed under the Open Software License version 3.0 //
9 // http://www.opensource.org/licenses/osl-3.0.php //
10 // //
12 
13 
14 #ifndef MPIWRAP_H
15 
16 #include <mpi.h>
17 
18 #if HAVE_CONFIG_H
19 #include "config.h"
20 #endif
21 
22 #if HAVE_MPI_COMM_DISCONNECT
23 #else
24 inline int MPI_Comm_disconnect(MPI_Comm *comm)
25 {
26  return MPI_Comm_free(comm);
27 }
28 #endif
29 
30 #endif