1 /* Core data structures for the 'tree' type.
2    Copyright (C) 1989-2016 Free Software Foundation, Inc.
3 
4 This file is part of GCC.
5 
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
9 version.
10 
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
14 for more details.
15 
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/>.  */
19 
20 #ifndef GCC_TREE_CORE_H
21 #define GCC_TREE_CORE_H
22 
23 #include "symtab.h"
24 
25 /* This file contains all the data structures that define the 'tree' type.
26    There are no accessor macros nor functions in this file. Only the
27    basic data structures, extern declarations and type definitions.  */
28 
29 /*---------------------------------------------------------------------------
30    Forward type declarations.  Mostly to avoid including unnecessary headers
31 ---------------------------------------------------------------------------*/
32 struct function;
33 struct real_value;
34 struct fixed_value;
35 struct ptr_info_def;
36 struct range_info_def;
37 struct die_struct;
38 
39 
40 /*---------------------------------------------------------------------------
41                               #defined constants
42 ---------------------------------------------------------------------------*/
43 /* Nonzero if this is a call to a function whose return value depends
44    solely on its arguments, has no side effects, and does not read
45    global memory.  This corresponds to TREE_READONLY for function
46    decls.  */
47 #define ECF_CONST		  (1 << 0)
48 
49 /* Nonzero if this is a call to "pure" function (like const function,
50    but may read memory.  This corresponds to DECL_PURE_P for function
51    decls.  */
52 #define ECF_PURE		  (1 << 1)
53 
54 /* Nonzero if this is ECF_CONST or ECF_PURE but cannot be proven to no
55    infinite loop.  This corresponds to DECL_LOOPING_CONST_OR_PURE_P
56    for function decls.*/
57 #define ECF_LOOPING_CONST_OR_PURE (1 << 2)
58 
59 /* Nonzero if this call will never return.  */
60 #define ECF_NORETURN		  (1 << 3)
61 
62 /* Nonzero if this is a call to malloc or a related function.  */
63 #define ECF_MALLOC		  (1 << 4)
64 
65 /* Nonzero if it is plausible that this is a call to alloca.  */
66 #define ECF_MAY_BE_ALLOCA	  (1 << 5)
67 
68 /* Nonzero if this is a call to a function that won't throw an exception.  */
69 #define ECF_NOTHROW		  (1 << 6)
70 
71 /* Nonzero if this is a call to setjmp or a related function.  */
72 #define ECF_RETURNS_TWICE	  (1 << 7)
73 
74 /* Nonzero if this call replaces the current stack frame.  */
75 #define ECF_SIBCALL		  (1 << 8)
76 
77 /* Function does not read or write memory (but may have side effects, so
78    it does not necessarily fit ECF_CONST).  */
79 #define ECF_NOVOPS		  (1 << 9)
80 
81 /* The function does not lead to calls within current function unit.  */
82 #define ECF_LEAF		  (1 << 10)
83 
84 /* Nonzero if this call does not affect transactions.  */
85 #define ECF_TM_PURE		  (1 << 11)
86 
87 /* Nonzero if this call is into the transaction runtime library.  */
88 #define ECF_TM_BUILTIN		  (1 << 12)
89 
90 /* Call argument flags.  */
91 /* Nonzero if the argument is not dereferenced recursively, thus only
92    directly reachable memory is read or written.  */
93 #define EAF_DIRECT		(1 << 0)
94 
95 /* Nonzero if memory reached by the argument is not clobbered.  */
96 #define EAF_NOCLOBBER		(1 << 1)
97 
98 /* Nonzero if the argument does not escape.  */
99 #define EAF_NOESCAPE		(1 << 2)
100 
101 /* Nonzero if the argument is not used by the function.  */
102 #define EAF_UNUSED		(1 << 3)
103 
104 /* Call return flags.  */
105 /* Mask for the argument number that is returned.  Lower two bits of
106    the return flags, encodes argument slots zero to three.  */
107 #define ERF_RETURN_ARG_MASK	(3)
108 
109 /* Nonzero if the return value is equal to the argument number
110    flags & ERF_RETURN_ARG_MASK.  */
111 #define ERF_RETURNS_ARG		(1 << 2)
112 
113 /* Nonzero if the return value does not alias with anything.  Functions
114    with the malloc attribute have this set on their return value.  */
115 #define ERF_NOALIAS		(1 << 3)
116 
117 
118 /*---------------------------------------------------------------------------
119                                   Enumerations
120 ---------------------------------------------------------------------------*/
121 /* Codes of tree nodes.  */
122 #define DEFTREECODE(SYM, STRING, TYPE, NARGS)   SYM,
123 #define END_OF_BASE_TREE_CODES LAST_AND_UNUSED_TREE_CODE,
124 
125 enum tree_code {
126 #include "all-tree.def"
127 MAX_TREE_CODES
128 };
129 
130 #undef DEFTREECODE
131 #undef END_OF_BASE_TREE_CODES
132 
133 /* Number of language-independent tree codes.  */
134 #define NUM_TREE_CODES \
135   ((int) LAST_AND_UNUSED_TREE_CODE)
136 
137 #define CODE_CONTAINS_STRUCT(CODE, STRUCT) \
138   (tree_contains_struct[(CODE)][(STRUCT)])
139 
140 
141 /* Classify which part of the compiler has defined a given builtin function.
142    Note that we assume below that this is no more than two bits.  */
143 enum built_in_class {
144   NOT_BUILT_IN = 0,
145   BUILT_IN_FRONTEND,
146   BUILT_IN_MD,
147   BUILT_IN_NORMAL
148 };
149 
150 /* Last marker used for LTO stremaing of built_in_class.  We can not add it
151    to the enum since we need the enumb to fit in 2 bits.  */
152 #define BUILT_IN_LAST (BUILT_IN_NORMAL + 1)
153 
154 /* Codes that identify the various built in functions
155    so that expand_call can identify them quickly.  */
156 #define DEF_BUILTIN(ENUM, N, C, T, LT, B, F, NA, AT, IM, COND) ENUM,
157 enum built_in_function {
158 #include "builtins.def"
159 
160   BEGIN_CHKP_BUILTINS,
161 
162 #define DEF_BUILTIN(ENUM, N, C, T, LT, B, F, NA, AT, IM, COND)
163 #define DEF_BUILTIN_CHKP(ENUM, N, C, T, LT, B, F, NA, AT, IM, COND) \
164   ENUM##_CHKP = ENUM + BEGIN_CHKP_BUILTINS + 1,
165 #include "builtins.def"
166 
167   END_CHKP_BUILTINS = BEGIN_CHKP_BUILTINS * 2 + 1,
168 
169   /* Complex division routines in libgcc.  These are done via builtins
170      because emit_library_call_value can't handle complex values.  */
171   BUILT_IN_COMPLEX_MUL_MIN,
172   BUILT_IN_COMPLEX_MUL_MAX
173     = BUILT_IN_COMPLEX_MUL_MIN
174       + MAX_MODE_COMPLEX_FLOAT
175       - MIN_MODE_COMPLEX_FLOAT,
176 
177   BUILT_IN_COMPLEX_DIV_MIN,
178   BUILT_IN_COMPLEX_DIV_MAX
179     = BUILT_IN_COMPLEX_DIV_MIN
180       + MAX_MODE_COMPLEX_FLOAT
181       - MIN_MODE_COMPLEX_FLOAT,
182 
183   /* Upper bound on non-language-specific builtins.  */
184   END_BUILTINS
185 };
186 
187 /* Internal functions.  */
188 enum internal_fn {
189 #define DEF_INTERNAL_FN(CODE, FLAGS, FNSPEC) IFN_##CODE,
190 #include "internal-fn.def"
191   IFN_LAST
192 };
193 
194 /* An enum that combines target-independent built-in functions with
195    internal functions, so that they can be treated in a similar way.
196    The numbers for built-in functions are the same as for the
197    built_in_function enum.  The numbers for internal functions
198    start at END_BUITLINS.  */
199 enum combined_fn {
200 #define DEF_BUILTIN(ENUM, N, C, T, LT, B, F, NA, AT, IM, COND) \
201   CFN_##ENUM = int (ENUM),
202 #include "builtins.def"
203 
204 #define DEF_BUILTIN(ENUM, N, C, T, LT, B, F, NA, AT, IM, COND)
205 #define DEF_BUILTIN_CHKP(ENUM, N, C, T, LT, B, F, NA, AT, IM, COND) \
206   CFN_##ENUM##_CHKP = int (ENUM##_CHKP),
207 #include "builtins.def"
208 
209 #define DEF_INTERNAL_FN(CODE, FLAGS, FNSPEC) \
210   CFN_##CODE = int (END_BUILTINS) + int (IFN_##CODE),
211 #include "internal-fn.def"
212 
213   CFN_LAST
214 };
215 
216 /* Tree code classes.  Each tree_code has an associated code class
217    represented by a TREE_CODE_CLASS.  */
218 enum tree_code_class {
219   tcc_exceptional, /* An exceptional code (fits no category).  */
220   tcc_constant,    /* A constant.  */
221   /* Order of tcc_type and tcc_declaration is important.  */
222   tcc_type,        /* A type object code.  */
223   tcc_declaration, /* A declaration (also serving as variable refs).  */
224   tcc_reference,   /* A reference to storage.  */
225   tcc_comparison,  /* A comparison expression.  */
226   tcc_unary,       /* A unary arithmetic expression.  */
227   tcc_binary,      /* A binary arithmetic expression.  */
228   tcc_statement,   /* A statement expression, which have side effects
229 		      but usually no interesting value.  */
230   tcc_vl_exp,      /* A function call or other expression with a
231 		      variable-length operand vector.  */
232   tcc_expression   /* Any other expression.  */
233 };
234 
235 /* OMP_CLAUSE codes.  Do not reorder, as this is used to index into
236    the tables omp_clause_num_ops and omp_clause_code_name.  */
237 enum omp_clause_code {
238   /* Clause zero is special-cased inside the parser
239      (c_parser_omp_variable_list).  */
240   OMP_CLAUSE_ERROR = 0,
241 
242   /* OpenACC/OpenMP clause: private (variable_list).  */
243   OMP_CLAUSE_PRIVATE,
244 
245   /* OpenMP clause: shared (variable_list).  */
246   OMP_CLAUSE_SHARED,
247 
248   /* OpenACC/OpenMP clause: firstprivate (variable_list).  */
249   OMP_CLAUSE_FIRSTPRIVATE,
250 
251   /* OpenMP clause: lastprivate (variable_list).  */
252   OMP_CLAUSE_LASTPRIVATE,
253 
254   /* OpenACC/OpenMP clause: reduction (operator:variable_list).
255      OMP_CLAUSE_REDUCTION_CODE: The tree_code of the operator.
256      Operand 1: OMP_CLAUSE_REDUCTION_INIT: Stmt-list to initialize the var.
257      Operand 2: OMP_CLAUSE_REDUCTION_MERGE: Stmt-list to merge private var
258                 into the shared one.
259      Operand 3: OMP_CLAUSE_REDUCTION_PLACEHOLDER: A dummy VAR_DECL
260                 placeholder used in OMP_CLAUSE_REDUCTION_{INIT,MERGE}.
261      Operand 4: OMP_CLAUSE_REDUCTION_DECL_PLACEHOLDER: Another dummy
262 		VAR_DECL placeholder, used like the above for C/C++ array
263 		reductions.  */
264   OMP_CLAUSE_REDUCTION,
265 
266   /* OpenMP clause: copyin (variable_list).  */
267   OMP_CLAUSE_COPYIN,
268 
269   /* OpenMP clause: copyprivate (variable_list).  */
270   OMP_CLAUSE_COPYPRIVATE,
271 
272   /* OpenMP clause: linear (variable-list[:linear-step]).  */
273   OMP_CLAUSE_LINEAR,
274 
275   /* OpenMP clause: aligned (variable-list[:alignment]).  */
276   OMP_CLAUSE_ALIGNED,
277 
278   /* OpenMP clause: depend ({in,out,inout}:variable-list).  */
279   OMP_CLAUSE_DEPEND,
280 
281   /* OpenMP clause: uniform (argument-list).  */
282   OMP_CLAUSE_UNIFORM,
283 
284   /* OpenMP clause: to (extended-list).
285      Only when it appears in declare target.  */
286   OMP_CLAUSE_TO_DECLARE,
287 
288   /* OpenMP clause: link (variable-list).  */
289   OMP_CLAUSE_LINK,
290 
291   /* OpenMP clause: from (variable-list).  */
292   OMP_CLAUSE_FROM,
293 
294   /* OpenMP clause: to (variable-list).  */
295   OMP_CLAUSE_TO,
296 
297   /* OpenACC clauses: {copy, copyin, copyout, create, delete, deviceptr,
298      device, host (self), present, present_or_copy (pcopy), present_or_copyin
299      (pcopyin), present_or_copyout (pcopyout), present_or_create (pcreate)}
300      (variable-list).
301 
302      OpenMP clause: map ({alloc:,to:,from:,tofrom:,}variable-list).  */
303   OMP_CLAUSE_MAP,
304 
305   /* OpenACC clause: use_device (variable_list).
306      OpenMP clause: use_device_ptr (variable-list).  */
307   OMP_CLAUSE_USE_DEVICE_PTR,
308 
309   /* OpenMP clause: is_device_ptr (variable-list).  */
310   OMP_CLAUSE_IS_DEVICE_PTR,
311 
312   /* Internal structure to hold OpenACC cache directive's variable-list.
313      #pragma acc cache (variable-list).  */
314   OMP_CLAUSE__CACHE_,
315 
316   /* OpenACC clause: device_resident (variable_list).  */
317   OMP_CLAUSE_DEVICE_RESIDENT,
318 
319   /* OpenACC clause: gang [(gang-argument-list)].
320      Where
321       gang-argument-list: [gang-argument-list, ] gang-argument
322       gang-argument: [num:] integer-expression
323                    | static: size-expression
324       size-expression: * | integer-expression.  */
325   OMP_CLAUSE_GANG,
326 
327   /* OpenACC clause: async [(integer-expression)].  */
328   OMP_CLAUSE_ASYNC,
329 
330   /* OpenACC clause: wait [(integer-expression-list)].  */
331   OMP_CLAUSE_WAIT,
332 
333   /* OpenACC clause: auto.  */
334   OMP_CLAUSE_AUTO,
335 
336   /* OpenACC clause: seq.  */
337   OMP_CLAUSE_SEQ,
338 
339   /* Internal clause: temporary for combined loops expansion.  */
340   OMP_CLAUSE__LOOPTEMP_,
341 
342   /* OpenACC/OpenMP clause: if (scalar-expression).  */
343   OMP_CLAUSE_IF,
344 
345   /* OpenMP clause: num_threads (integer-expression).  */
346   OMP_CLAUSE_NUM_THREADS,
347 
348   /* OpenMP clause: schedule.  */
349   OMP_CLAUSE_SCHEDULE,
350 
351   /* OpenMP clause: nowait.  */
352   OMP_CLAUSE_NOWAIT,
353 
354   /* OpenMP clause: ordered [(constant-integer-expression)].  */
355   OMP_CLAUSE_ORDERED,
356 
357   /* OpenMP clause: default.  */
358   OMP_CLAUSE_DEFAULT,
359 
360   /* OpenACC/OpenMP clause: collapse (constant-integer-expression).  */
361   OMP_CLAUSE_COLLAPSE,
362 
363   /* OpenMP clause: untied.  */
364   OMP_CLAUSE_UNTIED,
365 
366   /* OpenMP clause: final (scalar-expression).  */
367   OMP_CLAUSE_FINAL,
368 
369   /* OpenMP clause: mergeable.  */
370   OMP_CLAUSE_MERGEABLE,
371 
372   /* OpenMP clause: device (integer-expression).  */
373   OMP_CLAUSE_DEVICE,
374 
375   /* OpenMP clause: dist_schedule (static[:chunk-size]).  */
376   OMP_CLAUSE_DIST_SCHEDULE,
377 
378   /* OpenMP clause: inbranch.  */
379   OMP_CLAUSE_INBRANCH,
380 
381   /* OpenMP clause: notinbranch.  */
382   OMP_CLAUSE_NOTINBRANCH,
383 
384   /* OpenMP clause: num_teams(integer-expression).  */
385   OMP_CLAUSE_NUM_TEAMS,
386 
387   /* OpenMP clause: thread_limit(integer-expression).  */
388   OMP_CLAUSE_THREAD_LIMIT,
389 
390   /* OpenMP clause: proc_bind ({master,close,spread}).  */
391   OMP_CLAUSE_PROC_BIND,
392 
393   /* OpenMP clause: safelen (constant-integer-expression).  */
394   OMP_CLAUSE_SAFELEN,
395 
396   /* OpenMP clause: simdlen (constant-integer-expression).  */
397   OMP_CLAUSE_SIMDLEN,
398 
399   /* OpenMP clause: for.  */
400   OMP_CLAUSE_FOR,
401 
402   /* OpenMP clause: parallel.  */
403   OMP_CLAUSE_PARALLEL,
404 
405   /* OpenMP clause: sections.  */
406   OMP_CLAUSE_SECTIONS,
407 
408   /* OpenMP clause: taskgroup.  */
409   OMP_CLAUSE_TASKGROUP,
410 
411   /* OpenMP clause: priority (integer-expression).  */
412   OMP_CLAUSE_PRIORITY,
413 
414   /* OpenMP clause: grainsize (integer-expression).  */
415   OMP_CLAUSE_GRAINSIZE,
416 
417   /* OpenMP clause: num_tasks (integer-expression).  */
418   OMP_CLAUSE_NUM_TASKS,
419 
420   /* OpenMP clause: nogroup.  */
421   OMP_CLAUSE_NOGROUP,
422 
423   /* OpenMP clause: threads.  */
424   OMP_CLAUSE_THREADS,
425 
426   /* OpenMP clause: simd.  */
427   OMP_CLAUSE_SIMD,
428 
429   /* OpenMP clause: hint (integer-expression).  */
430   OMP_CLAUSE_HINT,
431 
432   /* OpenMP clause: defaultmap (tofrom: scalar).  */
433   OMP_CLAUSE_DEFAULTMAP,
434 
435   /* Internally used only clause, holding SIMD uid.  */
436   OMP_CLAUSE__SIMDUID_,
437 
438   /* Internally used only clause, holding _Cilk_for # of iterations
439      on OMP_PARALLEL.  */
440   OMP_CLAUSE__CILK_FOR_COUNT_,
441 
442   /* OpenACC clause: independent.  */
443   OMP_CLAUSE_INDEPENDENT,
444 
445   /* OpenACC clause: worker [( [num:] integer-expression)].  */
446   OMP_CLAUSE_WORKER,
447 
448   /* OpenACC clause: vector [( [length:] integer-expression)].  */
449   OMP_CLAUSE_VECTOR,
450 
451   /* OpenACC clause: num_gangs (integer-expression).  */
452   OMP_CLAUSE_NUM_GANGS,
453 
454   /* OpenACC clause: num_workers (integer-expression).  */
455   OMP_CLAUSE_NUM_WORKERS,
456 
457   /* OpenACC clause: vector_length (integer-expression).  */
458   OMP_CLAUSE_VECTOR_LENGTH,
459 
460   /* OpenACC clause: tile ( size-expr-list ).  */
461   OMP_CLAUSE_TILE,
462 
463   /* OpenMP internal-only clause to specify grid dimensions of a gridified
464      kernel.  */
465   OMP_CLAUSE__GRIDDIM_
466 };
467 
468 #undef DEFTREESTRUCT
469 #define DEFTREESTRUCT(ENUM, NAME) ENUM,
470 enum tree_node_structure_enum {
471 #include "treestruct.def"
472   LAST_TS_ENUM
473 };
474 #undef DEFTREESTRUCT
475 
476 enum omp_clause_schedule_kind {
477   OMP_CLAUSE_SCHEDULE_STATIC,
478   OMP_CLAUSE_SCHEDULE_DYNAMIC,
479   OMP_CLAUSE_SCHEDULE_GUIDED,
480   OMP_CLAUSE_SCHEDULE_AUTO,
481   OMP_CLAUSE_SCHEDULE_RUNTIME,
482   OMP_CLAUSE_SCHEDULE_CILKFOR,
483   OMP_CLAUSE_SCHEDULE_MASK = (1 << 3) - 1,
484   OMP_CLAUSE_SCHEDULE_MONOTONIC = (1 << 3),
485   OMP_CLAUSE_SCHEDULE_NONMONOTONIC = (1 << 4),
486   OMP_CLAUSE_SCHEDULE_LAST = 2 * OMP_CLAUSE_SCHEDULE_NONMONOTONIC - 1
487 };
488 
489 enum omp_clause_default_kind {
490   OMP_CLAUSE_DEFAULT_UNSPECIFIED,
491   OMP_CLAUSE_DEFAULT_SHARED,
492   OMP_CLAUSE_DEFAULT_NONE,
493   OMP_CLAUSE_DEFAULT_PRIVATE,
494   OMP_CLAUSE_DEFAULT_FIRSTPRIVATE,
495   OMP_CLAUSE_DEFAULT_LAST
496 };
497 
498 /* There is a TYPE_QUAL value for each type qualifier.  They can be
499    combined by bitwise-or to form the complete set of qualifiers for a
500    type.  */
501 enum cv_qualifier {
502   TYPE_UNQUALIFIED   = 0x0,
503   TYPE_QUAL_CONST    = 0x1,
504   TYPE_QUAL_VOLATILE = 0x2,
505   TYPE_QUAL_RESTRICT = 0x4,
506   TYPE_QUAL_ATOMIC   = 0x8
507 };
508 
509 /* Standard named or nameless data types of the C compiler.  */
510 enum tree_index {
511   TI_ERROR_MARK,
512   TI_INTQI_TYPE,
513   TI_INTHI_TYPE,
514   TI_INTSI_TYPE,
515   TI_INTDI_TYPE,
516   TI_INTTI_TYPE,
517 
518   TI_UINTQI_TYPE,
519   TI_UINTHI_TYPE,
520   TI_UINTSI_TYPE,
521   TI_UINTDI_TYPE,
522   TI_UINTTI_TYPE,
523 
524   TI_ATOMICQI_TYPE,
525   TI_ATOMICHI_TYPE,
526   TI_ATOMICSI_TYPE,
527   TI_ATOMICDI_TYPE,
528   TI_ATOMICTI_TYPE,
529 
530   TI_UINT16_TYPE,
531   TI_UINT32_TYPE,
532   TI_UINT64_TYPE,
533 
534   TI_VOID,
535 
536   TI_INTEGER_ZERO,
537   TI_INTEGER_ONE,
538   TI_INTEGER_THREE,
539   TI_INTEGER_MINUS_ONE,
540   TI_NULL_POINTER,
541 
542   TI_SIZE_ZERO,
543   TI_SIZE_ONE,
544 
545   TI_BITSIZE_ZERO,
546   TI_BITSIZE_ONE,
547   TI_BITSIZE_UNIT,
548 
549   TI_PUBLIC,
550   TI_PROTECTED,
551   TI_PRIVATE,
552 
553   TI_BOOLEAN_FALSE,
554   TI_BOOLEAN_TRUE,
555 
556   TI_COMPLEX_INTEGER_TYPE,
557   TI_COMPLEX_FLOAT_TYPE,
558   TI_COMPLEX_DOUBLE_TYPE,
559   TI_COMPLEX_LONG_DOUBLE_TYPE,
560 
561   TI_FLOAT_TYPE,
562   TI_DOUBLE_TYPE,
563   TI_LONG_DOUBLE_TYPE,
564 
565   TI_FLOAT_PTR_TYPE,
566   TI_DOUBLE_PTR_TYPE,
567   TI_LONG_DOUBLE_PTR_TYPE,
568   TI_INTEGER_PTR_TYPE,
569 
570   TI_VOID_TYPE,
571   TI_PTR_TYPE,
572   TI_CONST_PTR_TYPE,
573   TI_SIZE_TYPE,
574   TI_PID_TYPE,
575   TI_PTRDIFF_TYPE,
576   TI_VA_LIST_TYPE,
577   TI_VA_LIST_GPR_COUNTER_FIELD,
578   TI_VA_LIST_FPR_COUNTER_FIELD,
579   TI_BOOLEAN_TYPE,
580   TI_FILEPTR_TYPE,
581   TI_POINTER_SIZED_TYPE,
582 
583   TI_POINTER_BOUNDS_TYPE,
584 
585   TI_DFLOAT32_TYPE,
586   TI_DFLOAT64_TYPE,
587   TI_DFLOAT128_TYPE,
588   TI_DFLOAT32_PTR_TYPE,
589   TI_DFLOAT64_PTR_TYPE,
590   TI_DFLOAT128_PTR_TYPE,
591 
592   TI_VOID_LIST_NODE,
593 
594   TI_MAIN_IDENTIFIER,
595 
596   TI_SAT_SFRACT_TYPE,
597   TI_SAT_FRACT_TYPE,
598   TI_SAT_LFRACT_TYPE,
599   TI_SAT_LLFRACT_TYPE,
600   TI_SAT_USFRACT_TYPE,
601   TI_SAT_UFRACT_TYPE,
602   TI_SAT_ULFRACT_TYPE,
603   TI_SAT_ULLFRACT_TYPE,
604   TI_SFRACT_TYPE,
605   TI_FRACT_TYPE,
606   TI_LFRACT_TYPE,
607   TI_LLFRACT_TYPE,
608   TI_USFRACT_TYPE,
609   TI_UFRACT_TYPE,
610   TI_ULFRACT_TYPE,
611   TI_ULLFRACT_TYPE,
612   TI_SAT_SACCUM_TYPE,
613   TI_SAT_ACCUM_TYPE,
614   TI_SAT_LACCUM_TYPE,
615   TI_SAT_LLACCUM_TYPE,
616   TI_SAT_USACCUM_TYPE,
617   TI_SAT_UACCUM_TYPE,
618   TI_SAT_ULACCUM_TYPE,
619   TI_SAT_ULLACCUM_TYPE,
620   TI_SACCUM_TYPE,
621   TI_ACCUM_TYPE,
622   TI_LACCUM_TYPE,
623   TI_LLACCUM_TYPE,
624   TI_USACCUM_TYPE,
625   TI_UACCUM_TYPE,
626   TI_ULACCUM_TYPE,
627   TI_ULLACCUM_TYPE,
628   TI_QQ_TYPE,
629   TI_HQ_TYPE,
630   TI_SQ_TYPE,
631   TI_DQ_TYPE,
632   TI_TQ_TYPE,
633   TI_UQQ_TYPE,
634   TI_UHQ_TYPE,
635   TI_USQ_TYPE,
636   TI_UDQ_TYPE,
637   TI_UTQ_TYPE,
638   TI_SAT_QQ_TYPE,
639   TI_SAT_HQ_TYPE,
640   TI_SAT_SQ_TYPE,
641   TI_SAT_DQ_TYPE,
642   TI_SAT_TQ_TYPE,
643   TI_SAT_UQQ_TYPE,
644   TI_SAT_UHQ_TYPE,
645   TI_SAT_USQ_TYPE,
646   TI_SAT_UDQ_TYPE,
647   TI_SAT_UTQ_TYPE,
648   TI_HA_TYPE,
649   TI_SA_TYPE,
650   TI_DA_TYPE,
651   TI_TA_TYPE,
652   TI_UHA_TYPE,
653   TI_USA_TYPE,
654   TI_UDA_TYPE,
655   TI_UTA_TYPE,
656   TI_SAT_HA_TYPE,
657   TI_SAT_SA_TYPE,
658   TI_SAT_DA_TYPE,
659   TI_SAT_TA_TYPE,
660   TI_SAT_UHA_TYPE,
661   TI_SAT_USA_TYPE,
662   TI_SAT_UDA_TYPE,
663   TI_SAT_UTA_TYPE,
664 
665   TI_OPTIMIZATION_DEFAULT,
666   TI_OPTIMIZATION_CURRENT,
667   TI_TARGET_OPTION_DEFAULT,
668   TI_TARGET_OPTION_CURRENT,
669   TI_CURRENT_TARGET_PRAGMA,
670   TI_CURRENT_OPTIMIZE_PRAGMA,
671 
672   TI_MAX
673 };
674 
675 /* An enumeration of the standard C integer types.  These must be
676    ordered so that shorter types appear before longer ones, and so
677    that signed types appear before unsigned ones, for the correct
678    functioning of interpret_integer() in c-lex.c.  */
679 enum integer_type_kind {
680   itk_char,
681   itk_signed_char,
682   itk_unsigned_char,
683   itk_short,
684   itk_unsigned_short,
685   itk_int,
686   itk_unsigned_int,
687   itk_long,
688   itk_unsigned_long,
689   itk_long_long,
690   itk_unsigned_long_long,
691 
692   itk_intN_0,
693   itk_unsigned_intN_0,
694   itk_intN_1,
695   itk_unsigned_intN_1,
696   itk_intN_2,
697   itk_unsigned_intN_2,
698   itk_intN_3,
699   itk_unsigned_intN_3,
700 
701   itk_none
702 };
703 
704 /* A pointer-to-function member type looks like:
705 
706      struct {
707        __P __pfn;
708        ptrdiff_t __delta;
709      };
710 
711    If __pfn is NULL, it is a NULL pointer-to-member-function.
712 
713    (Because the vtable is always the first thing in the object, we
714    don't need its offset.)  If the function is virtual, then PFN is
715    one plus twice the index into the vtable; otherwise, it is just a
716    pointer to the function.
717 
718    Unfortunately, using the lowest bit of PFN doesn't work in
719    architectures that don't impose alignment requirements on function
720    addresses, or that use the lowest bit to tell one ISA from another,
721    for example.  For such architectures, we use the lowest bit of
722    DELTA instead of the lowest bit of the PFN, and DELTA will be
723    multiplied by 2.  */
724 enum ptrmemfunc_vbit_where_t {
725   ptrmemfunc_vbit_in_pfn,
726   ptrmemfunc_vbit_in_delta
727 };
728 
729 /* Flags that may be passed in the third argument of decl_attributes, and
730    to handler functions for attributes.  */
731 enum attribute_flags {
732   /* The type passed in is the type of a DECL, and any attributes that
733      should be passed in again to be applied to the DECL rather than the
734      type should be returned.  */
735   ATTR_FLAG_DECL_NEXT = 1,
736   /* The type passed in is a function return type, and any attributes that
737      should be passed in again to be applied to the function type rather
738      than the return type should be returned.  */
739   ATTR_FLAG_FUNCTION_NEXT = 2,
740   /* The type passed in is an array element type, and any attributes that
741      should be passed in again to be applied to the array type rather
742      than the element type should be returned.  */
743   ATTR_FLAG_ARRAY_NEXT = 4,
744   /* The type passed in is a structure, union or enumeration type being
745      created, and should be modified in place.  */
746   ATTR_FLAG_TYPE_IN_PLACE = 8,
747   /* The attributes are being applied by default to a library function whose
748      name indicates known behavior, and should be silently ignored if they
749      are not in fact compatible with the function type.  */
750   ATTR_FLAG_BUILT_IN = 16,
751   /* A given attribute has been parsed as a C++-11 attribute.  */
752   ATTR_FLAG_CXX11 = 32
753 };
754 
755 /* Types used to represent sizes.  */
756 enum size_type_kind {
757   stk_sizetype,		/* Normal representation of sizes in bytes.  */
758   stk_ssizetype,	/* Signed representation of sizes in bytes.  */
759   stk_bitsizetype,	/* Normal representation of sizes in bits.  */
760   stk_sbitsizetype,	/* Signed representation of sizes in bits.  */
761   stk_type_kind_last
762 };
763 
764 enum operand_equal_flag {
765   OEP_ONLY_CONST = 1,
766   OEP_PURE_SAME = 2,
767   OEP_MATCH_SIDE_EFFECTS = 4,
768   OEP_ADDRESS_OF = 8
769 };
770 
771 /* Enum and arrays used for tree allocation stats.
772    Keep in sync with tree.c:tree_node_kind_names.  */
773 enum tree_node_kind {
774   d_kind,
775   t_kind,
776   b_kind,
777   s_kind,
778   r_kind,
779   e_kind,
780   c_kind,
781   id_kind,
782   vec_kind,
783   binfo_kind,
784   ssa_name_kind,
785   constr_kind,
786   x_kind,
787   lang_decl,
788   lang_type,
789   omp_clause_kind,
790   all_kinds
791 };
792 
793 enum annot_expr_kind {
794   annot_expr_ivdep_kind,
795   annot_expr_no_vector_kind,
796   annot_expr_vector_kind,
797   annot_expr_kind_last
798 };
799 
800 /*---------------------------------------------------------------------------
801                                 Type definitions
802 ---------------------------------------------------------------------------*/
803 /* When processing aliases at the symbol table level, we need the
804    declaration of target. For this reason we need to queue aliases and
805    process them after all declarations has been produced.  */
806 struct GTY(()) alias_pair {
807   tree decl;
808   tree target;
809 };
810 
811 /* An initialization priority.  */
812 typedef unsigned short priority_type;
813 
814 /* The type of a callback function for walking over tree structure.  */
815 typedef tree (*walk_tree_fn) (tree *, int *, void *);
816 
817 /* The type of a callback function that represents a custom walk_tree.  */
818 typedef tree (*walk_tree_lh) (tree *, int *, tree (*) (tree *, int *, void *),
819 			      void *, hash_set<tree> *);
820 
821 
822 /*---------------------------------------------------------------------------
823                               Main data structures
824 ---------------------------------------------------------------------------*/
825 /* A tree node can represent a data type, a variable, an expression
826    or a statement.  Each node has a TREE_CODE which says what kind of
827    thing it represents.  Some common codes are:
828    INTEGER_TYPE -- represents a type of integers.
829    ARRAY_TYPE -- represents a type of pointer.
830    VAR_DECL -- represents a declared variable.
831    INTEGER_CST -- represents a constant integer value.
832    PLUS_EXPR -- represents a sum (an expression).
833 
834    As for the contents of a tree node: there are some fields
835    that all nodes share.  Each TREE_CODE has various special-purpose
836    fields as well.  The fields of a node are never accessed directly,
837    always through accessor macros.  */
838 
839 /* Every kind of tree node starts with this structure,
840    so all nodes have these fields.
841 
842    See the accessor macros, defined below, for documentation of the
843    fields, and the table below which connects the fields and the
844    accessor macros.  */
845 
846 struct GTY(()) tree_base {
847   ENUM_BITFIELD(tree_code) code : 16;
848 
849   unsigned side_effects_flag : 1;
850   unsigned constant_flag : 1;
851   unsigned addressable_flag : 1;
852   unsigned volatile_flag : 1;
853   unsigned readonly_flag : 1;
854   unsigned asm_written_flag: 1;
855   unsigned nowarning_flag : 1;
856   unsigned visited : 1;
857 
858   unsigned used_flag : 1;
859   unsigned nothrow_flag : 1;
860   unsigned static_flag : 1;
861   unsigned public_flag : 1;
862   unsigned private_flag : 1;
863   unsigned protected_flag : 1;
864   unsigned deprecated_flag : 1;
865   unsigned default_def_flag : 1;
866 
867   union {
868     /* The bits in the following structure should only be used with
869        accessor macros that constrain inputs with tree checking.  */
870     struct {
871       unsigned lang_flag_0 : 1;
872       unsigned lang_flag_1 : 1;
873       unsigned lang_flag_2 : 1;
874       unsigned lang_flag_3 : 1;
875       unsigned lang_flag_4 : 1;
876       unsigned lang_flag_5 : 1;
877       unsigned lang_flag_6 : 1;
878       unsigned saturating_flag : 1;
879 
880       unsigned unsigned_flag : 1;
881       unsigned packed_flag : 1;
882       unsigned user_align : 1;
883       unsigned nameless_flag : 1;
884       unsigned atomic_flag : 1;
885       unsigned spare0 : 3;
886 
887       unsigned spare1 : 8;
888 
889       /* This field is only used with TREE_TYPE nodes; the only reason it is
890 	 present in tree_base instead of tree_type is to save space.  The size
891 	 of the field must be large enough to hold addr_space_t values.  */
892       unsigned address_space : 8;
893     } bits;
894 
895     /* The following fields are present in tree_base to save space.  The
896        nodes using them do not require any of the flags above and so can
897        make better use of the 4-byte sized word.  */
898 
899     /* The number of HOST_WIDE_INTs in an INTEGER_CST.  */
900     struct {
901       /* The number of HOST_WIDE_INTs if the INTEGER_CST is accessed in
902 	 its native precision.  */
903       unsigned char unextended;
904 
905       /* The number of HOST_WIDE_INTs if the INTEGER_CST is extended to
906 	 wider precisions based on its TYPE_SIGN.  */
907       unsigned char extended;
908 
909       /* The number of HOST_WIDE_INTs if the INTEGER_CST is accessed in
910 	 offset_int precision, with smaller integers being extended
911 	 according to their TYPE_SIGN.  This is equal to one of the two
912 	 fields above but is cached for speed.  */
913       unsigned char offset;
914     } int_length;
915 
916     /* VEC length.  This field is only used with TREE_VEC.  */
917     int length;
918 
919     /* SSA version number.  This field is only used with SSA_NAME.  */
920     unsigned int version;
921 
922     /* Internal function code.  */
923     enum internal_fn ifn;
924 
925     /* The following two fields are used for MEM_REF and TARGET_MEM_REF
926        expression trees and specify known data non-dependences.  For
927        two memory references in a function they are known to not
928        alias if dependence_info.clique are equal and dependence_info.base
929        are distinct.  */
930     struct {
931       unsigned short clique;
932       unsigned short base;
933     } dependence_info;
934   } GTY((skip(""))) u;
935 };
936 
937 /* The following table lists the uses of each of the above flags and
938    for which types of nodes they are defined.
939 
940    addressable_flag:
941 
942        TREE_ADDRESSABLE in
943            VAR_DECL, PARM_DECL, RESULT_DECL, FUNCTION_DECL, LABEL_DECL
944            SSA_NAME
945            all types
946            CONSTRUCTOR, IDENTIFIER_NODE
947            STMT_EXPR
948 
949        CALL_EXPR_TAILCALL in
950            CALL_EXPR
951 
952        CASE_LOW_SEEN in
953            CASE_LABEL_EXPR
954 
955        PREDICT_EXPR_OUTCOME in
956 	   PREDICT_EXPR
957 
958    static_flag:
959 
960        TREE_STATIC in
961            VAR_DECL, FUNCTION_DECL
962            CONSTRUCTOR
963 
964        TREE_NO_TRAMPOLINE in
965            ADDR_EXPR
966 
967        BINFO_VIRTUAL_P in
968            TREE_BINFO
969 
970        TREE_SYMBOL_REFERENCED in
971            IDENTIFIER_NODE
972 
973        CLEANUP_EH_ONLY in
974            TARGET_EXPR, WITH_CLEANUP_EXPR
975 
976        TRY_CATCH_IS_CLEANUP in
977            TRY_CATCH_EXPR
978 
979        ASM_INPUT_P in
980            ASM_EXPR
981 
982        TYPE_REF_CAN_ALIAS_ALL in
983            POINTER_TYPE, REFERENCE_TYPE
984 
985        CASE_HIGH_SEEN in
986            CASE_LABEL_EXPR
987 
988        ENUM_IS_SCOPED in
989 	   ENUMERAL_TYPE
990 
991        TRANSACTION_EXPR_OUTER in
992 	   TRANSACTION_EXPR
993 
994        SSA_NAME_ANTI_RANGE_P in
995 	   SSA_NAME
996 
997    public_flag:
998 
999        TREE_OVERFLOW in
1000            INTEGER_CST, REAL_CST, COMPLEX_CST, VECTOR_CST
1001 
1002        TREE_PUBLIC in
1003            VAR_DECL, FUNCTION_DECL
1004            IDENTIFIER_NODE
1005 
1006        CONSTRUCTOR_NO_CLEARING in
1007            CONSTRUCTOR
1008 
1009        ASM_VOLATILE_P in
1010            ASM_EXPR
1011 
1012        CALL_EXPR_VA_ARG_PACK in
1013            CALL_EXPR
1014 
1015        TYPE_CACHED_VALUES_P in
1016            all types
1017 
1018        SAVE_EXPR_RESOLVED_P in
1019            SAVE_EXPR
1020 
1021        OMP_CLAUSE_LASTPRIVATE_FIRSTPRIVATE in
1022            OMP_CLAUSE_LASTPRIVATE
1023 
1024        OMP_CLAUSE_PRIVATE_DEBUG in
1025            OMP_CLAUSE_PRIVATE
1026 
1027        OMP_CLAUSE_LINEAR_NO_COPYIN in
1028 	   OMP_CLAUSE_LINEAR
1029 
1030        OMP_CLAUSE_MAP_ZERO_BIAS_ARRAY_SECTION in
1031 	   OMP_CLAUSE_MAP
1032 
1033        OMP_CLAUSE_REDUCTION_OMP_ORIG_REF in
1034 	   OMP_CLAUSE_REDUCTION
1035 
1036        TRANSACTION_EXPR_RELAXED in
1037 	   TRANSACTION_EXPR
1038 
1039    private_flag:
1040 
1041        TREE_PRIVATE in
1042            all decls
1043 
1044        CALL_EXPR_RETURN_SLOT_OPT in
1045            CALL_EXPR
1046 
1047        OMP_SECTION_LAST in
1048            OMP_SECTION
1049 
1050        OMP_PARALLEL_COMBINED in
1051            OMP_PARALLEL
1052 
1053        OMP_ATOMIC_SEQ_CST in
1054 	   OMP_ATOMIC*
1055 
1056        OMP_CLAUSE_PRIVATE_OUTER_REF in
1057 	   OMP_CLAUSE_PRIVATE
1058 
1059        OMP_CLAUSE_LINEAR_NO_COPYOUT in
1060 	   OMP_CLAUSE_LINEAR
1061 
1062        TYPE_REF_IS_RVALUE in
1063 	   REFERENCE_TYPE
1064 
1065        ENUM_IS_OPAQUE in
1066 	   ENUMERAL_TYPE
1067 
1068    protected_flag:
1069 
1070        TREE_PROTECTED in
1071            BLOCK
1072            all decls
1073 
1074        CALL_FROM_THUNK_P and
1075        CALL_ALLOCA_FOR_VAR_P in
1076            CALL_EXPR
1077 
1078        OMP_CLAUSE_LINEAR_VARIABLE_STRIDE in
1079 	   OMP_CLAUSE_LINEAR
1080 
1081    side_effects_flag:
1082 
1083        TREE_SIDE_EFFECTS in
1084            all expressions
1085            all decls
1086            all constants
1087 
1088        FORCED_LABEL in
1089            LABEL_DECL
1090 
1091    volatile_flag:
1092 
1093        TREE_THIS_VOLATILE in
1094            all expressions
1095            all decls
1096 
1097        TYPE_VOLATILE in
1098            all types
1099 
1100    readonly_flag:
1101 
1102        TREE_READONLY in
1103            all expressions
1104            all decls
1105 
1106        TYPE_READONLY in
1107            all types
1108 
1109    constant_flag:
1110 
1111        TREE_CONSTANT in
1112            all expressions
1113            all decls
1114            all constants
1115 
1116        TYPE_SIZES_GIMPLIFIED in
1117            all types
1118 
1119    unsigned_flag:
1120 
1121        TYPE_UNSIGNED in
1122            all types
1123 
1124        DECL_UNSIGNED in
1125            all decls
1126 
1127    asm_written_flag:
1128 
1129        TREE_ASM_WRITTEN in
1130            VAR_DECL, FUNCTION_DECL, TYPE_DECL
1131            RECORD_TYPE, UNION_TYPE, QUAL_UNION_TYPE
1132            BLOCK, STRING_CST
1133 
1134        SSA_NAME_OCCURS_IN_ABNORMAL_PHI in
1135            SSA_NAME
1136 
1137    used_flag:
1138 
1139        TREE_USED in
1140            all expressions
1141            all decls
1142            IDENTIFIER_NODE
1143 
1144    nothrow_flag:
1145 
1146        TREE_NOTHROW in
1147            CALL_EXPR
1148            FUNCTION_DECL
1149 
1150        TYPE_ALIGN_OK in
1151            all types
1152 
1153        TREE_THIS_NOTRAP in
1154           INDIRECT_REF, MEM_REF, TARGET_MEM_REF, ARRAY_REF, ARRAY_RANGE_REF
1155 
1156        SSA_NAME_IN_FREE_LIST in
1157           SSA_NAME
1158 
1159        DECL_NONALIASED in
1160 	  VAR_DECL
1161 
1162    deprecated_flag:
1163 
1164        TREE_DEPRECATED in
1165            all decls
1166 	   all types
1167 
1168        IDENTIFIER_TRANSPARENT_ALIAS in
1169            IDENTIFIER_NODE
1170 
1171    visited:
1172 
1173        TREE_VISITED in
1174            all trees (used liberally by many passes)
1175 
1176    saturating_flag:
1177 
1178        TYPE_REVERSE_STORAGE_ORDER in
1179            RECORD_TYPE, UNION_TYPE, QUAL_UNION_TYPE, ARRAY_TYPE
1180 
1181        TYPE_SATURATING in
1182            other types
1183 
1184        VAR_DECL_IS_VIRTUAL_OPERAND in
1185 	   VAR_DECL
1186 
1187    nowarning_flag:
1188 
1189        TREE_NO_WARNING in
1190            all expressions
1191            all decls
1192 
1193        TYPE_ARTIFICIAL in
1194            all types
1195 
1196    default_def_flag:
1197 
1198        TYPE_FINAL_P in
1199 	   RECORD_TYPE, UNION_TYPE and QUAL_UNION_TYPE
1200 
1201        TYPE_VECTOR_OPAQUE in
1202 	   VECTOR_TYPE
1203 
1204        SSA_NAME_IS_DEFAULT_DEF in
1205            SSA_NAME
1206 
1207        DECL_NONLOCAL_FRAME in
1208 	   VAR_DECL
1209 
1210        REF_REVERSE_STORAGE_ORDER in
1211            BIT_FIELD_REF, MEM_REF
1212 */
1213 
1214 struct GTY(()) tree_typed {
1215   struct tree_base base;
1216   tree type;
1217 };
1218 
1219 struct GTY(()) tree_common {
1220   struct tree_typed typed;
1221   tree chain;
1222 };
1223 
1224 struct GTY(()) tree_int_cst {
1225   struct tree_typed typed;
1226   HOST_WIDE_INT val[1];
1227 };
1228 
1229 
1230 struct GTY(()) tree_real_cst {
1231   struct tree_typed typed;
1232   struct real_value * real_cst_ptr;
1233 };
1234 
1235 struct GTY(()) tree_fixed_cst {
1236   struct tree_typed typed;
1237   struct fixed_value * fixed_cst_ptr;
1238 };
1239 
1240 struct GTY(()) tree_string {
1241   struct tree_typed typed;
1242   int length;
1243   char str[1];
1244 };
1245 
1246 struct GTY(()) tree_complex {
1247   struct tree_typed typed;
1248   tree real;
1249   tree imag;
1250 };
1251 
1252 struct GTY(()) tree_vector {
1253   struct tree_typed typed;
1254   tree GTY ((length ("TYPE_VECTOR_SUBPARTS (TREE_TYPE ((tree)&%h))"))) elts[1];
1255 };
1256 
1257 struct GTY(()) tree_identifier {
1258   struct tree_common common;
1259   struct ht_identifier id;
1260 };
1261 
1262 struct GTY(()) tree_list {
1263   struct tree_common common;
1264   tree purpose;
1265   tree value;
1266 };
1267 
1268 struct GTY(()) tree_vec {
1269   struct tree_common common;
1270   tree GTY ((length ("TREE_VEC_LENGTH ((tree)&%h)"))) a[1];
1271 };
1272 
1273 /* A single element of a CONSTRUCTOR. VALUE holds the actual value of the
1274    element. INDEX can optionally design the position of VALUE: in arrays,
1275    it is the index where VALUE has to be placed; in structures, it is the
1276    FIELD_DECL of the member.  */
1277 struct GTY(()) constructor_elt {
1278   tree index;
1279   tree value;
1280 };
1281 
1282 struct GTY(()) tree_constructor {
1283   struct tree_typed typed;
1284   vec<constructor_elt, va_gc> *elts;
1285 };
1286 
1287 enum omp_clause_depend_kind
1288 {
1289   OMP_CLAUSE_DEPEND_IN,
1290   OMP_CLAUSE_DEPEND_OUT,
1291   OMP_CLAUSE_DEPEND_INOUT,
1292   OMP_CLAUSE_DEPEND_SOURCE,
1293   OMP_CLAUSE_DEPEND_SINK,
1294   OMP_CLAUSE_DEPEND_LAST
1295 };
1296 
1297 enum omp_clause_proc_bind_kind
1298 {
1299   /* Numbers should match omp_proc_bind_t enum in omp.h.  */
1300   OMP_CLAUSE_PROC_BIND_FALSE = 0,
1301   OMP_CLAUSE_PROC_BIND_TRUE = 1,
1302   OMP_CLAUSE_PROC_BIND_MASTER = 2,
1303   OMP_CLAUSE_PROC_BIND_CLOSE = 3,
1304   OMP_CLAUSE_PROC_BIND_SPREAD = 4,
1305   OMP_CLAUSE_PROC_BIND_LAST
1306 };
1307 
1308 enum omp_clause_linear_kind
1309 {
1310   OMP_CLAUSE_LINEAR_DEFAULT,
1311   OMP_CLAUSE_LINEAR_REF,
1312   OMP_CLAUSE_LINEAR_VAL,
1313   OMP_CLAUSE_LINEAR_UVAL
1314 };
1315 
1316 struct GTY(()) tree_exp {
1317   struct tree_typed typed;
1318   location_t locus;
1319   tree GTY ((special ("tree_exp"),
1320 	     desc ("TREE_CODE ((tree) &%0)")))
1321     operands[1];
1322 };
1323 
1324 /* Immediate use linking structure.  This structure is used for maintaining
1325    a doubly linked list of uses of an SSA_NAME.  */
1326 struct GTY(()) ssa_use_operand_t {
1327   struct ssa_use_operand_t* GTY((skip(""))) prev;
1328   struct ssa_use_operand_t* GTY((skip(""))) next;
1329   /* Immediate uses for a given SSA name are maintained as a cyclic
1330      list.  To recognize the root of this list, the location field
1331      needs to point to the original SSA name.  Since statements and
1332      SSA names are of different data types, we need this union.  See
1333      the explanation in struct imm_use_iterator.  */
1334   union { gimple *stmt; tree ssa_name; } GTY((skip(""))) loc;
1335   tree *GTY((skip(""))) use;
1336 };
1337 
1338 struct GTY(()) tree_ssa_name {
1339   struct tree_typed typed;
1340 
1341   /* _DECL wrapped by this SSA name.  */
1342   tree var;
1343 
1344   /* Statement that defines this SSA name.  */
1345   gimple *def_stmt;
1346 
1347   /* Value range information.  */
1348   union ssa_name_info_type {
1349     /* Pointer attributes used for alias analysis.  */
1350     struct GTY ((tag ("0"))) ptr_info_def *ptr_info;
1351     /* Value range attributes used for zero/sign extension elimination.  */
1352     struct GTY ((tag ("1"))) range_info_def *range_info;
1353   } GTY ((desc ("%1.typed.type ?" \
1354 		"!POINTER_TYPE_P (TREE_TYPE ((tree)&%1)) : 2"))) info;
1355 
1356   /* Immediate uses list for this SSA_NAME.  */
1357   struct ssa_use_operand_t imm_uses;
1358 };
1359 
1360 struct GTY(()) phi_arg_d {
1361   /* imm_use MUST be the first element in struct because we do some
1362      pointer arithmetic with it.  See phi_arg_index_from_use.  */
1363   struct ssa_use_operand_t imm_use;
1364   tree def;
1365   location_t locus;
1366 };
1367 
1368 struct GTY(()) tree_omp_clause {
1369   struct tree_common common;
1370   location_t locus;
1371   enum omp_clause_code code;
1372   union omp_clause_subcode {
1373     enum omp_clause_default_kind   default_kind;
1374     enum omp_clause_schedule_kind  schedule_kind;
1375     enum omp_clause_depend_kind    depend_kind;
1376     /* See include/gomp-constants.h for enum gomp_map_kind's values.  */
1377     unsigned int		   map_kind;
1378     enum omp_clause_proc_bind_kind proc_bind_kind;
1379     enum tree_code                 reduction_code;
1380     enum omp_clause_linear_kind    linear_kind;
1381     enum tree_code                 if_modifier;
1382     /* The dimension a OMP_CLAUSE__GRIDDIM_ clause of a gridified target
1383        construct describes.  */
1384     unsigned int		   dimension;
1385   } GTY ((skip)) subcode;
1386 
1387   /* The gimplification of OMP_CLAUSE_REDUCTION_{INIT,MERGE} for omp-low's
1388      usage.  */
1389   gimple_seq gimple_reduction_init;
1390   gimple_seq gimple_reduction_merge;
1391 
1392   tree GTY ((length ("omp_clause_num_ops[OMP_CLAUSE_CODE ((tree)&%h)]")))
1393     ops[1];
1394 };
1395 
1396 struct GTY(()) tree_block {
1397   struct tree_base base;
1398   tree chain;
1399 
1400   unsigned abstract_flag : 1;
1401   unsigned block_num : 31;
1402 
1403   location_t locus;
1404   location_t end_locus;
1405 
1406   tree vars;
1407   vec<tree, va_gc> *nonlocalized_vars;
1408 
1409   tree subblocks;
1410   tree supercontext;
1411   tree abstract_origin;
1412   tree fragment_origin;
1413   tree fragment_chain;
1414 
1415   /* Pointer to the DWARF lexical block.  */
1416   struct die_struct *die;
1417 };
1418 
1419 struct GTY(()) tree_type_common {
1420   struct tree_common common;
1421   tree size;
1422   tree size_unit;
1423   tree attributes;
1424   unsigned int uid;
1425 
1426   unsigned int precision : 10;
1427   unsigned no_force_blk_flag : 1;
1428   unsigned needs_constructing_flag : 1;
1429   unsigned transparent_aggr_flag : 1;
1430   unsigned restrict_flag : 1;
1431   unsigned contains_placeholder_bits : 2;
1432 
1433   ENUM_BITFIELD(machine_mode) mode : 8;
1434 
1435   unsigned string_flag : 1;
1436   unsigned lang_flag_0 : 1;
1437   unsigned lang_flag_1 : 1;
1438   unsigned lang_flag_2 : 1;
1439   unsigned lang_flag_3 : 1;
1440   unsigned lang_flag_4 : 1;
1441   unsigned lang_flag_5 : 1;
1442   unsigned lang_flag_6 : 1;
1443 
1444   unsigned int align;
1445   alias_set_type alias_set;
1446   tree pointer_to;
1447   tree reference_to;
1448   union tree_type_symtab {
1449     int GTY ((tag ("TYPE_SYMTAB_IS_ADDRESS"))) address;
1450     const char * GTY ((tag ("TYPE_SYMTAB_IS_POINTER"))) pointer;
1451     struct die_struct * GTY ((tag ("TYPE_SYMTAB_IS_DIE"))) die;
1452   } GTY ((desc ("debug_hooks->tree_type_symtab_field"))) symtab;
1453   tree canonical;
1454   tree next_variant;
1455   tree main_variant;
1456   tree context;
1457   tree name;
1458 };
1459 
1460 struct GTY(()) tree_type_with_lang_specific {
1461   struct tree_type_common common;
1462   /* Points to a structure whose details depend on the language in use.  */
1463   struct lang_type *lang_specific;
1464 };
1465 
1466 struct GTY(()) tree_type_non_common {
1467   struct tree_type_with_lang_specific with_lang_specific;
1468   tree values;
1469   tree minval;
1470   tree maxval;
1471   tree binfo;
1472 };
1473 
1474 struct GTY (()) tree_binfo {
1475   struct tree_common common;
1476 
1477   tree offset;
1478   tree vtable;
1479   tree virtuals;
1480   tree vptr_field;
1481   vec<tree, va_gc> *base_accesses;
1482   tree inheritance;
1483 
1484   tree vtt_subvtt;
1485   tree vtt_vptr;
1486 
1487   vec<tree, va_gc> base_binfos;
1488 };
1489 
1490 struct GTY(()) tree_decl_minimal {
1491   struct tree_common common;
1492   location_t locus;
1493   unsigned int uid;
1494   tree name;
1495   tree context;
1496 };
1497 
1498 struct GTY(()) tree_decl_common {
1499   struct tree_decl_minimal common;
1500   tree size;
1501 
1502   ENUM_BITFIELD(machine_mode) mode : 8;
1503 
1504   unsigned nonlocal_flag : 1;
1505   unsigned virtual_flag : 1;
1506   unsigned ignored_flag : 1;
1507   unsigned abstract_flag : 1;
1508   unsigned artificial_flag : 1;
1509   unsigned preserve_flag: 1;
1510   unsigned debug_expr_is_from : 1;
1511 
1512   unsigned lang_flag_0 : 1;
1513   unsigned lang_flag_1 : 1;
1514   unsigned lang_flag_2 : 1;
1515   unsigned lang_flag_3 : 1;
1516   unsigned lang_flag_4 : 1;
1517   unsigned lang_flag_5 : 1;
1518   unsigned lang_flag_6 : 1;
1519   unsigned lang_flag_7 : 1;
1520   unsigned lang_flag_8 : 1;
1521 
1522   /* In VAR_DECL and PARM_DECL, this is DECL_REGISTER.  */
1523   unsigned decl_flag_0 : 1;
1524   /* In FIELD_DECL, this is DECL_BIT_FIELD
1525      In VAR_DECL and FUNCTION_DECL, this is DECL_EXTERNAL.
1526      In TYPE_DECL, this is TYPE_DECL_SUPPRESS_DEBUG.  */
1527   unsigned decl_flag_1 : 1;
1528   /* In FIELD_DECL, this is DECL_NONADDRESSABLE_P
1529      In VAR_DECL, PARM_DECL and RESULT_DECL, this is
1530      DECL_HAS_VALUE_EXPR_P.  */
1531   unsigned decl_flag_2 : 1;
1532   /* 1 bit unused.  */
1533   unsigned decl_flag_3 : 1;
1534   /* Logically, these two would go in a theoretical base shared by var and
1535      parm decl. */
1536   unsigned gimple_reg_flag : 1;
1537   /* In VAR_DECL, PARM_DECL and RESULT_DECL, this is DECL_BY_REFERENCE.  */
1538   unsigned decl_by_reference_flag : 1;
1539   /* In a VAR_DECL and PARM_DECL, this is DECL_READ_P.  */
1540   unsigned decl_read_flag : 1;
1541   /* In a VAR_DECL or RESULT_DECL, this is DECL_NONSHAREABLE.  */
1542   unsigned decl_nonshareable_flag : 1;
1543 
1544   /* DECL_OFFSET_ALIGN, used only for FIELD_DECLs.  */
1545   unsigned int off_align : 8;
1546 
1547   /* 24 bits unused.  */
1548 
1549   /* DECL_ALIGN.  It should have the same size as TYPE_ALIGN.  */
1550   unsigned int align;
1551 
1552   /* UID for points-to sets, stable over copying from inlining.  */
1553   unsigned int pt_uid;
1554 
1555   tree size_unit;
1556   tree initial;
1557   tree attributes;
1558   tree abstract_origin;
1559 
1560   /* Points to a structure whose details depend on the language in use.  */
1561   struct lang_decl *lang_specific;
1562 };
1563 
1564 struct GTY(()) tree_decl_with_rtl {
1565   struct tree_decl_common common;
1566   rtx rtl;
1567 };
1568 
1569 struct GTY(()) tree_field_decl {
1570   struct tree_decl_common common;
1571 
1572   tree offset;
1573   tree bit_field_type;
1574   tree qualifier;
1575   tree bit_offset;
1576   tree fcontext;
1577 };
1578 
1579 struct GTY(()) tree_label_decl {
1580   struct tree_decl_with_rtl common;
1581   int label_decl_uid;
1582   int eh_landing_pad_nr;
1583 };
1584 
1585 struct GTY(()) tree_result_decl {
1586   struct tree_decl_with_rtl common;
1587 };
1588 
1589 struct GTY(()) tree_const_decl {
1590   struct tree_decl_common common;
1591 };
1592 
1593 struct GTY(()) tree_parm_decl {
1594   struct tree_decl_with_rtl common;
1595   rtx incoming_rtl;
1596 };
1597 
1598 struct GTY(()) tree_decl_with_vis {
1599  struct tree_decl_with_rtl common;
1600  tree assembler_name;
1601  struct symtab_node *symtab_node;
1602 
1603  /* Belong to VAR_DECL exclusively.  */
1604  unsigned defer_output : 1;
1605  unsigned hard_register : 1;
1606  unsigned common_flag : 1;
1607  unsigned in_text_section : 1;
1608  unsigned in_constant_pool : 1;
1609  unsigned dllimport_flag : 1;
1610  /* Don't belong to VAR_DECL exclusively.  */
1611  unsigned weak_flag : 1;
1612 
1613  unsigned seen_in_bind_expr : 1;
1614  unsigned comdat_flag : 1;
1615  /* Used for FUNCTION_DECL, VAR_DECL and in C++ for TYPE_DECL.  */
1616  ENUM_BITFIELD(symbol_visibility) visibility : 2;
1617  unsigned visibility_specified : 1;
1618 
1619  /* Belong to FUNCTION_DECL exclusively.  */
1620  unsigned init_priority_p : 1;
1621  /* Used by C++ only.  Might become a generic decl flag.  */
1622  unsigned shadowed_for_var_p : 1;
1623  /* Belong to FUNCTION_DECL exclusively.  */
1624  unsigned cxx_constructor : 1;
1625  /* Belong to FUNCTION_DECL exclusively.  */
1626  unsigned cxx_destructor : 1;
1627  /* Belong to FUNCTION_DECL exclusively.  */
1628  unsigned final : 1;
1629  /* Belong to FUNCTION_DECL exclusively.  */
1630  unsigned regdecl_flag : 1;
1631  /* 14 unused bits. */
1632 };
1633 
1634 struct GTY(()) tree_var_decl {
1635   struct tree_decl_with_vis common;
1636 };
1637 
1638 struct GTY(()) tree_decl_non_common {
1639   struct tree_decl_with_vis common;
1640   /* Almost all FE's use this.  */
1641   tree result;
1642 };
1643 
1644 /* FUNCTION_DECL inherits from DECL_NON_COMMON because of the use of the
1645    arguments/result/saved_tree fields by front ends.   It was either inherit
1646    FUNCTION_DECL from non_common, or inherit non_common from FUNCTION_DECL,
1647    which seemed a bit strange.  */
1648 
1649 struct GTY(()) tree_function_decl {
1650   struct tree_decl_non_common common;
1651 
1652   struct function *f;
1653 
1654   /* Arguments of the function.  */
1655   tree arguments;
1656   /* The personality function. Used for stack unwinding. */
1657   tree personality;
1658 
1659   /* Function specific options that are used by this function.  */
1660   tree function_specific_target;	/* target options */
1661   tree function_specific_optimization;	/* optimization options */
1662 
1663   /* Generic function body.  */
1664   tree saved_tree;
1665   /* Index within a virtual table.  */
1666   tree vindex;
1667 
1668   /* In a FUNCTION_DECL for which DECL_BUILT_IN holds, this is
1669      DECL_FUNCTION_CODE.  Otherwise unused.
1670      ???  The bitfield needs to be able to hold all target function
1671 	  codes as well.  */
1672   ENUM_BITFIELD(built_in_function) function_code : 12;
1673   ENUM_BITFIELD(built_in_class) built_in_class : 2;
1674 
1675   unsigned static_ctor_flag : 1;
1676   unsigned static_dtor_flag : 1;
1677 
1678   unsigned uninlinable : 1;
1679   unsigned possibly_inlined : 1;
1680   unsigned novops_flag : 1;
1681   unsigned returns_twice_flag : 1;
1682   unsigned malloc_flag : 1;
1683   unsigned operator_new_flag : 1;
1684   unsigned declared_inline_flag : 1;
1685   unsigned no_inline_warning_flag : 1;
1686 
1687   unsigned no_instrument_function_entry_exit : 1;
1688   unsigned no_limit_stack : 1;
1689   unsigned disregard_inline_limits : 1;
1690   unsigned pure_flag : 1;
1691   unsigned looping_const_or_pure_flag : 1;
1692   unsigned has_debug_args_flag : 1;
1693   unsigned tm_clone_flag : 1;
1694   unsigned versioned_function : 1;
1695   /* No bits left.  */
1696 };
1697 
1698 struct GTY(()) tree_translation_unit_decl {
1699   struct tree_decl_common common;
1700   /* Source language of this translation unit.  Used for DWARF output.  */
1701   const char * GTY((skip(""))) language;
1702   /* TODO: Non-optimization used to build this translation unit.  */
1703   /* TODO: Root of a partial DWARF tree for global types and decls.  */
1704 };
1705 
1706 struct GTY(()) tree_type_decl {
1707   struct tree_decl_non_common common;
1708 
1709 };
1710 
1711 struct GTY ((chain_next ("%h.next"), chain_prev ("%h.prev"))) tree_statement_list_node
1712  {
1713   struct tree_statement_list_node *prev;
1714   struct tree_statement_list_node *next;
1715   tree stmt;
1716 };
1717 
1718 struct GTY(()) tree_statement_list
1719  {
1720   struct tree_typed typed;
1721   struct tree_statement_list_node *head;
1722   struct tree_statement_list_node *tail;
1723 };
1724 
1725 
1726 /* Optimization options used by a function.  */
1727 
1728 struct GTY(()) tree_optimization_option {
1729   struct tree_common common;
1730 
1731   /* The optimization options used by the user.  */
1732   struct cl_optimization *opts;
1733 
1734   /* Target optabs for this set of optimization options.  This is of
1735      type `struct target_optabs *'.  */
1736   void *GTY ((atomic)) optabs;
1737 
1738   /* The value of this_target_optabs against which the optabs above were
1739      generated.  */
1740   struct target_optabs *GTY ((skip)) base_optabs;
1741 };
1742 
1743 /* Forward declaration, defined in target-globals.h.  */
1744 
1745 struct GTY(()) target_globals;
1746 
1747 /* Target options used by a function.  */
1748 
1749 struct GTY(()) tree_target_option {
1750   struct tree_common common;
1751 
1752   /* Target globals for the corresponding target option.  */
1753   struct target_globals *globals;
1754 
1755   /* The optimization options used by the user.  */
1756   struct cl_target_option *opts;
1757 };
1758 
1759 /* Define the overall contents of a tree node.
1760    It may be any of the structures declared above
1761    for various types of node.  */
1762 union GTY ((ptr_alias (union lang_tree_node),
1763 	    desc ("tree_node_structure (&%h)"), variable_size)) tree_node {
1764   struct tree_base GTY ((tag ("TS_BASE"))) base;
1765   struct tree_typed GTY ((tag ("TS_TYPED"))) typed;
1766   struct tree_common GTY ((tag ("TS_COMMON"))) common;
1767   struct tree_int_cst GTY ((tag ("TS_INT_CST"))) int_cst;
1768   struct tree_real_cst GTY ((tag ("TS_REAL_CST"))) real_cst;
1769   struct tree_fixed_cst GTY ((tag ("TS_FIXED_CST"))) fixed_cst;
1770   struct tree_vector GTY ((tag ("TS_VECTOR"))) vector;
1771   struct tree_string GTY ((tag ("TS_STRING"))) string;
1772   struct tree_complex GTY ((tag ("TS_COMPLEX"))) complex;
1773   struct tree_identifier GTY ((tag ("TS_IDENTIFIER"))) identifier;
1774   struct tree_decl_minimal GTY((tag ("TS_DECL_MINIMAL"))) decl_minimal;
1775   struct tree_decl_common GTY ((tag ("TS_DECL_COMMON"))) decl_common;
1776   struct tree_decl_with_rtl GTY ((tag ("TS_DECL_WRTL"))) decl_with_rtl;
1777   struct tree_decl_non_common  GTY ((tag ("TS_DECL_NON_COMMON")))
1778     decl_non_common;
1779   struct tree_parm_decl  GTY  ((tag ("TS_PARM_DECL"))) parm_decl;
1780   struct tree_decl_with_vis GTY ((tag ("TS_DECL_WITH_VIS"))) decl_with_vis;
1781   struct tree_var_decl GTY ((tag ("TS_VAR_DECL"))) var_decl;
1782   struct tree_field_decl GTY ((tag ("TS_FIELD_DECL"))) field_decl;
1783   struct tree_label_decl GTY ((tag ("TS_LABEL_DECL"))) label_decl;
1784   struct tree_result_decl GTY ((tag ("TS_RESULT_DECL"))) result_decl;
1785   struct tree_const_decl GTY ((tag ("TS_CONST_DECL"))) const_decl;
1786   struct tree_type_decl GTY ((tag ("TS_TYPE_DECL"))) type_decl;
1787   struct tree_function_decl GTY ((tag ("TS_FUNCTION_DECL"))) function_decl;
1788   struct tree_translation_unit_decl GTY ((tag ("TS_TRANSLATION_UNIT_DECL")))
1789     translation_unit_decl;
1790   struct tree_type_common GTY ((tag ("TS_TYPE_COMMON"))) type_common;
1791   struct tree_type_with_lang_specific GTY ((tag ("TS_TYPE_WITH_LANG_SPECIFIC")))
1792     type_with_lang_specific;
1793   struct tree_type_non_common GTY ((tag ("TS_TYPE_NON_COMMON")))
1794     type_non_common;
1795   struct tree_list GTY ((tag ("TS_LIST"))) list;
1796   struct tree_vec GTY ((tag ("TS_VEC"))) vec;
1797   struct tree_exp GTY ((tag ("TS_EXP"))) exp;
1798   struct tree_ssa_name GTY ((tag ("TS_SSA_NAME"))) ssa_name;
1799   struct tree_block GTY ((tag ("TS_BLOCK"))) block;
1800   struct tree_binfo GTY ((tag ("TS_BINFO"))) binfo;
1801   struct tree_statement_list GTY ((tag ("TS_STATEMENT_LIST"))) stmt_list;
1802   struct tree_constructor GTY ((tag ("TS_CONSTRUCTOR"))) constructor;
1803   struct tree_omp_clause GTY ((tag ("TS_OMP_CLAUSE"))) omp_clause;
1804   struct tree_optimization_option GTY ((tag ("TS_OPTIMIZATION"))) optimization;
1805   struct tree_target_option GTY ((tag ("TS_TARGET_OPTION"))) target_option;
1806 };
1807 
1808 /* Structure describing an attribute and a function to handle it.  */
1809 struct attribute_spec {
1810   /* The name of the attribute (without any leading or trailing __),
1811      or NULL to mark the end of a table of attributes.  */
1812   const char *name;
1813   /* The minimum length of the list of arguments of the attribute.  */
1814   int min_length;
1815   /* The maximum length of the list of arguments of the attribute
1816      (-1 for no maximum).  */
1817   int max_length;
1818   /* Whether this attribute requires a DECL.  If it does, it will be passed
1819      from types of DECLs, function return types and array element types to
1820      the DECLs, function types and array types respectively; but when
1821      applied to a type in any other circumstances, it will be ignored with
1822      a warning.  (If greater control is desired for a given attribute,
1823      this should be false, and the flags argument to the handler may be
1824      used to gain greater control in that case.)  */
1825   bool decl_required;
1826   /* Whether this attribute requires a type.  If it does, it will be passed
1827      from a DECL to the type of that DECL.  */
1828   bool type_required;
1829   /* Whether this attribute requires a function (or method) type.  If it does,
1830      it will be passed from a function pointer type to the target type,
1831      and from a function return type (which is not itself a function
1832      pointer type) to the function type.  */
1833   bool function_type_required;
1834   /* Function to handle this attribute.  NODE points to the node to which
1835      the attribute is to be applied.  If a DECL, it should be modified in
1836      place; if a TYPE, a copy should be created.  NAME is the name of the
1837      attribute (possibly with leading or trailing __).  ARGS is the TREE_LIST
1838      of the arguments (which may be NULL).  FLAGS gives further information
1839      about the context of the attribute.  Afterwards, the attributes will
1840      be added to the DECL_ATTRIBUTES or TYPE_ATTRIBUTES, as appropriate,
1841      unless *NO_ADD_ATTRS is set to true (which should be done on error,
1842      as well as in any other cases when the attributes should not be added
1843      to the DECL or TYPE).  Depending on FLAGS, any attributes to be
1844      applied to another type or DECL later may be returned;
1845      otherwise the return value should be NULL_TREE.  This pointer may be
1846      NULL if no special handling is required beyond the checks implied
1847      by the rest of this structure.  */
1848   tree (*handler) (tree *node, tree name, tree args,
1849 		   int flags, bool *no_add_attrs);
1850   /* Specifies if attribute affects type's identity.  */
1851   bool affects_type_identity;
1852 };
1853 
1854 /* These functions allow a front-end to perform a manual layout of a
1855    RECORD_TYPE.  (For instance, if the placement of subsequent fields
1856    depends on the placement of fields so far.)  Begin by calling
1857    start_record_layout.  Then, call place_field for each of the
1858    fields.  Then, call finish_record_layout.  See layout_type for the
1859    default way in which these functions are used.  */
1860 typedef struct record_layout_info_s {
1861   /* The RECORD_TYPE that we are laying out.  */
1862   tree t;
1863   /* The offset into the record so far, in bytes, not including bits in
1864      BITPOS.  */
1865   tree offset;
1866   /* The last known alignment of SIZE.  */
1867   unsigned int offset_align;
1868   /* The bit position within the last OFFSET_ALIGN bits, in bits.  */
1869   tree bitpos;
1870   /* The alignment of the record so far, in bits.  */
1871   unsigned int record_align;
1872   /* The alignment of the record so far, ignoring #pragma pack and
1873      __attribute__ ((packed)), in bits.  */
1874   unsigned int unpacked_align;
1875   /* The previous field laid out.  */
1876   tree prev_field;
1877   /* The static variables (i.e., class variables, as opposed to
1878      instance variables) encountered in T.  */
1879   vec<tree, va_gc> *pending_statics;
1880   /* Bits remaining in the current alignment group */
1881   int remaining_in_alignment;
1882   /* True if we've seen a packed field that didn't have normal
1883      alignment anyway.  */
1884   int packed_maybe_necessary;
1885 } *record_layout_info;
1886 
1887 /* Iterator for going through the function arguments.  */
1888 struct function_args_iterator {
1889   tree next;			/* TREE_LIST pointing to the next argument */
1890 };
1891 
1892 /* Structures to map from a tree to another tree.  */
1893 struct GTY(()) tree_map_base {
1894   tree from;
1895 };
1896 
1897 /* Map from a tree to another tree.  */
1898 
1899 struct GTY((for_user)) tree_map {
1900   struct tree_map_base base;
1901   unsigned int hash;
1902   tree to;
1903 };
1904 
1905 /* Map from a decl tree to another tree.  */
1906 struct GTY((for_user)) tree_decl_map {
1907   struct tree_map_base base;
1908   tree to;
1909 };
1910 
1911 /* Map from a tree to an int.  */
1912 struct GTY((for_user)) tree_int_map {
1913   struct tree_map_base base;
1914   unsigned int to;
1915 };
1916 
1917 /* Map from a decl tree to a tree vector.  */
1918 struct GTY((for_user)) tree_vec_map {
1919   struct tree_map_base base;
1920   vec<tree, va_gc> *to;
1921 };
1922 
1923 /* Abstract iterators for CALL_EXPRs.  These static inline definitions
1924    have to go towards the end of tree.h so that union tree_node is fully
1925    defined by this point.  */
1926 
1927 /* Structure containing iterator state.  */
1928 struct call_expr_arg_iterator {
1929   tree t;	/* the call_expr */
1930   int n;	/* argument count */
1931   int i;	/* next argument index */
1932 };
1933 
1934 struct const_call_expr_arg_iterator {
1935   const_tree t;	/* the call_expr */
1936   int n;	/* argument count */
1937   int i;	/* next argument index */
1938 };
1939 
1940 /* The builtin_info structure holds the FUNCTION_DECL of the standard builtin
1941    function, and flags.  */
1942 struct GTY(()) builtin_info_type {
1943   tree decl;
1944   /* Whether the user can use <xxx> instead of explicitly using calls
1945      to __builtin_<xxx>.  */
1946   unsigned implicit_p : 1;
1947   /* Whether the user has provided a declaration of <xxx>.  */
1948   unsigned declared_p : 1;
1949 };
1950 
1951 
1952 /*---------------------------------------------------------------------------
1953                                 Global variables
1954 ---------------------------------------------------------------------------*/
1955 /* Matrix describing the structures contained in a given tree code.  */
1956 extern unsigned char tree_contains_struct[MAX_TREE_CODES][64];
1957 
1958 /* Class of tree given its code.  */
1959 extern const enum tree_code_class tree_code_type[];
1960 
1961 /* Each tree code class has an associated string representation.
1962    These must correspond to the tree_code_class entries.  */
1963 extern const char *const tree_code_class_strings[];
1964 
1965 /* Number of argument-words in each kind of tree-node.  */
1966 extern const unsigned char tree_code_length[];
1967 
1968 /* Vector of all alias pairs for global symbols.  */
1969 extern GTY(()) vec<alias_pair, va_gc> *alias_pairs;
1970 
1971 /* Names of all the built_in classes.  */
1972 extern const char *const built_in_class_names[BUILT_IN_LAST];
1973 
1974 /* Names of all the built_in functions.  */
1975 extern const char * built_in_names[(int) END_BUILTINS];
1976 
1977 /* Number of operands and names for each OMP_CLAUSE node.  */
1978 extern unsigned const char omp_clause_num_ops[];
1979 extern const char * const omp_clause_code_name[];
1980 
1981 /* A vector of all translation-units.  */
1982 extern GTY (()) vec<tree, va_gc> *all_translation_units;
1983 
1984 /* Vector of standard trees used by the C compiler.  */
1985 extern GTY(()) tree global_trees[TI_MAX];
1986 
1987 /* The standard C integer types.  Use integer_type_kind to index into
1988    this array.  */
1989 extern GTY(()) tree integer_types[itk_none];
1990 
1991 /* Types used to represent sizes.  */
1992 extern GTY(()) tree sizetype_tab[(int) stk_type_kind_last];
1993 
1994 /* Arrays for keeping track of tree node statistics.  */
1995 extern int tree_node_counts[];
1996 extern int tree_node_sizes[];
1997 
1998 /* True if we are in gimple form and the actions of the folders need to
1999    be restricted.  False if we are not in gimple form and folding is not
2000    restricted to creating gimple expressions.  */
2001 extern bool in_gimple_form;
2002 
2003 /* Functional interface to the builtin functions.  */
2004 extern GTY(()) builtin_info_type builtin_info[(int)END_BUILTINS];
2005 
2006 /* If nonzero, an upper limit on alignment of structure fields, in bits,  */
2007 extern unsigned int maximum_field_alignment;
2008 
2009 /* Points to the FUNCTION_DECL of the function whose body we are reading.  */
2010 extern GTY(()) tree current_function_decl;
2011 
2012 /* Nonzero means a FUNC_BEGIN label was emitted.  */
2013 extern GTY(()) const char * current_function_func_begin_label;
2014 
2015 #endif  // GCC_TREE_CORE_H
2016