Sign in
gnu
/
gcc
/
8a0fce6a51915c29584427fd376b40073c328090
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
automatic_repeat.f90
blob: 5c3133a2956038f9d99f9d83d820e58f35185a85 [
file
] [
log
] [
blame
]
!
{
dg
-
do
compile
}
!
{
dg
-
options
"-fdec-static"
}
!
An
AUTOMATIC statement cannot duplicated
FUNCTION X
()
REAL
,
AUTOMATIC
,
AUTOMATIC
::
Y
!
{
dg
-
error
"Duplicate AUTOMATIC attribute"
}
y
=
1
END
FUNCTION X
END