Sign in
llvm
/
llvm-archive
/
48649d2c83b557841c9e5c978d9ab5af13cb52e5
/
.
/
llvm-gcc-4.2
/
gcc
/
testsuite
/
gfortran.dg
/
logical_3.f90
blob: f4d069e9a4c311cd4d8de7b52ae62afef4713ed1 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
This
checks the fix
for
PR30406
.
!
!
Contributed
by
Francois
-
Xavier
Coudert
<
fxcoudert@gcc
.
gnu
.
org
>
!===============================================================
function
f
()
logical
(
8
)
::
f
f
=
.
false
.
_8
end
function
f