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_GANG
,
142 PRAGMA_OACC_CLAUSE_HOST
,
143 PRAGMA_OACC_CLAUSE_INDEPENDENT
,
144 PRAGMA_OACC_CLAUSE_NUM_GANGS
,
145 PRAGMA_OACC_CLAUSE_NUM_WORKERS
,
146 PRAGMA_OACC_CLAUSE_PRESENT
,
147 PRAGMA_OACC_CLAUSE_PRESENT_OR_COPY
,
148 PRAGMA_OACC_CLAUSE_PRESENT_OR_COPYIN
,
149 PRAGMA_OACC_CLAUSE_PRESENT_OR_COPYOUT
,
150 PRAGMA_OACC_CLAUSE_PRESENT_OR_CREATE
,
151 PRAGMA_OACC_CLAUSE_SELF
,
152 PRAGMA_OACC_CLAUSE_SEQ
,
153 PRAGMA_OACC_CLAUSE_TILE
,
154 PRAGMA_OACC_CLAUSE_USE_DEVICE
,
155 PRAGMA_OACC_CLAUSE_VECTOR
,
156 PRAGMA_OACC_CLAUSE_VECTOR_LENGTH
,
157 PRAGMA_OACC_CLAUSE_WAIT
,
158 PRAGMA_OACC_CLAUSE_WORKER
,
159 PRAGMA_OACC_CLAUSE_COLLAPSE
= PRAGMA_OMP_CLAUSE_COLLAPSE
,
160 PRAGMA_OACC_CLAUSE_COPYIN
= PRAGMA_OMP_CLAUSE_COPYIN
,
161 PRAGMA_OACC_CLAUSE_DEVICE
= PRAGMA_OMP_CLAUSE_DEVICE
,
162 PRAGMA_OACC_CLAUSE_DEFAULT
= PRAGMA_OMP_CLAUSE_DEFAULT
,
163 PRAGMA_OACC_CLAUSE_FIRSTPRIVATE
= PRAGMA_OMP_CLAUSE_FIRSTPRIVATE
,
164 PRAGMA_OACC_CLAUSE_IF
= PRAGMA_OMP_CLAUSE_IF
,
165 PRAGMA_OACC_CLAUSE_PRIVATE
= PRAGMA_OMP_CLAUSE_PRIVATE
,
166 PRAGMA_OACC_CLAUSE_REDUCTION
= PRAGMA_OMP_CLAUSE_REDUCTION
,
167 PRAGMA_OACC_CLAUSE_LINK
= PRAGMA_OMP_CLAUSE_LINK
170 extern struct cpp_reader
* parse_in
;
172 /* It's safe to always leave visibility pragma enabled as if
173 visibility is not supported on the host OS platform the
174 statements are ignored. */
175 extern void push_visibility (const char *, int);
176 extern bool pop_visibility (int);
178 extern void init_pragma (void);
180 /* Front-end wrappers for pragma registration. */
181 typedef void (*pragma_handler_1arg
)(struct cpp_reader
*);
182 /* A second pragma handler, which adds a void * argument allowing to pass extra
183 data to the handler. */
184 typedef void (*pragma_handler_2arg
)(struct cpp_reader
*, void *);
186 /* This union allows to abstract the different handlers. */
187 union gen_pragma_handler
{
188 pragma_handler_1arg handler_1arg
;
189 pragma_handler_2arg handler_2arg
;
191 /* Internally used to keep the data of the handler. */
192 struct internal_pragma_handler
{
193 union gen_pragma_handler handler
;
194 /* Permits to know if handler is a pragma_handler_1arg (extra_data is false)
195 or a pragma_handler_2arg (extra_data is true). */
197 /* A data field which can be used when extra_data is true. */
201 extern void c_register_pragma (const char *space
, const char *name
,
202 pragma_handler_1arg handler
);
203 extern void c_register_pragma_with_data (const char *space
, const char *name
,
204 pragma_handler_2arg handler
,
207 extern void c_register_pragma_with_expansion (const char *space
,
209 pragma_handler_1arg handler
);
210 extern void c_register_pragma_with_expansion_and_data (const char *space
,
212 pragma_handler_2arg handler
,
214 extern void c_invoke_pragma_handler (unsigned int);
216 extern void maybe_apply_pragma_weak (tree
);
217 extern void maybe_apply_pending_pragma_weaks (void);
218 extern tree
maybe_apply_renaming_pragma (tree
, tree
);
219 extern void maybe_apply_pragma_scalar_storage_order (tree
);
220 extern void add_to_renaming_pragma_list (tree
, tree
);
222 extern enum cpp_ttype
pragma_lex (tree
*, location_t
*loc
= NULL
);
224 /* Flags for use with c_lex_with_flags. The values here were picked
225 so that 0 means to translate and join strings. */
226 #define C_LEX_STRING_NO_TRANSLATE 1 /* Do not lex strings into
227 execution character set. */
228 #define C_LEX_STRING_NO_JOIN 2 /* Do not concatenate strings
229 nor translate them into execution
232 /* This is not actually available to pragma parsers. It's merely a
233 convenient location to declare this function for c-lex, after
234 having enum cpp_ttype declared. */
235 extern enum cpp_ttype
c_lex_with_flags (tree
*, location_t
*, unsigned char *,
238 extern void c_pp_lookup_pragma (unsigned int, const char **, const char **);
240 extern GTY(()) tree pragma_extern_prefix
;
242 #endif /* GCC_C_PRAGMA_H */