gcc-common.h 22 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916
  1. #ifndef GCC_COMMON_H_INCLUDED
  2. #define GCC_COMMON_H_INCLUDED
  3. #include "bversion.h"
  4. #if BUILDING_GCC_VERSION >= 6000
  5. #include "gcc-plugin.h"
  6. #else
  7. #include "plugin.h"
  8. #endif
  9. #include "plugin-version.h"
  10. #include "config.h"
  11. #include "system.h"
  12. #include "coretypes.h"
  13. #include "tm.h"
  14. #include "line-map.h"
  15. #include "input.h"
  16. #include "tree.h"
  17. #include "tree-inline.h"
  18. #include "version.h"
  19. #include "rtl.h"
  20. #include "tm_p.h"
  21. #include "flags.h"
  22. #include "hard-reg-set.h"
  23. #include "output.h"
  24. #include "except.h"
  25. #include "function.h"
  26. #include "toplev.h"
  27. #include "basic-block.h"
  28. #include "intl.h"
  29. #include "ggc.h"
  30. #include "timevar.h"
  31. #include "params.h"
  32. #if BUILDING_GCC_VERSION <= 4009
  33. #include "pointer-set.h"
  34. #else
  35. #include "hash-map.h"
  36. #endif
  37. #if BUILDING_GCC_VERSION >= 7000
  38. #include "memmodel.h"
  39. #endif
  40. #include "emit-rtl.h"
  41. #include "debug.h"
  42. #include "target.h"
  43. #include "langhooks.h"
  44. #include "cfgloop.h"
  45. #include "cgraph.h"
  46. #include "opts.h"
  47. #if BUILDING_GCC_VERSION == 4005
  48. #include <sys/mman.h>
  49. #endif
  50. #if BUILDING_GCC_VERSION >= 4007
  51. #include "tree-pretty-print.h"
  52. #include "gimple-pretty-print.h"
  53. #endif
  54. #if BUILDING_GCC_VERSION >= 4006
  55. #include "c-family/c-common.h"
  56. #else
  57. #include "c-common.h"
  58. #endif
  59. #if BUILDING_GCC_VERSION <= 4008
  60. #include "tree-flow.h"
  61. #else
  62. #include "tree-cfgcleanup.h"
  63. #include "tree-ssa-operands.h"
  64. #include "tree-into-ssa.h"
  65. #endif
  66. #if BUILDING_GCC_VERSION >= 4008
  67. #include "is-a.h"
  68. #endif
  69. #include "diagnostic.h"
  70. #include "tree-dump.h"
  71. #include "tree-pass.h"
  72. #include "predict.h"
  73. #include "ipa-utils.h"
  74. #if BUILDING_GCC_VERSION >= 4009
  75. #include "attribs.h"
  76. #include "varasm.h"
  77. #include "stor-layout.h"
  78. #include "internal-fn.h"
  79. #include "gimple-expr.h"
  80. #include "gimple-fold.h"
  81. #include "context.h"
  82. #include "tree-ssa-alias.h"
  83. #include "tree-ssa.h"
  84. #include "stringpool.h"
  85. #if BUILDING_GCC_VERSION >= 7000
  86. #include "tree-vrp.h"
  87. #endif
  88. #include "tree-ssanames.h"
  89. #include "print-tree.h"
  90. #include "tree-eh.h"
  91. #include "stmt.h"
  92. #include "gimplify.h"
  93. #endif
  94. #include "gimple.h"
  95. #if BUILDING_GCC_VERSION >= 4009
  96. #include "tree-ssa-operands.h"
  97. #include "tree-phinodes.h"
  98. #include "tree-cfg.h"
  99. #include "gimple-iterator.h"
  100. #include "gimple-ssa.h"
  101. #include "ssa-iterators.h"
  102. #endif
  103. #if BUILDING_GCC_VERSION >= 5000
  104. #include "builtins.h"
  105. #endif
  106. /* #include "expr.h" where are you... */
  107. extern rtx emit_move_insn(rtx x, rtx y);
  108. /* missing from basic_block.h... */
  109. extern void debug_dominance_info(enum cdi_direction dir);
  110. extern void debug_dominance_tree(enum cdi_direction dir, basic_block root);
  111. #if BUILDING_GCC_VERSION == 4006
  112. extern void debug_gimple_stmt(gimple);
  113. extern void debug_gimple_seq(gimple_seq);
  114. extern void print_gimple_seq(FILE *, gimple_seq, int, int);
  115. extern void print_gimple_stmt(FILE *, gimple, int, int);
  116. extern void print_gimple_expr(FILE *, gimple, int, int);
  117. extern void dump_gimple_stmt(pretty_printer *, gimple, int, int);
  118. #endif
  119. #define __unused __attribute__((__unused__))
  120. #define __visible __attribute__((visibility("default")))
  121. #define DECL_NAME_POINTER(node) IDENTIFIER_POINTER(DECL_NAME(node))
  122. #define DECL_NAME_LENGTH(node) IDENTIFIER_LENGTH(DECL_NAME(node))
  123. #define TYPE_NAME_POINTER(node) IDENTIFIER_POINTER(TYPE_NAME(node))
  124. #define TYPE_NAME_LENGTH(node) IDENTIFIER_LENGTH(TYPE_NAME(node))
  125. /* should come from c-tree.h if only it were installed for gcc 4.5... */
  126. #define C_TYPE_FIELDS_READONLY(TYPE) TREE_LANG_FLAG_1(TYPE)
  127. #if BUILDING_GCC_VERSION == 4005
  128. #define FOR_EACH_LOCAL_DECL(FUN, I, D) \
  129. for (tree vars = (FUN)->local_decls, (I) = 0; \
  130. vars && ((D) = TREE_VALUE(vars)); \
  131. vars = TREE_CHAIN(vars), (I)++)
  132. #define DECL_CHAIN(NODE) (TREE_CHAIN(DECL_MINIMAL_CHECK(NODE)))
  133. #define FOR_EACH_VEC_ELT(T, V, I, P) \
  134. for (I = 0; VEC_iterate(T, (V), (I), (P)); ++(I))
  135. #define TODO_rebuild_cgraph_edges 0
  136. #define SCOPE_FILE_SCOPE_P(EXP) (!(EXP))
  137. #ifndef O_BINARY
  138. #define O_BINARY 0
  139. #endif
  140. typedef struct varpool_node *varpool_node_ptr;
  141. static inline bool gimple_call_builtin_p(gimple stmt, enum built_in_function code)
  142. {
  143. tree fndecl;
  144. if (!is_gimple_call(stmt))
  145. return false;
  146. fndecl = gimple_call_fndecl(stmt);
  147. if (!fndecl || DECL_BUILT_IN_CLASS(fndecl) != BUILT_IN_NORMAL)
  148. return false;
  149. return DECL_FUNCTION_CODE(fndecl) == code;
  150. }
  151. static inline bool is_simple_builtin(tree decl)
  152. {
  153. if (decl && DECL_BUILT_IN_CLASS(decl) != BUILT_IN_NORMAL)
  154. return false;
  155. switch (DECL_FUNCTION_CODE(decl)) {
  156. /* Builtins that expand to constants. */
  157. case BUILT_IN_CONSTANT_P:
  158. case BUILT_IN_EXPECT:
  159. case BUILT_IN_OBJECT_SIZE:
  160. case BUILT_IN_UNREACHABLE:
  161. /* Simple register moves or loads from stack. */
  162. case BUILT_IN_RETURN_ADDRESS:
  163. case BUILT_IN_EXTRACT_RETURN_ADDR:
  164. case BUILT_IN_FROB_RETURN_ADDR:
  165. case BUILT_IN_RETURN:
  166. case BUILT_IN_AGGREGATE_INCOMING_ADDRESS:
  167. case BUILT_IN_FRAME_ADDRESS:
  168. case BUILT_IN_VA_END:
  169. case BUILT_IN_STACK_SAVE:
  170. case BUILT_IN_STACK_RESTORE:
  171. /* Exception state returns or moves registers around. */
  172. case BUILT_IN_EH_FILTER:
  173. case BUILT_IN_EH_POINTER:
  174. case BUILT_IN_EH_COPY_VALUES:
  175. return true;
  176. default:
  177. return false;
  178. }
  179. }
  180. static inline void add_local_decl(struct function *fun, tree d)
  181. {
  182. gcc_assert(TREE_CODE(d) == VAR_DECL);
  183. fun->local_decls = tree_cons(NULL_TREE, d, fun->local_decls);
  184. }
  185. #endif
  186. #if BUILDING_GCC_VERSION <= 4006
  187. #define ANY_RETURN_P(rtx) (GET_CODE(rtx) == RETURN)
  188. #define C_DECL_REGISTER(EXP) DECL_LANG_FLAG_4(EXP)
  189. #define EDGE_PRESERVE 0ULL
  190. #define HOST_WIDE_INT_PRINT_HEX_PURE "%" HOST_WIDE_INT_PRINT "x"
  191. #define flag_fat_lto_objects true
  192. #define get_random_seed(noinit) ({ \
  193. unsigned HOST_WIDE_INT seed; \
  194. sscanf(get_random_seed(noinit), "%" HOST_WIDE_INT_PRINT "x", &seed); \
  195. seed * seed; })
  196. #define int_const_binop(code, arg1, arg2) \
  197. int_const_binop((code), (arg1), (arg2), 0)
  198. static inline bool gimple_clobber_p(gimple s __unused)
  199. {
  200. return false;
  201. }
  202. static inline bool gimple_asm_clobbers_memory_p(const_gimple stmt)
  203. {
  204. unsigned i;
  205. for (i = 0; i < gimple_asm_nclobbers(stmt); i++) {
  206. tree op = gimple_asm_clobber_op(stmt, i);
  207. if (!strcmp(TREE_STRING_POINTER(TREE_VALUE(op)), "memory"))
  208. return true;
  209. }
  210. return false;
  211. }
  212. static inline tree builtin_decl_implicit(enum built_in_function fncode)
  213. {
  214. return implicit_built_in_decls[fncode];
  215. }
  216. static inline int ipa_reverse_postorder(struct cgraph_node **order)
  217. {
  218. return cgraph_postorder(order);
  219. }
  220. static inline struct cgraph_node *cgraph_create_node(tree decl)
  221. {
  222. return cgraph_node(decl);
  223. }
  224. static inline struct cgraph_node *cgraph_get_create_node(tree decl)
  225. {
  226. struct cgraph_node *node = cgraph_get_node(decl);
  227. return node ? node : cgraph_node(decl);
  228. }
  229. static inline bool cgraph_function_with_gimple_body_p(struct cgraph_node *node)
  230. {
  231. return node->analyzed && !node->thunk.thunk_p && !node->alias;
  232. }
  233. static inline struct cgraph_node *cgraph_first_function_with_gimple_body(void)
  234. {
  235. struct cgraph_node *node;
  236. for (node = cgraph_nodes; node; node = node->next)
  237. if (cgraph_function_with_gimple_body_p(node))
  238. return node;
  239. return NULL;
  240. }
  241. static inline struct cgraph_node *cgraph_next_function_with_gimple_body(struct cgraph_node *node)
  242. {
  243. for (node = node->next; node; node = node->next)
  244. if (cgraph_function_with_gimple_body_p(node))
  245. return node;
  246. return NULL;
  247. }
  248. static inline bool cgraph_for_node_and_aliases(cgraph_node_ptr node, bool (*callback)(cgraph_node_ptr, void *), void *data, bool include_overwritable)
  249. {
  250. cgraph_node_ptr alias;
  251. if (callback(node, data))
  252. return true;
  253. for (alias = node->same_body; alias; alias = alias->next) {
  254. if (include_overwritable || cgraph_function_body_availability(alias) > AVAIL_OVERWRITABLE)
  255. if (cgraph_for_node_and_aliases(alias, callback, data, include_overwritable))
  256. return true;
  257. }
  258. return false;
  259. }
  260. #define FOR_EACH_FUNCTION_WITH_GIMPLE_BODY(node) \
  261. for ((node) = cgraph_first_function_with_gimple_body(); (node); \
  262. (node) = cgraph_next_function_with_gimple_body(node))
  263. static inline void varpool_add_new_variable(tree decl)
  264. {
  265. varpool_finalize_decl(decl);
  266. }
  267. #endif
  268. #if BUILDING_GCC_VERSION <= 4007
  269. #define FOR_EACH_FUNCTION(node) \
  270. for (node = cgraph_nodes; node; node = node->next)
  271. #define FOR_EACH_VARIABLE(node) \
  272. for (node = varpool_nodes; node; node = node->next)
  273. #define PROP_loops 0
  274. #define NODE_SYMBOL(node) (node)
  275. #define NODE_DECL(node) (node)->decl
  276. #define INSN_LOCATION(INSN) RTL_LOCATION(INSN)
  277. #define vNULL NULL
  278. static inline int bb_loop_depth(const_basic_block bb)
  279. {
  280. return bb->loop_father ? loop_depth(bb->loop_father) : 0;
  281. }
  282. static inline bool gimple_store_p(gimple gs)
  283. {
  284. tree lhs = gimple_get_lhs(gs);
  285. return lhs && !is_gimple_reg(lhs);
  286. }
  287. static inline void gimple_init_singleton(gimple g __unused)
  288. {
  289. }
  290. #endif
  291. #if BUILDING_GCC_VERSION == 4007 || BUILDING_GCC_VERSION == 4008
  292. static inline struct cgraph_node *cgraph_alias_target(struct cgraph_node *n)
  293. {
  294. return cgraph_alias_aliased_node(n);
  295. }
  296. #endif
  297. #if BUILDING_GCC_VERSION >= 4007 && BUILDING_GCC_VERSION <= 4009
  298. #define cgraph_create_edge(caller, callee, call_stmt, count, freq, nest) \
  299. cgraph_create_edge((caller), (callee), (call_stmt), (count), (freq))
  300. #define cgraph_create_edge_including_clones(caller, callee, old_call_stmt, call_stmt, count, freq, nest, reason) \
  301. cgraph_create_edge_including_clones((caller), (callee), (old_call_stmt), (call_stmt), (count), (freq), (reason))
  302. #endif
  303. #if BUILDING_GCC_VERSION <= 4008
  304. #define ENTRY_BLOCK_PTR_FOR_FN(FN) ENTRY_BLOCK_PTR_FOR_FUNCTION(FN)
  305. #define EXIT_BLOCK_PTR_FOR_FN(FN) EXIT_BLOCK_PTR_FOR_FUNCTION(FN)
  306. #define basic_block_info_for_fn(FN) ((FN)->cfg->x_basic_block_info)
  307. #define n_basic_blocks_for_fn(FN) ((FN)->cfg->x_n_basic_blocks)
  308. #define n_edges_for_fn(FN) ((FN)->cfg->x_n_edges)
  309. #define last_basic_block_for_fn(FN) ((FN)->cfg->x_last_basic_block)
  310. #define label_to_block_map_for_fn(FN) ((FN)->cfg->x_label_to_block_map)
  311. #define profile_status_for_fn(FN) ((FN)->cfg->x_profile_status)
  312. #define BASIC_BLOCK_FOR_FN(FN, N) BASIC_BLOCK_FOR_FUNCTION((FN), (N))
  313. #define NODE_IMPLICIT_ALIAS(node) (node)->same_body_alias
  314. #define VAR_P(NODE) (TREE_CODE(NODE) == VAR_DECL)
  315. static inline bool tree_fits_shwi_p(const_tree t)
  316. {
  317. if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST)
  318. return false;
  319. if (TREE_INT_CST_HIGH(t) == 0 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) >= 0)
  320. return true;
  321. if (TREE_INT_CST_HIGH(t) == -1 && (HOST_WIDE_INT)TREE_INT_CST_LOW(t) < 0 && !TYPE_UNSIGNED(TREE_TYPE(t)))
  322. return true;
  323. return false;
  324. }
  325. static inline bool tree_fits_uhwi_p(const_tree t)
  326. {
  327. if (t == NULL_TREE || TREE_CODE(t) != INTEGER_CST)
  328. return false;
  329. return TREE_INT_CST_HIGH(t) == 0;
  330. }
  331. static inline HOST_WIDE_INT tree_to_shwi(const_tree t)
  332. {
  333. gcc_assert(tree_fits_shwi_p(t));
  334. return TREE_INT_CST_LOW(t);
  335. }
  336. static inline unsigned HOST_WIDE_INT tree_to_uhwi(const_tree t)
  337. {
  338. gcc_assert(tree_fits_uhwi_p(t));
  339. return TREE_INT_CST_LOW(t);
  340. }
  341. static inline const char *get_tree_code_name(enum tree_code code)
  342. {
  343. gcc_assert(code < MAX_TREE_CODES);
  344. return tree_code_name[code];
  345. }
  346. #define ipa_remove_stmt_references(cnode, stmt)
  347. typedef union gimple_statement_d gasm;
  348. typedef union gimple_statement_d gassign;
  349. typedef union gimple_statement_d gcall;
  350. typedef union gimple_statement_d gcond;
  351. typedef union gimple_statement_d gdebug;
  352. typedef union gimple_statement_d ggoto;
  353. typedef union gimple_statement_d gphi;
  354. typedef union gimple_statement_d greturn;
  355. static inline gasm *as_a_gasm(gimple stmt)
  356. {
  357. return stmt;
  358. }
  359. static inline const gasm *as_a_const_gasm(const_gimple stmt)
  360. {
  361. return stmt;
  362. }
  363. static inline gassign *as_a_gassign(gimple stmt)
  364. {
  365. return stmt;
  366. }
  367. static inline const gassign *as_a_const_gassign(const_gimple stmt)
  368. {
  369. return stmt;
  370. }
  371. static inline gcall *as_a_gcall(gimple stmt)
  372. {
  373. return stmt;
  374. }
  375. static inline const gcall *as_a_const_gcall(const_gimple stmt)
  376. {
  377. return stmt;
  378. }
  379. static inline gcond *as_a_gcond(gimple stmt)
  380. {
  381. return stmt;
  382. }
  383. static inline const gcond *as_a_const_gcond(const_gimple stmt)
  384. {
  385. return stmt;
  386. }
  387. static inline gdebug *as_a_gdebug(gimple stmt)
  388. {
  389. return stmt;
  390. }
  391. static inline const gdebug *as_a_const_gdebug(const_gimple stmt)
  392. {
  393. return stmt;
  394. }
  395. static inline ggoto *as_a_ggoto(gimple stmt)
  396. {
  397. return stmt;
  398. }
  399. static inline const ggoto *as_a_const_ggoto(const_gimple stmt)
  400. {
  401. return stmt;
  402. }
  403. static inline gphi *as_a_gphi(gimple stmt)
  404. {
  405. return stmt;
  406. }
  407. static inline const gphi *as_a_const_gphi(const_gimple stmt)
  408. {
  409. return stmt;
  410. }
  411. static inline greturn *as_a_greturn(gimple stmt)
  412. {
  413. return stmt;
  414. }
  415. static inline const greturn *as_a_const_greturn(const_gimple stmt)
  416. {
  417. return stmt;
  418. }
  419. #endif
  420. #if BUILDING_GCC_VERSION == 4008
  421. #define NODE_SYMBOL(node) (&(node)->symbol)
  422. #define NODE_DECL(node) (node)->symbol.decl
  423. #endif
  424. #if BUILDING_GCC_VERSION >= 4008
  425. #define add_referenced_var(var)
  426. #define mark_sym_for_renaming(var)
  427. #define varpool_mark_needed_node(node)
  428. #define create_var_ann(var)
  429. #define TODO_dump_func 0
  430. #define TODO_dump_cgraph 0
  431. #endif
  432. #if BUILDING_GCC_VERSION <= 4009
  433. #define TODO_verify_il 0
  434. #define AVAIL_INTERPOSABLE AVAIL_OVERWRITABLE
  435. #define section_name_prefix LTO_SECTION_NAME_PREFIX
  436. #define fatal_error(loc, gmsgid, ...) fatal_error((gmsgid), __VA_ARGS__)
  437. typedef struct rtx_def rtx_insn;
  438. static inline const char *get_decl_section_name(const_tree decl)
  439. {
  440. if (DECL_SECTION_NAME(decl) == NULL_TREE)
  441. return NULL;
  442. return TREE_STRING_POINTER(DECL_SECTION_NAME(decl));
  443. }
  444. static inline void set_decl_section_name(tree node, const char *value)
  445. {
  446. if (value)
  447. DECL_SECTION_NAME(node) = build_string(strlen(value) + 1, value);
  448. else
  449. DECL_SECTION_NAME(node) = NULL;
  450. }
  451. #endif
  452. #if BUILDING_GCC_VERSION == 4009
  453. typedef struct gimple_statement_asm gasm;
  454. typedef struct gimple_statement_base gassign;
  455. typedef struct gimple_statement_call gcall;
  456. typedef struct gimple_statement_base gcond;
  457. typedef struct gimple_statement_base gdebug;
  458. typedef struct gimple_statement_base ggoto;
  459. typedef struct gimple_statement_phi gphi;
  460. typedef struct gimple_statement_base greturn;
  461. static inline gasm *as_a_gasm(gimple stmt)
  462. {
  463. return as_a<gasm>(stmt);
  464. }
  465. static inline const gasm *as_a_const_gasm(const_gimple stmt)
  466. {
  467. return as_a<const gasm>(stmt);
  468. }
  469. static inline gassign *as_a_gassign(gimple stmt)
  470. {
  471. return stmt;
  472. }
  473. static inline const gassign *as_a_const_gassign(const_gimple stmt)
  474. {
  475. return stmt;
  476. }
  477. static inline gcall *as_a_gcall(gimple stmt)
  478. {
  479. return as_a<gcall>(stmt);
  480. }
  481. static inline const gcall *as_a_const_gcall(const_gimple stmt)
  482. {
  483. return as_a<const gcall>(stmt);
  484. }
  485. static inline gcond *as_a_gcond(gimple stmt)
  486. {
  487. return stmt;
  488. }
  489. static inline const gcond *as_a_const_gcond(const_gimple stmt)
  490. {
  491. return stmt;
  492. }
  493. static inline gdebug *as_a_gdebug(gimple stmt)
  494. {
  495. return stmt;
  496. }
  497. static inline const gdebug *as_a_const_gdebug(const_gimple stmt)
  498. {
  499. return stmt;
  500. }
  501. static inline ggoto *as_a_ggoto(gimple stmt)
  502. {
  503. return stmt;
  504. }
  505. static inline const ggoto *as_a_const_ggoto(const_gimple stmt)
  506. {
  507. return stmt;
  508. }
  509. static inline gphi *as_a_gphi(gimple stmt)
  510. {
  511. return as_a<gphi>(stmt);
  512. }
  513. static inline const gphi *as_a_const_gphi(const_gimple stmt)
  514. {
  515. return as_a<const gphi>(stmt);
  516. }
  517. static inline greturn *as_a_greturn(gimple stmt)
  518. {
  519. return stmt;
  520. }
  521. static inline const greturn *as_a_const_greturn(const_gimple stmt)
  522. {
  523. return stmt;
  524. }
  525. #endif
  526. #if BUILDING_GCC_VERSION >= 4009
  527. #define TODO_ggc_collect 0
  528. #define NODE_SYMBOL(node) (node)
  529. #define NODE_DECL(node) (node)->decl
  530. #define cgraph_node_name(node) (node)->name()
  531. #define NODE_IMPLICIT_ALIAS(node) (node)->cpp_implicit_alias
  532. #endif
  533. #if BUILDING_GCC_VERSION >= 5000 && BUILDING_GCC_VERSION < 6000
  534. /* gimple related */
  535. template <>
  536. template <>
  537. inline bool is_a_helper<const gassign *>::test(const_gimple gs)
  538. {
  539. return gs->code == GIMPLE_ASSIGN;
  540. }
  541. #endif
  542. #if BUILDING_GCC_VERSION >= 5000
  543. #define TODO_verify_ssa TODO_verify_il
  544. #define TODO_verify_flow TODO_verify_il
  545. #define TODO_verify_stmts TODO_verify_il
  546. #define TODO_verify_rtl_sharing TODO_verify_il
  547. #define INSN_DELETED_P(insn) (insn)->deleted()
  548. static inline const char *get_decl_section_name(const_tree decl)
  549. {
  550. return DECL_SECTION_NAME(decl);
  551. }
  552. /* symtab/cgraph related */
  553. #define debug_cgraph_node(node) (node)->debug()
  554. #define cgraph_get_node(decl) cgraph_node::get(decl)
  555. #define cgraph_get_create_node(decl) cgraph_node::get_create(decl)
  556. #define cgraph_create_node(decl) cgraph_node::create(decl)
  557. #define cgraph_n_nodes symtab->cgraph_count
  558. #define cgraph_max_uid symtab->cgraph_max_uid
  559. #define varpool_get_node(decl) varpool_node::get(decl)
  560. #define dump_varpool_node(file, node) (node)->dump(file)
  561. #define cgraph_create_edge(caller, callee, call_stmt, count, freq, nest) \
  562. (caller)->create_edge((callee), (call_stmt), (count), (freq))
  563. #define cgraph_create_edge_including_clones(caller, callee, old_call_stmt, call_stmt, count, freq, nest, reason) \
  564. (caller)->create_edge_including_clones((callee), (old_call_stmt), (call_stmt), (count), (freq), (reason))
  565. typedef struct cgraph_node *cgraph_node_ptr;
  566. typedef struct cgraph_edge *cgraph_edge_p;
  567. typedef struct varpool_node *varpool_node_ptr;
  568. static inline void change_decl_assembler_name(tree decl, tree name)
  569. {
  570. symtab->change_decl_assembler_name(decl, name);
  571. }
  572. static inline void varpool_finalize_decl(tree decl)
  573. {
  574. varpool_node::finalize_decl(decl);
  575. }
  576. static inline void varpool_add_new_variable(tree decl)
  577. {
  578. varpool_node::add(decl);
  579. }
  580. static inline unsigned int rebuild_cgraph_edges(void)
  581. {
  582. return cgraph_edge::rebuild_edges();
  583. }
  584. static inline cgraph_node_ptr cgraph_function_node(cgraph_node_ptr node, enum availability *availability)
  585. {
  586. return node->function_symbol(availability);
  587. }
  588. static inline cgraph_node_ptr cgraph_function_or_thunk_node(cgraph_node_ptr node, enum availability *availability = NULL)
  589. {
  590. return node->ultimate_alias_target(availability);
  591. }
  592. static inline bool cgraph_only_called_directly_p(cgraph_node_ptr node)
  593. {
  594. return node->only_called_directly_p();
  595. }
  596. static inline enum availability cgraph_function_body_availability(cgraph_node_ptr node)
  597. {
  598. return node->get_availability();
  599. }
  600. static inline cgraph_node_ptr cgraph_alias_target(cgraph_node_ptr node)
  601. {
  602. return node->get_alias_target();
  603. }
  604. static inline bool cgraph_for_node_and_aliases(cgraph_node_ptr node, bool (*callback)(cgraph_node_ptr, void *), void *data, bool include_overwritable)
  605. {
  606. return node->call_for_symbol_thunks_and_aliases(callback, data, include_overwritable);
  607. }
  608. static inline struct cgraph_node_hook_list *cgraph_add_function_insertion_hook(cgraph_node_hook hook, void *data)
  609. {
  610. return symtab->add_cgraph_insertion_hook(hook, data);
  611. }
  612. static inline void cgraph_remove_function_insertion_hook(struct cgraph_node_hook_list *entry)
  613. {
  614. symtab->remove_cgraph_insertion_hook(entry);
  615. }
  616. static inline struct cgraph_node_hook_list *cgraph_add_node_removal_hook(cgraph_node_hook hook, void *data)
  617. {
  618. return symtab->add_cgraph_removal_hook(hook, data);
  619. }
  620. static inline void cgraph_remove_node_removal_hook(struct cgraph_node_hook_list *entry)
  621. {
  622. symtab->remove_cgraph_removal_hook(entry);
  623. }
  624. static inline struct cgraph_2node_hook_list *cgraph_add_node_duplication_hook(cgraph_2node_hook hook, void *data)
  625. {
  626. return symtab->add_cgraph_duplication_hook(hook, data);
  627. }
  628. static inline void cgraph_remove_node_duplication_hook(struct cgraph_2node_hook_list *entry)
  629. {
  630. symtab->remove_cgraph_duplication_hook(entry);
  631. }
  632. static inline void cgraph_call_node_duplication_hooks(cgraph_node_ptr node, cgraph_node_ptr node2)
  633. {
  634. symtab->call_cgraph_duplication_hooks(node, node2);
  635. }
  636. static inline void cgraph_call_edge_duplication_hooks(cgraph_edge *cs1, cgraph_edge *cs2)
  637. {
  638. symtab->call_edge_duplication_hooks(cs1, cs2);
  639. }
  640. #if BUILDING_GCC_VERSION >= 6000
  641. typedef gimple *gimple_ptr;
  642. typedef const gimple *const_gimple_ptr;
  643. #define gimple gimple_ptr
  644. #define const_gimple const_gimple_ptr
  645. #undef CONST_CAST_GIMPLE
  646. #define CONST_CAST_GIMPLE(X) CONST_CAST(gimple, (X))
  647. #endif
  648. /* gimple related */
  649. static inline gimple gimple_build_assign_with_ops(enum tree_code subcode, tree lhs, tree op1, tree op2 MEM_STAT_DECL)
  650. {
  651. return gimple_build_assign(lhs, subcode, op1, op2 PASS_MEM_STAT);
  652. }
  653. template <>
  654. template <>
  655. inline bool is_a_helper<const ggoto *>::test(const_gimple gs)
  656. {
  657. return gs->code == GIMPLE_GOTO;
  658. }
  659. template <>
  660. template <>
  661. inline bool is_a_helper<const greturn *>::test(const_gimple gs)
  662. {
  663. return gs->code == GIMPLE_RETURN;
  664. }
  665. static inline gasm *as_a_gasm(gimple stmt)
  666. {
  667. return as_a<gasm *>(stmt);
  668. }
  669. static inline const gasm *as_a_const_gasm(const_gimple stmt)
  670. {
  671. return as_a<const gasm *>(stmt);
  672. }
  673. static inline gassign *as_a_gassign(gimple stmt)
  674. {
  675. return as_a<gassign *>(stmt);
  676. }
  677. static inline const gassign *as_a_const_gassign(const_gimple stmt)
  678. {
  679. return as_a<const gassign *>(stmt);
  680. }
  681. static inline gcall *as_a_gcall(gimple stmt)
  682. {
  683. return as_a<gcall *>(stmt);
  684. }
  685. static inline const gcall *as_a_const_gcall(const_gimple stmt)
  686. {
  687. return as_a<const gcall *>(stmt);
  688. }
  689. static inline ggoto *as_a_ggoto(gimple stmt)
  690. {
  691. return as_a<ggoto *>(stmt);
  692. }
  693. static inline const ggoto *as_a_const_ggoto(const_gimple stmt)
  694. {
  695. return as_a<const ggoto *>(stmt);
  696. }
  697. static inline gphi *as_a_gphi(gimple stmt)
  698. {
  699. return as_a<gphi *>(stmt);
  700. }
  701. static inline const gphi *as_a_const_gphi(const_gimple stmt)
  702. {
  703. return as_a<const gphi *>(stmt);
  704. }
  705. static inline greturn *as_a_greturn(gimple stmt)
  706. {
  707. return as_a<greturn *>(stmt);
  708. }
  709. static inline const greturn *as_a_const_greturn(const_gimple stmt)
  710. {
  711. return as_a<const greturn *>(stmt);
  712. }
  713. /* IPA/LTO related */
  714. #define ipa_ref_list_referring_iterate(L, I, P) \
  715. (L)->referring.iterate((I), &(P))
  716. #define ipa_ref_list_reference_iterate(L, I, P) \
  717. (L)->reference.iterate((I), &(P))
  718. static inline cgraph_node_ptr ipa_ref_referring_node(struct ipa_ref *ref)
  719. {
  720. return dyn_cast<cgraph_node_ptr>(ref->referring);
  721. }
  722. static inline void ipa_remove_stmt_references(symtab_node *referring_node, gimple stmt)
  723. {
  724. referring_node->remove_stmt_references(stmt);
  725. }
  726. #endif
  727. #if BUILDING_GCC_VERSION < 6000
  728. #define get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, preversep, pvolatilep, keep_aligning) \
  729. get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, pvolatilep, keep_aligning)
  730. #define gen_rtx_set(ARG0, ARG1) gen_rtx_SET(VOIDmode, (ARG0), (ARG1))
  731. #endif
  732. #if BUILDING_GCC_VERSION >= 6000
  733. #define gen_rtx_set(ARG0, ARG1) gen_rtx_SET((ARG0), (ARG1))
  734. #endif
  735. #ifdef __cplusplus
  736. static inline void debug_tree(const_tree t)
  737. {
  738. debug_tree(CONST_CAST_TREE(t));
  739. }
  740. static inline void debug_gimple_stmt(const_gimple s)
  741. {
  742. debug_gimple_stmt(CONST_CAST_GIMPLE(s));
  743. }
  744. #else
  745. #define debug_tree(t) debug_tree(CONST_CAST_TREE(t))
  746. #define debug_gimple_stmt(s) debug_gimple_stmt(CONST_CAST_GIMPLE(s))
  747. #endif
  748. #if BUILDING_GCC_VERSION >= 7000
  749. #define get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, preversep, pvolatilep, keep_aligning) \
  750. get_inner_reference(exp, pbitsize, pbitpos, poffset, pmode, punsignedp, preversep, pvolatilep)
  751. #endif
  752. #endif