#ifndef GCC_COMMON_H_INCLUDED#define GCC_COMMON_H_INCLUDED #include "bversion.h"#if BUILDING_GCC_VERSION >= 6000#include "gcc-plugin.h"#else#include "plugin.h"#endif#include "plugin-version.h"#include "config.h"#include "system.h"#include "coretypes.h"#include "tm.h"#include "line-map.h"#include "input.h"#include "tree.h" #include "tree-inline.h"#include "version.h"#include "rtl.h"#include "tm_p.h"#include "flags.h"#include "hard-reg-set.h"#include "output.h"#include "except.h"#include "function.h"#include "toplev.h"#if BUILDING_GCC_VERSION >= 5000#include "expr.h"#endif#include "basic-block.h"#include "intl.h"#include "ggc.h"#include "timevar.h" #include "params.h" #if BUILDING_GCC_VERSION <= 4009#include "pointer-set.h"#else#include "hash-map.h"#endif #if BUILDING_GCC_VERSION >= 7000#include "memmodel.h"#endif#include "emit-rtl.h"#include "debug.h"#include "target.h"#include "langhooks.h"#include "cfgloop.h"#include "cgraph.h"#include "opts.h" #if BUILDING_GCC_VERSION == 4005#include <sys/mman.h>#endif #if BUILDING_GCC_VERSION >= 4007#include "tree-pretty-print.h"#include "gimple-pretty-print.h"#endif #if BUILDING_GCC_VERSION >= 4006/* * The c-family headers were moved into a subdirectory in GCC version * 4.7, but most plugin-building users of GCC 4.6 are using the Debian * or Ubuntu package, which has an out-of-tree patch to move this to the * same location as found in 4.7 and later: * https://sources.debian.net/src/gcc-4.6/4.6.3-14/debian/patches/pr45078.diff/ */#include "c-family/c-common.h"#else#include "c-common.h"#endif #if BUILDING_GCC_VERSION <= 4008#include "tree-flow.h"#else#include "tree-cfgcleanup.h"#include "tree-ssa-operands.h"#include "tree-into-ssa.h"#endif #if BUILDING_GCC_VERSION >= 4008#include "is-a.h"#endif #include "diagnostic.h"#include "tree-dump.h"#include "tree-pass.h"#if BUILDING_GCC_VERSION >= 4009#include "pass_manager.h"#endif#include "predict.h"#include "ipa-utils.h" #if BUILDING_GCC_VERSION >= 4009#include "attribs.h"#include "varasm.h"#include "stor-layout.h"#include "internal-fn.h"#include "gimple-expr.h"#include "gimple-fold.h"#include "context.h"#include "tree-ssa-alias.h"#include "tree-ssa.h"#include "stringpool.h"#if BUILDING_GCC_VERSION >= 7000#include "tree-vrp.h"#endif#include "tree-ssanames.h"#include "print-tree.h"#include "tree-eh.h"#include "stmt.h"#include "gimplify.h"#endif #include "gimple.h" #if BUILDING_GCC_VERSION >= 4009#include "tree-ssa-operands.h"#include "tree-phinodes.h"#include "tree-cfg.h"#include "gimple-iterator.h"#include "gimple-ssa.h"#include "ssa-iterators.h"#endif #if BUILDING_GCC_VERSION >= 5000#include "builtins.h"#endif /* missing from basic_block.h... */void debug_dominance_info(enum cdi_direction dir);void debug_dominance_tree(enum cdi_direction dir, basic_block root); #if BUILDING_GCC_VERSION == 4006void debug_gimple_stmt(gimple);void debug_gimple_seq(gimple_seq);void print_gimple_seq(FILE *, gimple_seq, int, int);void print_gimple_stmt(FILE *, gimple, int, int);void print_gimple_expr(FILE *, gimple, int, int);void dump_gimple_stmt(pretty_printer *, gimple, int, int);#endif #define __unused __attribute__((__unused__))#define __visible __attribute__((visibility("default"))) #define DECL_NAME_POINTER(node) IDENTIFIER_POINTER(DECL_NAME(node))#define DECL_NAME_LENGTH(node) IDENTIFIER_LENGTH(DECL_NAME(node))#define TYPE_NAME_POINTER(node) IDENTIFIER_POINTER(TYPE_NAME(node))#define TYPE_NAME_LENGTH(node) IDENTIFIER_LENGTH(TYPE_NAME(node)) /* should come from c-tree.h if only it were installed for gcc 4.5... */#define C_TYPE_FIELDS_READONLY(TYPE) TREE_LANG_FLAG_1(TYPE) static inline tree build_const_char_string(int len, const char *str){ tree cstr, elem, index, type; cstr = build_string(len, str); elem = build_type_variant(char_type_node, 1, 0); index = build_index_type(size_int(len - 1)); type = build_array_type(elem, index); TREE_TYPE(cstr) = type; TREE_CONSTANT(cstr) = 1; TREE_READONLY(cstr) = 1; TREE_STATIC(cstr) = 1; return cstr;} #define PASS_INFO(NAME, REF, ID, POS) \struct register_pass_info NAME##_pass_info = { \ .pass = make_##NAME##_pass(), \ .reference_pass_name = REF, \ .ref_pass_instance_number = ID, \ .pos_op = POS, \} #if BUILDING_GCC_VERSION == 4005#define FOR_EACH_LOCAL_DECL(FUN, I, D) \ for (tree vars = (FUN)->local_decls, (I) = 0; \ vars && ((D) = TREE_VALUE(vars)); \ vars = TREE_CHAIN(vars), (I)++)#define DECL_CHAIN(NODE) (TREE_CHAIN(DECL_MINIMAL_CHECK(NODE)))#define FOR_EACH_VEC_ELT(T, V, I, P) \ for (I = 0; VEC_iterate(T, (V), (I), (P)); ++(I))#define TODO_rebuild_cgraph_edges 0#define SCOPE_FILE_SCOPE_P(EXP) (!(EXP)) #ifndef O_BINARY#define O_BINARY 0#endif typedef struct varpool_node *varpool_node_ptr; static inline bool gimple_call_builtin_p(gimple stmt, enum built_in_function code){ tree fndecl; if (!is_gimple_call(stmt)) return false; fndecl = gimple_call_fndecl(stmt); if (!fndecl || DECL_BUILT_IN_CLASS(fndecl) != BUILT_IN_NORMAL) return false; return DECL_FUNCTION_CODE(fndecl) == code;} static inline bool is_simple_builtin(tree decl){ if (decl && DECL_BUILT_IN_CLASS(decl) != BUILT_IN_NORMAL) return false; switch (DECL_FUNCTION_CODE(decl)) { /* Builtins that expand to constants. */ case BUILT_IN_CONSTANT_P: case BUILT_IN_EXPECT: case BUILT_IN_OBJECT_SIZE: case BUILT_IN_UNREACHABLE: /* Simple register moves or loads from stack. */ case BUILT_IN_RETURN_ADDRESS: case BUILT_IN_EXTRACT_RETURN_ADDR: case BUILT_IN_FROB_RETURN_ADDR: case BUILT_IN_RETURN: case BUILT_IN_AGGREGATE_INCOMING_ADDRESS: case BUILT_IN_FRAME_ADDRESS: case BUILT_IN_VA_END: case BUILT_IN_STACK_SAVE: case BUILT_IN_STACK_RESTORE: /* Exception state returns or moves registers around. */ case BUILT_IN_EH_FILTER: case BUILT_IN_EH_POINTER: case BUILT_IN_EH_COPY_VALUES: return true; default: return false; }} static inline void add_local_decl(struct function *fun, tree d){ gcc_assert(TREE_CODE(d) == VAR_DECL); fun->local_decls = tree_cons(NULL_TREE, d, fun->local_decls);}#endif #if BUILDING_GCC_VERSION <= 4006#define ANY_RETURN_P(rtx) (GET_CODE(rtx) == RETURN)#define C_DECL_REGISTER(EXP) DECL_LANG_FLAG_4(EXP)#define EDGE_PRESERVE 0ULL#define HOST_WIDE_INT_PRINT_HEX_PURE "%" HOST_WIDE_INT_PRINT "x"#define flag_fat_lto_objects true #define get_random_seed(noinit) ({ \ unsigned HOST_WIDE_INT seed; \ sscanf(get_random_seed(noinit), "%" HOST_WIDE_INT_PRINT "x", &seed); \ seed * seed; }) #define int_const_binop(code, arg1, arg2) \ int_const_binop((code), (arg1), (arg2), 0) static inline bool gimple_clobber_p(gimple s __unused){ return false;} static inline bool gimple_asm_clobbers_memory_p(const_gimple stmt){ unsigned i; for (i = 0; i < gimple_asm_nclobbers(stmt); i++) { tree op = gimple_asm_clobber_op(stmt, i); if (!strcmp(TREE_STRING_POINTER(TREE_VALUE(op)), "memory")) return true; } return false;} static inline tree builtin_decl_implicit(enum built_in_function fncode){ return implicit_built_in_decls[fncode];} static inline int ipa_reverse_postorder(struct cgraph_node **order){ return cgraph_postorder(order);} static inline struct cgraph_node *cgraph_create_node(tree decl){ return cgraph_node(decl);} static inline struct cgraph_node *cgraph_get_create_node(tree decl){ struct cgraph_node *node = cgraph_get_node(decl); return node ? node : cgraph_node(decl);} static inline bool cgraph_function_with_gimple_body_p(struct cgraph_node *node){ return node->analyzed && !node->thunk.thunk_p && !node->alias;} static inline struct cgraph_node *cgraph_first_function_with_gimple_body(void){ struct cgraph_node *node; for (node = cgraph_nodes; node; node = node->next) if (cgraph_function_with_gimple_body_p(node)) return node; return NULL;} static inline struct cgraph_node *cgraph_next_function_with_gimple_body(struct cgraph_node *node){ for (node = node->next; node; node = node->next) if (cgraph_function_with_gimple_body_p(node)) return node; return NULL;} static inline bool cgraph_for_node_and_aliases(cgraph_node_ptr node, bool (*callback)(cgraph_node_ptr, void *), void *data, bool include_overwritable){ cgraph_node_ptr alias; if (callback(node, data)) return true; for (alias = node->same_body; alias; alias = alias->next) { if (include_overwritable || cgraph_function_body_availability(alias) > AVAIL_OVERWRITABLE) if (cgraph_for_node_and_aliases(alias, callback, data, include_overwritable)) return true; } return false;} #define FOR_EACH_FUNCTION_WITH_GIMPLE_BODY(node) \ for ((node) = cgraph_first_function_with_gimple_body(); (node); \ (node) = cgraph_next_function_with_gimple_body(node)) static inline void varpool_add_new_variable(tree decl){ varpool_finalize_decl(decl);}#endif #if BUILDING_GCC_VERSION <= 4007#define FOR_EACH_FUNCTION(node) \ for (node = cgraph_nodes; node; node = node->next)#define FOR_EACH_VARIABLE(node) \ for (node = varpool_nodes; node; node = node->next)#define PROP_loops 0#define NODE_SYMBOL(node) (node)#define NODE_DECL(node) (node)->decl#define INSN_LOCATION(INSN) RTL_LOCATION(INSN)#define vNULL NULL static inline int bb_loop_depth(const_basic_block bb){ return bb->loop_father ? loop_depth(bb->loop_father) : 0;} static inline bool gimple_store_p(gimple gs){ tree lhs = gimple_get_lhs(gs); return lhs && !is_gimple_reg(lhs);} static inline void gimple_init_singleton(gimple g __unused){}#endif #if BUILDING_GCC_VERSION == 4007 || BUILDING_GCC_VERSION == 4008static inline struct cgraph_node *cgraph_alias_target(struct cgraph_node *n){ return cgraph_alias_aliased_node(n);}#endif #if BUILDING_GCC_VERSION >= 4007 && BUILDING_GCC_VERSION <= 4009#define cgraph_create_edge(caller, callee, call_stmt, count, freq, nest) \ cgraph_create_edge((caller), (callee), (call_stmt), (count), (freq))#define cgraph_create_edge_including_clones(caller, callee, old_call_stmt, call_stmt, count, freq, nest, reason) \ cgraph_create_edge_including_clones((caller), (callee), (old_call_stmt), (call_stmt), (count), (freq), (reason))#endif #if BUILDING_GCC_VERSION <= 4008#define ENTRY_BLOCK_PTR_FOR_FN(FN) ENTRY_BLOCK_PTR_FOR_FUNCTION(FN)#define EXIT_BLOCK_PTR_FOR_FN(FN) EXIT_BLOCK_PTR_FOR_FUNCTION(FN)#define basic_block_info_for_fn(FN) ((FN)->cfg->x_basic_block_info)#define n_basic_blocks_for_fn(FN) ((FN)->cfg->x_n_basic_blocks)#define n_edges_for_fn(FN) ((FN)->cfg->x_n_edges)#define last_basic_block_for_fn(FN) ((FN)->cfg->x_last_basic_block)#define label_to_block_map_for_fn(FN) ((FN)->cfg->x_label_to_block_map)#define profile_status_for_fn(FN) ((FN)->cfg->x_profile_status)#define BASIC_BLOCK_FOR_FN(FN, N) BASIC_BLOCK_FOR_FUNCTION((FN), (N))#define NODE_IMPLICIT_ALIAS(node) (node)->same_body_alias#define VAR_P(NODE) (TREE_CODE(NODE) == VAR_DECL) static inline bool tree_fits_shwi_p(const_tree t){ if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST) return false; if (TREE_INT_CST_HIGH(t) == 0 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) >= 0) return true; if (TREE_INT_CST_HIGH(t) == -1 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) < 0 && !TYPE_UNSIGNED(TREE_TYPE(t))) return true; return false;} static inline bool tree_fits_uhwi_p(const_tree t){ if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST) return false; return TREE_INT_CST_HIGH(t) == 0;} static inline HOST_WIDE_INT tree_to_shwi(const_tree t){ gcc_assert(tree_fits_shwi_p(t)); return TREE_INT_CST_LOW(t);} static inline unsigned HOST_WIDE_INT tree_to_uhwi(const_tree t){ gcc_assert(tree_fits_uhwi_p(t)); return TREE_INT_CST_LOW(t);} static inline const char *get_tree_code_name(enum tree_code code){ gcc_assert(code < MAX_TREE_CODES); return tree_code_name[code];} #define ipa_remove_stmt_references(cnode, stmt) typedef union gimple_statement_d gasm;typedef union gimple_statement_d gassign;typedef union gimple_statement_d gcall;typedef union gimple_statement_d gcond;typedef union gimple_statement_d gdebug;typedef union gimple_statement_d ggoto;typedef union gimple_statement_d gphi;typedef union gimple_statement_d greturn; static inline gasm *as_a_gasm(gimple stmt){ return stmt;} static inline const gasm *as_a_const_gasm(const_gimple stmt){ return stmt;} static inline gassign *as_a_gassign(gimple stmt){ return stmt;} static inline const gassign *as_a_const_gassign(const_gimple stmt){ return stmt;} static inline gcall *as_a_gcall(gimple stmt){ return stmt;} static inline const gcall *as_a_const_gcall(const_gimple stmt){ return stmt;} static inline gcond *as_a_gcond(gimple stmt){ return stmt;} static inline const gcond *as_a_const_gcond(const_gimple stmt){ return stmt;} Lines 1–500 of 961. Load more
#ifndef GCC_COMMON_H_INCLUDED #define GCC_COMMON_H_INCLUDED #include "bversion.h" #if BUILDING_GCC_VERSION >= 6000 #include "gcc-plugin.h" #else #include "plugin.h" #endif #include "plugin-version.h" #include "config.h" #include "system.h" #include "coretypes.h" #include "tm.h" #include "line-map.h" #include "input.h" #include "tree.h" #include "tree-inline.h" #include "version.h" #include "rtl.h" #include "tm_p.h" #include "flags.h" #include "hard-reg-set.h" #include "output.h" #include "except.h" #include "function.h" #include "toplev.h" #if BUILDING_GCC_VERSION >= 5000 #include "expr.h" #endif #include "basic-block.h" #include "intl.h" #include "ggc.h" #include "timevar.h" #include "params.h" #if BUILDING_GCC_VERSION <= 4009 #include "pointer-set.h" #else #include "hash-map.h" #endif #if BUILDING_GCC_VERSION >= 7000 #include "memmodel.h" #endif #include "emit-rtl.h" #include "debug.h" #include "target.h" #include "langhooks.h" #include "cfgloop.h" #include "cgraph.h" #include "opts.h" #if BUILDING_GCC_VERSION == 4005 #include <sys/mman.h> #endif #if BUILDING_GCC_VERSION >= 4007 #include "tree-pretty-print.h" #include "gimple-pretty-print.h" #endif #if BUILDING_GCC_VERSION >= 4006 /* * The c-family headers were moved into a subdirectory in GCC version * 4.7, but most plugin-building users of GCC 4.6 are using the Debian * or Ubuntu package, which has an out-of-tree patch to move this to the * same location as found in 4.7 and later: * https://sources.debian.net/src/gcc-4.6/4.6.3-14/debian/patches/pr45078.diff/ */ #include "c-family/c-common.h" #else #include "c-common.h" #endif #if BUILDING_GCC_VERSION <= 4008 #include "tree-flow.h" #else #include "tree-cfgcleanup.h" #include "tree-ssa-operands.h" #include "tree-into-ssa.h" #endif #if BUILDING_GCC_VERSION >= 4008 #include "is-a.h" #endif #include "diagnostic.h" #include "tree-dump.h" #include "tree-pass.h" #if BUILDING_GCC_VERSION >= 4009 #include "pass_manager.h" #endif #include "predict.h" #include "ipa-utils.h" #if BUILDING_GCC_VERSION >= 4009 #include "attribs.h" #include "varasm.h" #include "stor-layout.h" #include "internal-fn.h" #include "gimple-expr.h" #include "gimple-fold.h" #include "context.h" #include "tree-ssa-alias.h" #include "tree-ssa.h" #include "stringpool.h" #if BUILDING_GCC_VERSION >= 7000 #include "tree-vrp.h" #endif #include "tree-ssanames.h" #include "print-tree.h" #include "tree-eh.h" #include "stmt.h" #include "gimplify.h" #endif #include "gimple.h" #if BUILDING_GCC_VERSION >= 4009 #include "tree-ssa-operands.h" #include "tree-phinodes.h" #include "tree-cfg.h" #include "gimple-iterator.h" #include "gimple-ssa.h" #include "ssa-iterators.h" #endif #if BUILDING_GCC_VERSION >= 5000 #include "builtins.h" #endif /* missing from basic_block.h... */ void debug_dominance_info(enum cdi_direction dir); void debug_dominance_tree(enum cdi_direction dir, basic_block root); #if BUILDING_GCC_VERSION == 4006 void debug_gimple_stmt(gimple); void debug_gimple_seq(gimple_seq); void print_gimple_seq(FILE *, gimple_seq, int, int); void print_gimple_stmt(FILE *, gimple, int, int); void print_gimple_expr(FILE *, gimple, int, int); void dump_gimple_stmt(pretty_printer *, gimple, int, int); #endif #define __unused __attribute__((__unused__)) #define __visible __attribute__((visibility("default"))) #define DECL_NAME_POINTER(node) IDENTIFIER_POINTER(DECL_NAME(node)) #define DECL_NAME_LENGTH(node) IDENTIFIER_LENGTH(DECL_NAME(node)) #define TYPE_NAME_POINTER(node) IDENTIFIER_POINTER(TYPE_NAME(node)) #define TYPE_NAME_LENGTH(node) IDENTIFIER_LENGTH(TYPE_NAME(node)) /* should come from c-tree.h if only it were installed for gcc 4.5... */ #define C_TYPE_FIELDS_READONLY(TYPE) TREE_LANG_FLAG_1(TYPE) static inline tree build_const_char_string(int len, const char *str) { tree cstr, elem, index, type; cstr = build_string(len, str); elem = build_type_variant(char_type_node, 1, 0); index = build_index_type(size_int(len - 1)); type = build_array_type(elem, index); TREE_TYPE(cstr) = type; TREE_CONSTANT(cstr) = 1; TREE_READONLY(cstr) = 1; TREE_STATIC(cstr) = 1; return cstr; } #define PASS_INFO(NAME, REF, ID, POS) \ struct register_pass_info NAME##_pass_info = { \ .pass = make_##NAME##_pass(), \ .reference_pass_name = REF, \ .ref_pass_instance_number = ID, \ .pos_op = POS, \ } #if BUILDING_GCC_VERSION == 4005 #define FOR_EACH_LOCAL_DECL(FUN, I, D) \ for (tree vars = (FUN)->local_decls, (I) = 0; \ vars && ((D) = TREE_VALUE(vars)); \ vars = TREE_CHAIN(vars), (I)++) #define DECL_CHAIN(NODE) (TREE_CHAIN(DECL_MINIMAL_CHECK(NODE))) #define FOR_EACH_VEC_ELT(T, V, I, P) \ for (I = 0; VEC_iterate(T, (V), (I), (P)); ++(I)) #define TODO_rebuild_cgraph_edges 0 #define SCOPE_FILE_SCOPE_P(EXP) (!(EXP)) #ifndef O_BINARY #define O_BINARY 0 #endif typedef struct varpool_node *varpool_node_ptr; static inline bool gimple_call_builtin_p(gimple stmt, enum built_in_function code) { tree fndecl; if (!is_gimple_call(stmt)) return false; fndecl = gimple_call_fndecl(stmt); if (!fndecl || DECL_BUILT_IN_CLASS(fndecl) != BUILT_IN_NORMAL) return false; return DECL_FUNCTION_CODE(fndecl) == code; } static inline bool is_simple_builtin(tree decl) { if (decl && DECL_BUILT_IN_CLASS(decl) != BUILT_IN_NORMAL) return false; switch (DECL_FUNCTION_CODE(decl)) { /* Builtins that expand to constants. */ case BUILT_IN_CONSTANT_P: case BUILT_IN_EXPECT: case BUILT_IN_OBJECT_SIZE: case BUILT_IN_UNREACHABLE: /* Simple register moves or loads from stack. */ case BUILT_IN_RETURN_ADDRESS: case BUILT_IN_EXTRACT_RETURN_ADDR: case BUILT_IN_FROB_RETURN_ADDR: case BUILT_IN_RETURN: case BUILT_IN_AGGREGATE_INCOMING_ADDRESS: case BUILT_IN_FRAME_ADDRESS: case BUILT_IN_VA_END: case BUILT_IN_STACK_SAVE: case BUILT_IN_STACK_RESTORE: /* Exception state returns or moves registers around. */ case BUILT_IN_EH_FILTER: case BUILT_IN_EH_POINTER: case BUILT_IN_EH_COPY_VALUES: return true; default: return false; } } static inline void add_local_decl(struct function *fun, tree d) { gcc_assert(TREE_CODE(d) == VAR_DECL); fun->local_decls = tree_cons(NULL_TREE, d, fun->local_decls); } #endif #if BUILDING_GCC_VERSION <= 4006 #define ANY_RETURN_P(rtx) (GET_CODE(rtx) == RETURN) #define C_DECL_REGISTER(EXP) DECL_LANG_FLAG_4(EXP) #define EDGE_PRESERVE 0ULL #define HOST_WIDE_INT_PRINT_HEX_PURE "%" HOST_WIDE_INT_PRINT "x" #define flag_fat_lto_objects true #define get_random_seed(noinit) ({ \ unsigned HOST_WIDE_INT seed; \ sscanf(get_random_seed(noinit), "%" HOST_WIDE_INT_PRINT "x", &seed); \ seed * seed; }) #define int_const_binop(code, arg1, arg2) \ int_const_binop((code), (arg1), (arg2), 0) static inline bool gimple_clobber_p(gimple s __unused) { return false; } static inline bool gimple_asm_clobbers_memory_p(const_gimple stmt) { unsigned i; for (i = 0; i < gimple_asm_nclobbers(stmt); i++) { tree op = gimple_asm_clobber_op(stmt, i); if (!strcmp(TREE_STRING_POINTER(TREE_VALUE(op)), "memory")) return true; } return false; } static inline tree builtin_decl_implicit(enum built_in_function fncode) { return implicit_built_in_decls[fncode]; } static inline int ipa_reverse_postorder(struct cgraph_node **order) { return cgraph_postorder(order); } static inline struct cgraph_node *cgraph_create_node(tree decl) { return cgraph_node(decl); } static inline struct cgraph_node *cgraph_get_create_node(tree decl) { struct cgraph_node *node = cgraph_get_node(decl); return node ? node : cgraph_node(decl); } static inline bool cgraph_function_with_gimple_body_p(struct cgraph_node *node) { return node->analyzed && !node->thunk.thunk_p && !node->alias; } static inline struct cgraph_node *cgraph_first_function_with_gimple_body(void) { struct cgraph_node *node; for (node = cgraph_nodes; node; node = node->next) if (cgraph_function_with_gimple_body_p(node)) return node; return NULL; } static inline struct cgraph_node *cgraph_next_function_with_gimple_body(struct cgraph_node *node) { for (node = node->next; node; node = node->next) if (cgraph_function_with_gimple_body_p(node)) return node; return NULL; } static inline bool cgraph_for_node_and_aliases(cgraph_node_ptr node, bool (*callback)(cgraph_node_ptr, void *), void *data, bool include_overwritable) { cgraph_node_ptr alias; if (callback(node, data)) return true; for (alias = node->same_body; alias; alias = alias->next) { if (include_overwritable || cgraph_function_body_availability(alias) > AVAIL_OVERWRITABLE) if (cgraph_for_node_and_aliases(alias, callback, data, include_overwritable)) return true; } return false; } #define FOR_EACH_FUNCTION_WITH_GIMPLE_BODY(node) \ for ((node) = cgraph_first_function_with_gimple_body(); (node); \ (node) = cgraph_next_function_with_gimple_body(node)) static inline void varpool_add_new_variable(tree decl) { varpool_finalize_decl(decl); } #endif #if BUILDING_GCC_VERSION <= 4007 #define FOR_EACH_FUNCTION(node) \ for (node = cgraph_nodes; node; node = node->next) #define FOR_EACH_VARIABLE(node) \ for (node = varpool_nodes; node; node = node->next) #define PROP_loops 0 #define NODE_SYMBOL(node) (node) #define NODE_DECL(node) (node)->decl #define INSN_LOCATION(INSN) RTL_LOCATION(INSN) #define vNULL NULL static inline int bb_loop_depth(const_basic_block bb) { return bb->loop_father ? loop_depth(bb->loop_father) : 0; } static inline bool gimple_store_p(gimple gs) { tree lhs = gimple_get_lhs(gs); return lhs && !is_gimple_reg(lhs); } static inline void gimple_init_singleton(gimple g __unused) { } #endif #if BUILDING_GCC_VERSION == 4007 || BUILDING_GCC_VERSION == 4008 static inline struct cgraph_node *cgraph_alias_target(struct cgraph_node *n) { return cgraph_alias_aliased_node(n); } #endif #if BUILDING_GCC_VERSION >= 4007 && BUILDING_GCC_VERSION <= 4009 #define cgraph_create_edge(caller, callee, call_stmt, count, freq, nest) \ cgraph_create_edge((caller), (callee), (call_stmt), (count), (freq)) #define cgraph_create_edge_including_clones(caller, callee, old_call_stmt, call_stmt, count, freq, nest, reason) \ cgraph_create_edge_including_clones((caller), (callee), (old_call_stmt), (call_stmt), (count), (freq), (reason)) #endif #if BUILDING_GCC_VERSION <= 4008 #define ENTRY_BLOCK_PTR_FOR_FN(FN) ENTRY_BLOCK_PTR_FOR_FUNCTION(FN) #define EXIT_BLOCK_PTR_FOR_FN(FN) EXIT_BLOCK_PTR_FOR_FUNCTION(FN) #define basic_block_info_for_fn(FN) ((FN)->cfg->x_basic_block_info) #define n_basic_blocks_for_fn(FN) ((FN)->cfg->x_n_basic_blocks) #define n_edges_for_fn(FN) ((FN)->cfg->x_n_edges) #define last_basic_block_for_fn(FN) ((FN)->cfg->x_last_basic_block) #define label_to_block_map_for_fn(FN) ((FN)->cfg->x_label_to_block_map) #define profile_status_for_fn(FN) ((FN)->cfg->x_profile_status) #define BASIC_BLOCK_FOR_FN(FN, N) BASIC_BLOCK_FOR_FUNCTION((FN), (N)) #define NODE_IMPLICIT_ALIAS(node) (node)->same_body_alias #define VAR_P(NODE) (TREE_CODE(NODE) == VAR_DECL) static inline bool tree_fits_shwi_p(const_tree t) { if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST) return false; if (TREE_INT_CST_HIGH(t) == 0 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) >= 0) return true; if (TREE_INT_CST_HIGH(t) == -1 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) < 0 && !TYPE_UNSIGNED(TREE_TYPE(t))) return true; return false; } static inline bool tree_fits_uhwi_p(const_tree t) { if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST) return false; return TREE_INT_CST_HIGH(t) == 0; } static inline HOST_WIDE_INT tree_to_shwi(const_tree t) { gcc_assert(tree_fits_shwi_p(t)); return TREE_INT_CST_LOW(t); } static inline unsigned HOST_WIDE_INT tree_to_uhwi(const_tree t) { gcc_assert(tree_fits_uhwi_p(t)); return TREE_INT_CST_LOW(t); } static inline const char *get_tree_code_name(enum tree_code code) { gcc_assert(code < MAX_TREE_CODES); return tree_code_name[code]; } #define ipa_remove_stmt_references(cnode, stmt) typedef union gimple_statement_d gasm; typedef union gimple_statement_d gassign; typedef union gimple_statement_d gcall; typedef union gimple_statement_d gcond; typedef union gimple_statement_d gdebug; typedef union gimple_statement_d ggoto; typedef union gimple_statement_d gphi; typedef union gimple_statement_d greturn; static inline gasm *as_a_gasm(gimple stmt) { return stmt; } static inline const gasm *as_a_const_gasm(const_gimple stmt) { return stmt; } static inline gassign *as_a_gassign(gimple stmt) { return stmt; } static inline const gassign *as_a_const_gassign(const_gimple stmt) { return stmt; } static inline gcall *as_a_gcall(gimple stmt) { return stmt; } static inline const gcall *as_a_const_gcall(const_gimple stmt) { return stmt; } static inline gcond *as_a_gcond(gimple stmt) { return stmt; } static inline const gcond *as_a_const_gcond(const_gimple stmt) { return stmt; }