Sign in
llvm
/
llvm-archive
/
47f46514d69ad808308539dc6c69b907868fcf8a
/
.
/
llvm-gcc-4.2
/
gcc
/
testsuite
/
gfortran.dg
/
g77
/
xformat.f
blob: 9b2769a034be8c140d56f029213021607754e999 [
file
] [
log
] [
blame
]
c
{
dg
-
do
compile
}
PRINT
10
,
2
,
3
10
FORMAT
(
I1
,
X
,
I1
)
!
{
dg
-
warning
"Extension: X descriptor"
"Extension: X descriptor"
}
END