/[escript]/branches/arrexp_2137_win/paso/src/Paso_MPI.h
ViewVC logotype

Contents of /branches/arrexp_2137_win/paso/src/Paso_MPI.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 971 - (show annotations)
Wed Feb 14 04:40:49 2007 UTC (12 years, 4 months ago) by ksteube
Original Path: trunk/paso/src/Paso_MPI.h
File MIME type: text/plain
File size: 785 byte(s)
Had to undo commit to new MPI branch. The changes went into the original and
not the branch. The files committed here are exactly the same as revision 969.


1 #ifndef INC_MPI
2 #define INC_MPI
3
4 #include "Common.h"
5
6 #ifdef PASO_MPI
7
8 #include "mpi_C.h"
9
10 #define PASO_MPI_TODO { fprintf( stdout, "\nTODO : %s:%d\n", __FILE__, __LINE__); MPI_Finalize(); exit(1); }
11 #define PASO_INFO_ERRORMSG( err, msg ) { char _msg__[256]; sprintf( _msg__, "%s : %s:%d\n", msg, __FILE__, __LINE__ ); Paso_setError( err, _msg__ ); }
12
13 /* Datatypes */
14 struct Paso_MPIInfo{
15 dim_t reference_counter;
16 int size;
17 int rank;
18 MPI_Comm comm;
19 };
20
21 typedef struct Paso_MPIInfo Paso_MPIInfo;
22
23 /* Function prototypes */
24 Paso_MPIInfo* Paso_MPIInfo_alloc( MPI_Comm comm );
25 void Paso_MPIInfo_dealloc( Paso_MPIInfo* );
26 Paso_MPIInfo *Paso_MPIInfo_getReference( Paso_MPIInfo* in );
27 int Paso_MPI_initialized( void );
28
29 #endif // INC_PASO_MPI
30
31 #endif // PASO_MPI

  ViewVC Help
Powered by ViewVC 1.1.26