]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: fix corner case of IBITS intrinsic [PR108937]
authorHarald Anlauf <anlauf@gmx.de>
Mon, 27 Feb 2023 20:37:11 +0000 (21:37 +0100)
committerHarald Anlauf <anlauf@gmx.de>
Sat, 4 Mar 2023 19:10:30 +0000 (20:10 +0100)
commitbb68c20e1f3c673ed00e0e1abd468d8f19cd2072
tree3bfa63de0b37a5545f2d1a872500d763c8016dde
parent3f1ae4deb9c1524b2b1a5c9c4e751ea1c0f7478d
Fortran: fix corner case of IBITS intrinsic [PR108937]

gcc/fortran/ChangeLog:

PR fortran/108937
* trans-intrinsic.cc (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)
gcc/fortran/trans-intrinsic.cc
gcc/testsuite/gfortran.dg/ibits_2.f90 [new file with mode: 0644]