Sign in
gnu
/
gcc
/
a48323ff520827d38b0ca4b6af4dc87fe9e26b50
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
error_recovery_4.f90
blob: 31e0e3b9a313bf601668807d0595d23925201f2a [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
PR33609 ICE on arithmetic overflow
!
Before
patch
,
this
segfaulted
.
print
*,
real
(
huge
(
1.0
_8
),
4
)
!
{
dg
-
error
"Arithmetic overflow"
}
end