]> git.ipfire.org Git - people/ms/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>
Sun, 5 Mar 2023 19:35:12 +0000 (20:35 +0100)
commitadc4c8eb79a75bd0f38a461c299b37c643a1153c
treeab66f7da93d4855e6cd0f48d80036670f4020e04
parent7db643a17e8c862b4c758fd69d62a45c6de43d38
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)
gcc/fortran/trans-intrinsic.c
gcc/testsuite/gfortran.dg/ibits_2.f90 [new file with mode: 0644]