OSDN Git Service

update the sample output
[pf3gnuchains/gcc-fork.git] / gcc / c-common.h
index b31499f..0ba64b1 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,8 @@ 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)
+      RETURN_NULLIFIED_P (in RETURN_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)
@@ -74,6 +77,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,
@@ -101,9 +107,22 @@ enum rid
   RID_MAX,
 
   RID_FIRST_MODIFIER = RID_STATIC,
-  RID_LAST_MODIFIER = RID_ONEWAY
+  RID_LAST_MODIFIER = RID_ONEWAY,
+
+  RID_FIRST_AT = RID_AT_ENCODE,
+  RID_LAST_AT = RID_AT_IMPLEMENTATION,
+  RID_FIRST_PQ = RID_IN,
+  RID_LAST_PQ = RID_ONEWAY
 };
 
+#define OBJC_IS_AT_KEYWORD(rid) \
+  ((unsigned int)(rid) >= (unsigned int)RID_FIRST_AT && \
+   (unsigned int)(rid) <= (unsigned int)RID_LAST_AT)
+
+#define OBJC_IS_PQ_KEYWORD(rid) \
+  ((unsigned int)(rid) >= (unsigned int)RID_FIRST_PQ && \
+   (unsigned int)(rid) <= (unsigned int)RID_LAST_PQ)
+
 /* The elements of `ridpointers' are identifier nodes for the reserved
    type names and storage classes.  It is indexed by a RID_... value.  */
 extern tree *ridpointers;
@@ -142,28 +161,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]
@@ -191,11 +216,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]
@@ -203,9 +223,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]
@@ -222,7 +243,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.  */
@@ -244,10 +265,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;
@@ -261,9 +282,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
@@ -294,10 +312,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));
@@ -333,6 +356,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
@@ -345,6 +375,14 @@ 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;
@@ -403,11 +441,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;
@@ -436,7 +469,7 @@ extern int warn_long_long;
    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))
 
@@ -449,25 +482,51 @@ extern int warn_long_long;
    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 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));
+
+/* Flags that may be passed in the third argument of decl_attributes.  */
+enum attribute_flags
+{
+  /* The type passed in is the type of a DECL, and any attributes that
+     should be passed in again to be applied to the DECL rather than the
+     type should be returned.  */
+  ATTR_FLAG_DECL_NEXT = 1,
+  /* The type passed in is a function return type, and any attributes that
+     should be passed in again to be applied to the function type rather
+     than the return type should be returned.  */
+  ATTR_FLAG_FUNCTION_NEXT = 2,
+  /* The type passed in is an array element type, and any attributes that
+     should be passed in again to be applied to the array type rather
+     than the element type should be returned.  */
+  ATTR_FLAG_ARRAY_NEXT = 4
+};
 
-extern void declare_function_name              PARAMS ((void));
-extern void decl_attributes                    PARAMS ((tree, tree, tree));
+extern tree decl_attributes                    PARAMS ((tree *, tree, int));
 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));
@@ -490,11 +549,6 @@ extern char *get_directive_line                    PARAMS ((void));
    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));
 
@@ -507,17 +561,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));
@@ -547,9 +593,11 @@ extern tree strip_array_types                   PARAMS ((tree));
 #define DO_COND(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 0)
 #define DO_BODY(NODE)           TREE_OPERAND (DO_STMT_CHECK (NODE), 1)
 
-/* RETURN_STMT accessor. This gives the expression associated with a
-   return statement. */
+/* RETURN_STMT accessors. These give the expression associated with a
+   return statement, and whether it should be ignored when expanding
+   (as opposed to inlining).  */
 #define RETURN_EXPR(NODE)       TREE_OPERAND (RETURN_STMT_CHECK (NODE), 0)
+#define RETURN_NULLIFIED_P(NODE) TREE_LANG_FLAG_0 (RETURN_STMT_CHECK (NODE))
 
 /* EXPR_STMT accessor. This gives the expression associated with an
    expression statement. */
@@ -595,7 +643,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. */
@@ -607,7 +655,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) \
@@ -629,7 +677,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;
@@ -654,12 +702,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,
 
@@ -689,7 +741,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));
@@ -713,8 +765,8 @@ extern int anon_aggr_type_p                     PARAMS ((tree));
 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));
@@ -754,7 +806,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,
@@ -763,6 +815,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
@@ -782,6 +840,22 @@ 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_class,                   /* dump class heirarchy */
+  TDI_original,                        /* dump each function before optimizing it */
+  TDI_optimized,               /* dump each function after optimizing it */
+  TDI_inlined,                 /* dump each function after inlining
+                                  within it. */
+  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
@@ -792,7 +866,13 @@ 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 *));
+extern const char *dump_flag_name      PARAMS ((enum tree_dump_index));
 
 /* Information recorded about each file examined during compilation.  */
 
@@ -806,6 +886,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 */