OSDN Git Service

* doc/install-old.texi: Remove more obsolete documentation.
[pf3gnuchains/gcc-fork.git] / gcc / c-common.h
index 06c9c61..3f766a7 100644 (file)
@@ -1,6 +1,6 @@
 /* Definitions for c-common.c.
    Copyright (C) 1987, 1993, 1994, 1995, 1997, 1998,
-   1999, 2000 Free Software Foundation, Inc.
+   1999, 2000, 2001 Free Software Foundation, Inc.
 
 This file is part of GNU CC.
 
@@ -23,6 +23,7 @@ Boston, MA 02111-1307, USA.  */
 #define GCC_C_COMMON_H
 
 #include "splay-tree.h"
+#include "cpplib.h"
 
 /* Usage of TREE_LANG_FLAG_?:
    0: COMPOUND_STMT_NO_SCOPE (in COMPOUND_STMT).
@@ -31,6 +32,7 @@ Boston, MA 02111-1307, USA.  */
       SCOPE_BEGIN_P (in SCOPE_STMT)
       DECL_PRETTY_FUNCTION_P (in VAR_DECL)
       NEW_FOR_SCOPE_P (in FOR_STMT)
+      ASM_INPUT_P (in ASM_STMT)
    1: C_DECLARED_LABEL_FLAG (in LABEL_DECL)
       STMT_IS_FULL_EXPR_P (in _STMT)
    2: STMT_LINENO_FOR_FN_P (in _STMT)
@@ -60,7 +62,7 @@ enum rid
   RID_FRIEND, RID_VIRTUAL, RID_EXPLICIT, RID_EXPORT, RID_MUTABLE,
 
   /* ObjC */
-  RID_IN, RID_OUT, RID_INOUT, RID_BYCOPY, RID_BYREF, RID_ONEWAY,
+  RID_FIRST_PQ, RID_IN = RID_FIRST_PQ, RID_OUT, RID_INOUT, RID_BYCOPY, RID_BYREF, RID_ONEWAY,
 
   /* C */
   RID_INT,     RID_CHAR,   RID_FLOAT,    RID_DOUBLE, RID_VOID,
@@ -74,6 +76,9 @@ enum rid
   RID_EXTENSION, RID_IMAGPART, RID_REALPART, RID_LABEL,      RID_PTRBASE,
   RID_PTREXTENT, RID_PTRVALUE,
 
+  /* Too many ways of getting the name of a function as a string */
+  RID_FUNCTION_NAME, RID_PRETTY_FUNCTION_NAME, RID_C99_FUNCTION_NAME,
+
   /* C++ */
   RID_BOOL,     RID_WCHAR,    RID_CLASS,
   RID_PUBLIC,   RID_PRIVATE,  RID_PROTECTED,
@@ -116,7 +121,10 @@ enum c_tree_index
     CTI_SIGNED_WCHAR_TYPE,
     CTI_UNSIGNED_WCHAR_TYPE,
     CTI_WINT_TYPE,
-    CTI_C_SIZE_TYPE, /* For format checking only.  */
+    CTI_C_SIZE_TYPE, /* The type used for the size_t typedef and the
+                       result type of sizeof (an ordinary type without
+                       TYPE_IS_SIZETYPE set, unlike the internal
+                       sizetype).  */
     CTI_SIGNED_SIZE_TYPE, /* For format checking only.  */
     CTI_UNSIGNED_PTRDIFF_TYPE, /* For format checking only.  */
     CTI_INTMAX_TYPE,
@@ -139,28 +147,34 @@ enum c_tree_index
     CTI_C_BOOL_TRUE,
     CTI_C_BOOL_FALSE,
     CTI_DEFAULT_FUNCTION_TYPE,
-    CTI_VOID_LIST,
-
-    CTI_VOID_FTYPE,
-    CTI_VOID_FTYPE_PTR,
-    CTI_INT_FTYPE_INT,
-    CTI_PTR_FTYPE_SIZETYPE,
 
     CTI_G77_INTEGER_TYPE,
     CTI_G77_UINTEGER_TYPE,
     CTI_G77_LONGINT_TYPE,
     CTI_G77_ULONGINT_TYPE,
 
-    /* These are not types, but we have to look them up all the time.  */
-    CTI_FUNCTION_ID,
-    CTI_PRETTY_FUNCTION_ID,
-    CTI_FUNC_ID,
-
+    /* These are not types, but we have to look them up all the time. */
+    CTI_FUNCTION_NAME_DECL,
+    CTI_PRETTY_FUNCTION_NAME_DECL,
+    CTI_C99_FUNCTION_NAME_DECL,
+    CTI_SAVED_FUNCTION_NAME_DECLS,
+    
     CTI_VOID_ZERO,
 
     CTI_MAX
 };
 
+#define C_RID_CODE(id) (((struct c_common_identifier *) (id))->rid_code)
+
+/* Identifier part common to the C front ends.  Inherits from
+   tree_identifier, despite appearances.  */
+struct c_common_identifier
+{
+  struct tree_common common;
+  struct cpp_hashnode node;
+  ENUM_BITFIELD(rid) rid_code: CHAR_BIT;
+};
+
 #define wchar_type_node                        c_global_trees[CTI_WCHAR_TYPE]
 #define signed_wchar_type_node         c_global_trees[CTI_SIGNED_WCHAR_TYPE]
 #define unsigned_wchar_type_node       c_global_trees[CTI_UNSIGNED_WCHAR_TYPE]
@@ -188,11 +202,6 @@ enum c_tree_index
 #define const_string_type_node         c_global_trees[CTI_CONST_STRING_TYPE]
 
 #define default_function_type          c_global_trees[CTI_DEFAULT_FUNCTION_TYPE]
-#define void_list_node                 c_global_trees[CTI_VOID_LIST]
-#define void_ftype                     c_global_trees[CTI_VOID_FTYPE]
-#define void_ftype_ptr                 c_global_trees[CTI_VOID_FTYPE_PTR]
-#define int_ftype_int                  c_global_trees[CTI_INT_FTYPE_INT]
-#define ptr_ftype_sizetype             c_global_trees[CTI_PTR_FTYPE_SIZETYPE]
 
 /* g77 integer types, which which must be kept in sync with f/com.h */
 #define g77_integer_type_node          c_global_trees[CTI_G77_INTEGER_TYPE]
@@ -200,9 +209,10 @@ enum c_tree_index
 #define g77_longint_type_node          c_global_trees[CTI_G77_LONGINT_TYPE]
 #define g77_ulongint_type_node         c_global_trees[CTI_G77_ULONGINT_TYPE]
 
-#define function_id_node               c_global_trees[CTI_FUNCTION_ID]
-#define pretty_function_id_node                c_global_trees[CTI_PRETTY_FUNCTION_ID]
-#define func_id_node                   c_global_trees[CTI_FUNC_ID]
+#define function_name_decl_node                c_global_trees[CTI_FUNCTION_NAME_DECL]
+#define pretty_function_name_decl_node c_global_trees[CTI_PRETTY_FUNCTION_NAME_DECL]
+#define c99_function_name_decl_node            c_global_trees[CTI_C99_FUNCTION_NAME_DECL]
+#define saved_function_name_decls      c_global_trees[CTI_SAVED_FUNCTION_NAME_DECLS]
 
 /* A node for `((void) 0)'.  */
 #define void_zero_node                  c_global_trees[CTI_VOID_ZERO]
@@ -219,7 +229,7 @@ typedef enum c_language_kind
                       etc. */
   clk_cplusplus,   /* ANSI/ISO C++ */
   clk_objective_c  /* Objective C */
-} 
+}
 c_language_kind;
 
 /* Information about a statement tree.  */
@@ -241,10 +251,10 @@ struct stmt_tree_s {
      However, in order to represent aggregate initialization code as
      tree structure, we use statement-expressions.  The statements
      within the statement expression should not result in cleanups
-     being run until the entire enclosing statement is complete.  
+     being run until the entire enclosing statement is complete.
 
      This flag has no effect in C.  */
-  int stmts_are_full_exprs_p; 
+  int stmts_are_full_exprs_p;
 };
 
 typedef struct stmt_tree_s *stmt_tree;
@@ -258,9 +268,6 @@ struct language_function {
   struct stmt_tree_s x_stmt_tree;
   /* The stack of SCOPE_STMTs for the current function.  */
   tree x_scope_stmt_stack;
-  /* Nonzero if __FUNCTION__ and its ilk have been declared in this
-     function.  */
-  int x_function_name_declared_p;
 };
 
 /* When building a statement-tree, this is the last statement added to
@@ -291,10 +298,15 @@ extern void (*lang_expand_stmt)                 PARAMS ((tree));
 extern void (*lang_expand_decl_stmt)            PARAMS ((tree));
 extern void (*lang_expand_function_end)         PARAMS ((void));
 
+/* Callback that determines if it's ok for a function to have no
+   noreturn attribute.  */
+extern int (*lang_missing_noreturn_ok_p)       PARAMS ((tree));
+
+
 /* The type of a function that walks over tree structure.  */
 
-typedef tree (*walk_tree_fn)                    PARAMS ((tree *, 
-                                                        int *, 
+typedef tree (*walk_tree_fn)                    PARAMS ((tree *,
+                                                        int *,
                                                         void *));
 
 extern stmt_tree current_stmt_tree              PARAMS ((void));
@@ -330,6 +342,13 @@ struct c_lang_decl {
   (((struct c_lang_decl *) DECL_LANG_SPECIFIC (FUNCTION_DECL_CHECK (NODE))) \
    ->saved_tree)
 
+/* In a FUNCTION_DECL for which DECL_BUILT_IN does not hold, this is
+     the approximate number of statements in this function.  There is
+     no need for this number to be exact; it is only used in various
+     heuristics regarding optimization.  */
+#define DECL_NUM_STMTS(NODE) \
+  (FUNCTION_DECL_CHECK (NODE)->decl.u1.i)
+
 extern void c_mark_lang_decl                    PARAMS ((struct c_lang_decl *));
 
 /* The variant of the C language being processed.  Each C language
@@ -342,10 +361,34 @@ extern c_language_kind c_language;
 
 extern int flag_const_strings;
 
+/* Nonzero means give `double' the same size as `float'.  */
+
+extern int flag_short_double;
+
+/* Nonzero means give `wchar_t' the same size as `short'.  */
+
+extern int flag_short_wchar;
+
 /* Warn about *printf or *scanf format/argument anomalies. */
 
 extern int warn_format;
 
+/* Warn about Y2K problems with strftime formats.  */
+
+extern int warn_format_y2k;
+
+/* Warn about excess arguments to formats.  */
+
+extern int warn_format_extra_args;
+
+/* Warn about non-literal format arguments.  */
+
+extern int warn_format_nonliteral;
+
+/* Warn about possible security problems with calls to format functions.  */
+
+extern int warn_format_security;
+
 /* Warn about possible violations of sequence point rules.  */
 
 extern int warn_sequence_point;
@@ -358,7 +401,7 @@ extern int warn_missing_format_attribute;
 
 extern int flag_traditional;
 
-/* Nonzero means enable C89 Amendment 1 features, other than digraphs.  */
+/* Nonzero means enable C89 Amendment 1 features.  */
 
 extern int flag_isoc94;
 
@@ -366,10 +409,6 @@ extern int flag_isoc94;
 
 extern int flag_isoc99;
 
-/* Nonzero means accept digraphs.  */
-
-extern int flag_digraphs;
-
 /* Nonzero means environment is hosted (i.e., not freestanding) */
 
 extern int flag_hosted;
@@ -388,11 +427,6 @@ extern int flag_no_builtin;
 
 extern int flag_no_nonansi_builtin;
 
-/* If non-NULL, dump the tree structure for the entire translation
-   unit to this file.  */
-
-extern const char *flag_dump_translation_unit;
-
 /* Nonzero means warn about suggesting putting in ()'s.  */
 
 extern int warn_parentheses;
@@ -401,6 +435,11 @@ extern int warn_parentheses;
 
 extern int warn_conversion;
 
+/* Nonzero means warn about usage of long long,
+   when `-pedantic' and not C99.  */
+
+extern int warn_long_long;
+
 /* C types are partitioned into three subsets: object, function, and
    incomplete types.  */
 #define C_TYPE_OBJECT_P(type) \
@@ -416,7 +455,7 @@ extern int warn_conversion;
    descending through array types.  Note that this macro evaluates its
    arguments mor than once.  */
 #define C_TYPE_QUALS(TYPE)                             \
-  (TYPE_QUALS ((TREE_CODE (TYPE) == ARRAY_TYPE                 \
+  (TYPE_QUALS ((TREE_CODE (TYPE) == ARRAY_TYPE         \
                && c_language == clk_cplusplus)         \
               ? strip_array_types (TYPE) : TYPE))
 
@@ -429,22 +468,33 @@ extern int warn_conversion;
    what operator was specified for it.  */
 #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
 
-/* Pointer to function to generate the VAR_DECL for __FUNCTION__ etc.
+/* Pointer to function to lazily generate the VAR_DECL for __FUNCTION__ etc.
    ID is the identifier to use, NAME is the string.
    TYPE_DEP indicates whether it depends on type of the function or not
    (i.e. __PRETTY_FUNCTION__).  */
 
-extern tree (*make_fname_decl)                  PARAMS ((tree, const char *, int));
-
-extern void declare_function_name              PARAMS ((void));
+extern tree (*make_fname_decl)                  PARAMS ((tree, int));
+
+extern tree identifier_global_value            PARAMS ((tree));
+extern void record_builtin_type                        PARAMS ((enum rid,
+                                                        const char *, tree));
+extern tree build_void_list_node               PARAMS ((void));
+extern void start_fname_decls                  PARAMS ((void));
+extern void finish_fname_decls                 PARAMS ((void));
+extern const char *fname_as_string             PARAMS ((int));
+extern tree fname_decl                         PARAMS ((unsigned, tree));
+extern const char *fname_string                        PARAMS ((unsigned));
 extern void decl_attributes                    PARAMS ((tree, tree, tree));
 extern void init_function_format_info          PARAMS ((void));
 extern void check_function_format              PARAMS ((int *, tree, tree, tree));
+extern void set_Wformat                                PARAMS ((int));
+extern void decl_handle_format_attribute       PARAMS ((tree, tree));
+extern void decl_handle_format_arg_attribute   PARAMS ((tree, tree));
 extern void c_apply_type_quals_to_decl         PARAMS ((int, tree));
 /* Print an error message for invalid operands to arith operation CODE.
    NOP_EXPR is used as a special case (see truthvalue_conversion).  */
 extern void binary_op_error                    PARAMS ((enum tree_code));
-extern void c_expand_expr_stmt                 PARAMS ((tree));
+extern tree c_expand_expr_stmt                 PARAMS ((tree));
 extern void c_expand_start_cond                        PARAMS ((tree, int));
 extern void c_finish_then                       PARAMS ((void));
 extern void c_expand_start_else                        PARAMS ((void));
@@ -460,23 +510,13 @@ extern void overflow_warning                      PARAMS ((tree));
 extern void unsigned_conversion_warning                PARAMS ((tree, tree));
 
 /* Read the rest of the current #-directive line.  */
-#if USE_CPPLIB
 extern char *get_directive_line                        PARAMS ((void));
 #define GET_DIRECTIVE_LINE() get_directive_line ()
-#else
-extern char *get_directive_line                        PARAMS ((FILE *));
-#define GET_DIRECTIVE_LINE() get_directive_line (finput)
-#endif
 
 /* Subroutine of build_binary_op, used for comparison operations.
    See if the operands have both been converted from subword integer types
    and, if so, perhaps change them both back to their original type.  */
 extern tree shorten_compare                    PARAMS ((tree *, tree *, tree *, enum tree_code *));
-/* Prepare expr to be an argument of a TRUTH_NOT_EXPR,
-   or validate its data type for an `if' or `while' statement or ?..: exp. */
-extern tree truthvalue_conversion              PARAMS ((tree));
-extern tree type_for_mode                      PARAMS ((enum machine_mode, int));
-extern tree type_for_size                      PARAMS ((unsigned, int));
 
 extern unsigned int min_precision              PARAMS ((tree, int));
 
@@ -489,17 +529,9 @@ extern void c_common_nodes_and_builtins            PARAMS ((void));
 
 extern tree build_va_arg                       PARAMS ((tree, tree));
 
-/* Nonzero if the type T promotes to itself.
-   ANSI C states explicitly the list of types that promote;
-   in particular, short promotes to int even if they have the same width.  */
-#define C_PROMOTING_INTEGER_TYPE_P(t)                          \
-  (TREE_CODE ((t)) == INTEGER_TYPE                             \
-   && (TYPE_MAIN_VARIANT (t) == char_type_node                 \
-       || TYPE_MAIN_VARIANT (t) == signed_char_type_node       \
-       || TYPE_MAIN_VARIANT (t) == unsigned_char_type_node     \
-       || TYPE_MAIN_VARIANT (t) == short_integer_type_node     \
-       || TYPE_MAIN_VARIANT (t) == short_unsigned_type_node))
+extern void c_common_lang_init                 PARAMS ((void));
 
+extern bool c_promoting_integer_type_p         PARAMS ((tree));
 extern int self_promoting_args_p               PARAMS ((tree));
 extern tree simple_type_promotes_to            PARAMS ((tree));
 extern tree strip_array_types                   PARAMS ((tree));
@@ -577,7 +609,7 @@ extern tree strip_array_types                   PARAMS ((tree));
 #define ASM_CLOBBERS(NODE)      TREE_OPERAND (ASM_STMT_CHECK (NODE), 4)
 
 /* DECL_STMT accessor. This gives access to the DECL associated with
-   the given declaration statement. */ 
+   the given declaration statement. */
 #define DECL_STMT_DECL(NODE)    TREE_OPERAND (DECL_STMT_CHECK (NODE), 0)
 
 /* STMT_EXPR accessor. */
@@ -589,7 +621,7 @@ extern tree strip_array_types                   PARAMS ((tree));
 
 /* Nonzero if this SCOPE_STMT is for the beginning of a scope.  */
 #define SCOPE_BEGIN_P(NODE) \
-  (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE))) 
+  (TREE_LANG_FLAG_0 (SCOPE_STMT_CHECK (NODE)))
 
 /* Nonzero if this SCOPE_STMT is for the end of a scope.  */
 #define SCOPE_END_P(NODE) \
@@ -611,7 +643,7 @@ extern tree strip_array_types                   PARAMS ((tree));
 
 /* Nonzero for a SCOPE_STMT if this statement is for a partial scope.
    For example, in:
-  
+
      S s;
      l:
      S s2;
@@ -636,12 +668,16 @@ extern tree strip_array_types                   PARAMS ((tree));
 
 /* If non-zero, the STMT_LINENO for NODE is the line at which the
    function ended.  */
-#define STMT_LINENO_FOR_FN_P(NODE)             \
+#define STMT_LINENO_FOR_FN_P(NODE)             \
   (TREE_LANG_FLAG_2 ((NODE)))
 
 /* Nonzero if we want the new ISO rules for pushing a new scope for `for'
    initialization variables. */
-#define NEW_FOR_SCOPE_P(NODE) (TREE_LANG_FLAG_0 (NODE)) 
+#define NEW_FOR_SCOPE_P(NODE) (TREE_LANG_FLAG_0 (NODE))
+
+/* Nonzero if we want to create an ASM_INPUT instead of an
+   ASM_OPERAND with no operands.  */
+#define ASM_INPUT_P(NODE) (TREE_LANG_FLAG_0 (NODE))
 
 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
 
@@ -671,7 +707,7 @@ extern void genrtl_case_label                   PARAMS ((tree));
 extern void genrtl_compound_stmt                PARAMS ((tree));
 extern void genrtl_asm_stmt                     PARAMS ((tree, tree,
                                                         tree, tree,
-                                                        tree));
+                                                        tree, int));
 extern void genrtl_decl_cleanup                 PARAMS ((tree, tree));
 extern int stmts_are_full_exprs_p               PARAMS ((void));
 extern int anon_aggr_type_p                     PARAMS ((tree));
@@ -688,11 +724,15 @@ extern int anon_aggr_type_p                     PARAMS ((tree));
 #define CLEAR_DECL_C_BIT_FIELD(NODE) \
   (DECL_LANG_FLAG_4 (FIELD_DECL_CHECK (NODE)) = 0)
 
+/* In a VAR_DECL, nonzero if the decl is a register variable with
+   an explicit asm specification.  */
+#define DECL_C_HARD_REGISTER(DECL)  DECL_LANG_FLAG_4 (VAR_DECL_CHECK (DECL))
+
 extern void emit_local_var                      PARAMS ((tree));
 extern void make_rtl_for_local_static           PARAMS ((tree));
 extern tree expand_cond                         PARAMS ((tree));
-extern void c_expand_return                    PARAMS ((tree));
-extern void do_case                            PARAMS ((tree, tree));
+extern tree c_expand_return                    PARAMS ((tree));
+extern tree do_case                            PARAMS ((tree, tree));
 extern tree build_stmt                          PARAMS ((enum tree_code, ...));
 extern tree build_case_label                    PARAMS ((tree, tree, tree));
 extern tree build_continue_stmt                 PARAMS ((void));
@@ -732,7 +772,7 @@ extern void extract_interface_info          PARAMS ((void));
 
 extern void mark_c_language_function            PARAMS ((struct language_function *));
 
-extern int case_compare                         PARAMS ((splay_tree_key, 
+extern int case_compare                         PARAMS ((splay_tree_key,
                                                         splay_tree_key));
 
 extern tree c_add_case_label                    PARAMS ((splay_tree,
@@ -741,6 +781,12 @@ extern tree c_add_case_label                    PARAMS ((splay_tree,
 
 extern tree build_function_call                        PARAMS ((tree, tree));
 
+extern tree finish_label_address_expr          PARAMS ((tree));
+
+/* Same function prototype, but the C and C++ front ends have
+   different implementations.  Used in c-common.c.  */
+extern tree lookup_label                       PARAMS ((tree));
+
 /* If this variable is defined to a non-NULL value, it will be called
    after the file has been completely parsed.  The argument will be
    the GLOBAL_NAMESPACE in C++, or the list of top-level declarations
@@ -754,11 +800,26 @@ extern struct rtx_def *c_expand_expr            PARAMS ((tree, rtx,
                                                         enum expand_modifier));
 
 extern int c_safe_from_p                        PARAMS ((rtx, tree));
-
 #endif
 
+extern int c_unsafe_for_reeval                 PARAMS ((tree));
+
 /* In dump.c */
 
+/* Different tree dump places. */
+enum tree_dump_index
+{
+  TDI_all,                     /* dump the whole translation unit */
+  TDI_original,                        /* dump each function before optimizing it */
+  TDI_optimized,                       /* dump each function after optimizing it */
+  TDI_class,                   /* dump class heirarchy */
+  TDI_end
+};
+
+/* Bit masks to control tree dumping. */
+#define TDF_ADDRESS    (1 << 0)        /* dump node addresses */
+#define TDF_SLIM       (1 << 1)        /* don't go wild following links */
+
 typedef struct dump_info *dump_info_p;
 
 /* A callback function used dump language-specific parts of tree
@@ -769,7 +830,12 @@ typedef int (*dump_tree_fn) PARAMS ((dump_info_p, tree));
 
 extern dump_tree_fn lang_dump_tree;
 
-extern void dump_node_to_file                   PARAMS ((tree, const char *));
+extern int dump_flag                   PARAMS ((dump_info_p, int, tree));
+extern int dump_enabled_p              PARAMS ((enum tree_dump_index));
+extern FILE *dump_begin                        PARAMS ((enum tree_dump_index, int *));
+extern void dump_end                   PARAMS ((enum tree_dump_index, FILE *));
+extern void dump_node                  PARAMS ((tree, int, FILE *));
+extern int dump_switch_p                PARAMS ((const char *));
 
 /* Information recorded about each file examined during compilation.  */
 
@@ -783,6 +849,4 @@ struct c_fileinfo
 struct c_fileinfo *get_fileinfo                        PARAMS ((const char *));
 extern void dump_time_statistics               PARAMS ((void));
 
-#endif
-
-
+#endif /* ! GCC_C_COMMON_H */