gcc/tree-core.h

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