diff options
author | Andrew MacLeod <amacleod@redhat.com> | 2023-06-09 13:43:12 -0400 |
---|---|---|
committer | Andrew MacLeod <amacleod@redhat.com> | 2023-06-09 20:33:03 -0400 |
commit | 56518befc2663ddc082e34dddd66b6334a3d4da5 (patch) | |
tree | 214c4958b470b252d48016ef10c450a9fe0ed544 /gcc | |
parent | d5818a361779e19b9c17295c6a014c4145c73937 (diff) | |
download | gcc-56518befc2663ddc082e34dddd66b6334a3d4da5.zip gcc-56518befc2663ddc082e34dddd66b6334a3d4da5.tar.gz gcc-56518befc2663ddc082e34dddd66b6334a3d4da5.tar.bz2 |
Unify NEGATE_EXPR range operator
Move the declaration of the class to the range-op-mixed header, add the
floating point prototypes as well, and use it in the new unified table.
* range-op-float.cc (foperator_negate): Remove. Move prototypes
to range-op-mixed.h
(operator_negate::fold_range): Rename from foperator_negate.
(operator_negate::op1_range): Ditto.
(float_table::float_table): Remove NEGATE_EXPR.
* range-op-mixed.h (class operator_negate): Combined from integer
and float files.
* range-op.cc (op_negate): New object.
(unified_table::unified_table): Add NEGATE_EXPR.
(class operator_negate): Move to range-op-mixed.h.
(integral_table::integral_table): Remove NEGATE_EXPR.
(pointer_table::pointer_table): Remove NEGATE_EXPR.
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/range-op-float.cc | 86 | ||||
-rw-r--r-- | gcc/range-op-mixed.h | 20 | ||||
-rw-r--r-- | gcc/range-op.cc | 18 |
3 files changed, 63 insertions, 61 deletions
diff --git a/gcc/range-op-float.cc b/gcc/range-op-float.cc index db76dd5..20b4b9f 100644 --- a/gcc/range-op-float.cc +++ b/gcc/range-op-float.cc @@ -1295,51 +1295,48 @@ foperator_ordered::op1_range (frange &r, tree type, return true; } -class foperator_negate : public range_operator +bool +operator_negate::fold_range (frange &r, tree type, + const frange &op1, const frange &op2, + relation_trio) const { - using range_operator::fold_range; - using range_operator::op1_range; -public: - bool fold_range (frange &r, tree type, - const frange &op1, const frange &op2, - relation_trio = TRIO_VARYING) const final override - { - if (empty_range_varying (r, type, op1, op2)) + if (empty_range_varying (r, type, op1, op2)) + return true; + if (op1.known_isnan ()) + { + bool sign; + if (op1.nan_signbit_p (sign)) + r.set_nan (type, !sign); + else + r.set_nan (type); return true; - if (op1.known_isnan ()) - { - bool sign; - if (op1.nan_signbit_p (sign)) - r.set_nan (type, !sign); - else - r.set_nan (type); - return true; - } + } - REAL_VALUE_TYPE lh_lb = op1.lower_bound (); - REAL_VALUE_TYPE lh_ub = op1.upper_bound (); - lh_lb = real_value_negate (&lh_lb); - lh_ub = real_value_negate (&lh_ub); - r.set (type, lh_ub, lh_lb); - if (op1.maybe_isnan ()) - { - bool sign; - if (op1.nan_signbit_p (sign)) - r.update_nan (!sign); - else - r.update_nan (); - } - else - r.clear_nan (); - return true; - } - bool op1_range (frange &r, tree type, - const frange &lhs, const frange &op2, - relation_trio rel = TRIO_VARYING) const final override - { - return fold_range (r, type, lhs, op2, rel); - } -} fop_negate; + REAL_VALUE_TYPE lh_lb = op1.lower_bound (); + REAL_VALUE_TYPE lh_ub = op1.upper_bound (); + lh_lb = real_value_negate (&lh_lb); + lh_ub = real_value_negate (&lh_ub); + r.set (type, lh_ub, lh_lb); + if (op1.maybe_isnan ()) + { + bool sign; + if (op1.nan_signbit_p (sign)) + r.update_nan (!sign); + else + r.update_nan (); + } + else + r.clear_nan (); + return true; +} + +bool +operator_negate::op1_range (frange &r, tree type, + const frange &lhs, const frange &op2, + relation_trio rel) const +{ + return fold_range (r, type, lhs, op2, rel); +} bool operator_abs::fold_range (frange &r, tree type, @@ -2674,7 +2671,6 @@ private: float_table::float_table () { - set (NEGATE_EXPR, fop_negate); set (MULT_EXPR, fop_mult); } @@ -2719,13 +2715,13 @@ range_op_float_tests () // negate([-5, +10]) => [-10, 5] r0 = frange_float ("-5", "10"); - fop_negate.fold_range (r, float_type_node, r0, trange); + range_op_handler (NEGATE_EXPR).fold_range (r, float_type_node, r0, trange); ASSERT_EQ (r, frange_float ("-10", "5")); // negate([0, 1] -NAN) => [-1, -0] +NAN r0 = frange_float ("0", "1"); r0.update_nan (true); - fop_negate.fold_range (r, float_type_node, r0, trange); + range_op_handler (NEGATE_EXPR).fold_range (r, float_type_node, r0, trange); r1 = frange_float ("-1", "-0"); r1.update_nan (false); ASSERT_EQ (r, r1); diff --git a/gcc/range-op-mixed.h b/gcc/range-op-mixed.h index 520ec19..598825a 100644 --- a/gcc/range-op-mixed.h +++ b/gcc/range-op-mixed.h @@ -430,4 +430,24 @@ private: const REAL_VALUE_TYPE &rh_lb, const REAL_VALUE_TYPE &rh_ub, relation_kind) const final override; }; + +class operator_negate : public range_operator +{ + public: + using range_operator::fold_range; + using range_operator::op1_range; + bool fold_range (irange &r, tree type, + const irange &op1, const irange &op2, + relation_trio rel = TRIO_VARYING) const final override; + bool fold_range (frange &r, tree type, + const frange &op1, const frange &op2, + relation_trio = TRIO_VARYING) const final override; + + bool op1_range (irange &r, tree type, + const irange &lhs, const irange &op2, + relation_trio rel = TRIO_VARYING) const final override; + bool op1_range (frange &r, tree type, + const frange &lhs, const frange &op2, + relation_trio rel = TRIO_VARYING) const final override; +}; #endif // GCC_RANGE_OP_MIXED_H diff --git a/gcc/range-op.cc b/gcc/range-op.cc index 2094479..539036d 100644 --- a/gcc/range-op.cc +++ b/gcc/range-op.cc @@ -74,6 +74,7 @@ operator_cast op_cast; operator_plus op_plus; operator_abs op_abs; operator_minus op_minus; +operator_negate op_negate; // Invoke the initialization routines for each class of range. @@ -99,6 +100,7 @@ unified_table::unified_table () set (PLUS_EXPR, op_plus); set (ABS_EXPR, op_abs); set (MINUS_EXPR, op_minus); + set (NEGATE_EXPR, op_negate); } // The tables are hidden and accessed via a simple extern function. @@ -4378,21 +4380,6 @@ operator_absu::wi_fold (irange &r, tree type, } -class operator_negate : public range_operator -{ - using range_operator::fold_range; - using range_operator::op1_range; - public: - virtual bool fold_range (irange &r, tree type, - const irange &op1, - const irange &op2, - relation_trio rel = TRIO_VARYING) const; - virtual bool op1_range (irange &r, tree type, - const irange &lhs, - const irange &op2, - relation_trio rel = TRIO_VARYING) const; -} op_negate; - bool operator_negate::fold_range (irange &r, tree type, const irange &lh, @@ -4665,7 +4652,6 @@ integral_table::integral_table () set (BIT_IOR_EXPR, op_bitwise_or); set (BIT_XOR_EXPR, op_bitwise_xor); set (BIT_NOT_EXPR, op_bitwise_not); - set (NEGATE_EXPR, op_negate); set (ADDR_EXPR, op_addr); } |