[Bug fortran/46146] New: Bessel and kind=8 integer arguments
tkoenig at gcc dot gnu.org
gcc-bugzilla@gcc.gnu.org
Sat Oct 23 10:16:00 GMT 2010
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46146
Summary: Bessel and kind=8 integer arguments
Product: gcc
Version: 4.6.0
Status: UNCONFIRMED
Keywords: rejects-valid
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned@gcc.gnu.org
ReportedBy: tkoenig@gcc.gnu.org
Blocks: 32770
Discovered while re-checking PR 32770, bessel_5.f90 from the test suite:
ig25@linux-fd1f:~/Krempel/8> gfortran -fdefault-integer-8 bessel_5.f90
bessel_5.f90:64.50:
if (any (BESSEL_YN(0, 10, 0.0) /= [ (BESSEL_YN(i, 0.0), i = 0, 10) ])) &
1
Error: Result of BESSEL_YN overflows its kind at (1)
bessel_5.f90:64.26:
if (any (BESSEL_YN(0, 10, 0.0) /= [ (BESSEL_YN(i, 0.0), i = 0, 10) ])) &
1
Error: Result of BESSEL_YN is -INF at (1)
The same error also occurs when changing i in the test case to kind=8.
More information about the Gcc-bugs
mailing list