http://gcc.gnu.org/bugzilla/show_bug.cgi?id=50821
Bug #: 50821
Summary: [4.7 Regression] 3 new GCC HEAD@180266 regressions
Classification: Unclassified
Product: gcc
Version: 4.7.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassig...@gcc.gnu.org
ReportedBy: domi...@lps.ens.fr
CC: h...@gcc.gnu.org, ka...@gcc.gnu.org
Between revisions 180262 (OK) and 180266 three gfortran tests failed (see
http://gcc.gnu.org/ml/gcc-regression/2011-10/msg00461.html )
NEW gfortran.sum gfortran.dg/g77/f90-intrinsic-bit.f
NEW gfortran.sum gfortran.dg/simplify_argN_1.f90
NEW gfortran.sum gfortran.fortran-torture/execute/intrinsic_bitops.f90
The errors are
[macbook] f90/bug% gfc
/opt/gcc/work/gcc/testsuite/gfortran.dg/g77/f90-intrinsic-bit.f
/opt/gcc/work/gcc/testsuite/gfortran.dg/g77/f90-intrinsic-bit.f:224.24-27:
call c_i(ISHFTC(i,i2,i3),5,'ISHFTC(integer,integer,integer)')
1 2
Error: The absolute value of SHIFT at (1) must be less than or equal to SIZE at
(2)
...
/opt/gcc/work/gcc/testsuite/gfortran.dg/g77/f90-intrinsic-bit.f:265.25-28:
call c_i2(ISHFTC(j,k2,i3),ja,
1 2
Error: The absolute value of SHIFT at (1) must be less than or equal to SIZE at
(2)
Fatal Error: Error count reached limit of 25.
[macbook] f90/bug% gfc
/opt/gcc/work/gcc/testsuite/gfortran.dg/simplify_argN_1.f90
/opt/gcc/work/gcc/testsuite/gfortran.dg/simplify_argN_1.f90:11.53-56:
INTEGER, PARAMETER, DIMENSION(N) :: C = ISHFTC(3, B, 5) !ICE
1 2
Error: The absolute value of SHIFT at (1) must be less than or equal to SIZE at
(2)
/opt/gcc/work/gcc/testsuite/gfortran.dg/simplify_argN_1.f90:13.53-56:
INTEGER, PARAMETER, DIMENSION(N) :: E = ISHFTC(A, B, 5) ! OK
1 2
Error: The absolute value of SHIFT at (1) must be less than or equal to SIZE at
(2)
/opt/gcc/work/gcc/testsuite/gfortran.dg/simplify_argN_1.f90:17.6:
use mods
1
Fatal Error: Can't open module file 'mods.mod' for reading at (1): No such file
or directory
[macbook] f90/bug% gfc
/opt/gcc/work/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_bitops.f90
/opt/gcc/work/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_bitops.f90:28.18-23:
if (ishftc (k, o+1, o+3) .ne. 9) call abort
1 2
Error: The absolute value of SHIFT at (1) must be less than or equal to SIZE at
(2)
This is likely due to revision 180264
Author: kargl
Date: Thu Oct 20 18:07:10 2011 UTC (18 hours, 32 minutes ago)
Changed paths: 4
Log Message:
2011-10-20 Steven G. Kargl <ka...@gcc.gnu.org>
* gfortran.dg/ishft_3.f90: Update test.
2011-10-20 Steven G. Kargl <ka...@gcc.gnu.org>
* check.c (less_than_bitsize1): Check |shift| <= bit_size(i).
(gfc_check_ishftc): Check |shift| <= bit_size(i) and check
that size is positive.
