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

Contents of /trunk/paso/src/Paso_MPI.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1028 - (show annotations)
Wed Mar 14 00:15:24 2007 UTC (12 years, 5 months ago) by gross
File MIME type: text/plain
File size: 791 byte(s)
modifications to be compliant with _WIN32. The substitutes for asinh, acosh, atanh are still missing (erf will through an exception)
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