projects
/
gcc.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
0c1018b593ba059efa2a7d200fdaa635a4d50a81
[gcc.git]
/
gcc
/
testsuite
/
gfortran.dg
/
underflow.f90
1
! { dg-do compile}
2
program a
3
real x
4
x = 1e-20 / 1e+20 ! { dg-warning "Arithmetic underflow" "" }
5
end program a