Fortran: fix compile-time simplification of SET_EXPONENT [PR109511]
authorHarald Anlauf <anlauf@gmx.de>
Fri, 14 Apr 2023 18:45:19 +0000 (20:45 +0200)
committerHarald Anlauf <anlauf@gmx.de>
Fri, 14 Apr 2023 18:50:02 +0000 (20:50 +0200)
commitfa4cb42870df60deb8888dbd51e2ddc6d6ab9e6a
tree59e44f0a3f40031dd7c72d9aa5b3af0359e567ca
parent94a21e008c4778e446321b1355f61abc75a076be
Fortran: fix compile-time simplification of SET_EXPONENT [PR109511]

gcc/fortran/ChangeLog:

PR fortran/109511
* simplify.cc (gfc_simplify_set_exponent): Fix implementation of
compile-time simplification of intrinsic SET_EXPONENT for argument
X < 1 and for I < 0.

gcc/testsuite/ChangeLog:

PR fortran/109511
* gfortran.dg/set_exponent_1.f90: New test.
gcc/fortran/simplify.cc
gcc/testsuite/gfortran.dg/set_exponent_1.f90 [new file with mode: 0644]