Sign in
android
/
toolchain
/
gcc
/
donut
/
.
/
gcc-4.4.0
/
gcc
/
testsuite
/
gfortran.dg
/
func_result_4.f90
blob: 81f02a57ca2854dfa9e878c15f94f7d9bc8a3337 [
file
] [
log
] [
blame
]
!
{
dg
-
do
"compile"
}
!
{
dg
-
options
"-c"
}
!
!
Do
not
apply the SAVE attribute to
function
results
.
!
FUNCTION f
()
RESULT
(
g
)
INTEGER
::
g
SAVE
g
=
42
END
FUNCTION