Sign in
gnu
/
gcc
/
f00b5710a30f22efc3171c393e56aeb335c3cd39
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
warn_conversion_2.f90
blob: d071a3c322f382212c4a2cf88613d64809206953 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-Wconversion-extra"
}
real
(
8
)
::
sqrt2
real x
x
=
2.0
sqrt2
=
sqrt
(
x
)
!
{
dg
-
warning
"Conversion"
}
sqrt2
=
sqrt
(
2.0
)
!
{
dg
-
warning
"Conversion"
}
end