PR fortran/38830
[official-gcc.git] / gcc / c-pragma.h
blob188afb8dbaaee26fd02f568f02619a2415a675cc
1 /* Pragma related interfaces.
2 Copyright (C) 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
3 2007, 2008 Free Software Foundation, Inc.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
10 version.
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 for more details.
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
21 #ifndef GCC_C_PRAGMA_H
22 #define GCC_C_PRAGMA_H
24 #include <cpplib.h> /* For enum cpp_ttype. */
26 /* Pragma identifiers built in to the front end parsers. Identifiers
27 for ancillary handlers will follow these. */
28 typedef enum pragma_kind {
29 PRAGMA_NONE = 0,
31 PRAGMA_OMP_ATOMIC,
32 PRAGMA_OMP_BARRIER,
33 PRAGMA_OMP_CRITICAL,
34 PRAGMA_OMP_FLUSH,
35 PRAGMA_OMP_FOR,
36 PRAGMA_OMP_MASTER,
37 PRAGMA_OMP_ORDERED,
38 PRAGMA_OMP_PARALLEL,
39 PRAGMA_OMP_PARALLEL_FOR,
40 PRAGMA_OMP_PARALLEL_SECTIONS,
41 PRAGMA_OMP_SECTION,
42 PRAGMA_OMP_SECTIONS,
43 PRAGMA_OMP_SINGLE,
44 PRAGMA_OMP_TASK,
45 PRAGMA_OMP_TASKWAIT,
46 PRAGMA_OMP_THREADPRIVATE,
48 PRAGMA_GCC_PCH_PREPROCESS,
50 PRAGMA_FIRST_EXTERNAL
51 } pragma_kind;
54 /* All clauses defined by OpenMP 2.5 and 3.0.
55 Used internally by both C and C++ parsers. */
56 typedef enum pragma_omp_clause {
57 PRAGMA_OMP_CLAUSE_NONE = 0,
59 PRAGMA_OMP_CLAUSE_COLLAPSE,
60 PRAGMA_OMP_CLAUSE_COPYIN,
61 PRAGMA_OMP_CLAUSE_COPYPRIVATE,
62 PRAGMA_OMP_CLAUSE_DEFAULT,
63 PRAGMA_OMP_CLAUSE_FIRSTPRIVATE,
64 PRAGMA_OMP_CLAUSE_IF,
65 PRAGMA_OMP_CLAUSE_LASTPRIVATE,
66 PRAGMA_OMP_CLAUSE_NOWAIT,
67 PRAGMA_OMP_CLAUSE_NUM_THREADS,
68 PRAGMA_OMP_CLAUSE_ORDERED,
69 PRAGMA_OMP_CLAUSE_PRIVATE,
70 PRAGMA_OMP_CLAUSE_REDUCTION,
71 PRAGMA_OMP_CLAUSE_SCHEDULE,
72 PRAGMA_OMP_CLAUSE_SHARED,
73 PRAGMA_OMP_CLAUSE_UNTIED
74 } pragma_omp_clause;
76 extern struct cpp_reader* parse_in;
78 #define HANDLE_PRAGMA_WEAK SUPPORTS_WEAK
80 #ifdef HANDLE_SYSV_PRAGMA
81 /* We always support #pragma pack for SYSV pragmas. */
82 #ifndef HANDLE_PRAGMA_PACK
83 #define HANDLE_PRAGMA_PACK 1
84 #endif
85 #endif /* HANDLE_SYSV_PRAGMA */
88 #ifdef HANDLE_PRAGMA_PACK_PUSH_POP
89 /* If we are supporting #pragma pack(push... then we automatically
90 support #pragma pack(<n>) */
91 #define HANDLE_PRAGMA_PACK 1
92 #endif /* HANDLE_PRAGMA_PACK_PUSH_POP */
94 /* It's safe to always leave visibility pragma enabled as if
95 visibility is not supported on the host OS platform the
96 statements are ignored. */
97 #define HANDLE_PRAGMA_VISIBILITY 1
98 extern void push_visibility (const char *);
99 extern void pop_visibility (void);
101 extern void init_pragma (void);
103 /* Front-end wrappers for pragma registration. */
104 typedef void (*pragma_handler)(struct cpp_reader *);
105 extern void c_register_pragma (const char *, const char *, pragma_handler);
106 extern void c_register_pragma_with_expansion (const char *, const char *,
107 pragma_handler);
108 extern void c_invoke_pragma_handler (unsigned int);
110 extern void maybe_apply_pragma_weak (tree);
111 extern void maybe_apply_pending_pragma_weaks (void);
112 extern tree maybe_apply_renaming_pragma (tree, tree);
113 extern void add_to_renaming_pragma_list (tree, tree);
115 extern enum cpp_ttype pragma_lex (tree *);
117 /* Flags for use with c_lex_with_flags. The values here were picked
118 so that 0 means to translate and join strings. */
119 #define C_LEX_STRING_NO_TRANSLATE 1 /* Do not lex strings into
120 execution character set. */
121 #define C_LEX_RAW_STRINGS 2 /* Return raw strings -- no
122 concatenation, no
123 translation. */
125 /* This is not actually available to pragma parsers. It's merely a
126 convenient location to declare this function for c-lex, after
127 having enum cpp_ttype declared. */
128 extern enum cpp_ttype c_lex_with_flags (tree *, location_t *, unsigned char *,
129 int);
131 extern void c_pp_lookup_pragma (unsigned int, const char **, const char **);
133 #endif /* GCC_C_PRAGMA_H */