[flang-commits] [flang] [llvm] [flang] Fix wrong result for exponentiation when denormal is expected (PR #205262)

[via flang-commits]

================
@@ -307,5 +307,6 @@ module m
   logical, parameter :: test_set_exponent_1 = set_exponent(1., 1) == 1.
   logical, parameter :: test_set_exponent_2 = set_exponent(1., 2) == 2.
   logical, parameter :: test_set_exponent_min = set_exponent(1., -149) == 1.40129846432481707092372958328991613128026194187651577175706828388979108268586060148663818836212158203125e-45_4
+  logical, parameter :: test_pow_denorm_neg = 2.0**(-133) /= 0.0
----------------
ejose02 wrote:

Replaced /= 0.0 with 2.0_4**(-133) == scale(1.0_4, -133), plus folds for 3.0**(-2) and 7.0**(-5) (ordinary negative powers) and 1.5_8**(-128_1) < 1.0_8 (most negative INTEGER(1) exponent).

https://github.com/llvm/llvm-project/pull/205262