X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Fc-tree.h;h=acecbe96768826220448b56669733ea20f2d54f3;hb=d7997df08d801df20306d42f2c68cfe03d1acd26;hp=50e161e5e46d608374974729fd1c0f3b346381ee;hpb=860251bec40a1182f2cec4c8039a6120c165271f;p=pf3gnuchains%2Fgcc-fork.git diff --git a/gcc/c-tree.h b/gcc/c-tree.h index 50e161e5e46..acecbe96768 100644 --- a/gcc/c-tree.h +++ b/gcc/c-tree.h @@ -1,6 +1,6 @@ /* Definitions for C parsing and type checking. Copyright (C) 1987, 1993, 1994, 1995, 1997, 1998, - 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc. + 1999, 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc. This file is part of GCC. @@ -23,68 +23,30 @@ Software Foundation, 59 Temple Place - Suite 330, Boston, MA #define GCC_C_TREE_H #include "c-common.h" +#include "diagnostic.h" -/* Language-dependent contents of an identifier. */ +/* struct lang_identifier is private to c-decl.c, but langhooks.c needs to + know how big it is. This is sanity-checked in c-decl.c. */ +#define C_SIZEOF_STRUCT_LANG_IDENTIFIER \ + (sizeof (struct c_common_identifier) + 3 * sizeof (void *)) -/* The limbo_value is used for block level extern declarations, which need - to be type checked against subsequent extern declarations. They can't - be referenced after they fall out of scope, so they can't be global. - - The rid_code field is used for keywords. It is in all - lang_identifier nodes, because some keywords are only special in a - particular context. */ - -struct lang_identifier GTY(()) -{ - struct c_common_identifier common_id; - tree symbol_value; - tree tag_value; - tree label_value; -}; - -/* The resulting tree type. */ - -union lang_tree_node - GTY((desc ("TREE_CODE (&%h.generic) == IDENTIFIER_NODE"), - chain_next ("TREE_CODE (&%h.generic) == INTEGER_TYPE ? (union lang_tree_node *)TYPE_NEXT_VARIANT (&%h.generic) : (union lang_tree_node *)TREE_CHAIN (&%h.generic)"))) -{ - union tree_node GTY ((tag ("0"), - desc ("tree_node_structure (&%h)"))) - generic; - struct lang_identifier GTY ((tag ("1"))) identifier; -}; +/* For gc purposes, return the most likely link for the longest chain. */ +#define C_LANG_TREE_NODE_CHAIN_NEXT(T) \ + ((union lang_tree_node *) \ + (TREE_CODE (T) == INTEGER_TYPE ? TYPE_NEXT_VARIANT (T) \ + : TREE_CODE (T) == COMPOUND_EXPR ? TREE_OPERAND (T, 1) \ + : TREE_CHAIN (T))) /* Language-specific declaration information. */ struct lang_decl GTY(()) { - struct c_lang_decl base; /* The return types and parameter types may have variable size. This is a list of any SAVE_EXPRs that need to be evaluated to compute those sizes. */ tree pending_sizes; }; -/* Macros for access to language-specific slots in an identifier. */ -/* Each of these slots contains a DECL node or null. */ - -/* The value of the identifier in the namespace of "ordinary identifiers" - (data objects, enum constants, functions, typedefs). */ -#define IDENTIFIER_SYMBOL_VALUE(NODE) \ - (((struct lang_identifier *) (NODE))->symbol_value) -/* The value of the identifier in the namespace of struct, union, - and enum tags. */ -#define IDENTIFIER_TAG_VALUE(NODE) \ - (((struct lang_identifier *) (NODE))->tag_value) -/* The value of the identifier in the namespace of labels. */ -#define IDENTIFIER_LABEL_VALUE(NODE) \ - (((struct lang_identifier *) (NODE))->label_value) - -/* In identifiers, C uses the following fields in a special way: - TREE_PUBLIC to record that there was a previous local extern decl. - TREE_USED to record that such a decl was used. - TREE_ADDRESSABLE to record that the address of such a decl was used. */ - /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only. */ #define C_TYPE_FIELDS_READONLY(TYPE) TREE_LANG_FLAG_1 (TYPE) @@ -95,21 +57,22 @@ struct lang_decl GTY(()) nonzero if the definition of the type has already started. */ #define C_TYPE_BEING_DEFINED(TYPE) TYPE_LANG_FLAG_0 (TYPE) +/* In an incomplete RECORD_TYPE or UNION_TYPE, a list of variable + declarations whose type would be completed by completing that type. */ +#define C_TYPE_INCOMPLETE_VARS(TYPE) TYPE_VFIELD (TYPE) + /* In an IDENTIFIER_NODE, nonzero if this identifier is actually a keyword. C_RID_CODE (node) is then the RID_* value of the keyword, and C_RID_YYCODE is the token number wanted by Yacc. */ #define C_IS_RESERVED_WORD(ID) TREE_LANG_FLAG_0 (ID) -/* This function was declared inline. This flag controls the linkage - semantics of 'inline'; whether or not the function is inlined is - controlled by DECL_INLINE. */ -#define DECL_DECLARED_INLINE_P(NODE) \ - (DECL_LANG_SPECIFIC (NODE)->base.declared_inline) - -/* In a RECORD_TYPE, a sorted array of the fields of the type. */ struct lang_type GTY(()) { - struct sorted_fields_type * GTY ((reorder ("resort_sorted_fields"))) s; + /* In a RECORD_TYPE, a sorted array of the fields of the type. */ + struct sorted_fields_type * GTY ((reorder ("resort_sorted_fields"))) s; + /* In an ENUMERAL_TYPE, the min and max values. */ + tree enum_min; + tree enum_max; }; /* Record whether a type or decl was written with nonconstant size. @@ -117,10 +80,6 @@ struct lang_type GTY(()) #define C_TYPE_VARIABLE_SIZE(TYPE) TYPE_LANG_FLAG_1 (TYPE) #define C_DECL_VARIABLE_SIZE(TYPE) DECL_LANG_FLAG_0 (TYPE) -/* Store a value in that field. */ -#define C_SET_EXP_ORIGINAL_CODE(EXP, CODE) \ - (TREE_COMPLEXITY (EXP) = (int) (CODE)) - /* Record whether a typedef for type `int' was actually `signed int'. */ #define C_TYPEDEF_EXPLICITLY_SIGNED(EXP) DECL_LANG_FLAG_1 (EXP) @@ -131,11 +90,14 @@ struct lang_type GTY(()) /* For a FUNCTION_DECL, nonzero if it was an implicit declaration. */ #define C_DECL_IMPLICIT(EXP) DECL_LANG_FLAG_2 (EXP) -/* Nonzero for a declaration of an external object which is not - currently in scope. This is either a built-in declaration of - a library function, before a real declaration has been seen, - or a declaration that appeared in an inner scope that has ended. */ -#define C_DECL_INVISIBLE(EXP) DECL_LANG_FLAG_3 (EXP) +/* For FUNCTION_DECLs, evaluates true if the decl is built-in but has + been declared. */ +#define C_DECL_DECLARED_BUILTIN(EXP) DECL_LANG_FLAG_3 (EXP) + +/* Record whether a decl was declared register. This is strictly a + front-end flag, whereas DECL_REGISTER is used for code generation; + they may differ for structures with volatile fields. */ +#define C_DECL_REGISTER(EXP) DECL_LANG_FLAG_4 (EXP) /* Nonzero for a decl which either doesn't exist or isn't a prototype. N.B. Could be simplified if all built-in decls had complete prototypes @@ -145,26 +107,41 @@ struct lang_type GTY(()) || (TYPE_ARG_TYPES (TREE_TYPE (EXP)) == 0 \ && !DECL_BUILT_IN (EXP))) -/* Nonzero for a decl which is at file scope. */ -#define C_DECL_FILE_SCOPE(EXP) \ - (! DECL_CONTEXT (EXP) \ - || TREE_CODE (DECL_CONTEXT (EXP)) == TRANSLATION_UNIT_DECL) - /* For FUNCTION_TYPE, a hidden list of types of arguments. The same as TYPE_ARG_TYPES for functions with prototypes, but created for functions without prototypes. */ -#define TYPE_ACTUAL_ARG_TYPES(NODE) TYPE_BINFO (NODE) +#define TYPE_ACTUAL_ARG_TYPES(NODE) TYPE_LANG_SLOT_1 (NODE) - -/* in c-lang.c and objc-act.c */ -extern tree lookup_interface (tree); -extern tree is_class_name (tree); -extern tree objc_is_id (tree); -extern void objc_check_decl (tree); -extern int objc_comptypes (tree, tree, int); -extern tree objc_message_selector (void); -extern tree lookup_objc_ivar (tree); -extern void c_expand_body (tree); +/* Record parser information about an expression that is irrelevant + for code generation alongside a tree representing its value. */ +struct c_expr +{ + /* The value of the expression. */ + tree value; + /* Record the original binary operator of an expression, which may + have been changed by fold, STRING_CST for unparenthesised string + constants, or ERROR_MARK for other expressions (including + parenthesized expressions). */ + enum tree_code original_code; +}; + +/* Save and restore the variables in this file and elsewhere + that keep track of the progress of compilation of the current function. + Used for nested functions. */ + +struct language_function GTY(()) +{ + struct c_language_function base; + tree x_break_label; + tree x_cont_label; + struct c_switch * GTY((skip)) x_switch_stack; + tree arg_info; + int returns_value; + int returns_null; + int returns_abnormally; + int warn_about_return_type; + int extern_inline; +}; /* in c-parse.in */ @@ -174,123 +151,135 @@ extern void c_parse_init (void); extern void gen_aux_info_record (tree, int, int, int); /* in c-decl.c */ +extern tree c_break_label; +extern tree c_cont_label; + extern int global_bindings_p (void); -extern int kept_level_p (void); -extern tree getdecls (void); -extern void pushlevel (int); +extern void push_scope (void); +extern tree pop_scope (void); extern void insert_block (tree); -extern void set_block (tree); extern tree pushdecl (tree); +extern void c_expand_body (tree); -extern void c_insert_default_attributes (tree); extern void c_init_decl_processing (void); extern void c_dup_lang_specific_decl (tree); extern void c_print_identifier (FILE *, tree, int); -extern tree build_array_declarator (tree, tree, int, int); +extern tree build_array_declarator (tree, tree, bool, bool); extern tree build_enumerator (tree, tree); extern void check_for_loop_decls (void); -extern void clear_parm_order (void); +extern void mark_forward_parm_decls (void); extern int complete_array_type (tree, tree, int); -extern void declare_parm_level (int); +extern void declare_parm_level (void); +extern void undeclared_variable (tree); +extern tree declare_label (tree); extern tree define_label (location_t, tree); extern void finish_decl (tree, tree, tree); extern tree finish_enum (tree, tree, tree); -extern void finish_function (int, int); +extern void finish_function (void); extern tree finish_struct (tree, tree, tree); -extern tree get_parm_info (int); +extern tree get_parm_info (bool); extern tree grokfield (tree, tree, tree); +extern void split_specs_attrs (tree, tree *, tree *); extern tree groktypename (tree); extern tree groktypename_in_parm_context (tree); +extern tree grokparm (tree); extern tree implicitly_declare (tree); -extern int in_parm_level_p (void); extern void keep_next_level (void); extern tree lookup_name (tree); -extern void parmlist_tags_warning (void); extern void pending_xref_error (void); extern void c_push_function_context (struct function *); extern void c_pop_function_context (struct function *); -extern void pop_label_level (void); -extern void push_label_level (void); extern void push_parm_decl (tree); extern tree pushdecl_top_level (tree); -extern tree pushdecl_function_level (tree, tree); -extern void pushtag (tree, tree); -extern tree set_array_declarator_type (tree, tree, int); -extern tree shadow_label (tree); +extern tree set_array_declarator_inner (tree, tree, bool); +extern tree builtin_function (const char *, tree, int, enum built_in_class, + const char *, tree); extern void shadow_tag (tree); extern void shadow_tag_warned (tree, int); extern tree start_enum (tree); extern int start_function (tree, tree, tree); -extern tree start_decl (tree, tree, int, tree); +extern tree start_decl (tree, tree, bool, tree); extern tree start_struct (enum tree_code, tree); extern void store_parm_decls (void); +extern void store_parm_decls_from (tree); extern tree xref_tag (enum tree_code, tree); -extern tree c_begin_compound_stmt (void); -extern void c_expand_deferred_function (tree); -extern void c_expand_decl_stmt (tree); +extern int c_expand_decl (tree); +extern tree build_c_parm (tree, tree, tree); +extern tree build_attrs_declarator (tree, tree); +extern tree build_function_declarator (tree, tree); extern tree make_pointer_declarator (tree, tree); -extern void merge_translation_unit_decls (void); /* in c-objc-common.c */ extern int c_disregard_inline_limits (tree); extern int c_cannot_inline_tree_fn (tree *); extern bool c_objc_common_init (void); -extern int c_missing_noreturn_ok_p (tree); -extern void c_objc_common_finish_file (void); +extern bool c_missing_noreturn_ok_p (tree); +extern tree c_objc_common_truthvalue_conversion (tree expr); extern int defer_fn (tree); extern bool c_warn_unused_global_decl (tree); +extern void c_initialize_diagnostics (diagnostic_context *); #define c_build_type_variant(TYPE, CONST_P, VOLATILE_P) \ c_build_qualified_type ((TYPE), \ ((CONST_P) ? TYPE_QUAL_CONST : 0) | \ ((VOLATILE_P) ? TYPE_QUAL_VOLATILE : 0)) -#define c_sizeof_nowarn(T) c_sizeof_or_alignof_type (T, SIZEOF_EXPR, 0) - /* in c-typeck.c */ - -/* For use with comptypes. */ -enum { - COMPARE_STRICT = 0, - COMPARE_DIFFERENT_TU = 1 -}; +extern struct c_switch *c_switch_stack; extern tree require_complete_type (tree); -extern int comptypes (tree, tree, int); +extern int same_translation_unit_p (tree, tree); +extern int comptypes (tree, tree); extern tree c_size_in_bytes (tree); extern bool c_mark_addressable (tree); extern void c_incomplete_type_error (tree, tree); extern tree c_type_promotes_to (tree); +extern tree composite_type (tree, tree); extern tree build_component_ref (tree, tree); extern tree build_indirect_ref (tree, const char *); extern tree build_array_ref (tree, tree); extern tree build_external_ref (tree, int); -extern tree parser_build_binary_op (enum tree_code, tree, tree); -extern int c_tree_expr_nonnegative_p (tree); -extern void readonly_warning (tree, const char *); +extern struct c_expr parser_build_binary_op (enum tree_code, struct c_expr, + struct c_expr); +extern void readonly_error (tree, const char *); extern tree build_conditional_expr (tree, tree, tree); -extern tree build_compound_expr (tree); +extern tree build_compound_expr (tree, tree); extern tree c_cast_expr (tree, tree); extern tree build_c_cast (tree, tree); extern tree build_modify_expr (tree, enum tree_code, tree); extern void store_init_value (tree, tree); extern void error_init (const char *); extern void pedwarn_init (const char *); +extern void maybe_warn_string_init (tree, struct c_expr); extern void start_init (tree, tree, int); extern void finish_init (void); extern void really_start_incremental_init (tree); extern void push_init_level (int); -extern tree pop_init_level (int); +extern struct c_expr pop_init_level (int); extern void set_init_index (tree, tree); extern void set_init_label (tree); -extern void process_init_element (tree); +extern void process_init_element (struct c_expr); extern tree build_compound_literal (tree, tree); +extern void pedwarn_c90 (const char *, ...) ATTRIBUTE_PRINTF_1; extern void pedwarn_c99 (const char *, ...) ATTRIBUTE_PRINTF_1; extern tree c_start_case (tree); -extern void c_finish_case (void); -extern tree simple_asm_stmt (tree); -extern tree build_asm_stmt (tree, tree, tree, tree, tree); -extern tree c_convert_parm_for_inlining (tree, tree, tree); +extern void c_finish_case (tree); +extern tree build_asm_expr (tree, tree, tree, tree, bool); +extern tree build_asm_stmt (tree, tree); +extern tree c_convert_parm_for_inlining (tree, tree, tree, int); +extern int c_types_compatible_p (tree, tree); +extern tree c_begin_compound_stmt (bool); +extern tree c_end_compound_stmt (tree, bool); +extern void c_finish_if_stmt (location_t, tree, tree, tree, bool); +extern void c_finish_loop (location_t, tree, tree, tree, tree, tree, bool); +extern tree c_begin_stmt_expr (void); +extern tree c_finish_stmt_expr (tree); +extern tree c_process_expr_stmt (tree); +extern tree c_finish_expr_stmt (tree); +extern tree c_finish_return (tree); +extern tree c_finish_bc_stmt (tree *, bool); +extern tree c_finish_goto_label (tree); +extern tree c_finish_goto_ptr (tree); /* Set to 0 at beginning of a function definition, set to 1 if a return statement that specifies a return value is seen. */ @@ -311,13 +300,18 @@ extern int current_function_returns_abnormally; extern int system_header_p; +/* True means global_bindings_p should return false even if the scope stack + says we are in file scope. */ + +extern bool c_override_global_bindings_to_false; + +/* True means we've initialized exception handling. */ +extern bool c_eh_initialized_p; + /* In c-decl.c */ extern void c_finish_incomplete_decl (tree); extern void c_write_global_declarations (void); -extern GTY(()) tree static_ctors; -extern GTY(()) tree static_dtors; - /* In order for the format checking to accept the C frontend diagnostic framework extensions, you must include this file before toplev.h, not after. */