1 /* Pragma related interfaces.
2 Copyright (C) 1995-2018 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>. */
20 #ifndef GCC_C_PRAGMA_H
21 #define GCC_C_PRAGMA_H
23 #include "cpplib.h" /* For enum cpp_ttype. */
25 /* Pragma identifiers built in to the front end parsers. Identifiers
26 for ancillary handlers will follow these. */
34 PRAGMA_OACC_ENTER_DATA
,
35 PRAGMA_OACC_EXIT_DATA
,
36 PRAGMA_OACC_HOST_DATA
,
47 PRAGMA_OMP_CANCELLATION_POINT
,
50 PRAGMA_OMP_DISTRIBUTE
,
51 PRAGMA_OMP_END_DECLARE_TARGET
,
67 PRAGMA_OMP_THREADPRIVATE
,
70 PRAGMA_GCC_PCH_PREPROCESS
,
78 /* All clauses defined by OpenACC 2.0, and OpenMP 2.5, 3.0, 3.1, 4.0 and 4.5.
79 Used internally by both C and C++ parsers. */
80 enum pragma_omp_clause
{
81 PRAGMA_OMP_CLAUSE_NONE
= 0,
83 PRAGMA_OMP_CLAUSE_ALIGNED
,
84 PRAGMA_OMP_CLAUSE_COLLAPSE
,
85 PRAGMA_OMP_CLAUSE_COPYIN
,
86 PRAGMA_OMP_CLAUSE_COPYPRIVATE
,
87 PRAGMA_OMP_CLAUSE_DEFAULT
,
88 PRAGMA_OMP_CLAUSE_DEFAULTMAP
,
89 PRAGMA_OMP_CLAUSE_DEPEND
,
90 PRAGMA_OMP_CLAUSE_DEVICE
,
91 PRAGMA_OMP_CLAUSE_DIST_SCHEDULE
,
92 PRAGMA_OMP_CLAUSE_FINAL
,
93 PRAGMA_OMP_CLAUSE_FIRSTPRIVATE
,
94 PRAGMA_OMP_CLAUSE_FOR
,
95 PRAGMA_OMP_CLAUSE_FROM
,
96 PRAGMA_OMP_CLAUSE_GRAINSIZE
,
97 PRAGMA_OMP_CLAUSE_HINT
,
99 PRAGMA_OMP_CLAUSE_INBRANCH
,
100 PRAGMA_OMP_CLAUSE_IS_DEVICE_PTR
,
101 PRAGMA_OMP_CLAUSE_LASTPRIVATE
,
102 PRAGMA_OMP_CLAUSE_LINEAR
,
103 PRAGMA_OMP_CLAUSE_LINK
,
104 PRAGMA_OMP_CLAUSE_MAP
,
105 PRAGMA_OMP_CLAUSE_MERGEABLE
,
106 PRAGMA_OMP_CLAUSE_NOGROUP
,
107 PRAGMA_OMP_CLAUSE_NOTINBRANCH
,
108 PRAGMA_OMP_CLAUSE_NOWAIT
,
109 PRAGMA_OMP_CLAUSE_NUM_TASKS
,
110 PRAGMA_OMP_CLAUSE_NUM_TEAMS
,
111 PRAGMA_OMP_CLAUSE_NUM_THREADS
,
112 PRAGMA_OMP_CLAUSE_ORDERED
,
113 PRAGMA_OMP_CLAUSE_PARALLEL
,
114 PRAGMA_OMP_CLAUSE_PRIORITY
,
115 PRAGMA_OMP_CLAUSE_PRIVATE
,
116 PRAGMA_OMP_CLAUSE_PROC_BIND
,
117 PRAGMA_OMP_CLAUSE_REDUCTION
,
118 PRAGMA_OMP_CLAUSE_SAFELEN
,
119 PRAGMA_OMP_CLAUSE_SCHEDULE
,
120 PRAGMA_OMP_CLAUSE_SECTIONS
,
121 PRAGMA_OMP_CLAUSE_SHARED
,
122 PRAGMA_OMP_CLAUSE_SIMD
,
123 PRAGMA_OMP_CLAUSE_SIMDLEN
,
124 PRAGMA_OMP_CLAUSE_TASKGROUP
,
125 PRAGMA_OMP_CLAUSE_THREAD_LIMIT
,
126 PRAGMA_OMP_CLAUSE_THREADS
,
127 PRAGMA_OMP_CLAUSE_TO
,
128 PRAGMA_OMP_CLAUSE_UNIFORM
,
129 PRAGMA_OMP_CLAUSE_UNTIED
,
130 PRAGMA_OMP_CLAUSE_USE_DEVICE_PTR
,
132 /* Clauses for OpenACC. */
133 PRAGMA_OACC_CLAUSE_ASYNC
,
134 PRAGMA_OACC_CLAUSE_AUTO
,
135 PRAGMA_OACC_CLAUSE_COPY
,
136 PRAGMA_OACC_CLAUSE_COPYOUT
,
137 PRAGMA_OACC_CLAUSE_CREATE
,
138 PRAGMA_OACC_CLAUSE_DELETE
,
139 PRAGMA_OACC_CLAUSE_DEVICEPTR
,
140 PRAGMA_OACC_CLAUSE_DEVICE_RESIDENT
,
141 PRAGMA_OACC_CLAUSE_FINALIZE
,
142 PRAGMA_OACC_CLAUSE_GANG
,
143 PRAGMA_OACC_CLAUSE_HOST
,
144 PRAGMA_OACC_CLAUSE_INDEPENDENT
,
145 PRAGMA_OACC_CLAUSE_NUM_GANGS
,
146 PRAGMA_OACC_CLAUSE_NUM_WORKERS
,
147 PRAGMA_OACC_CLAUSE_PRESENT
,
148 PRAGMA_OACC_CLAUSE_SELF
,
149 PRAGMA_OACC_CLAUSE_SEQ
,
150 PRAGMA_OACC_CLAUSE_TILE
,
151 PRAGMA_OACC_CLAUSE_USE_DEVICE
,
152 PRAGMA_OACC_CLAUSE_VECTOR
,
153 PRAGMA_OACC_CLAUSE_VECTOR_LENGTH
,
154 PRAGMA_OACC_CLAUSE_WAIT
,
155 PRAGMA_OACC_CLAUSE_WORKER
,
156 PRAGMA_OACC_CLAUSE_IF_PRESENT
,
157 PRAGMA_OACC_CLAUSE_COLLAPSE
= PRAGMA_OMP_CLAUSE_COLLAPSE
,
158 PRAGMA_OACC_CLAUSE_COPYIN
= PRAGMA_OMP_CLAUSE_COPYIN
,
159 PRAGMA_OACC_CLAUSE_DEVICE
= PRAGMA_OMP_CLAUSE_DEVICE
,
160 PRAGMA_OACC_CLAUSE_DEFAULT
= PRAGMA_OMP_CLAUSE_DEFAULT
,
161 PRAGMA_OACC_CLAUSE_FIRSTPRIVATE
= PRAGMA_OMP_CLAUSE_FIRSTPRIVATE
,
162 PRAGMA_OACC_CLAUSE_IF
= PRAGMA_OMP_CLAUSE_IF
,
163 PRAGMA_OACC_CLAUSE_PRIVATE
= PRAGMA_OMP_CLAUSE_PRIVATE
,
164 PRAGMA_OACC_CLAUSE_REDUCTION
= PRAGMA_OMP_CLAUSE_REDUCTION
,
165 PRAGMA_OACC_CLAUSE_LINK
= PRAGMA_OMP_CLAUSE_LINK
168 extern struct cpp_reader
* parse_in
;
170 /* It's safe to always leave visibility pragma enabled as if
171 visibility is not supported on the host OS platform the
172 statements are ignored. */
173 extern void push_visibility (const char *, int);
174 extern bool pop_visibility (int);
176 extern void init_pragma (void);
178 /* Front-end wrappers for pragma registration. */
179 typedef void (*pragma_handler_1arg
)(struct cpp_reader
*);
180 /* A second pragma handler, which adds a void * argument allowing to pass extra
181 data to the handler. */
182 typedef void (*pragma_handler_2arg
)(struct cpp_reader
*, void *);
184 /* This union allows to abstract the different handlers. */
185 union gen_pragma_handler
{
186 pragma_handler_1arg handler_1arg
;
187 pragma_handler_2arg handler_2arg
;
189 /* Internally used to keep the data of the handler. */
190 struct internal_pragma_handler
{
191 union gen_pragma_handler handler
;
192 /* Permits to know if handler is a pragma_handler_1arg (extra_data is false)
193 or a pragma_handler_2arg (extra_data is true). */
195 /* A data field which can be used when extra_data is true. */
199 extern void c_register_pragma (const char *space
, const char *name
,
200 pragma_handler_1arg handler
);
201 extern void c_register_pragma_with_data (const char *space
, const char *name
,
202 pragma_handler_2arg handler
,
205 extern void c_register_pragma_with_expansion (const char *space
,
207 pragma_handler_1arg handler
);
208 extern void c_register_pragma_with_expansion_and_data (const char *space
,
210 pragma_handler_2arg handler
,
212 extern void c_invoke_pragma_handler (unsigned int);
214 extern void maybe_apply_pragma_weak (tree
);
215 extern void maybe_apply_pending_pragma_weaks (void);
216 extern tree
maybe_apply_renaming_pragma (tree
, tree
);
217 extern void maybe_apply_pragma_scalar_storage_order (tree
);
218 extern void add_to_renaming_pragma_list (tree
, tree
);
220 extern enum cpp_ttype
pragma_lex (tree
*, location_t
*loc
= NULL
);
222 /* Flags for use with c_lex_with_flags. The values here were picked
223 so that 0 means to translate and join strings. */
224 #define C_LEX_STRING_NO_TRANSLATE 1 /* Do not lex strings into
225 execution character set. */
226 #define C_LEX_STRING_NO_JOIN 2 /* Do not concatenate strings
227 nor translate them into execution
230 /* This is not actually available to pragma parsers. It's merely a
231 convenient location to declare this function for c-lex, after
232 having enum cpp_ttype declared. */
233 extern enum cpp_ttype
c_lex_with_flags (tree
*, location_t
*, unsigned char *,
236 extern void c_pp_lookup_pragma (unsigned int, const char **, const char **);
238 extern GTY(()) tree pragma_extern_prefix
;
240 #endif /* GCC_C_PRAGMA_H */