[Ada] Fix deleted Compile_Time warnings causing crashes
[official-gcc.git] / gcc / tree-affine.h
blob54a324e18dc6e87a27777b4e45da6c7477a3920c
1 /* Operations with affine combinations of trees.
2 Copyright (C) 2005-2021 Free Software Foundation, Inc.
4 This file is part of GCC.
6 GCC is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 3, or (at your option) any
9 later version.
11 GCC is distributed in the hope that it will be useful, but WITHOUT
12 ANY 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 /* Affine combination of trees. We keep track of at most MAX_AFF_ELTS elements
21 to make things simpler; this is sufficient in most cases. */
23 #ifndef GCC_TREE_AFFINE_H
24 #define GCC_TREE_AFFINE_H
27 #define MAX_AFF_ELTS 8
29 /* Element of an affine combination. */
31 class aff_comb_elt
33 public:
34 /* The value of the element. */
35 tree val;
37 /* Its coefficient in the combination. */
38 widest_int coef;
41 class aff_tree
43 public:
44 /* Type of the result of the combination. */
45 tree type;
47 /* Constant offset. */
48 poly_widest_int offset;
50 /* Number of elements of the combination. */
51 unsigned n;
53 /* Elements and their coefficients. Type of elements may be different from
54 TYPE, but their sizes must be the same (STRIP_NOPS is applied to the
55 elements).
57 The coefficients are always sign extended from the precision of TYPE
58 (regardless of signedness of TYPE). */
59 class aff_comb_elt elts[MAX_AFF_ELTS];
61 /* Remainder of the expression. Usually NULL, used only if there are more
62 than MAX_AFF_ELTS elements. Type of REST will be either sizetype for
63 TYPE of POINTER_TYPEs or TYPE. */
64 tree rest;
67 class name_expansion;
69 void aff_combination_const (aff_tree *, tree, const poly_widest_int &);
70 void aff_combination_elt (aff_tree *, tree, tree);
71 void aff_combination_scale (aff_tree *, const widest_int &);
72 void aff_combination_mult (aff_tree *, aff_tree *, aff_tree *);
73 void aff_combination_add (aff_tree *, aff_tree *);
74 void aff_combination_add_elt (aff_tree *, tree, const widest_int &);
75 void aff_combination_remove_elt (aff_tree *, unsigned);
76 void aff_combination_convert (aff_tree *, tree);
77 void tree_to_aff_combination (tree, tree, aff_tree *);
78 tree aff_combination_to_tree (aff_tree *);
79 void unshare_aff_combination (aff_tree *);
80 bool aff_combination_constant_multiple_p (aff_tree *, aff_tree *,
81 poly_widest_int *);
82 void aff_combination_expand (aff_tree *, hash_map<tree, name_expansion *> **);
83 void tree_to_aff_combination_expand (tree, tree, aff_tree *,
84 hash_map<tree, name_expansion *> **);
85 tree get_inner_reference_aff (tree, aff_tree *, poly_widest_int *);
86 void free_affine_expand_cache (hash_map<tree, name_expansion *> **);
87 bool aff_comb_cannot_overlap_p (aff_tree *, const poly_widest_int &,
88 const poly_widest_int &);
90 /* Debugging functions. */
91 void debug_aff (aff_tree *);
93 /* Return AFF's type. */
94 inline tree
95 aff_combination_type (aff_tree *aff)
97 return aff->type;
100 /* Return true if AFF is actually ZERO. */
101 inline bool
102 aff_combination_zero_p (aff_tree *aff)
104 if (!aff)
105 return true;
107 if (aff->n == 0 && known_eq (aff->offset, 0))
108 return true;
110 return false;
113 /* Return true if AFF is actually const. */
114 inline bool
115 aff_combination_const_p (aff_tree *aff)
117 return (aff == NULL || aff->n == 0);
120 /* Return true iff AFF contains one (negated) singleton variable. Users need
121 to make sure AFF points to a valid combination. */
122 inline bool
123 aff_combination_singleton_var_p (aff_tree *aff)
125 return (aff->n == 1
126 && known_eq (aff->offset, 0)
127 && (aff->elts[0].coef == 1 || aff->elts[0].coef == -1));
129 #endif /* GCC_TREE_AFFINE_H */