X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ast_t.h;h=8a16c2fd76c723a5728b66ebaa020fd7897f7596;hb=779610287a11b207e958e31a29f0dd9ea5459e39;hp=0b7f9f6f602fbbb9feba2b040c1c6011961b8caa;hpb=e3aa358852a45d943e0f7d0c6b20ccfe74ac52ae;p=cparser diff --git a/ast_t.h b/ast_t.h index 0b7f9f6..8a16c2f 100644 --- a/ast_t.h +++ b/ast_t.h @@ -1,21 +1,6 @@ /* * This file is part of cparser. - * Copyright (C) 2007-2008 Matthias Braun - * - * This program is free software; you can redistribute it and/or - * modify it under the terms of the GNU General Public License - * as published by the Free Software Foundation; either version 2 - * of the License, or (at your option) any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA - * 02111-1307, USA. + * Copyright (C) 2012 Matthias Braun */ #ifndef AST_T_H #define AST_T_H @@ -25,25 +10,51 @@ #include "ast.h" #include "symbol.h" -#include "token_t.h" #include "type.h" +#include "entity_t.h" #include "adt/obst.h" /** The AST obstack contains all data that must stay in the AST. */ extern struct obstack ast_obstack; +/** + * Operator precedence classes + */ +typedef enum precedence_t { + PREC_BOTTOM, + PREC_EXPRESSION, /* , left to right */ + PREC_ASSIGNMENT, /* = += -= *= /= %= <<= >>= &= ^= |= right to left */ + PREC_CONDITIONAL, /* ?: right to left */ + PREC_LOGICAL_OR, /* || left to right */ + PREC_LOGICAL_AND, /* && left to right */ + PREC_OR, /* | left to right */ + PREC_XOR, /* ^ left to right */ + PREC_AND, /* & left to right */ + PREC_EQUALITY, /* == != left to right */ + PREC_RELATIONAL, /* < <= > >= left to right */ + PREC_SHIFT, /* << >> left to right */ + PREC_ADDITIVE, /* + - left to right */ + PREC_MULTIPLICATIVE, /* * / % left to right */ + PREC_CAST, /* (type) right to left */ + PREC_UNARY, /* ! ~ ++ -- + - * & sizeof right to left */ + PREC_POSTFIX, /* () [] -> . left to right */ + PREC_PRIMARY, + PREC_TOP +} precedence_t; + /** * Expression kinds. */ typedef enum expression_kind_t { - EXPR_UNKNOWN = 0, - EXPR_INVALID, + EXPR_ERROR = 1, EXPR_REFERENCE, - EXPR_CONST, - EXPR_CHARACTER_CONSTANT, - EXPR_WIDE_CHARACTER_CONSTANT, + EXPR_ENUM_CONSTANT, + EXPR_LITERAL_BOOLEAN, + EXPR_LITERAL_INTEGER, + EXPR_LITERAL_FLOATINGPOINT, + EXPR_LITERAL_CHARACTER, + EXPR_LITERAL_MS_NOOP, /**< MS __noop extension */ EXPR_STRING_LITERAL, - EXPR_WIDE_STRING_LITERAL, EXPR_COMPOUND_LITERAL, EXPR_CALL, EXPR_CONDITIONAL, @@ -54,19 +65,19 @@ typedef enum expression_kind_t { EXPR_ALIGNOF, EXPR_FUNCNAME, - EXPR_BUILTIN_SYMBOL, EXPR_BUILTIN_CONSTANT_P, - EXPR_BUILTIN_PREFETCH, + EXPR_BUILTIN_TYPES_COMPATIBLE_P, EXPR_OFFSETOF, EXPR_VA_START, EXPR_VA_ARG, + EXPR_VA_COPY, EXPR_STATEMENT, EXPR_LABEL_ADDRESS, /**< GCC extension &&label operator */ EXPR_UNARY_FIRST, EXPR_UNARY_NEGATE = EXPR_UNARY_FIRST, EXPR_UNARY_PLUS, - EXPR_UNARY_BITWISE_NEGATE, + EXPR_UNARY_COMPLEMENT, EXPR_UNARY_NOT, EXPR_UNARY_DEREFERENCE, EXPR_UNARY_TAKE_ADDRESS, @@ -75,9 +86,13 @@ typedef enum expression_kind_t { EXPR_UNARY_PREFIX_INCREMENT, EXPR_UNARY_PREFIX_DECREMENT, EXPR_UNARY_CAST, - EXPR_UNARY_CAST_IMPLICIT, /**< compiler generated cast */ EXPR_UNARY_ASSUME, /**< MS __assume() */ - EXPR_UNARY_LAST = EXPR_UNARY_ASSUME, + EXPR_UNARY_DELETE, + EXPR_UNARY_DELETE_ARRAY, + EXPR_UNARY_THROW, + EXPR_UNARY_REAL, + EXPR_UNARY_IMAG, + EXPR_UNARY_LAST = EXPR_UNARY_IMAG, EXPR_BINARY_FIRST, EXPR_BINARY_ADD = EXPR_BINARY_FIRST, @@ -111,7 +126,6 @@ typedef enum expression_kind_t { EXPR_BINARY_BITWISE_OR_ASSIGN, EXPR_BINARY_COMMA, - EXPR_BINARY_BUILTIN_EXPECT, EXPR_BINARY_ISGREATER, EXPR_BINARY_ISGREATEREQUAL, EXPR_BINARY_ISLESS, @@ -129,117 +143,127 @@ typedef enum funcname_kind_t { } funcname_kind_t; /* convenience macros */ -#define EXPR_BINARY_CASES \ - case EXPR_BINARY_ADD: \ - case EXPR_BINARY_SUB: \ - case EXPR_BINARY_MUL: \ - case EXPR_BINARY_DIV: \ - case EXPR_BINARY_MOD: \ - case EXPR_BINARY_EQUAL: \ - case EXPR_BINARY_NOTEQUAL: \ - case EXPR_BINARY_LESS: \ - case EXPR_BINARY_LESSEQUAL: \ - case EXPR_BINARY_GREATER: \ - case EXPR_BINARY_GREATEREQUAL: \ - case EXPR_BINARY_BITWISE_AND: \ - case EXPR_BINARY_BITWISE_OR: \ - case EXPR_BINARY_BITWISE_XOR: \ - case EXPR_BINARY_LOGICAL_AND: \ - case EXPR_BINARY_LOGICAL_OR: \ - case EXPR_BINARY_SHIFTLEFT: \ - case EXPR_BINARY_SHIFTRIGHT: \ - case EXPR_BINARY_ASSIGN: \ - case EXPR_BINARY_MUL_ASSIGN: \ - case EXPR_BINARY_DIV_ASSIGN: \ - case EXPR_BINARY_MOD_ASSIGN: \ - case EXPR_BINARY_ADD_ASSIGN: \ - case EXPR_BINARY_SUB_ASSIGN: \ - case EXPR_BINARY_SHIFTLEFT_ASSIGN: \ - case EXPR_BINARY_SHIFTRIGHT_ASSIGN: \ - case EXPR_BINARY_BITWISE_AND_ASSIGN: \ - case EXPR_BINARY_BITWISE_XOR_ASSIGN: \ - case EXPR_BINARY_BITWISE_OR_ASSIGN: \ - case EXPR_BINARY_COMMA: \ - case EXPR_BINARY_BUILTIN_EXPECT: \ - case EXPR_BINARY_ISGREATER: \ - case EXPR_BINARY_ISGREATEREQUAL: \ - case EXPR_BINARY_ISLESS: \ - case EXPR_BINARY_ISLESSEQUAL: \ - case EXPR_BINARY_ISLESSGREATER: \ - case EXPR_BINARY_ISUNORDERED: - -#define EXPR_UNARY_CASES \ - case EXPR_UNARY_NEGATE: \ - case EXPR_UNARY_PLUS: \ - case EXPR_UNARY_BITWISE_NEGATE: \ - case EXPR_UNARY_NOT: \ - case EXPR_UNARY_DEREFERENCE: \ - case EXPR_UNARY_TAKE_ADDRESS: \ - case EXPR_UNARY_POSTFIX_INCREMENT: \ - case EXPR_UNARY_POSTFIX_DECREMENT: \ - case EXPR_UNARY_PREFIX_INCREMENT: \ - case EXPR_UNARY_PREFIX_DECREMENT: \ - case EXPR_UNARY_CAST: \ - case EXPR_UNARY_CAST_IMPLICIT: \ - case EXPR_UNARY_ASSUME: +#define EXPR_BINARY_CASES \ + EXPR_BINARY_ADD: \ + case EXPR_BINARY_SUB: \ + case EXPR_BINARY_MUL: \ + case EXPR_BINARY_DIV: \ + case EXPR_BINARY_MOD: \ + case EXPR_BINARY_EQUAL: \ + case EXPR_BINARY_NOTEQUAL: \ + case EXPR_BINARY_LESS: \ + case EXPR_BINARY_LESSEQUAL: \ + case EXPR_BINARY_GREATER: \ + case EXPR_BINARY_GREATEREQUAL: \ + case EXPR_BINARY_BITWISE_AND: \ + case EXPR_BINARY_BITWISE_OR: \ + case EXPR_BINARY_BITWISE_XOR: \ + case EXPR_BINARY_LOGICAL_AND: \ + case EXPR_BINARY_LOGICAL_OR: \ + case EXPR_BINARY_SHIFTLEFT: \ + case EXPR_BINARY_SHIFTRIGHT: \ + case EXPR_BINARY_ASSIGN: \ + case EXPR_BINARY_MUL_ASSIGN: \ + case EXPR_BINARY_DIV_ASSIGN: \ + case EXPR_BINARY_MOD_ASSIGN: \ + case EXPR_BINARY_ADD_ASSIGN: \ + case EXPR_BINARY_SUB_ASSIGN: \ + case EXPR_BINARY_SHIFTLEFT_ASSIGN: \ + case EXPR_BINARY_SHIFTRIGHT_ASSIGN: \ + case EXPR_BINARY_BITWISE_AND_ASSIGN: \ + case EXPR_BINARY_BITWISE_XOR_ASSIGN: \ + case EXPR_BINARY_BITWISE_OR_ASSIGN: \ + case EXPR_BINARY_COMMA: \ + case EXPR_BINARY_ISGREATER: \ + case EXPR_BINARY_ISGREATEREQUAL: \ + case EXPR_BINARY_ISLESS: \ + case EXPR_BINARY_ISLESSEQUAL: \ + case EXPR_BINARY_ISLESSGREATER: \ + case EXPR_BINARY_ISUNORDERED /** - * A scope containing declarations. + * unary expression with mandatory operand */ -struct scope_t { - declaration_t *declarations; /**< List of declarations in this scope. */ - declaration_t *last_declaration; /**< last declaration in this scope. */ - scope_t *parent; /**< points to the parent scope. */ - unsigned depth; /**< while parsing, the depth of this scope in the scope stack. */ - bool is_parameter; /**< Set if this scope is a parameter scope. */ -}; +#define EXPR_UNARY_CASES_MANDATORY \ + EXPR_UNARY_NEGATE: \ + case EXPR_UNARY_PLUS: \ + case EXPR_UNARY_COMPLEMENT: \ + case EXPR_UNARY_NOT: \ + case EXPR_UNARY_DEREFERENCE: \ + case EXPR_UNARY_TAKE_ADDRESS: \ + case EXPR_UNARY_POSTFIX_INCREMENT: \ + case EXPR_UNARY_POSTFIX_DECREMENT: \ + case EXPR_UNARY_PREFIX_INCREMENT: \ + case EXPR_UNARY_PREFIX_DECREMENT: \ + case EXPR_UNARY_CAST: \ + case EXPR_UNARY_ASSUME: \ + case EXPR_UNARY_DELETE: \ + case EXPR_UNARY_DELETE_ARRAY: \ + case EXPR_UNARY_IMAG: \ + case EXPR_UNARY_REAL + +/** + * unary expression with optional operand + */ +#define EXPR_UNARY_CASES_OPTIONAL \ + EXPR_UNARY_THROW + +#define EXPR_UNARY_CASES \ + EXPR_UNARY_CASES_MANDATORY: \ + case EXPR_UNARY_CASES_OPTIONAL +#define EXPR_LITERAL_CASES \ + EXPR_LITERAL_BOOLEAN: \ + case EXPR_LITERAL_INTEGER: \ + case EXPR_LITERAL_FLOATINGPOINT: \ + case EXPR_LITERAL_MS_NOOP + +/** + * The base class of every expression. + */ struct expression_base_t { - expression_kind_t kind; - type_t *type; - source_position_t source_position; + expression_kind_t kind; /**< The expression kind. */ + type_t *type; /**< The type of the expression. */ + position_t pos; /**< The source position of this expression. */ + bool parenthesized : 1; #ifndef NDEBUG - bool transformed; + bool transformed : 1; /**< Set if this expression was transformed. */ #endif + bool implicit : 1; /**< compiler generated expression. + Examples: select into anonymous structs, + implicit casts */ }; -struct const_expression_t { - expression_base_t base; - union { - long long int_value; - long double float_value; - string_t character; - wide_string_t wide_character; - } v; - bool is_ms_noop; /**< True, if this constant is the result - of an microsoft __noop operator */ +/** + * integer, float and boolean constants + */ +struct literal_expression_t { + expression_base_t base; + string_t value; + char const *suffix; /**< Start of the suffix in value. */ + + /* ast2firm data */ + ir_tarval *target_value; }; +/** + * string and character literals + */ struct string_literal_expression_t { - expression_base_t base; - string_t value; + expression_base_t base; + string_t value; }; struct funcname_expression_t { expression_base_t base; funcname_kind_t kind; - string_t value; /**< the value once assigned. */ -}; - -struct wide_string_literal_expression_t { - expression_base_t base; - wide_string_t value; }; struct compound_literal_expression_t { expression_base_t base; type_t *type; initializer_t *initializer; -}; - -struct builtin_symbol_expression_t { - expression_base_t base; - symbol_t *symbol; + bool global_scope; }; struct builtin_constant_expression_t { @@ -247,34 +271,36 @@ struct builtin_constant_expression_t { expression_t *value; }; -struct builtin_prefetch_expression_t { +struct builtin_types_compatible_expression_t { expression_base_t base; - expression_t *adr; - expression_t *rw; - expression_t *locality; + type_t *left; + type_t *right; }; struct reference_expression_t { expression_base_t base; - declaration_t *declaration; - bool is_outer_ref; /**< Set, if this referenced a variable - outside of an inner function */ + entity_t *entity; }; +/** + * An argument of a call. + */ struct call_argument_t { - expression_t *expression; - call_argument_t *next; + expression_t *expression; /**< The expression which value is transmitted. */ + call_argument_t *next; /**< Links to the next argument of this call. */ }; + struct call_expression_t { expression_base_t base; - expression_t *function; - call_argument_t *arguments; + expression_t *function; /**< The address of the function to call. */ + call_argument_t *arguments; /**< List of arguments of this call. */ }; + struct unary_expression_t { expression_base_t base; - expression_t *value; + expression_t *value; /**< The unary operand. */ }; struct binary_expression_t { @@ -286,14 +312,14 @@ struct binary_expression_t { struct select_expression_t { expression_base_t base; expression_t *compound; - declaration_t *compound_entry; + entity_t *compound_entry; }; struct array_access_expression_t { expression_base_t base; - expression_t *array_ref; - expression_t *index; - bool flipped; /**< index/ref was written in a 5[a] way */ + expression_t *array_ref; /**< the referenced array */ + expression_t *index; /**< the index used */ + bool flipped; /**< True if index/ref was written in a 5[a] way */ }; struct typeprop_expression_t { @@ -303,10 +329,11 @@ struct typeprop_expression_t { }; struct designator_t { - source_position_t source_position; - symbol_t *symbol; - expression_t *array_index; - designator_t *next; + position_t pos; + symbol_t *symbol; /**< the symbol if any */ + expression_t *array_index; /**< the array index if any */ + expression_t *range_last; /**< last index of a range initializer, if any */ + designator_t *next; }; struct offsetof_expression_t { @@ -318,7 +345,7 @@ struct offsetof_expression_t { struct va_start_expression_t { expression_base_t base; expression_t *ap; - declaration_t *parameter; + expression_t *parameter; }; struct va_arg_expression_t { @@ -326,6 +353,12 @@ struct va_arg_expression_t { expression_t *ap; }; +struct va_copy_expression_t { + expression_base_t base; + expression_t *dst; /**< destination argument */ + expression_t *src; /**< source argument */ +}; + struct conditional_expression_t { expression_base_t base; expression_t *condition; @@ -345,63 +378,39 @@ struct classify_type_expression_t { struct label_address_expression_t { expression_base_t base; - declaration_t *declaration; + label_t *label; }; union expression_t { - expression_kind_t kind; - expression_base_t base; - const_expression_t conste; - funcname_expression_t funcname; - string_literal_expression_t string; - wide_string_literal_expression_t wide_string; - compound_literal_expression_t compound_literal; - builtin_symbol_expression_t builtin_symbol; - builtin_constant_expression_t builtin_constant; - builtin_prefetch_expression_t builtin_prefetch; - reference_expression_t reference; - call_expression_t call; - unary_expression_t unary; - binary_expression_t binary; - select_expression_t select; - array_access_expression_t array_access; - typeprop_expression_t typeprop; - offsetof_expression_t offsetofe; - va_start_expression_t va_starte; - va_arg_expression_t va_arge; - conditional_expression_t conditional; - statement_expression_t statement; - classify_type_expression_t classify_type; - label_address_expression_t label_address; -}; - -typedef enum storage_class_tag_t { - STORAGE_CLASS_NONE, - STORAGE_CLASS_EXTERN, - STORAGE_CLASS_STATIC, - STORAGE_CLASS_TYPEDEF, - STORAGE_CLASS_AUTO, - STORAGE_CLASS_REGISTER, - STORAGE_CLASS_ENUM_ENTRY, - STORAGE_CLASS_THREAD, - STORAGE_CLASS_THREAD_EXTERN, - STORAGE_CLASS_THREAD_STATIC, -} storage_class_tag_t; - -typedef enum namespace_t { - NAMESPACE_NORMAL, - NAMESPACE_STRUCT, - NAMESPACE_UNION, - NAMESPACE_ENUM, - NAMESPACE_LABEL, - NAMESPACE_LOCAL_LABEL -} namespace_t; + expression_kind_t kind; + expression_base_t base; + literal_expression_t literal; + string_literal_expression_t string_literal; + funcname_expression_t funcname; + compound_literal_expression_t compound_literal; + builtin_constant_expression_t builtin_constant; + builtin_types_compatible_expression_t builtin_types_compatible; + reference_expression_t reference; + call_expression_t call; + unary_expression_t unary; + binary_expression_t binary; + select_expression_t select; + array_access_expression_t array_access; + typeprop_expression_t typeprop; + offsetof_expression_t offsetofe; + va_start_expression_t va_starte; + va_arg_expression_t va_arge; + va_copy_expression_t va_copye; + conditional_expression_t conditional; + statement_expression_t statement; + classify_type_expression_t classify_type; + label_address_expression_t label_address; +}; typedef enum initializer_kind_t { INITIALIZER_VALUE, INITIALIZER_LIST, INITIALIZER_STRING, - INITIALIZER_WIDE_STRING, INITIALIZER_DESIGNATOR } initializer_kind_t; @@ -420,16 +429,6 @@ struct initializer_list_t { initializer_t *initializers[]; }; -struct initializer_string_t { - initializer_base_t base; - string_t string; -}; - -struct initializer_wide_string_t { - initializer_base_t base; - wide_string_t string; -}; - struct initializer_designator_t { initializer_base_t base; designator_t *designator; @@ -440,165 +439,21 @@ union initializer_t { initializer_base_t base; initializer_value_t value; initializer_list_t list; - initializer_string_t string; - initializer_wide_string_t wide_string; initializer_designator_t designator; }; -/** - * GNU attributes. - */ -typedef enum gnu_attribute_kind_t { - GNU_AK_CONST, - GNU_AK_VOLATILE, - GNU_AK_CDECL, - GNU_AK_STDCALL, - GNU_AK_FASTCALL, - GNU_AK_DEPRECATED, - GNU_AK_NOINLINE, - GNU_AK_NORETURN, - GNU_AK_NAKED, - GNU_AK_PURE, - GNU_AK_ALWAYS_INLINE, - GNU_AK_MALLOC, - GNU_AK_WEAK, - GNU_AK_CONSTRUCTOR, - GNU_AK_DESTRUCTOR, - GNU_AK_NOTHROW, - GNU_AK_TRANSPARENT_UNION, - GNU_AK_COMMON, - GNU_AK_NOCOMMON, - GNU_AK_PACKED, - GNU_AK_SHARED, - GNU_AK_NOTSHARED, - GNU_AK_USED, - GNU_AK_UNUSED, - GNU_AK_NO_INSTRUMENT_FUNCTION, - GNU_AK_WARN_UNUSED_RESULT, - GNU_AK_LONGCALL, - GNU_AK_SHORTCALL, - GNU_AK_LONG_CALL, - GNU_AK_SHORT_CALL, - GNU_AK_FUNCTION_VECTOR, - GNU_AK_INTERRUPT, - GNU_AK_INTERRUPT_HANDLER, - GNU_AK_NMI_HANDLER, - GNU_AK_NESTING, - GNU_AK_NEAR, - GNU_AK_FAR, - GNU_AK_SIGNAL, - GNU_AK_EIGTHBIT_DATA, - GNU_AK_TINY_DATA, - GNU_AK_SAVEALL, - GNU_AK_FLATTEN, - GNU_AK_SSEREGPARM, - GNU_AK_EXTERNALLY_VISIBLE, - GNU_AK_RETURN_TWICE, - GNU_AK_MAY_ALIAS, - GNU_AK_MS_STRUCT, - GNU_AK_GCC_STRUCT, - GNU_AK_DLLIMPORT, - GNU_AK_DLLEXPORT, - GNU_AK_ALIGNED, - GNU_AK_ALIAS, - GNU_AK_SECTION, - GNU_AK_FORMAT, - GNU_AK_FORMAT_ARG, - GNU_AK_WEAKREF, - GNU_AK_NONNULL, - GNU_AK_TLS_MODEL, - GNU_AK_VISIBILITY, - GNU_AK_REGPARM, - GNU_AK_MODEL, - GNU_AK_MODE, - GNU_AK_TRAP_EXIT, - GNU_AK_SP_SWITCH, - GNU_AK_SENTINEL, - GNU_AK_LAST -} gnu_attribute_kind_t; +static inline string_literal_expression_t const *get_init_string(initializer_t const *const init) +{ + assert(init->kind == INITIALIZER_STRING); + assert(init->value.value->kind == EXPR_STRING_LITERAL); + return &init->value.value->string_literal; +} /** - * Extended microsoft modifier. + * The statement kinds. */ -typedef enum decl_modifier_t { - DM_DLLIMPORT = 1 << 0, - DM_DLLEXPORT = 1 << 1, - DM_THREAD = 1 << 2, - DM_NAKED = 1 << 3, - DM_MICROSOFT_INLINE = 1 << 4, - DM_FORCEINLINE = 1 << 5, - DM_SELECTANY = 1 << 6, - DM_NOTHROW = 1 << 7, - DM_NOVTABLE = 1 << 8, - DM_NORETURN = 1 << 9, - DM_NOINLINE = 1 << 10, - DM_RESTRICT = 1 << 11, - DM_NOALIAS = 1 << 12, - DM_PACKED = 1 << 13, - DM_TRANSPARENT_UNION = 1 << 14, - DM_CONST = 1 << 15, - DM_PURE = 1 << 16, - DM_CONSTRUCTOR = 1 << 17, - DM_DESTRUCTOR = 1 << 18, - DM_UNUSED = 1 << 19, - DM_USED = 1 << 20, - DM_CDECL = 1 << 21, - DM_FASTCALL = 1 << 22, - DM_STDCALL = 1 << 23, - DM_THISCALL = 1 << 24, - DM_DEPRECATED = 1 << 25 -} decl_modifier_t; - -typedef unsigned decl_modifiers_t; - -struct declaration_t { - unsigned char namespc; - unsigned char declared_storage_class; - unsigned char storage_class; - unsigned char alignment; /**< Alignment of the declaration, 0 for default. */ - decl_modifiers_t modifiers; /**< modifiers. */ - const char *deprecated_string; /**< MS deprecated string if any. */ - symbol_t *get_property_sym; /**< MS get property. */ - symbol_t *put_property_sym; /**< MS put property. */ - unsigned int address_taken : 1; /**< Set if the address of this declaration was taken. */ - unsigned int is_inline : 1; - unsigned int used : 1; /**< Set if the declaration is used. */ - unsigned int implicit : 1; /**< Set for implicit (not found in source code) declarations. */ - unsigned int need_closure : 1; /**< Inner function needs closure. */ - unsigned int goto_to_outer : 1; /**< Inner function has goto to outer function. */ - type_t *type; - il_size_t offset; /**< The offset of this member inside a compound. */ - symbol_t *symbol; - string_t *asm_name; /**< GCC extension: ASM label. */ - source_position_t source_position; - union { - bool complete; /**< used to indicate whether struct/union types are already defined or if just the name is declared */ - statement_t *statement; - initializer_t *initializer; - expression_t *enum_value; - } init; - scope_t scope; /**< The scope that this declaration opens. */ - scope_t *parent_scope; /**< The parent scope where this declaration lives. */ - - /** next declaration in a scope */ - declaration_t *next; - /** next declaration with same symbol */ - declaration_t *symbol_next; - - /* the following fields are used in ast2firm module */ - unsigned char declaration_kind; - union { - unsigned int value_number; - ir_entity *entity; - ir_node *block; - ir_node *vla_base; - tarval *enum_val; - ir_type *irtype; - } v; -}; - typedef enum statement_kind_t { - STATEMENT_INVALID, + STATEMENT_ERROR = 1, STATEMENT_EMPTY, STATEMENT_COMPOUND, STATEMENT_RETURN, @@ -608,10 +463,10 @@ typedef enum statement_kind_t { STATEMENT_EXPRESSION, STATEMENT_CONTINUE, STATEMENT_BREAK, + STATEMENT_COMPUTED_GOTO, STATEMENT_GOTO, STATEMENT_LABEL, STATEMENT_CASE_LABEL, - STATEMENT_WHILE, STATEMENT_DO_WHILE, STATEMENT_FOR, STATEMENT_ASM, @@ -619,44 +474,41 @@ typedef enum statement_kind_t { STATEMENT_LEAVE /**< MS __leave */ } statement_kind_t; +/** + * The base class of every statement. + */ struct statement_base_t { - statement_kind_t kind; - statement_t *next; - source_position_t source_position; - statement_t *parent; - bool reachable; + statement_kind_t kind; + statement_t *next; /**< Point to the next statement in a compound statement. */ + position_t pos; + statement_t *parent; /**< The Parent statement that controls the execution. */ + bool reachable; /**< True, if this statement is reachable. */ #ifndef NDEBUG - bool transformed; + bool transformed; #endif }; -struct invalid_statement_t { - statement_base_t base; -}; - -struct empty_statement_t { - statement_base_t base; -}; - struct return_statement_t { statement_base_t base; - expression_t *value; + expression_t *value; /**< The return value if any. */ }; struct compound_statement_t { statement_base_t base; statement_t *statements; scope_t scope; + bool stmt_expr; /**< True if this compound statement is a statement expression. */ }; struct declaration_statement_t { statement_base_t base; - declaration_t *declarations_begin; - declaration_t *declarations_end; + entity_t *declarations_begin; + entity_t *declarations_end; }; struct if_statement_t { statement_base_t base; + scope_t scope; expression_t *condition; statement_t *true_statement; statement_t *false_statement; @@ -664,19 +516,22 @@ struct if_statement_t { struct switch_statement_t { statement_base_t base; + scope_t scope; expression_t *expression; statement_t *body; - case_label_statement_t *first_case, *last_case; /**< List of all cases, including default. */ - case_label_statement_t *default_label; /**< The default label if existent. */ - unsigned long default_proj_nr; /**< The Proj-number for the default Proj. */ + case_label_statement_t *first_case, *last_case; /**< List of all cases, including default. */ + case_label_statement_t *default_label; /**< The default label if existent. */ }; struct goto_statement_t { statement_base_t base; - declaration_t *label; /**< The destination label. */ - expression_t *expression; /**< The expression for an assigned goto. */ + label_t *label; /**< The destination label. */ goto_statement_t *next; /**< links all goto statements of a function */ - bool outer_fkt_jmp; /**< Set if this goto jump to an outer function. */ +}; + +struct computed_goto_statement_t { + statement_base_t base; + expression_t *expression; /**< The expression for the computed goto. */ }; struct case_label_statement_t { @@ -685,15 +540,16 @@ struct case_label_statement_t { expression_t *end_range; /**< For GNUC case a .. b: the end range expression, NULL else. */ case_label_statement_t *next; /**< link to the next case label in switch */ statement_t *statement; - long first_case; /**< The folded value of expression. */ - long last_case; /**< The folded value of end_range. */ + ir_tarval *first_case; + ir_tarval *last_case; bool is_bad; /**< If set marked as bad to suppress warnings. */ bool is_empty_range; /**< If set marked this as an empty range. */ + long pn; }; struct label_statement_t { statement_base_t base; - declaration_t *label; + label_t *label; statement_t *statement; label_statement_t *next; /**< links all label statements of a function */ }; @@ -703,25 +559,20 @@ struct expression_statement_t { expression_t *expression; }; -struct while_statement_t { - statement_base_t base; - expression_t *condition; - statement_t *body; -}; - struct do_while_statement_t { statement_base_t base; + scope_t scope; expression_t *condition; statement_t *body; }; struct for_statement_t { statement_base_t base; + scope_t scope; expression_t *initialisation; expression_t *condition; expression_t *step; statement_t *body; - scope_t scope; bool condition_reachable:1; bool step_reachable:1; }; @@ -738,12 +589,18 @@ struct asm_clobber_t { asm_clobber_t *next; }; +struct asm_label_t { + label_t *label; + asm_label_t *next; +}; + struct asm_statement_t { statement_base_t base; string_t asm_text; asm_argument_t *inputs; asm_argument_t *outputs; asm_clobber_t *clobbers; + asm_label_t *labels; bool is_volatile; }; @@ -759,23 +616,23 @@ struct leave_statement_t { }; union statement_t { - statement_kind_t kind; - statement_base_t base; - return_statement_t returns; - compound_statement_t compound; - declaration_statement_t declaration; - if_statement_t ifs; - switch_statement_t switchs; - goto_statement_t gotos; - case_label_statement_t case_label; - label_statement_t label; - expression_statement_t expression; - while_statement_t whiles; - do_while_statement_t do_while; - for_statement_t fors; - asm_statement_t asms; - ms_try_statement_t ms_try; - leave_statement_t leave; + statement_kind_t kind; + statement_base_t base; + return_statement_t returns; + compound_statement_t compound; + declaration_statement_t declaration; + if_statement_t ifs; + switch_statement_t switchs; + computed_goto_statement_t computed_goto; + goto_statement_t gotos; + case_label_statement_t case_label; + label_statement_t label; + expression_statement_t expression; + do_while_statement_t do_while; + for_statement_t fors; + asm_statement_t asms; + ms_try_statement_t ms_try; + leave_statement_t leave; }; struct translation_unit_t { @@ -783,25 +640,18 @@ struct translation_unit_t { statement_t *global_asm; }; -static inline -void *_allocate_ast(size_t size) -{ - return obstack_alloc(&ast_obstack, size); -} - -static inline -bool is_invalid_expression(expression_t *expression) -{ - return expression->base.kind == EXPR_INVALID; -} - -static inline -bool is_invalid_statement(statement_t *statement) +/** + * Allocate an AST node with given size and + * initialize all fields with zero. + */ +static inline void *allocate_ast_zero(size_t size) { - return statement->base.kind == STATEMENT_INVALID; + return memset(obstack_alloc(&ast_obstack, size), 0, size); } - -#define allocate_ast(size) _allocate_ast(size) +/** If set, implicit casts are printed. */ +extern bool print_implicit_casts; +/** If set parenthesis are printed to indicate operator precedence. */ +extern bool print_parenthesis; #endif