ESyS-Particle  4.0.1
MpiWrap.h
00001 
00002 //                                                         //
00003 // Copyright (c) 2003-2011 by The University of Queensland //
00004 // Earth Systems Science Computational Centre (ESSCC)      //
00005 // http://www.uq.edu.au/esscc                              //
00006 //                                                         //
00007 // Primary Business: Brisbane, Queensland, Australia       //
00008 // Licensed under the Open Software License version 3.0    //
00009 // http://www.opensource.org/licenses/osl-3.0.php          //
00010 //                                                         //
00012 
00013 
00014 #ifndef MPIWRAP_H
00015 
00016 #include <mpi.h>
00017 
00018 #if HAVE_CONFIG_H
00019 #include "config.h"
00020 #endif
00021 
00022 #if HAVE_MPI_COMM_DISCONNECT
00023 #else
00024 inline int MPI_Comm_disconnect(MPI_Comm *comm)
00025 {
00026   return MPI_Comm_free(comm);
00027 }
00028 #endif
00029 
00030 #endif