gcc/c-tree.h

   1 /* Definitions for C parsing and type checking.
   2    Copyright (C) 1987, 1993 Free Software Foundation, Inc.
   3
   4 This file is part of GNU CC.
   5
   6 GNU CC is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2, or (at your option)
   9 any later version.
  10
  11 GNU CC is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GNU CC; see the file COPYING.  If not, write to
  18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  19
  20 #ifndef _C_TREE_H
  21 #define _C_TREE_H
  22 #if 0 /* I fear this may cause failures on some systems,
  23          so I turned off the few prototypes that needed it -- rms. */
  24 #include <stdio.h>
  25 #endif
  26
  27 /* Language-dependent contents of an identifier.  */
  28
  29 /* The limbo_value is used for block level extern declarations, which need
  30    to be type checked against subsequent extern declarations.  They can't
  31    be referenced after they fall out of scope, so they can't be global.  */
  32
  33 struct lang_identifier
  34 {
  35   struct tree_identifier ignore;
  36   tree global_value, local_value, label_value, implicit_decl;
  37   tree error_locus, limbo_value;
  38 };
  39
  40 /* Macros for access to language-specific slots in an identifier.  */
  41 /* Each of these slots contains a DECL node or null.  */
  42
  43 /* This represents the value which the identifier has in the
  44    file-scope namespace.  */
  45 #define IDENTIFIER_GLOBAL_VALUE(NODE)   \
  46   (((struct lang_identifier *)(NODE))->global_value)
  47 /* This represents the value which the identifier has in the current
  48    scope.  */
  49 #define IDENTIFIER_LOCAL_VALUE(NODE)    \
  50   (((struct lang_identifier *)(NODE))->local_value)
  51 /* This represents the value which the identifier has as a label in
  52    the current label scope.  */
  53 #define IDENTIFIER_LABEL_VALUE(NODE)    \
  54   (((struct lang_identifier *)(NODE))->label_value)
  55 /* This records the extern decl of this identifier, if it has had one
  56    at any point in this compilation.  */
  57 #define IDENTIFIER_LIMBO_VALUE(NODE)    \
  58   (((struct lang_identifier *)(NODE))->limbo_value)
  59 /* This records the implicit function decl of this identifier, if it
  60    has had one at any point in this compilation.  */
  61 #define IDENTIFIER_IMPLICIT_DECL(NODE)  \
  62   (((struct lang_identifier *)(NODE))->implicit_decl)
  63 /* This is the last function in which we printed an "undefined variable"
  64    message for this identifier.  Value is a FUNCTION_DECL or null.  */
  65 #define IDENTIFIER_ERROR_LOCUS(NODE)    \
  66   (((struct lang_identifier *)(NODE))->error_locus)
  67
  68 /* In identifiers, C uses the following fields in a special way:
  69    TREE_PUBLIC        to record that there was a previous local extern decl.
  70    TREE_USED          to record that such a decl was used.
  71    TREE_ADDRESSABLE   to record that the address of such a decl was used.  */
  72
  73 /* Nonzero means reject anything that ANSI standard C forbids.  */
  74 extern int pedantic;
  75
  76 /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is read-only.  */
  77 #define C_TYPE_FIELDS_READONLY(type) TREE_LANG_FLAG_1 (type)
  78
  79 /* In a RECORD_TYPE or UNION_TYPE, nonzero if any component is volatile.  */
  80 #define C_TYPE_FIELDS_VOLATILE(type) TREE_LANG_FLAG_2 (type)
  81
  82 /* In a RECORD_TYPE or UNION_TYPE or ENUMERAL_TYPE
  83    nonzero if the definition of the type has already started.  */
  84 #define C_TYPE_BEING_DEFINED(type) TYPE_LANG_FLAG_0 (type)
  85
  86 /* In a RECORD_TYPE, a sorted array of the fields of the type.  */
  87 struct lang_type
  88 {
  89   int len;
  90   tree elts[1];
  91 };
  92
  93 /* Mark which labels are explicitly declared.
  94    These may be shadowed, and may be referenced from nested functions.  */
  95 #define C_DECLARED_LABEL_FLAG(label) TREE_LANG_FLAG_1 (label)
  96
  97 /* Record whether a type or decl was written with nonconstant size.
  98    Note that TYPE_SIZE may have simplified to a constant.  */
  99 #define C_TYPE_VARIABLE_SIZE(type) TYPE_LANG_FLAG_1 (type)
 100 #define C_DECL_VARIABLE_SIZE(type) DECL_LANG_FLAG_0 (type)
 101
 102 /* Record in each node resulting from a binary operator
 103    what operator was specified for it.  */
 104 #define C_EXP_ORIGINAL_CODE(exp) ((enum tree_code) TREE_COMPLEXITY (exp))
 105
 106 #if 0 /* Not used.  */
 107 /* Record whether a decl for a function or function pointer has
 108    already been mentioned (in a warning) because it was called
 109    but didn't have a prototype.  */
 110 #define C_MISSING_PROTOTYPE_WARNED(decl) DECL_LANG_FLAG_2(decl)
 111 #endif
 112
 113 /* Store a value in that field.  */
 114 #define C_SET_EXP_ORIGINAL_CODE(exp, code) \
 115   (TREE_COMPLEXITY (exp) = (int)(code))
 116
 117 /* Record whether a typedef for type `int' was actually `signed int'.  */
 118 #define C_TYPEDEF_EXPLICITLY_SIGNED(exp) DECL_LANG_FLAG_1 ((exp))
 119
 120 /* Nonzero for a declaration of a built in function if there has been no
 121    occasion that would declare the function in ordinary C.
 122    Using the function draws a pedantic warning in this case.  */
 123 #define C_DECL_ANTICIPATED(exp) DECL_LANG_FLAG_3 ((exp))
 124
 125 /* For FUNCTION_TYPE, a hidden list of types of arguments.  The same as
 126    TYPE_ARG_TYPES for functions with prototypes, but created for functions
 127    without prototypes.  */
 128 #define TYPE_ACTUAL_ARG_TYPES(NODE) TYPE_NONCOPIED_PARTS (NODE)
 129
 130 /* Nonzero if the type T promotes to itself.
 131    ANSI C states explicitly the list of types that promote;
 132    in particular, short promotes to int even if they have the same width.  */
 133 #define C_PROMOTING_INTEGER_TYPE_P(t)                           \
 134   (TREE_CODE ((t)) == INTEGER_TYPE                              \
 135    && (TYPE_MAIN_VARIANT (t) == char_type_node                  \
 136        || TYPE_MAIN_VARIANT (t) == signed_char_type_node        \
 137        || TYPE_MAIN_VARIANT (t) == unsigned_char_type_node      \
 138        || TYPE_MAIN_VARIANT (t) == short_integer_type_node      \
 139        || TYPE_MAIN_VARIANT (t) == short_unsigned_type_node))
 140 \f
 141 extern int maybe_objc_comptypes                 PROTO((tree, tree));
 142 extern tree maybe_building_objc_message_expr    PROTO((void));
 143 \f
 144 /* in c-aux-info.c */
 145 extern void gen_aux_info_record                 PROTO((tree, int, int, int));
 146
 147 /* in c-common.c */
 148 /* Print an error message for invalid operands to arith operation CODE.
 149    NOP_EXPR is used as a special case (see truthvalue_conversion).  */
 150 extern void binary_op_error                     PROTO((enum tree_code));
 151 extern void c_expand_expr_stmt                  PROTO((tree));
 152 /* Validate the expression after `case' and apply default promotions.  */
 153 extern tree check_case_value                    PROTO((tree));
 154 /* Concatenate a list of STRING_CST nodes into one STRING_CST.  */
 155 extern tree combine_strings                     PROTO((tree));
 156 extern void constant_expression_warning         PROTO((tree));
 157 extern void decl_attributes                     PROTO((tree, tree));
 158 extern void declare_function_name               PROTO((void));
 159 extern tree convert_and_check                   PROTO((tree, tree));
 160 extern void constant_expression_warning         PROTO((tree));
 161 extern void overflow_warning                    PROTO((tree));
 162 extern void unsigned_conversion_warning         PROTO((tree, tree));
 163 /* Read the rest of the current #-directive line.  */
 164 #if 0
 165 extern char *get_directive_line                 PROTO((FILE *));
 166 #endif
 167 extern char *get_directive_line ();
 168 /* Subroutine of build_binary_op, used for comparison operations.
 169    See if the operands have both been converted from subword integer types
 170    and, if so, perhaps change them both back to their original type.  */
 171 extern tree shorten_compare                     PROTO((tree *, tree *, tree *, enum tree_code *));
 172 /* Prepare expr to be an argument of a TRUTH_NOT_EXPR,
 173    or validate its data type for an `if' or `while' statement or ?..: exp. */
 174 extern tree truthvalue_conversion               PROTO((tree));
 175 extern tree type_for_mode                       PROTO((enum machine_mode, int));
 176 extern tree type_for_size                       PROTO((unsigned, int));
 177
 178 /* in c-convert.c */
 179 extern tree convert                             PROTO((tree, tree));
 180
 181 /* in c-decl.c */
 182 /* Standard named or nameless data types of the C compiler.  */
 183 extern tree char_array_type_node;
 184 extern tree char_type_node;
 185 extern tree const_ptr_type_node;
 186 extern tree const_string_type_node;
 187 extern tree default_function_type;
 188 extern tree double_ftype_double;
 189 extern tree double_ftype_double_double;
 190 extern tree double_type_node;
 191 extern tree float_type_node;
 192 extern tree intDI_type_node;
 193 extern tree intHI_type_node;
 194 extern tree intQI_type_node;
 195 extern tree intSI_type_node;
 196 extern tree int_array_type_node;
 197 extern tree int_ftype_cptr_cptr_sizet;
 198 extern tree int_ftype_int;
 199 extern tree int_ftype_ptr_ptr_int;
 200 extern tree int_ftype_string_string;
 201 extern tree integer_type_node;
 202 extern tree long_double_type_node;
 203 extern tree long_ftype_long;
 204 extern tree long_integer_type_node;
 205 extern tree long_long_integer_type_node;
 206 extern tree long_long_unsigned_type_node;
 207 extern tree long_unsigned_type_node;
 208 extern tree ptr_type_node;
 209 extern tree ptrdiff_type_node;
 210 extern tree short_integer_type_node;
 211 extern tree short_unsigned_type_node;
 212 extern tree signed_char_type_node;
 213 extern tree signed_wchar_type_node;
 214 extern tree string_ftype_ptr_ptr;
 215 extern tree string_type_node;
 216 extern tree unsigned_char_type_node;
 217 extern tree unsigned_intDI_type_node;
 218 extern tree unsigned_intHI_type_node;
 219 extern tree unsigned_intQI_type_node;
 220 extern tree unsigned_intSI_type_node;
 221 extern tree unsigned_type_node;
 222 extern tree unsigned_wchar_type_node;
 223 extern tree void_ftype_ptr_int_int;
 224 extern tree void_ftype_ptr_ptr_int;
 225 extern tree void_type_node;
 226 extern tree wchar_array_type_node;
 227 extern tree wchar_type_node;
 228
 229 extern tree build_enumerator                    PROTO((tree, tree));
 230 /* Declare a predefined function.  Return the declaration.  */
 231 extern tree builtin_function                    PROTO((char *, tree, enum built_in_function function_, char *));
 232 /* Add qualifiers to a type, in the fashion for C.  */
 233 extern tree c_build_type_variant                PROTO((tree, int, int));
 234 extern int  c_decode_option                     PROTO((char *));
 235 extern void c_mark_varargs                      PROTO((void));
 236 extern tree check_identifier                    PROTO((tree, tree));
 237 extern void clear_parm_order                    PROTO((void));
 238 extern tree combine_parm_decls                  PROTO((tree, tree, int));
 239 extern int  complete_array_type                 PROTO((tree, tree, int));
 240 extern void declare_parm_level                  PROTO((int));
 241 extern tree define_label                        PROTO((char *, int, tree));
 242 extern void delete_block                        PROTO((tree));
 243 extern void finish_decl                         PROTO((tree, tree, tree));
 244 extern tree finish_enum                         PROTO((tree, tree));
 245 extern void finish_function                     PROTO((int));
 246 extern tree finish_struct                       PROTO((tree, tree));
 247 extern tree get_parm_info                       PROTO((int));
 248 extern tree getdecls                            PROTO((void));
 249 extern tree gettags                             PROTO((void));
 250 extern int  global_bindings_p                   PROTO((void));
 251 extern tree grokfield                           PROTO((char *, int, tree, tree, tree));
 252 extern tree groktypename                        PROTO((tree));
 253 extern tree groktypename_in_parm_context        PROTO((tree));
 254 extern tree implicitly_declare                  PROTO((tree));
 255 extern int  in_parm_level_p                     PROTO((void));
 256 extern void init_decl_processing                PROTO((void));
 257 extern void insert_block                        PROTO((tree));
 258 extern void keep_next_level                     PROTO((void));
 259 extern int  kept_level_p                        PROTO((void));
 260 extern tree lookup_label                        PROTO((tree));
 261 extern tree lookup_name                         PROTO((tree));
 262 extern tree maybe_build_cleanup                 PROTO((tree));
 263 extern void parmlist_tags_warning               PROTO((void));
 264 extern void pending_xref_error                  PROTO((void));
 265 extern void pop_c_function_context              PROTO((void));
 266 extern void pop_label_level                     PROTO((void));
 267 extern tree poplevel                            PROTO((int, int, int));
 268 extern void print_lang_decl                     PROTO((void));
 269 #if 0
 270 extern void print_lang_identifier               PROTO((FILE *, tree, int));
 271 #endif
 272 extern void print_lang_type                     PROTO((void));
 273 extern void push_c_function_context             PROTO((void));
 274 extern void push_label_level                    PROTO((void));
 275 extern void push_parm_decl                      PROTO((tree));
 276 extern tree pushdecl                            PROTO((tree));
 277 extern tree pushdecl_top_level                  PROTO((tree));
 278 extern void pushlevel                           PROTO((int));
 279 extern void pushtag                             PROTO((tree, tree));
 280 extern void set_block                           PROTO((tree));
 281 extern tree shadow_label                        PROTO((tree));
 282 extern void shadow_record_fields                PROTO((tree));
 283 extern void shadow_tag                          PROTO((tree));
 284 extern void shadow_tag_warned                   PROTO((tree, int));
 285 extern tree start_enum                          PROTO((tree));
 286 extern int  start_function                      PROTO((tree, tree, int));
 287 extern tree start_decl                          PROTO((tree, tree, int));
 288 extern tree start_struct                        PROTO((enum tree_code, tree));
 289 extern void store_parm_decls                    PROTO((void));
 290 extern tree xref_tag                            PROTO((enum tree_code, tree));
 291
 292 /* in c-typeck.c */
 293 extern tree build_array_ref                     PROTO((tree, tree));
 294 extern tree build_binary_op                     PROTO((enum tree_code, tree, tree, int));
 295 extern tree build_c_cast                        PROTO((tree, tree));
 296 extern tree build_component_ref                 PROTO((tree, tree));
 297 extern tree build_compound_expr                 PROTO((tree));
 298 extern tree build_conditional_expr              PROTO((tree, tree, tree));
 299 extern tree build_function_call                 PROTO((tree, tree));
 300 extern tree build_indirect_ref                  PROTO((tree, char *));
 301 extern tree build_modify_expr                   PROTO((tree, enum tree_code, tree));
 302 extern tree build_unary_op                      PROTO((enum tree_code, tree, int));
 303 extern tree c_alignof                           PROTO((tree));
 304 extern tree c_alignof_expr                      PROTO((tree));
 305 extern tree c_sizeof                            PROTO((tree));
 306 extern tree c_expand_start_case                 PROTO((tree));
 307 /* Given two integer or real types, return the type for their sum.
 308    Given two compatible ANSI C types, returns the merged type.  */
 309 extern tree common_type                         PROTO((tree, tree));
 310 extern tree default_conversion                  PROTO((tree));
 311 extern tree digest_init                         PROTO((tree, tree, tree *, int, int, char *));
 312 extern tree parser_build_binary_op              PROTO((enum tree_code, tree, tree));
 313 extern void store_init_value                    PROTO((tree, tree));
 314
 315 /* Set to 0 at beginning of a function definition, set to 1 if
 316    a return statement that specifies a return value is seen.  */
 317
 318 extern int current_function_returns_value;
 319
 320 /* Set to 0 at beginning of a function definition, set to 1 if
 321    a return statement with no argument is seen.  */
 322
 323 extern int current_function_returns_null;
 324
 325 /* Nonzero means `$' can be in an identifier.  */
 326
 327 extern int dollars_in_ident;
 328
 329 /* Nonzero means allow type mismatches in conditional expressions;
 330    just make their values `void'.   */
 331
 332 extern int flag_cond_mismatch;
 333
 334 /* Nonzero means don't recognize the keyword `asm'.  */
 335
 336 extern int flag_no_asm;
 337
 338 /* Nonzero means ignore `#ident' directives.  */
 339
 340 extern int flag_no_ident;
 341
 342 /* Nonzero means warn about implicit declarations.  */
 343
 344 extern int warn_implicit;
 345
 346 /* Nonzero means give string constants the type `const char *'
 347    to get extra warnings from them.  These warnings will be too numerous
 348    to be useful, except in thoroughly ANSIfied programs.  */
 349
 350 extern int warn_write_strings;
 351
 352 /* Nonzero means warn about sizeof (function) or addition/subtraction
 353    of function pointers.  */
 354
 355 extern int warn_pointer_arith;
 356
 357 /* Nonzero means warn for all old-style non-prototype function decls.  */
 358
 359 extern int warn_strict_prototypes;
 360
 361 /* Nonzero means warn about multiple (redundant) decls for the same single
 362    variable or function.  */
 363
 364 extern int warn_redundant_decls;
 365
 366 /* Nonzero means warn about extern declarations of objects not at
 367    file-scope level and about *all* declarations of functions (whether
 368    extern or static) not at file-scope level.  Note that we exclude
 369    implicit function declarations.  To get warnings about those, use
 370    -Wimplicit.  */
 371
 372 extern int warn_nested_externs;
 373
 374 /* Nonzero means warn about pointer casts that can drop a type qualifier
 375    from the pointer target type.  */
 376
 377 extern int warn_cast_qual;
 378
 379 /* Warn about traditional constructs whose meanings changed in ANSI C.  */
 380
 381 extern int warn_traditional;
 382
 383 /* Warn about *printf or *scanf format/argument anomalies. */
 384
 385 extern int warn_format;
 386
 387 /* Warn about a subscript that has type char.  */
 388
 389 extern int warn_char_subscripts;
 390
 391 /* Warn if a type conversion is done that might have confusing results.  */
 392
 393 extern int warn_conversion;
 394
 395 /* Nonzero means do some things the same way PCC does.  */
 396
 397 extern int flag_traditional;
 398
 399 /* Nonzero means warn about suggesting putting in ()'s.  */
 400
 401 extern int warn_parentheses;
 402
 403 /* Nonzero means this is a function to call to perform comptypes
 404    on two record types.  */
 405
 406 extern int (*comptypes_record_hook) ();
 407
 408 /* Nonzero means we are reading code that came from a system header file.  */
 409
 410 extern int system_header_p;
 411
 412 #endif /* not _C_TREE_H */