Sign in
llvm
/
llvm-archive
/
f8b4f79771a41ee0a0f02ac90619d37ccd834915
/
.
/
llvm-gcc-4.2
/
gcc
/
testsuite
/
gfortran.fortran-torture
/
compile
/
fnresvar.f90
blob: fab9aa665a4835ec7ee48921ca688d85503466d4 [
file
] [
log
] [
blame
]
!
Explicit
function
rsult variables
function
fnresvar
()
result
(
r
)
integer r
r
=
0
end
function