[Bug fortran/108937] Intrinsic IBITS(I,POS,LEN) fails when LEN equals to BIT_SIZE(I).

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

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

--- Comment #12 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:570828e84f751730743093e5f060eeaf98c08cac

commit r10-11241-g570828e84f751730743093e5f060eeaf98c08cac
Author: Harald Anlauf <anl...@gmx.de>
Date:   Mon Feb 27 21:37:11 2023 +0100

    Fortran: fix corner case of IBITS intrinsic [PR108937]

    gcc/fortran/ChangeLog:

            PR fortran/108937
            * trans-intrinsic.c (gfc_conv_intrinsic_ibits): Handle corner case
            LEN argument of IBITS equal to BITSIZE(I).

    gcc/testsuite/ChangeLog:

            PR fortran/108937
            * gfortran.dg/ibits_2.f90: New test.

    (cherry picked from commit 6cce953ebec274f1468d5d3a0697cf05bb43b8f6)