OpenMPI  0.1.1
opari.h
1 /****************************************************************************
2 ** SCALASCA http://www.scalasca.org/ **
3 ** KOJAK http://www.fz-juelich.de/jsc/kojak/ **
4 *****************************************************************************
5 ** Copyright (c) 1998-2008 **
6 ** Forschungszentrum Juelich, Juelich Supercomputing Centre **
7 ** **
8 ** See the file COPYING in the package base directory for details **
9 ****************************************************************************/
10 
11 #ifndef OPARI_H
12 #define OPARI_H
13 
14 #include <iosfwd>
15  using std::istream;
16  using std::ostream;
17 
18 #include "ompragma.h"
19 
20 enum Language { L_NA = 0x00,
21  L_F77 = 0x01, L_F90 = 0x02, L_FORTRAN = 0x03,
22  L_C = 0x04, L_CXX = 0x08, L_C_OR_CXX = 0x0C };
23 
24 void process_fortran(istream& is, const char* infile, ostream& os,
25  bool addSharedDecl);
26 void process_c_or_cxx(istream& is, const char* infile, ostream& os,
27  bool addSharedDecl);
28 void process_pragma(OMPragma* p, ostream& os, bool* hasEnd=0, bool* isFor=0);
29 
30 void cleanup_and_exit();
31 
32 #endif
Definition: ompragma.h:19