OSDN Git Service

* extend.texi (-fthis-is-variable): Undocument.
[pf3gnuchains/gcc-fork.git] / gcc / tree.h
index 976f70f..0332102 100644 (file)
@@ -1,5 +1,6 @@
 /* Front-end tree definitions for GNU compiler.
-   Copyright (C) 1989, 93-98, 1999, 2000 Free Software Foundation, Inc.
+   Copyright (C) 1989, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000
+   Free Software Foundation, Inc.
 
 This file is part of GNU CC.
 
@@ -19,6 +20,7 @@ the Free Software Foundation, 59 Temple Place - Suite 330,
 Boston, MA 02111-1307, USA.  */
 
 #include "machmode.h"
+#include "version.h"
 
 #ifndef RTX_CODE
 struct rtx_def;
@@ -65,8 +67,8 @@ extern int tree_code_length[MAX_TREE_CODES];
 
 extern const char *tree_code_name[MAX_TREE_CODES];
 \f
-/* Classify which part of the compiler has defined a given builtin
-   function.  */
+/* Classify which part of the compiler has defined a given builtin function.
+   Note that we assume below that this is no more than two bits.  */
 enum built_in_class
 {
   NOT_BUILT_IN = 0,
@@ -74,79 +76,25 @@ enum built_in_class
   BUILT_IN_MD,
   BUILT_IN_NORMAL
 };
+
+/* Names for the above.  */
+extern const char *const built_in_class_names[4];
+
 /* Codes that identify the various built in functions
    so that expand_call can identify them quickly.  */
 
+#define DEF_BUILTIN(x) x,
 enum built_in_function
 {
-  BUILT_IN_ALLOCA,
-  BUILT_IN_ABS,
-  BUILT_IN_FABS,
-  BUILT_IN_LABS,
-  BUILT_IN_FFS,
-  BUILT_IN_DIV,
-  BUILT_IN_LDIV,
-  BUILT_IN_FFLOOR,
-  BUILT_IN_FCEIL,
-  BUILT_IN_FMOD,
-  BUILT_IN_FREM,
-  BUILT_IN_MEMCPY,
-  BUILT_IN_MEMCMP,
-  BUILT_IN_MEMSET,
-  BUILT_IN_STRCPY,
-  BUILT_IN_STRCMP,
-  BUILT_IN_STRLEN,
-  BUILT_IN_FSQRT,
-  BUILT_IN_SIN,
-  BUILT_IN_COS,
-  BUILT_IN_GETEXP,
-  BUILT_IN_GETMAN,
-  BUILT_IN_SAVEREGS,
-  BUILT_IN_CLASSIFY_TYPE,
-  BUILT_IN_NEXT_ARG,
-  BUILT_IN_ARGS_INFO,
-  BUILT_IN_CONSTANT_P,
-  BUILT_IN_FRAME_ADDRESS,
-  BUILT_IN_RETURN_ADDRESS,
-  BUILT_IN_AGGREGATE_INCOMING_ADDRESS,
-  BUILT_IN_APPLY_ARGS,
-  BUILT_IN_APPLY,
-  BUILT_IN_RETURN,
-  BUILT_IN_SETJMP,
-  BUILT_IN_LONGJMP,
-  BUILT_IN_TRAP,
-
-  /* ISO C99 floating point unordered comparisons.  */
-  BUILT_IN_ISGREATER,
-  BUILT_IN_ISGREATEREQUAL,
-  BUILT_IN_ISLESS,
-  BUILT_IN_ISLESSEQUAL,
-  BUILT_IN_ISLESSGREATER,
-  BUILT_IN_ISUNORDERED,
-
-  /* Various hooks for the DWARF 2 __throw routine.  */
-  BUILT_IN_UNWIND_INIT,
-  BUILT_IN_DWARF_CFA,
-  BUILT_IN_DWARF_FP_REGNUM,
-  BUILT_IN_INIT_DWARF_REG_SIZES,
-  BUILT_IN_FROB_RETURN_ADDR,
-  BUILT_IN_EXTRACT_RETURN_ADDR,
-  BUILT_IN_EH_RETURN,
-
-  BUILT_IN_VARARGS_START,
-  BUILT_IN_STDARG_START,
-  BUILT_IN_VA_END,
-  BUILT_IN_VA_COPY,
-
-  /* C++ extensions */
-  BUILT_IN_NEW,
-  BUILT_IN_VEC_NEW,
-  BUILT_IN_DELETE,
-  BUILT_IN_VEC_DELETE,
+#include "builtins.def"
 
   /* Upper bound on non-language-specific builtins. */
   END_BUILTINS
 };
+#undef DEF_BUILTIN
+
+/* Names for the above.  */
+extern const char *const built_in_names[(int) END_BUILTINS];
 \f
 /* The definition of tree nodes fills the next several pages.  */
 
@@ -197,7 +145,7 @@ struct tree_common
   unsigned asm_written_flag: 1;
 
   unsigned used_flag : 1;
-  unsigned raises_flag : 1;
+  unsigned nothrow_flag : 1;
   unsigned static_flag : 1;
   unsigned public_flag : 1;
   unsigned private_flag : 1;
@@ -313,10 +261,10 @@ struct tree_common
        TREE_USED in
            expressions, IDENTIFIER_NODE
 
-   raises_flag:
+   nothrow_flag:
 
-       TREE_RAISES in
-           expressions
+       TREE_NOTHROW in
+           CALL_EXPR, FUNCTION_DECL
 
                                                          */
 /* Define accessors for the fields that all tree nodes have
@@ -459,6 +407,17 @@ extern void tree_class_check_failed PARAMS ((const tree, char,
 #define POINTER_TYPE_P(TYPE) \
   (TREE_CODE (TYPE) == POINTER_TYPE || TREE_CODE (TYPE) == REFERENCE_TYPE)
 
+/* Nonzero if this type is a complete type.  */
+#define COMPLETE_TYPE_P(NODE) (TYPE_SIZE (NODE) != NULL_TREE)
+
+/* Nonzero if this type is complete or is cv void.  */
+#define COMPLETE_OR_VOID_TYPE_P(NODE) \
+    (COMPLETE_TYPE_P (NODE) || TREE_CODE (NODE) == VOID_TYPE)
+
+/* Nonzero if this type is complete or is an array with unspecified bound.  */
+#define COMPLETE_OR_UNBOUND_ARRAY_TYPE_P(NODE) \
+    (COMPLETE_TYPE_P (TREE_CODE (NODE) == ARRAY_TYPE ? TREE_TYPE (NODE) : NODE))
+
 /* Nonzero if TYPE represents a type.  */
 
 #define TYPE_P(TYPE)   (TREE_CODE_CLASS (TREE_CODE (TYPE)) == 't')
@@ -561,8 +520,14 @@ extern void tree_class_check_failed PARAMS ((const tree, char,
 
 /* Nonzero means permanent node;
    node will continue to exist for the entire compiler run.
-   Otherwise it will be recycled at the end of the function.  */
+   Otherwise it will be recycled at the end of the function.
+   This flag is always zero if garbage collection is in use.
+   Try not to use this.  Only set it with TREE_SET_PERMANENT.  */
 #define TREE_PERMANENT(NODE) ((NODE)->common.permanent_flag)
+#define TREE_SET_PERMANENT(NODE) do { \
+  if (!ggc_p && current_obstack == &permanent_obstack) \
+    TREE_PERMANENT(NODE) = 1; \
+} while (0) 
 
 /* In INTEGER_TYPE or ENUMERAL_TYPE nodes, means an unsigned type.
    In FIELD_DECL nodes, means an unsigned bit field.
@@ -584,9 +549,9 @@ extern void tree_class_check_failed PARAMS ((const tree, char,
    was used.  */
 #define TREE_USED(NODE) ((NODE)->common.used_flag)
 
-/* Nonzero for a tree node whose evaluation could result
-   in the raising of an exception.  Not implemented yet.  */
-#define TREE_RAISES(NODE) ((NODE)->common.raises_flag)
+/* In a FUNCTION_DECL, nonzero means a call to the function cannot throw
+   an exception.  In a CALL_EXPR, nonzero means the call cannot throw.  */
+#define TREE_NOTHROW(NODE) ((NODE)->common.nothrow_flag)
 
 /* Used in classes in C++.  */
 #define TREE_PRIVATE(NODE) ((NODE)->common.private_flag)
@@ -615,23 +580,21 @@ extern void tree_class_check_failed PARAMS ((const tree, char,
 #define INT_CST_LT(A, B)  \
 (TREE_INT_CST_HIGH (A) < TREE_INT_CST_HIGH (B)                 \
  || (TREE_INT_CST_HIGH (A) == TREE_INT_CST_HIGH (B)            \
-     && ((unsigned HOST_WIDE_INT) TREE_INT_CST_LOW (A)         \
-        < (unsigned HOST_WIDE_INT) TREE_INT_CST_LOW (B))))
+     && TREE_INT_CST_LOW (A) < TREE_INT_CST_LOW (B)))
 
 #define INT_CST_LT_UNSIGNED(A, B)  \
 (((unsigned HOST_WIDE_INT) TREE_INT_CST_HIGH (A)       \
   < (unsigned HOST_WIDE_INT) TREE_INT_CST_HIGH (B))    \
  || (((unsigned HOST_WIDE_INT) TREE_INT_CST_HIGH (A)   \
-      == (unsigned HOST_WIDE_INT ) TREE_INT_CST_HIGH (B)) \
-     && (((unsigned HOST_WIDE_INT) TREE_INT_CST_LOW (A)        \
-         < (unsigned HOST_WIDE_INT) TREE_INT_CST_LOW (B)))))
+      == (unsigned HOST_WIDE_INT) TREE_INT_CST_HIGH (B)) \
+     && TREE_INT_CST_LOW (A) < TREE_INT_CST_LOW (B)))
 
 struct tree_int_cst
 {
   char common[sizeof (struct tree_common)];
   struct rtx_def *rtl; /* acts as link to register transfer language
                           (rtl) info */
-  HOST_WIDE_INT int_cst_low;
+  unsigned HOST_WIDE_INT int_cst_low;
   HOST_WIDE_INT int_cst_high;
 };
 
@@ -789,12 +752,18 @@ struct tree_exp
    listed in the BLOCK_VARS slot.  */
 #define BLOCK_HANDLER_BLOCK(NODE) (BLOCK_CHECK (NODE)->block.handler_block_flag)
 
+/* An index number for this block.  These values are not guaranteed to
+   be unique across functions -- whether or not they are depends on
+   the debugging output format in use.  */
+#define BLOCK_NUMBER(NODE) (BLOCK_CHECK (NODE)->block.block_num)
+
 struct tree_block
 {
   char common[sizeof (struct tree_common)];
 
   unsigned handler_block_flag : 1;
   unsigned abstract_flag : 1;
+  unsigned block_num : 30;
 
   union tree_node *vars;
   union tree_node *subblocks;
@@ -859,6 +828,10 @@ struct tree_block
    The value is an int, measured in bits.  */
 #define TYPE_ALIGN(NODE) (TYPE_CHECK (NODE)->type.align)
 
+/* The alignment for NODE, in bytes.  */
+#define TYPE_ALIGN_UNIT(NODE) \
+  (TYPE_ALIGN (NODE) / BITS_PER_UNIT)
+
 #define TYPE_STUB_DECL(NODE) (TREE_CHAIN (NODE))
 
 /* In a RECORD_TYPE, UNION_TYPE or QUAL_UNION_TYPE, it means the type
@@ -866,6 +839,11 @@ struct tree_block
    its size.  */
 #define TYPE_NO_FORCE_BLK(NODE) (TYPE_CHECK (NODE)->type.no_force_blk_flag)
 
+/* In an INTEGER_TYPE, it means the type represents a size.  We use this
+   both for validity checking and to permit optimziations that are unsafe
+   for other types.  */
+#define TYPE_IS_SIZETYPE(NODE) (TYPE_CHECK (NODE)->type.no_force_blk_flag)
+
 /* Nonzero in a type considered volatile as a whole.  */
 #define TYPE_VOLATILE(NODE) ((NODE)->common.volatile_flag)
 
@@ -932,7 +910,7 @@ struct tree_type
 
   unsigned char precision;
 #ifdef ONLY_INT_FIELDS
-  int mode : 8;
+  unsigned int mode : 8;
 #else
   enum machine_mode mode : 8;
 #endif
@@ -1044,9 +1022,11 @@ struct tree_type
 #define BINFO_VPTR_FIELD(NODE) TREE_VEC_ELT ((NODE), 5)
 
 /* The size of a base class subobject of this type.  Not all frontends
-   currently allocate the space for this field.  */
+   currently allocate the space for these fields.  */
 #define BINFO_SIZE(NODE) TREE_VEC_ELT ((NODE), 6)
+#define BINFO_SIZE_UNIT(NODE) TREE_VEC_ELT ((NODE), 7)
 #define TYPE_BINFO_SIZE(NODE) BINFO_SIZE (TYPE_BINFO (NODE))
+#define TYPE_BINFO_SIZE_UNIT(NODE) BINFO_SIZE_UNIT (TYPE_BINFO (NODE))
 
 /* Slot used to build a chain that represents a use of inheritance.
    For example, if X is derived from Y, and Y is derived from Z,
@@ -1083,27 +1063,33 @@ struct tree_type
     containing function, the RECORD_TYPE or UNION_TYPE for the containing
     type, or NULL_TREE if the given decl has "file scope".  */
 #define DECL_CONTEXT(NODE) (DECL_CHECK (NODE)->decl.context)
-#define DECL_FIELD_CONTEXT(NODE) (DECL_CHECK (NODE)->decl.context)
+#define DECL_FIELD_CONTEXT(NODE) (FIELD_DECL_CHECK (NODE)->decl.context)
 /* In a DECL this is the field where configuration dependent machine
    attributes are store */
 #define DECL_MACHINE_ATTRIBUTES(NODE) (DECL_CHECK (NODE)->decl.machine_attributes)
-/* In a FIELD_DECL, this is the field position, counting in bits,
-   of the bit closest to the beginning of the structure.  */
-#define DECL_FIELD_BITPOS(NODE) (DECL_CHECK (NODE)->decl.arguments)
+/* In a FIELD_DECL, this is the field position, counting in bytes, of the
+   byte containing the bit closest to the beginning of the structure.  */
+#define DECL_FIELD_OFFSET(NODE) (FIELD_DECL_CHECK (NODE)->decl.arguments)
+/* In a FIELD_DECL, this is the offset, in bits, of the first bit of the
+   field from DECL_FIELD_OFFSET.  */
+#define DECL_FIELD_BIT_OFFSET(NODE) (FIELD_DECL_CHECK (NODE)->decl.u2.t)
 /* In a FIELD_DECL, this indicates whether the field was a bit-field and
    if so, the type that was originally specified for it.
    TREE_TYPE may have been modified (in finish_struct).  */
-#define DECL_BIT_FIELD_TYPE(NODE) (DECL_CHECK (NODE)->decl.result)
+#define DECL_BIT_FIELD_TYPE(NODE) (FIELD_DECL_CHECK (NODE)->decl.result)
 /* In FUNCTION_DECL, a chain of ..._DECL nodes.  */
 /* VAR_DECL and PARM_DECL reserve the arguments slot
    for language-specific uses.  */
 #define DECL_ARGUMENTS(NODE) (DECL_CHECK (NODE)->decl.arguments)
+/* This field is used to reference anything in decl.result and is meant only
+   for use by the garbage collector.  */
+#define DECL_RESULT_FLD(NODE) (DECL_CHECK (NODE)->decl.result)
 /* In FUNCTION_DECL, holds the decl for the return value.  */
-#define DECL_RESULT(NODE) (DECL_CHECK (NODE)->decl.result)
+#define DECL_RESULT(NODE) (FUNCTION_DECL_CHECK (NODE)->decl.result)
 /* For a TYPE_DECL, holds the "original" type.  (TREE_TYPE has the copy.) */
-#define DECL_ORIGINAL_TYPE(NODE) (DECL_CHECK (NODE)->decl.result)
+#define DECL_ORIGINAL_TYPE(NODE) (TYPE_DECL_CHECK (NODE)->decl.result)
 /* In PARM_DECL, holds the type as written (perhaps a function or array).  */
-#define DECL_ARG_TYPE_AS_WRITTEN(NODE) (DECL_CHECK (NODE)->decl.result)
+#define DECL_ARG_TYPE_AS_WRITTEN(NODE) (PARM_DECL_CHECK (NODE)->decl.result)
 /* For a FUNCTION_DECL, holds the tree of BINDINGs.
    For a VAR_DECL, holds the initial value.
    For a PARM_DECL, not used--default
@@ -1112,18 +1098,22 @@ struct tree_type
 #define DECL_INITIAL(NODE) (DECL_CHECK (NODE)->decl.initial)
 /* For a PARM_DECL, records the data type used to pass the argument,
    which may be different from the type seen in the program.  */
-#define DECL_ARG_TYPE(NODE) (DECL_CHECK (NODE)->decl.initial)   /* In PARM_DECL.  */
+#define DECL_ARG_TYPE(NODE) (PARM_DECL_CHECK (NODE)->decl.initial)
 /* For a FIELD_DECL in a QUAL_UNION_TYPE, records the expression, which
    if nonzero, indicates that the field occupies the type.  */
-#define DECL_QUALIFIER(NODE) (DECL_CHECK (NODE)->decl.initial)
+#define DECL_QUALIFIER(NODE) (FIELD_DECL_CHECK (NODE)->decl.initial)
 /* These two fields describe where in the source code the declaration was.  */
 #define DECL_SOURCE_FILE(NODE) (DECL_CHECK (NODE)->decl.filename)
 #define DECL_SOURCE_LINE(NODE) (DECL_CHECK (NODE)->decl.linenum)
-/* Holds the size of the datum, as a tree expression.
+/* Holds the size of the datum, in bits, as a tree expression.
    Need not be constant.  */
 #define DECL_SIZE(NODE) (DECL_CHECK (NODE)->decl.size)
+/* Likewise for the size in bytes.  */
+#define DECL_SIZE_UNIT(NODE) (DECL_CHECK (NODE)->decl.size_unit)
 /* Holds the alignment required for the datum.  */
-#define DECL_ALIGN(NODE) (DECL_CHECK (NODE)->decl.frame_size.u)
+#define DECL_ALIGN(NODE) (DECL_CHECK (NODE)->decl.u1.a.align)
+/* For FIELD_DECLs, holds the alignment that DECL_FEILD_OFFSET has.  */
+#define DECL_OFFSET_ALIGN(NODE) (FIELD_DECL_CHECK (NODE)->decl.u1.a.off_align)
 /* Holds the machine mode corresponding to the declaration of a variable or
    field.  Always equal to TYPE_MODE (TREE_TYPE (decl)) except for a
    FIELD_DECL.  */
@@ -1139,18 +1129,15 @@ struct tree_type
 #define DECL_LIVE_RANGE_RTL(NODE) (DECL_CHECK (NODE)->decl.live_range_rtl)
 /* For PARM_DECL, holds an RTL for the stack slot or register
    where the data was actually passed.  */
-#define DECL_INCOMING_RTL(NODE) (DECL_CHECK (NODE)->decl.saved_insns.r)
+#define DECL_INCOMING_RTL(NODE) (PARM_DECL_CHECK (NODE)->decl.u2.r)
 /* For FUNCTION_DECL, if it is inline, holds the saved insn chain.  */
-#define DECL_SAVED_INSNS(NODE) (DECL_CHECK (NODE)->decl.saved_insns.f)
+#define DECL_SAVED_INSNS(NODE) (FUNCTION_DECL_CHECK (NODE)->decl.u2.f)
 /* For FUNCTION_DECL, if it is inline,
    holds the size of the stack frame, as an integer.  */
-#define DECL_FRAME_SIZE(NODE) (DECL_CHECK (NODE)->decl.frame_size.i)
+#define DECL_FRAME_SIZE(NODE) (FUNCTION_DECL_CHECK (NODE)->decl.u1.i)
 /* For FUNCTION_DECL, if it is built-in,
    this identifies which built-in operation it is.  */
-#define DECL_FUNCTION_CODE(NODE) (DECL_CHECK (NODE)->decl.frame_size.f.code)
-#define DECL_SET_FUNCTION_CODE(NODE,VAL) (DECL_CHECK (NODE)->decl.frame_size.f.code = (VAL))
-/* For a FIELD_DECL, holds the size of the member as an integer.  */
-#define DECL_FIELD_SIZE(NODE) (DECL_CHECK (NODE)->decl.saved_insns.i)
+#define DECL_FUNCTION_CODE(NODE) (FUNCTION_DECL_CHECK (NODE)->decl.u1.f)
 
 /* The DECL_VINDEX is used for FUNCTION_DECLS in two different ways.
    Before the struct containing the FUNCTION_DECL is laid out,
@@ -1163,7 +1150,7 @@ struct tree_type
 /* For FIELD_DECLS, DECL_FCONTEXT is the *first* baseclass in
    which this FIELD_DECL is defined.  This information is needed when
    writing debugging information about vfield and vbase decls for C++.  */
-#define DECL_FCONTEXT(NODE) (DECL_CHECK (NODE)->decl.vindex)
+#define DECL_FCONTEXT(NODE) (FIELD_DECL_CHECK (NODE)->decl.vindex)
 
 /* Every ..._DECL node gets a unique number.  */
 #define DECL_UID(NODE) (DECL_CHECK (NODE)->decl.uid)
@@ -1227,19 +1214,20 @@ struct tree_type
    nonzero means the detail info about this type is not dumped into stabs.
    Instead it will generate cross reference ('x') of names. 
    This uses the same flag as DECL_EXTERNAL. */
-#define TYPE_DECL_SUPPRESS_DEBUG(NODE) (DECL_CHECK (NODE)->decl.external_flag)
-   
+#define TYPE_DECL_SUPPRESS_DEBUG(NODE) \
+(TYPE_DECL_CHECK (NODE)->decl.external_flag)
 
 /* In VAR_DECL and PARM_DECL nodes, nonzero means declared `register'.  */
 #define DECL_REGISTER(NODE) (DECL_CHECK (NODE)->decl.regdecl_flag)
 /* In LABEL_DECL nodes, nonzero means that an error message about
    jumping into such a binding contour has been printed for this label.  */
-#define DECL_ERROR_ISSUED(NODE) (DECL_CHECK (NODE)->decl.regdecl_flag)
+#define DECL_ERROR_ISSUED(NODE) (LABEL_DECL_CHECK (NODE)->decl.regdecl_flag)
 /* In a FIELD_DECL, indicates this field should be bit-packed.  */
-#define DECL_PACKED(NODE) (DECL_CHECK (NODE)->decl.regdecl_flag)
+#define DECL_PACKED(NODE) (FIELD_DECL_CHECK (NODE)->decl.regdecl_flag)
 /* In a FUNCTION_DECL with a non-zero DECL_CONTEXT, indicates that a
    static chain is not needed.  */
-#define DECL_NO_STATIC_CHAIN(NODE) (DECL_CHECK (NODE)->decl.regdecl_flag)
+#define DECL_NO_STATIC_CHAIN(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.regdecl_flag)
 
 /* Nonzero in a ..._DECL means this variable is ref'd from a nested function.
    For VAR_DECL nodes, PARM_DECL nodes, and FUNCTION_DECL nodes.
@@ -1252,33 +1240,37 @@ struct tree_type
 
 /* Nonzero in a FUNCTION_DECL means this function can be substituted
    where it is called.  */
-#define DECL_INLINE(NODE) (DECL_CHECK (NODE)->decl.inline_flag)
+#define DECL_INLINE(NODE) (FUNCTION_DECL_CHECK (NODE)->decl.inline_flag)
 
 /* Nonzero in a FUNCTION_DECL means this is a built-in function
    that is not specified by ansi C and that users are supposed to be allowed
    to redefine for any purpose whatever.  */
-#define DECL_BUILT_IN_NONANSI(NODE) ((NODE)->common.unsigned_flag)
+#define DECL_BUILT_IN_NONANSI(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->common.unsigned_flag)
 
 /* Nonzero in a FUNCTION_DECL means this function should be treated
    as if it were a malloc, meaning it returns a pointer that is
    not an alias.  */
-#define DECL_IS_MALLOC(NODE) (DECL_CHECK (NODE)->decl.malloc_flag)
+#define DECL_IS_MALLOC(NODE) (FUNCTION_DECL_CHECK (NODE)->decl.malloc_flag)
 
 /* Nonzero in a FIELD_DECL means it is a bit field, and must be accessed
    specially.  */
-#define DECL_BIT_FIELD(NODE) (DECL_CHECK (NODE)->decl.bit_field_flag)
+#define DECL_BIT_FIELD(NODE) (FIELD_DECL_CHECK (NODE)->decl.bit_field_flag)
 /* In a LABEL_DECL, nonzero means label was defined inside a binding
    contour that restored a stack level and which is now exited.  */
-#define DECL_TOO_LATE(NODE) (DECL_CHECK (NODE)->decl.bit_field_flag)
+#define DECL_TOO_LATE(NODE) (LABEL_DECL_CHECK (NODE)->decl.bit_field_flag)
 
-/* In a FUNCTION_DECL, nonzero means a built in function.  */
-#define DECL_BUILT_IN(NODE) (DECL_BUILT_IN_CLASS (NODE) != NOT_BUILT_IN)
-/* For a builtin function, identify which part of the compiler defined it.  */
-#define DECL_BUILT_IN_CLASS(NODE) (DECL_CHECK (NODE)->decl.frame_size.f.bclass)
+/* Unused in FUNCTION_DECL.  */
 
 /* In a VAR_DECL that's static,
    nonzero if the space is in the text section.  */
-#define DECL_IN_TEXT_SECTION(NODE) (DECL_CHECK (NODE)->decl.bit_field_flag)
+#define DECL_IN_TEXT_SECTION(NODE) (VAR_DECL_CHECK (NODE)->decl.bit_field_flag)
+
+/* In a FUNCTION_DECL, nonzero means a built in function.  */
+#define DECL_BUILT_IN(NODE) (DECL_BUILT_IN_CLASS (NODE) != NOT_BUILT_IN)
+/* For a builtin function, identify which part of the compiler defined it.  */
+#define DECL_BUILT_IN_CLASS(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.built_in_class)
 
 /* Used in VAR_DECLs to indicate that the variable is a vtable.
    Used in FIELD_DECLs for vtable pointers.
@@ -1292,12 +1284,16 @@ struct tree_type
 /* Used in PARM_DECLs whose type are unions to indicate that the
    argument should be passed in the same way that the first union
    alternative would be passed.  */
-#define DECL_TRANSPARENT_UNION(NODE) (DECL_CHECK (NODE)->decl.transparent_union)
+#define DECL_TRANSPARENT_UNION(NODE) \
+(PARM_DECL_CHECK (NODE)->decl.transparent_union)
 
 /* Used in FUNCTION_DECLs to indicate that they should be run automatically
    at the beginning or end of execution.  */
-#define DECL_STATIC_CONSTRUCTOR(NODE) (DECL_CHECK (NODE)->decl.static_ctor_flag)
-#define DECL_STATIC_DESTRUCTOR(NODE) (DECL_CHECK (NODE)->decl.static_dtor_flag)
+#define DECL_STATIC_CONSTRUCTOR(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.static_ctor_flag)
+
+#define DECL_STATIC_DESTRUCTOR(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.static_dtor_flag)
 
 /* Used to indicate that this DECL represents a compiler-generated entity.  */
 #define DECL_ARTIFICIAL(NODE) (DECL_CHECK (NODE)->decl.artificial_flag)
@@ -1322,15 +1318,18 @@ struct tree_type
 
 /* Used in FUNCTION_DECLs to indicate that function entry and exit should
    be instrumented with calls to support routines.  */
-#define DECL_NO_INSTRUMENT_FUNCTION_ENTRY_EXIT(NODE) ((NODE)->decl.no_instrument_function_entry_exit)
+#define DECL_NO_INSTRUMENT_FUNCTION_ENTRY_EXIT(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.no_instrument_function_entry_exit)
 
 /* Used in FUNCTION_DECLs to indicate that check-memory-usage should be
    disabled in this function.  */
-#define DECL_NO_CHECK_MEMORY_USAGE(NODE) ((NODE)->decl.no_check_memory_usage)
+#define DECL_NO_CHECK_MEMORY_USAGE(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.no_check_memory_usage)
 
 /* Used in FUNCTION_DECLs to indicate that limit-stack-* should be
    disabled in this function.  */
-#define DECL_NO_LIMIT_STACK(NODE) ((NODE)->decl.no_limit_stack)
+#define DECL_NO_LIMIT_STACK(NODE) \
+(FUNCTION_DECL_CHECK (NODE)->decl.no_limit_stack)
 
 /* Additional flags for language-specific uses.  */
 #define DECL_LANG_FLAG_0(NODE) (DECL_CHECK (NODE)->decl.lang_flag_0)
@@ -1387,6 +1386,18 @@ struct tree_decl
   unsigned artificial_flag : 1;
   unsigned weak_flag : 1;
 
+  unsigned non_addr_const_p : 1;
+  unsigned no_instrument_function_entry_exit : 1;
+  unsigned no_check_memory_usage : 1;
+  unsigned comdat_flag : 1;
+  unsigned malloc_flag : 1;
+  unsigned no_limit_stack : 1;
+#ifdef ONLY_INT_FIELDS
+  unsigned int built_in_class : 2;
+#else
+  enum built_in_class built_in_class : 2;
+#endif
+
   unsigned lang_flag_0 : 1;
   unsigned lang_flag_1 : 1;
   unsigned lang_flag_2 : 1;
@@ -1396,45 +1407,40 @@ struct tree_decl
   unsigned lang_flag_6 : 1;
   unsigned lang_flag_7 : 1;
 
-  unsigned non_addr_const_p : 1;
-  unsigned no_instrument_function_entry_exit : 1;
-  unsigned no_check_memory_usage : 1;
-  unsigned comdat_flag : 1;
-  unsigned malloc_flag : 1;
-  unsigned no_limit_stack : 1;
-
   /* For a FUNCTION_DECL, if inline, this is the size of frame needed.
      If built-in, this is the code for which built-in function.
-     For other kinds of decls, this is DECL_ALIGN.  */
+     For other kinds of decls, this is DECL_ALIGN and DECL_OFFSET_ALIGN.  */
   union {
-    int i;
-    unsigned int u;
-    struct
-      {
-       unsigned int code:24;
-       unsigned int bclass:8;
-      } f;
-  } frame_size;
+    HOST_WIDE_INT i;
+    enum built_in_function f;
+    struct {unsigned int align : 24; unsigned int off_align : 8;} a;
+  } u1;
 
+  union tree_node *size_unit;
   union tree_node *name;
   union tree_node *context;
-  union tree_node *arguments;
-  union tree_node *result;
-  union tree_node *initial;
+  union tree_node *arguments;  /* Also used for DECL_FIELD_OFFSET */
+  union tree_node *result;     /* Also used for DECL_BIT_FIELD_TYPE */
+  union tree_node *initial;    /* Also used for DECL_QUALIFIER */
   union tree_node *abstract_origin;
   union tree_node *assembler_name;
   union tree_node *section_name;
   union tree_node *machine_attributes;
-  struct rtx_def *rtl; /* acts as link to register transfer language
-                                  (rtl) info */
+  struct rtx_def *rtl; /* RTL representation for object.  */
   struct rtx_def *live_range_rtl;
-  /* For FUNCTION_DECLs: points to insn that constitutes its definition
-     on the permanent obstack.  For FIELD_DECL, this is DECL_FIELD_SIZE.  */
+
+  /* In FUNCTION_DECL, if it is inline, holds the saved insn chain.
+     In FIELD_DECL, is DECL_FIELD_BIT_OFFSET.
+     In PARM_DECL, holds an RTL for the stack slot
+     of register where the data was actually passed.
+     Used by Chill and Java in LABEL_DECL and by C++ and Java in VAR_DECL.  */
   union {
     struct function *f;
     struct rtx_def *r;
-    HOST_WIDE_INT i;
-  } saved_insns;
+    union tree_node *t;
+    int i;
+  } u2;
+
   union tree_node *vindex;
   int pointer_alias_set;
   /* Points to a structure whose details depend on the language in use.  */
@@ -1478,25 +1484,17 @@ enum tree_index
   TI_UINTDI_TYPE,
   TI_UINTTI_TYPE,
     
-  TI_CHAR_TYPE,
-  TI_SIGNED_CHAR_TYPE,
-  TI_UNSIGNED_CHAR_TYPE,
-  TI_INTEGER_TYPE,
-  TI_UNSIGNED_TYPE,
-  TI_SHORT_INTEGER_TYPE,
-  TI_SHORT_UNSIGNED_TYPE,
-  TI_LONG_INTEGER_TYPE,
-  TI_LONG_UNSIGNED_TYPE,
-  TI_LONG_LONG_INTEGER_TYPE,
-  TI_LONG_LONG_UNSIGNED_TYPE,
-
   TI_INTEGER_ZERO,
   TI_INTEGER_ONE,
   TI_NULL_POINTER,
 
   TI_SIZE_ZERO,
   TI_SIZE_ONE,
-    
+
+  TI_BITSIZE_ZERO,
+  TI_BITSIZE_ONE,
+  TI_BITSIZE_UNIT,
+
   TI_COMPLEX_INTEGER_TYPE,
   TI_COMPLEX_FLOAT_TYPE,
   TI_COMPLEX_DOUBLE_TYPE,
@@ -1531,22 +1529,14 @@ extern tree global_trees[TI_MAX];
 #define unsigned_intDI_type_node       global_trees[TI_UINTDI_TYPE]
 #define unsigned_intTI_type_node       global_trees[TI_UINTTI_TYPE]
 
-#define char_type_node                 global_trees[TI_CHAR_TYPE]
-#define signed_char_type_node          global_trees[TI_SIGNED_CHAR_TYPE]
-#define unsigned_char_type_node                global_trees[TI_UNSIGNED_CHAR_TYPE]
-#define short_integer_type_node                global_trees[TI_SHORT_INTEGER_TYPE]
-#define short_unsigned_type_node       global_trees[TI_SHORT_UNSIGNED_TYPE]
-#define integer_type_node              global_trees[TI_INTEGER_TYPE]
-#define unsigned_type_node             global_trees[TI_UNSIGNED_TYPE]
-#define long_integer_type_node         global_trees[TI_LONG_INTEGER_TYPE]
-#define long_unsigned_type_node                global_trees[TI_LONG_UNSIGNED_TYPE]
-#define long_long_integer_type_node    global_trees[TI_LONG_LONG_INTEGER_TYPE]
-#define long_long_unsigned_type_node   global_trees[TI_LONG_LONG_UNSIGNED_TYPE]
-
 #define integer_zero_node              global_trees[TI_INTEGER_ZERO]
 #define integer_one_node               global_trees[TI_INTEGER_ONE]
 #define size_zero_node                 global_trees[TI_SIZE_ZERO]
 #define size_one_node                  global_trees[TI_SIZE_ONE]
+#define bitsize_zero_node              global_trees[TI_BITSIZE_ZERO]
+#define bitsize_one_node               global_trees[TI_BITSIZE_ONE]
+#define bitsize_unit_node              global_trees[TI_BITSIZE_UNIT]
+
 #define null_pointer_node              global_trees[TI_NULL_POINTER]
 
 #define float_type_node                        global_trees[TI_FLOAT_TYPE]
@@ -1565,6 +1555,43 @@ extern tree global_trees[TI_MAX];
 #define const_ptr_type_node            global_trees[TI_CONST_PTR_TYPE]
 #define ptrdiff_type_node              global_trees[TI_PTRDIFF_TYPE]
 #define va_list_type_node              global_trees[TI_VA_LIST_TYPE]
+
+/* An enumeration of the standard C integer types.  These must be
+   ordered so that shorter types appear before longer ones.  */
+enum integer_type_kind 
+{
+  itk_char,
+  itk_signed_char,
+  itk_unsigned_char,
+  itk_short,
+  itk_unsigned_short,
+  itk_int,
+  itk_unsigned_int,
+  itk_long,
+  itk_unsigned_long,
+  itk_long_long,
+  itk_unsigned_long_long,
+  itk_none
+};
+
+typedef enum integer_type_kind integer_type_kind;
+
+/* The standard C integer types.  Use integer_type_kind to index into
+   this array.  */
+extern tree integer_types[itk_none];
+
+#define char_type_node                 integer_types[itk_char]
+#define signed_char_type_node          integer_types[itk_signed_char]
+#define unsigned_char_type_node                integer_types[itk_unsigned_char]
+#define short_integer_type_node                integer_types[itk_short]
+#define short_unsigned_type_node       integer_types[itk_unsigned_short]
+#define integer_type_node              integer_types[itk_int]
+#define unsigned_type_node             integer_types[itk_unsigned_int]
+#define long_integer_type_node         integer_types[itk_long]
+#define long_unsigned_type_node                integer_types[itk_unsigned_long]
+#define long_long_integer_type_node    integer_types[itk_long_long]
+#define long_long_unsigned_type_node   integer_types[itk_unsigned_long_long]
+
 \f
 #define NULL_TREE (tree) NULL
 
@@ -1643,6 +1670,7 @@ extern tree build_expr_wfl              PARAMS ((tree, const char *, int, int));
 
 extern tree make_signed_type           PARAMS ((int));
 extern tree make_unsigned_type         PARAMS ((int));
+extern void initialize_sizetypes       PARAMS ((void));
 extern void set_sizetype               PARAMS ((tree));
 extern tree signed_or_unsigned_type    PARAMS ((int, tree));
 extern void fixup_unsigned_type                PARAMS ((tree));
@@ -1660,12 +1688,16 @@ extern tree array_type_nelts            PARAMS ((tree));
 extern tree value_member               PARAMS ((tree, tree));
 extern tree purpose_member             PARAMS ((tree, tree));
 extern tree binfo_member               PARAMS ((tree, tree));
-extern int attribute_hash_list         PARAMS ((tree));
+extern unsigned int attribute_hash_list        PARAMS ((tree));
 extern int attribute_list_equal                PARAMS ((tree, tree));
 extern int attribute_list_contained    PARAMS ((tree, tree));
 extern int tree_int_cst_equal          PARAMS ((tree, tree));
 extern int tree_int_cst_lt             PARAMS ((tree, tree));
+extern int host_integerp               PARAMS ((tree, int));
+extern HOST_WIDE_INT tree_low_cst      PARAMS ((tree, int));
+extern int tree_int_cst_msb            PARAMS ((tree));
 extern int tree_int_cst_sgn            PARAMS ((tree));
+extern int tree_expr_nonnegative_p             PARAMS ((tree));
 extern int index_type_equal            PARAMS ((tree, tree));
 extern tree get_inner_array_type       PARAMS ((tree));
 
@@ -1737,18 +1769,60 @@ extern tree build_qualified_type        PARAMS ((tree, int));
 extern tree build_type_copy            PARAMS ((tree));
 
 /* Given a ..._TYPE node, calculate the TYPE_SIZE, TYPE_SIZE_UNIT,
-   TYPE_ALIGN and TYPE_MODE fields.
-   If called more than once on one node, does nothing except
-   for the first time.  */
+   TYPE_ALIGN and TYPE_MODE fields.  If called more than once on one
+   node, does nothing except for the first time.  */
 
 extern void layout_type                        PARAMS ((tree));
 
+/* These functions allow a front-end to perform a manual layout of a
+   RECORD_TYPE.  (For instance, if the placement of subsequent fields
+   depends on the placement of fields so far.)  Begin by calling
+   start_record_layout.  Then, call place_field for each of the
+   fields.  Then, call finish_record_layout.  See layout_type for the
+   default way in which these functions are used.  */
+
+typedef struct record_layout_info
+{
+  /* The RECORD_TYPE that we are laying out.  */
+  tree t;
+  /* The offset into the record so far, in bytes, not including bits in
+     BITPOS.  */
+  tree offset;
+  /* The last known alignment of SIZE.  */
+  unsigned int offset_align;
+  /* The bit position within the last OFFSET_ALIGN bits, in bits.  */
+  tree bitpos;
+  /* The alignment of the record so far, in bits.  */
+  unsigned int record_align;
+  /* The alignment of the record so far, not including padding, in bits.  */
+  unsigned int unpacked_align;
+  /* The static variables (i.e., class variables, as opposed to
+     instance variables) encountered in T.  */
+  tree pending_statics;
+  int packed_maybe_necessary;
+} *record_layout_info;
+
+extern record_layout_info start_record_layout PARAMS ((tree));
+extern tree bit_from_pos               PARAMS ((tree, tree));
+extern tree byte_from_pos              PARAMS ((tree, tree));
+extern void pos_from_byte              PARAMS ((tree *, tree *, unsigned int,
+                                                tree));
+extern void pos_from_bit               PARAMS ((tree *, tree *, unsigned int,
+                                                tree));
+extern void normalize_offset           PARAMS ((tree *, tree *,
+                                                unsigned int));
+extern tree rli_size_unit_so_far       PARAMS ((record_layout_info));
+extern tree rli_size_so_far            PARAMS ((record_layout_info));
+extern void normalize_rli              PARAMS ((record_layout_info));
+extern void place_field                        PARAMS ((record_layout_info, tree));
+extern void finish_record_layout       PARAMS ((record_layout_info));
+
 /* Given a hashcode and a ..._TYPE node (for which the hashcode was made),
    return a canonicalized ..._TYPE node, so that duplicates are not made.
    How the hash code is computed is up to the caller, as long as any two
    callers that could hash identical-looking type nodes agree.  */
 
-extern tree type_hash_canon            PARAMS ((int, tree));
+extern tree type_hash_canon            PARAMS ((unsigned int, tree));
 
 /* Given a VAR_DECL, PARM_DECL, RESULT_DECL or FIELD_DECL node,
    calculates the DECL_SIZE, DECL_SIZE_UNIT, DECL_ALIGN and DECL_MODE
@@ -1760,23 +1834,61 @@ extern tree type_hash_canon             PARAMS ((int, tree));
 
 extern void layout_decl                        PARAMS ((tree, unsigned));
 
+/* Return the mode for data of a given size SIZE and mode class CLASS.
+   If LIMIT is nonzero, then don't use modes bigger than MAX_FIXED_MODE_SIZE.
+   The value is BLKmode if no other mode is found.  This is like
+   mode_for_size, but is passed a tree.  */
+
+extern enum machine_mode mode_for_size_tree PARAMS ((tree, enum mode_class,
+                                                    int));
+
 /* Return an expr equal to X but certainly not valid as an lvalue.  */
 
 extern tree non_lvalue                 PARAMS ((tree));
 extern tree pedantic_non_lvalue                PARAMS ((tree));
 
 extern tree convert                    PARAMS ((tree, tree));
+extern unsigned int expr_align         PARAMS ((tree));
 extern tree size_in_bytes              PARAMS ((tree));
 extern HOST_WIDE_INT int_size_in_bytes PARAMS ((tree));
+extern tree bit_position               PARAMS ((tree));
+extern HOST_WIDE_INT int_bit_position  PARAMS ((tree));
+extern tree byte_position              PARAMS ((tree));
+extern HOST_WIDE_INT int_byte_position PARAMS ((tree));
+
+/* Define data structures, macros, and functions for handling sizes
+   and the various types used to represent sizes.  */
+
+enum size_type_kind
+{
+  SIZETYPE,            /* Normal representation of sizes in bytes. */
+  SSIZETYPE,           /* Signed representation of sizes in bytes. */
+  USIZETYPE,           /* Unsigned representation of sizes in bytes.  */
+  BITSIZETYPE,         /* Normal representation of sizes in bits.  */
+  SBITSIZETYPE,                /* Signed representation of sizes in bits.  */
+  UBITSIZETYPE,                /* Unsifgned representation of sizes in bits.  */
+  TYPE_KIND_LAST};
+
+extern tree sizetype_tab[(int) TYPE_KIND_LAST];
+
+#define sizetype sizetype_tab[(int) SIZETYPE]
+#define bitsizetype sizetype_tab[(int) BITSIZETYPE]
+#define ssizetype sizetype_tab[(int) SSIZETYPE]
+#define usizetype sizetype_tab[(int) USIZETYPE]
+#define sbitsizetype sizetype_tab[(int) SBITSIZETYPE]
+#define ubitsizetype sizetype_tab[(int) UBITSIZETYPE]
+
 extern tree size_binop                 PARAMS ((enum tree_code, tree, tree));
-extern tree ssize_binop                        PARAMS ((enum tree_code, tree, tree));
-extern tree size_int_wide              PARAMS ((unsigned HOST_WIDE_INT,
-                                              unsigned HOST_WIDE_INT, int));
-#define size_int(L) size_int_2 ((L), 0, 0)
-#define bitsize_int(L, H) size_int_2 ((L), (H), 1)
-#define size_int_2(L, H, T)                    \
-  size_int_wide ((unsigned HOST_WIDE_INT) (L), \
-                (unsigned HOST_WIDE_INT) (H), (T))
+extern tree size_diffop                        PARAMS ((tree, tree));
+extern tree size_int_wide              PARAMS ((HOST_WIDE_INT,
+                                                enum size_type_kind));
+extern tree size_int_type_wide         PARAMS ((HOST_WIDE_INT, tree));
+
+#define size_int_type(L, T) size_int_type_wide ((HOST_WIDE_INT) (L), T)
+#define size_int(L) size_int_wide ((HOST_WIDE_INT) (L), SIZETYPE)
+#define ssize_int(L) size_int_wide ((HOST_WIDE_INT) (L), SSIZETYPE)
+#define bitsize_int(L) size_int_wide ((HOST_WIDE_INT) (L), BITSIZETYPE)
+#define sbitsize_int(L) size_int_wide ((HOST_WIDE_INT) (L), SBITSIZETYPE)
 
 extern tree round_up                   PARAMS ((tree, int));
 extern tree get_pending_sizes          PARAMS ((void));
@@ -1789,27 +1901,11 @@ extern void put_pending_sizes           PARAMS ((tree));
    + (BITS_PER_UNIT > 8) + (BITS_PER_UNIT > 16) + (BITS_PER_UNIT > 32) \
    + (BITS_PER_UNIT > 64) + (BITS_PER_UNIT > 128) + (BITS_PER_UNIT > 256))
 
-struct sizetype_tab
-{
-  tree xsizetype, xbitsizetype;
-  tree xssizetype, xusizetype;
-  tree xsbitsizetype, xubitsizetype;
-};
-
-extern struct sizetype_tab sizetype_tab;
-
-#define sizetype sizetype_tab.xsizetype
-#define bitsizetype sizetype_tab.xbitsizetype
-#define ssizetype sizetype_tab.xssizetype
-#define usizetype sizetype_tab.xusizetype
-#define sbitsizetype sizetype_tab.xsbitsizetype
-#define ubitsizetype sizetype_tab.xubitsizetype
-
 /* If nonzero, an upper limit on alignment of structure fields, in bits. */
-extern int maximum_field_alignment;
+extern unsigned int maximum_field_alignment;
 
 /* If non-zero, the alignment of a bitstring or (power-)set value, in bits. */
-extern int set_alignment;
+extern unsigned int set_alignment;
 
 /* Concatenate two lists (chains of TREE_LIST nodes) X and Y
    by making the last node in X point to Y.
@@ -1839,6 +1935,10 @@ extern tree nreverse                     PARAMS ((tree));
 
 extern int list_length                 PARAMS ((tree));
 
+/* Returns the number of FIELD_DECLs in a type.  */
+
+extern int fields_length               PARAMS ((tree));
+
 /* integer_zerop (tree x) is nonzero if X is an integer constant of value 0 */
 
 extern int integer_zerop               PARAMS ((tree));
@@ -1901,6 +2001,11 @@ extern tree unsave_expr_now              PARAMS ((tree));
 extern void (*lang_unsave)              PARAMS ((tree *));
 extern void (*lang_unsave_expr_now)     PARAMS ((tree));
 
+/* Return 0 if it is safe to evaluate EXPR multiple times,
+   return 1 if it is safe if EXPR is unsaved afterward, or
+   return 2 if it is completely unsafe.  */
+extern int unsafe_for_reeval PARAMS ((tree));
+
 /* Return 1 if EXP contains a PLACEHOLDER_EXPR; i.e., if it represents a size
    or offset that depends on a field within a record.
 
@@ -1993,9 +2098,10 @@ extern tree maybe_build_cleanup          PARAMS ((tree));
    look for nested component-refs or array-refs at constant positions
    and find the ultimate containing object, which is returned.  */
 
-extern tree get_inner_reference                PARAMS ((tree, int *, int *, tree *,
-                                              enum machine_mode *, int *,
-                                              int *, int *));
+extern tree get_inner_reference                PARAMS ((tree, HOST_WIDE_INT *,
+                                                HOST_WIDE_INT *, tree *,
+                                                enum machine_mode *, int *,
+                                                int *, unsigned int *));
 
 /* Given a DECL or TYPE, return the scope in which it was declared, or
    NUL_TREE if there is no containing scope.  */
@@ -2047,6 +2153,9 @@ extern int immediate_size_expand;
 
 extern tree current_function_decl;
 
+/* Nonzero means a FUNC_BEGIN label was emitted.  */
+extern tree current_function_func_begin_label;
+
 /* Nonzero means all ..._TYPE nodes should be allocated permanently.  */
 
 extern int all_types_permanent;
@@ -2126,6 +2235,8 @@ extern void expand_end_bindings                   PARAMS ((tree, int, int));
 extern void warn_about_unused_variables         PARAMS ((tree));
 extern void start_cleanup_deferral             PARAMS ((void));
 extern void end_cleanup_deferral               PARAMS ((void));
+extern int is_body_block                       PARAMS ((tree));
+
 extern void mark_block_as_eh_region            PARAMS ((void));
 extern void mark_block_as_not_eh_region                PARAMS ((void));
 extern int is_eh_region                                PARAMS ((void));
@@ -2156,26 +2267,34 @@ extern int stmt_loop_nest_empty                 PARAMS ((void));
 extern tree fold               PARAMS ((tree));
 
 extern int force_fit_type      PARAMS ((tree, int));
-extern int add_double          PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT *, HOST_WIDE_INT *));
-extern int neg_double          PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT *, HOST_WIDE_INT *));
-extern int mul_double          PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT *, HOST_WIDE_INT *));
-extern void lshift_double      PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT, int, HOST_WIDE_INT *,
-                                      HOST_WIDE_INT *, int));
-extern void rshift_double      PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT, int,
-                                      HOST_WIDE_INT *, HOST_WIDE_INT *, int));
-extern void lrotate_double     PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT, int, HOST_WIDE_INT *,
-                                      HOST_WIDE_INT *));
-extern void rrotate_double     PARAMS ((HOST_WIDE_INT, HOST_WIDE_INT,
-                                      HOST_WIDE_INT, int, HOST_WIDE_INT *,
-                                      HOST_WIDE_INT *));
+extern int add_double          PARAMS ((unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *));
+extern int neg_double          PARAMS ((unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *));
+extern int mul_double          PARAMS ((unsigned HOST_WIDE_INT,
+                                        HOST_WIDE_INT,
+                                        unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *));
+extern void lshift_double      PARAMS ((unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        HOST_WIDE_INT, unsigned int,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *, int));
+extern void rshift_double      PARAMS ((unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        HOST_WIDE_INT, unsigned int,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *, int));
+extern void lrotate_double     PARAMS ((unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        HOST_WIDE_INT, unsigned int,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *));
+extern void rrotate_double     PARAMS ((unsigned HOST_WIDE_INT, HOST_WIDE_INT,
+                                        HOST_WIDE_INT, unsigned int,
+                                        unsigned HOST_WIDE_INT *,
+                                        HOST_WIDE_INT *));
 extern int operand_equal_p     PARAMS ((tree, tree, int));
 extern tree invert_truthvalue  PARAMS ((tree));
 
@@ -2332,19 +2451,21 @@ extern tree get_file_function_name      PARAMS ((int));
 extern void set_identifier_size                PARAMS ((int));
 extern int int_fits_type_p             PARAMS ((tree, tree));
 extern int tree_log2                   PARAMS ((tree));
+extern int tree_floor_log2             PARAMS ((tree));
 extern void preserve_initializer       PARAMS ((void));
 extern void preserve_data              PARAMS ((void));
 extern int object_permanent_p          PARAMS ((tree));
 extern int type_precision              PARAMS ((tree));
 extern int simple_cst_equal            PARAMS ((tree, tree));
+extern int compare_tree_int            PARAMS ((tree, unsigned int));
 extern int type_list_equal             PARAMS ((tree, tree));
 extern int chain_member                        PARAMS ((tree, tree));
 extern int chain_member_purpose                PARAMS ((tree, tree));
 extern int chain_member_value          PARAMS ((tree, tree));
 extern tree listify                    PARAMS ((tree));
-extern tree type_hash_lookup           PARAMS ((int, tree));
-extern void type_hash_add              PARAMS ((int, tree));
-extern int type_hash_list              PARAMS ((tree));
+extern tree type_hash_lookup           PARAMS ((unsigned int, tree));
+extern void type_hash_add              PARAMS ((unsigned int, tree));
+extern unsigned int type_hash_list     PARAMS ((tree));
 extern int simple_cst_list_equal       PARAMS ((tree, tree));
 extern void debug_obstack              PARAMS ((char *));
 extern void rtl_in_current_obstack     PARAMS ((void));
@@ -2378,6 +2499,7 @@ extern void init_function_for_compilation PARAMS ((void));
 extern void init_function_start                PARAMS ((tree, char *, int));
 extern void assign_parms               PARAMS ((tree));
 extern void put_var_into_stack         PARAMS ((tree));
+extern void flush_addressof            PARAMS ((tree));
 extern void uninitialized_vars_warning PARAMS ((tree));
 extern void setjmp_args_warning                PARAMS ((void));
 extern void mark_all_temps_used                PARAMS ((void));
@@ -2387,11 +2509,11 @@ extern void free_temp_slots             PARAMS ((void));
 extern void pop_temp_slots             PARAMS ((void));
 extern void push_temp_slots            PARAMS ((void));
 extern void preserve_temp_slots                PARAMS ((struct rtx_def *));
+extern void preserve_rtl_expr_temps    PARAMS ((tree));
 extern int aggregate_value_p           PARAMS ((tree));
-extern tree reorder_blocks             PARAMS ((tree,
-                                               struct rtx_def *));
 extern void free_temps_for_rtl_expr    PARAMS ((tree));
 extern void instantiate_virtual_regs   PARAMS ((tree, struct rtx_def *));
+extern void unshare_all_rtl            PARAMS ((tree, struct rtx_def *));
 extern int max_parm_reg_num            PARAMS ((void));
 extern void push_function_context      PARAMS ((void));
 extern void pop_function_context       PARAMS ((void));
@@ -2424,14 +2546,15 @@ extern void check_max_integer_computation_mode  PARAMS ((tree));
 
 /* In emit-rtl.c */
 extern void start_sequence_for_rtl_expr                PARAMS ((tree));
-extern struct rtx_def *emit_line_note_after    PARAMS ((char *, int,
-                                                       struct rtx_def *));
-extern struct rtx_def *emit_line_note          PARAMS ((char *, int));
-extern struct rtx_def *emit_line_note_force    PARAMS ((char *, int));
+extern struct rtx_def *emit_line_note_after    PARAMS ((const char *, int,
+                                                        struct rtx_def *));
+extern struct rtx_def *emit_line_note          PARAMS ((const char *, int));
+extern struct rtx_def *emit_line_note_force    PARAMS ((const char *, int));
 
 /* In calls.c */
-extern void special_function_p         PARAMS ((tree, int *, int *,
-                                               int *, int *, int *));
+
+/* Flags used by special_function_p.  */
+extern int setjmp_call_p               PARAMS ((tree));
 
 /* In c-typeck.c */
 extern int mark_addressable            PARAMS ((tree));
@@ -2442,7 +2565,6 @@ extern void print_lang_statistics PARAMS ((void));
 
 /* In c-common.c */
 extern tree truthvalue_conversion      PARAMS ((tree));
-extern int min_precision               PARAMS ((tree, int));
 extern void split_specs_attrs          PARAMS ((tree, tree *, tree *));
 
 /* In c-decl.c */
@@ -2474,12 +2596,14 @@ extern void variable_section            PARAMS ((tree, int));
 
 /* In fold-const.c */
 extern int div_and_round_double                PARAMS ((enum tree_code, int,
-                                               HOST_WIDE_INT, HOST_WIDE_INT,
-                                               HOST_WIDE_INT, HOST_WIDE_INT,
-                                               HOST_WIDE_INT *,
-                                               HOST_WIDE_INT *,
-                                               HOST_WIDE_INT *,
-                                               HOST_WIDE_INT *));
+                                                unsigned HOST_WIDE_INT,
+                                                HOST_WIDE_INT,
+                                                unsigned HOST_WIDE_INT,
+                                                HOST_WIDE_INT,
+                                                unsigned HOST_WIDE_INT *,
+                                                HOST_WIDE_INT *,
+                                                unsigned HOST_WIDE_INT *,
+                                                HOST_WIDE_INT *));
 
 /* In stmt.c */
 extern void emit_nop                   PARAMS ((void));