Fix issue for pointers to anonymous types with -fdump-ada-spec
[official-gcc.git] / gcc / tree-ssa.h
blob008535454a88cc96f42e7107815fcf674e402791
1 /* Header file for any pass which requires SSA routines.
2 Copyright (C) 2013-2022 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it under
7 the terms of the GNU General Public License as published by the Free
8 Software Foundation; either version 3, or (at your option) any later
9 version.
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 for more details.
16 You should have received a copy of the GNU General Public License
17 along with GCC; see the file COPYING3. If not see
18 <http://www.gnu.org/licenses/>. */
20 #ifndef GCC_TREE_SSA_H
21 #define GCC_TREE_SSA_H
23 /* Mapping for redirected edges. */
24 struct edge_var_map {
25 tree result; /* PHI result. */
26 tree def; /* PHI arg definition. */
27 location_t locus; /* PHI arg location. */
30 /* A vector of var maps. */
31 typedef vec<edge_var_map, va_heap, vl_embed> edge_var_map_vector;
34 extern void redirect_edge_var_map_add (edge, tree, tree, location_t);
35 extern void redirect_edge_var_map_clear (edge);
36 extern void redirect_edge_var_map_dup (edge, edge);
37 extern vec<edge_var_map> *redirect_edge_var_map_vector (edge);
38 extern void redirect_edge_var_map_empty (void);
39 extern edge ssa_redirect_edge (edge, basic_block);
40 extern void flush_pending_stmts (edge);
41 extern void gimple_replace_ssa_lhs (gimple *, tree);
42 extern tree target_for_debug_bind (tree);
43 extern void insert_debug_temp_for_var_def (gimple_stmt_iterator *, tree);
44 extern void insert_debug_temps_for_defs (gimple_stmt_iterator *);
45 extern void reset_debug_uses (gimple *);
46 extern void release_defs_bitset (bitmap toremove);
47 extern void verify_ssa (bool, bool);
48 extern void init_tree_ssa (function *, int size = 0);
49 extern void delete_tree_ssa (function *);
50 extern bool tree_ssa_useless_type_conversion (tree);
51 extern tree tree_ssa_strip_useless_type_conversions (tree);
52 extern tree find_released_ssa_name (tree *, int *, void *);
55 extern bool ssa_defined_default_def_p (tree t);
56 extern bool ssa_undefined_value_p (tree, bool = true);
57 extern bool gimple_uses_undefined_value_p (gimple *);
58 extern void execute_update_addresses_taken (void);
60 /* Given an edge_var_map V, return the PHI arg definition. */
62 static inline tree
63 redirect_edge_var_map_def (edge_var_map *v)
65 return v->def;
68 /* Given an edge_var_map V, return the PHI result. */
70 static inline tree
71 redirect_edge_var_map_result (edge_var_map *v)
73 return v->result;
76 /* Given an edge_var_map V, return the PHI arg location. */
78 static inline location_t
79 redirect_edge_var_map_location (edge_var_map *v)
81 return v->locus;
84 /* Verify SSA invariants, if internal consistency checks are enabled. */
86 static inline void
87 checking_verify_ssa (bool check_modified_stmt, bool check_ssa_operands)
89 if (flag_checking)
90 verify_ssa (check_modified_stmt, check_ssa_operands);
93 #endif /* GCC_TREE_SSA_H */