68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
1 /* Pragma related interfaces.
|
145
|
2 Copyright (C) 1995-2020 Free Software Foundation, Inc.
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
3
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
4 This file is part of GCC.
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
5
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
6 GCC is free software; you can redistribute it and/or modify it under
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
7 the terms of the GNU General Public License as published by the Free
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
8 Software Foundation; either version 3, or (at your option) any later
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
9 version.
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
10
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
14 for more details.
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
15
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
16 You should have received a copy of the GNU General Public License
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
17 along with GCC; see the file COPYING3. If not see
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
18 <http://www.gnu.org/licenses/>. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
19
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
20 #ifndef GCC_C_PRAGMA_H
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
21 #define GCC_C_PRAGMA_H
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
22
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
23 #include "cpplib.h" /* For enum cpp_ttype. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
24
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
25 /* Pragma identifiers built in to the front end parsers. Identifiers
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
26 for ancillary handlers will follow these. */
|
111
|
27 enum pragma_kind {
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
28 PRAGMA_NONE = 0,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
29
|
111
|
30 PRAGMA_OACC_ATOMIC,
|
|
31 PRAGMA_OACC_CACHE,
|
|
32 PRAGMA_OACC_DATA,
|
|
33 PRAGMA_OACC_DECLARE,
|
|
34 PRAGMA_OACC_ENTER_DATA,
|
|
35 PRAGMA_OACC_EXIT_DATA,
|
|
36 PRAGMA_OACC_HOST_DATA,
|
|
37 PRAGMA_OACC_KERNELS,
|
|
38 PRAGMA_OACC_LOOP,
|
|
39 PRAGMA_OACC_PARALLEL,
|
|
40 PRAGMA_OACC_ROUTINE,
|
145
|
41 PRAGMA_OACC_SERIAL,
|
111
|
42 PRAGMA_OACC_UPDATE,
|
|
43 PRAGMA_OACC_WAIT,
|
|
44
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
45 PRAGMA_OMP_ATOMIC,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
46 PRAGMA_OMP_BARRIER,
|
111
|
47 PRAGMA_OMP_CANCEL,
|
|
48 PRAGMA_OMP_CANCELLATION_POINT,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
49 PRAGMA_OMP_CRITICAL,
|
111
|
50 PRAGMA_OMP_DECLARE,
|
145
|
51 PRAGMA_OMP_DEPOBJ,
|
111
|
52 PRAGMA_OMP_DISTRIBUTE,
|
|
53 PRAGMA_OMP_END_DECLARE_TARGET,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
54 PRAGMA_OMP_FLUSH,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
55 PRAGMA_OMP_FOR,
|
145
|
56 PRAGMA_OMP_LOOP,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
57 PRAGMA_OMP_MASTER,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
58 PRAGMA_OMP_ORDERED,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
59 PRAGMA_OMP_PARALLEL,
|
145
|
60 PRAGMA_OMP_REQUIRES,
|
|
61 PRAGMA_OMP_SCAN,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
62 PRAGMA_OMP_SECTION,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
63 PRAGMA_OMP_SECTIONS,
|
111
|
64 PRAGMA_OMP_SIMD,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
65 PRAGMA_OMP_SINGLE,
|
111
|
66 PRAGMA_OMP_TARGET,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
67 PRAGMA_OMP_TASK,
|
111
|
68 PRAGMA_OMP_TASKGROUP,
|
|
69 PRAGMA_OMP_TASKLOOP,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
70 PRAGMA_OMP_TASKWAIT,
|
111
|
71 PRAGMA_OMP_TASKYIELD,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
72 PRAGMA_OMP_THREADPRIVATE,
|
111
|
73 PRAGMA_OMP_TEAMS,
|
|
74
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
75 PRAGMA_GCC_PCH_PREPROCESS,
|
111
|
76 PRAGMA_IVDEP,
|
131
|
77 PRAGMA_UNROLL,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
78
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
79 PRAGMA_FIRST_EXTERNAL
|
111
|
80 };
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
81
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
82
|
145
|
83 /* All clauses defined by OpenACC 2.0, and OpenMP 2.5, 3.0, 3.1, 4.0, 4.5
|
|
84 and 5.0. Used internally by both C and C++ parsers. */
|
111
|
85 enum pragma_omp_clause {
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
86 PRAGMA_OMP_CLAUSE_NONE = 0,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
87
|
111
|
88 PRAGMA_OMP_CLAUSE_ALIGNED,
|
145
|
89 PRAGMA_OMP_CLAUSE_BIND,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
90 PRAGMA_OMP_CLAUSE_COLLAPSE,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
91 PRAGMA_OMP_CLAUSE_COPYIN,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
92 PRAGMA_OMP_CLAUSE_COPYPRIVATE,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
93 PRAGMA_OMP_CLAUSE_DEFAULT,
|
111
|
94 PRAGMA_OMP_CLAUSE_DEFAULTMAP,
|
|
95 PRAGMA_OMP_CLAUSE_DEPEND,
|
|
96 PRAGMA_OMP_CLAUSE_DEVICE,
|
145
|
97 PRAGMA_OMP_CLAUSE_DEVICE_TYPE,
|
111
|
98 PRAGMA_OMP_CLAUSE_DIST_SCHEDULE,
|
|
99 PRAGMA_OMP_CLAUSE_FINAL,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
100 PRAGMA_OMP_CLAUSE_FIRSTPRIVATE,
|
111
|
101 PRAGMA_OMP_CLAUSE_FOR,
|
|
102 PRAGMA_OMP_CLAUSE_FROM,
|
|
103 PRAGMA_OMP_CLAUSE_GRAINSIZE,
|
|
104 PRAGMA_OMP_CLAUSE_HINT,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
105 PRAGMA_OMP_CLAUSE_IF,
|
145
|
106 PRAGMA_OMP_CLAUSE_IN_REDUCTION,
|
111
|
107 PRAGMA_OMP_CLAUSE_INBRANCH,
|
|
108 PRAGMA_OMP_CLAUSE_IS_DEVICE_PTR,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
109 PRAGMA_OMP_CLAUSE_LASTPRIVATE,
|
111
|
110 PRAGMA_OMP_CLAUSE_LINEAR,
|
|
111 PRAGMA_OMP_CLAUSE_LINK,
|
|
112 PRAGMA_OMP_CLAUSE_MAP,
|
|
113 PRAGMA_OMP_CLAUSE_MERGEABLE,
|
|
114 PRAGMA_OMP_CLAUSE_NOGROUP,
|
145
|
115 PRAGMA_OMP_CLAUSE_NONTEMPORAL,
|
111
|
116 PRAGMA_OMP_CLAUSE_NOTINBRANCH,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
117 PRAGMA_OMP_CLAUSE_NOWAIT,
|
111
|
118 PRAGMA_OMP_CLAUSE_NUM_TASKS,
|
|
119 PRAGMA_OMP_CLAUSE_NUM_TEAMS,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
120 PRAGMA_OMP_CLAUSE_NUM_THREADS,
|
145
|
121 PRAGMA_OMP_CLAUSE_ORDER,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
122 PRAGMA_OMP_CLAUSE_ORDERED,
|
111
|
123 PRAGMA_OMP_CLAUSE_PARALLEL,
|
|
124 PRAGMA_OMP_CLAUSE_PRIORITY,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
125 PRAGMA_OMP_CLAUSE_PRIVATE,
|
111
|
126 PRAGMA_OMP_CLAUSE_PROC_BIND,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
127 PRAGMA_OMP_CLAUSE_REDUCTION,
|
111
|
128 PRAGMA_OMP_CLAUSE_SAFELEN,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
129 PRAGMA_OMP_CLAUSE_SCHEDULE,
|
111
|
130 PRAGMA_OMP_CLAUSE_SECTIONS,
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
131 PRAGMA_OMP_CLAUSE_SHARED,
|
111
|
132 PRAGMA_OMP_CLAUSE_SIMD,
|
|
133 PRAGMA_OMP_CLAUSE_SIMDLEN,
|
145
|
134 PRAGMA_OMP_CLAUSE_TASK_REDUCTION,
|
111
|
135 PRAGMA_OMP_CLAUSE_TASKGROUP,
|
|
136 PRAGMA_OMP_CLAUSE_THREAD_LIMIT,
|
|
137 PRAGMA_OMP_CLAUSE_THREADS,
|
|
138 PRAGMA_OMP_CLAUSE_TO,
|
|
139 PRAGMA_OMP_CLAUSE_UNIFORM,
|
|
140 PRAGMA_OMP_CLAUSE_UNTIED,
|
|
141 PRAGMA_OMP_CLAUSE_USE_DEVICE_PTR,
|
145
|
142 PRAGMA_OMP_CLAUSE_USE_DEVICE_ADDR,
|
111
|
143
|
|
144 /* Clauses for OpenACC. */
|
131
|
145 PRAGMA_OACC_CLAUSE_ASYNC,
|
145
|
146 PRAGMA_OACC_CLAUSE_ATTACH,
|
111
|
147 PRAGMA_OACC_CLAUSE_AUTO,
|
|
148 PRAGMA_OACC_CLAUSE_COPY,
|
|
149 PRAGMA_OACC_CLAUSE_COPYOUT,
|
|
150 PRAGMA_OACC_CLAUSE_CREATE,
|
|
151 PRAGMA_OACC_CLAUSE_DELETE,
|
145
|
152 PRAGMA_OACC_CLAUSE_DETACH,
|
111
|
153 PRAGMA_OACC_CLAUSE_DEVICEPTR,
|
|
154 PRAGMA_OACC_CLAUSE_DEVICE_RESIDENT,
|
131
|
155 PRAGMA_OACC_CLAUSE_FINALIZE,
|
111
|
156 PRAGMA_OACC_CLAUSE_GANG,
|
|
157 PRAGMA_OACC_CLAUSE_HOST,
|
|
158 PRAGMA_OACC_CLAUSE_INDEPENDENT,
|
145
|
159 PRAGMA_OACC_CLAUSE_NO_CREATE,
|
111
|
160 PRAGMA_OACC_CLAUSE_NUM_GANGS,
|
|
161 PRAGMA_OACC_CLAUSE_NUM_WORKERS,
|
|
162 PRAGMA_OACC_CLAUSE_PRESENT,
|
|
163 PRAGMA_OACC_CLAUSE_SELF,
|
|
164 PRAGMA_OACC_CLAUSE_SEQ,
|
|
165 PRAGMA_OACC_CLAUSE_TILE,
|
|
166 PRAGMA_OACC_CLAUSE_VECTOR,
|
|
167 PRAGMA_OACC_CLAUSE_VECTOR_LENGTH,
|
|
168 PRAGMA_OACC_CLAUSE_WAIT,
|
|
169 PRAGMA_OACC_CLAUSE_WORKER,
|
131
|
170 PRAGMA_OACC_CLAUSE_IF_PRESENT,
|
111
|
171 PRAGMA_OACC_CLAUSE_COLLAPSE = PRAGMA_OMP_CLAUSE_COLLAPSE,
|
|
172 PRAGMA_OACC_CLAUSE_COPYIN = PRAGMA_OMP_CLAUSE_COPYIN,
|
|
173 PRAGMA_OACC_CLAUSE_DEVICE = PRAGMA_OMP_CLAUSE_DEVICE,
|
|
174 PRAGMA_OACC_CLAUSE_DEFAULT = PRAGMA_OMP_CLAUSE_DEFAULT,
|
|
175 PRAGMA_OACC_CLAUSE_FIRSTPRIVATE = PRAGMA_OMP_CLAUSE_FIRSTPRIVATE,
|
|
176 PRAGMA_OACC_CLAUSE_IF = PRAGMA_OMP_CLAUSE_IF,
|
|
177 PRAGMA_OACC_CLAUSE_PRIVATE = PRAGMA_OMP_CLAUSE_PRIVATE,
|
|
178 PRAGMA_OACC_CLAUSE_REDUCTION = PRAGMA_OMP_CLAUSE_REDUCTION,
|
145
|
179 PRAGMA_OACC_CLAUSE_LINK = PRAGMA_OMP_CLAUSE_LINK,
|
|
180 PRAGMA_OACC_CLAUSE_USE_DEVICE = PRAGMA_OMP_CLAUSE_USE_DEVICE_PTR
|
111
|
181 };
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
182
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
183 extern struct cpp_reader* parse_in;
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
184
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
185 /* It's safe to always leave visibility pragma enabled as if
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
186 visibility is not supported on the host OS platform the
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
187 statements are ignored. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
188 extern void push_visibility (const char *, int);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
189 extern bool pop_visibility (int);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
190
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
191 extern void init_pragma (void);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
192
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
193 /* Front-end wrappers for pragma registration. */
|
111
|
194 typedef void (*pragma_handler_1arg)(struct cpp_reader *);
|
|
195 /* A second pragma handler, which adds a void * argument allowing to pass extra
|
|
196 data to the handler. */
|
|
197 typedef void (*pragma_handler_2arg)(struct cpp_reader *, void *);
|
|
198
|
|
199 /* This union allows to abstract the different handlers. */
|
|
200 union gen_pragma_handler {
|
|
201 pragma_handler_1arg handler_1arg;
|
|
202 pragma_handler_2arg handler_2arg;
|
|
203 };
|
|
204 /* Internally used to keep the data of the handler. */
|
|
205 struct internal_pragma_handler {
|
|
206 union gen_pragma_handler handler;
|
|
207 /* Permits to know if handler is a pragma_handler_1arg (extra_data is false)
|
|
208 or a pragma_handler_2arg (extra_data is true). */
|
|
209 bool extra_data;
|
|
210 /* A data field which can be used when extra_data is true. */
|
|
211 void * data;
|
|
212 };
|
|
213
|
|
214 extern void c_register_pragma (const char *space, const char *name,
|
|
215 pragma_handler_1arg handler);
|
|
216 extern void c_register_pragma_with_data (const char *space, const char *name,
|
|
217 pragma_handler_2arg handler,
|
|
218 void *data);
|
|
219
|
|
220 extern void c_register_pragma_with_expansion (const char *space,
|
|
221 const char *name,
|
|
222 pragma_handler_1arg handler);
|
|
223 extern void c_register_pragma_with_expansion_and_data (const char *space,
|
|
224 const char *name,
|
|
225 pragma_handler_2arg handler,
|
|
226 void *data);
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
227 extern void c_invoke_pragma_handler (unsigned int);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
228
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
229 extern void maybe_apply_pragma_weak (tree);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
230 extern void maybe_apply_pending_pragma_weaks (void);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
231 extern tree maybe_apply_renaming_pragma (tree, tree);
|
111
|
232 extern void maybe_apply_pragma_scalar_storage_order (tree);
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
233 extern void add_to_renaming_pragma_list (tree, tree);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
234
|
111
|
235 extern enum cpp_ttype pragma_lex (tree *, location_t *loc = NULL);
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
236
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
237 /* Flags for use with c_lex_with_flags. The values here were picked
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
238 so that 0 means to translate and join strings. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
239 #define C_LEX_STRING_NO_TRANSLATE 1 /* Do not lex strings into
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
240 execution character set. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
241 #define C_LEX_STRING_NO_JOIN 2 /* Do not concatenate strings
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
242 nor translate them into execution
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
243 character set. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
244
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
245 /* This is not actually available to pragma parsers. It's merely a
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
246 convenient location to declare this function for c-lex, after
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
247 having enum cpp_ttype declared. */
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
248 extern enum cpp_ttype c_lex_with_flags (tree *, location_t *, unsigned char *,
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
249 int);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
250
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
251 extern void c_pp_lookup_pragma (unsigned int, const char **, const char **);
|
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
252
|
111
|
253 extern GTY(()) tree pragma_extern_prefix;
|
|
254
|
68
Nobuyasu Oshiro <dimolto@cr.ie.u-ryukyu.ac.jp>
parents:
diff
changeset
|
255 #endif /* GCC_C_PRAGMA_H */
|