[Bug fortran/109186] nearest(huge(x),-1.0_kind(x)) half of correct value

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

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

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

https://gcc.gnu.org/g:b9f6e7e234bab6ef8b5425c3e8b88bf8dfbc5089

commit r10-11265-gb9f6e7e234bab6ef8b5425c3e8b88bf8dfbc5089
Author: Harald Anlauf <anl...@gmx.de>
Date:   Sun Mar 19 21:29:46 2023 +0100

    Fortran: simplification of NEAREST for large argument [PR109186]

    gcc/fortran/ChangeLog:

            PR fortran/109186
            * simplify.c (gfc_simplify_nearest): Fix off-by-one error in
setting
            up real kind-specific maximum exponent for mpfr.

    gcc/testsuite/ChangeLog:

            PR fortran/109186
            * gfortran.dg/nearest_6.f90: New test.

    (cherry picked from commit 4410a08b80cc40342eeaa5b6af824cd4352b218c)