[Bug fortran/109511] incorrectly rejects set_exponent with constant negative exponent

[cvs-commit at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=109511

--- Comment #7 from CVS Commits <cvs-commit at gcc dot gnu.org> ---
The releases/gcc-12 branch has been updated by Harald Anlauf
<anl...@gcc.gnu.org>:

https://gcc.gnu.org/g:64efeac03cb9fa2603bb6628712f3a2541aef1cb

commit r12-9402-g64efeac03cb9fa2603bb6628712f3a2541aef1cb
Author: Harald Anlauf <anl...@gmx.de>
Date:   Fri Apr 14 20:45:19 2023 +0200

    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.

    (cherry picked from commit fa4cb42870df60deb8888dbd51e2ddc6d6ab9e6a)