Sign in
gnu
/
gcc
/
1f16a020acbea0af26209478990b83b1a1ba3a2b
/
.
/
gcc
/
testsuite
/
gfortran.fortran-torture
/
compile
/
pr85878.f90
blob: e52e95faa007c9a1f9008152c08836634bbe01a1 [
file
] [
log
] [
blame
]
!
PR middle
-
end
/
85878
program pr85878
real
::
a
complex
::
c
=
(
2.0
,
3.0
)
print
*,
c
print
*,
transfer
(
a
,
c
)
end
