/[escript]/temp/paso/src/Paso_MPI.h
ViewVC logotype

Annotation of /temp/paso/src/Paso_MPI.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 971 - (hide annotations)
Wed Feb 14 04:40:49 2007 UTC (12 years, 5 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 bcumming 731 #ifndef INC_MPI
2     #define INC_MPI
3    
4     #include "Common.h"
5    
6 bcumming 790 #ifdef PASO_MPI
7 ksteube 971
8 bcumming 790 #include "mpi_C.h"
9    
10 bcumming 731 #define PASO_MPI_TODO { fprintf( stdout, "\nTODO : %s:%d\n", __FILE__, __LINE__); MPI_Finalize(); exit(1); }
11 bcumming 751 #define PASO_INFO_ERRORMSG( err, msg ) { char _msg__[256]; sprintf( _msg__, "%s : %s:%d\n", msg, __FILE__, __LINE__ ); Paso_setError( err, _msg__ ); }
12 bcumming 731
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 ksteube 971 #endif // INC_PASO_MPI
30    
31 bcumming 790 #endif // PASO_MPI

  ViewVC Help
Powered by ViewVC 1.1.26