OpenMPI 0.1.1

- Main Page
- Related Pages
- Modules
- Data Structures
- Files

- File List
- Globals

vt_fmpiconst.h
1 /**
2 * VampirTrace
3 * http://www.tu-dresden.de/zih/vampirtrace
4 *
5 * Copyright (c) 2005-2012, ZIH, TU Dresden, Federal Republic of Germany
6 *
7 * Copyright (c) 1998-2005, Forschungszentrum Juelich, Juelich Supercomputing
8 * Centre, Federal Republic of Germany
9 *
10 * See the file COPYING in the package base directory for details
11 **/
12
13 #ifndef _VT_FMPICONST_H
14 #define _VT_FMPICONST_H
15
16 #ifdef __cplusplus
17 # define EXTERN extern "C"
18 #else
19 # define EXTERN extern
20 #endif
21
22 #include "config.h"
23
24 #include "mpi.h"
25
26 #define VT_MPI_F_BOTTOM vt_mpi_f_bottom_addr
27 #if (defined(HAVE_DECL_MPI_IN_PLACE) && HAVE_DECL_MPI_IN_PLACE)
28 # define VT_MPI_F_IN_PLACE vt_mpi_f_in_place_addr
29 #endif /* HAVE_DECL_MPI_IN_PLACE */
30 #define VT_MPI_F_STATUS_IGNORE vt_mpi_f_status_ignore_addr
31 #define VT_MPI_F_STATUSES_IGNORE vt_mpi_f_statuses_ignore_addr
32 #if (defined(HAVE_DECL_MPI_STATUS_SIZE) && HAVE_DECL_MPI_STATUS_SIZE)
33 # define VT_MPI_STATUS_SIZE MPI_STATUS_SIZE
34 #else /* HAVE_DECL_MPI_STATUS_SIZE */
35 # define VT_MPI_STATUS_SIZE vt_mpi_status_size
36 #endif /* HAVE_DECL_MPI_STATUS_SIZE */
37
38 #define VT_MPI_BOTTOM_F2C(addr) \
39 ((addr == VT_MPI_F_BOTTOM) ? MPI_BOTTOM : (addr))
40 #if (defined(HAVE_DECL_MPI_IN_PLACE) && HAVE_DECL_MPI_IN_PLACE)
41 # define VT_MPI_IN_PLACE_F2C(addr) \
42 ((addr == VT_MPI_F_IN_PLACE) ? MPI_IN_PLACE : (addr))
43 #endif /* HAVE_DECL_MPI_IN_PLACE */
44
45 EXTERN MPI_Fint* vt_mpi_f_bottom_addr;
46 #if (defined(HAVE_DECL_MPI_IN_PLACE) && HAVE_DECL_MPI_IN_PLACE)
47 EXTERN MPI_Fint* vt_mpi_f_in_place_addr;
48 #endif /* HAVE_DECL_MPI_IN_PLACE */
49 EXTERN MPI_Fint* vt_mpi_f_status_ignore_addr;
50 EXTERN MPI_Fint* vt_mpi_f_statuses_ignore_addr;
51 #if !(defined(HAVE_DECL_MPI_STATUS_SIZE) && HAVE_DECL_MPI_STATUS_SIZE)
52 EXTERN MPI_Fint vt_mpi_status_size;
53 #endif /* HAVE_DECL_MPI_STATUS_SIZE */
54
55 EXTERN void vt_fmpiconst_init(void);
56
57 #endif /* _VT_FMPICONST_H */