Sign in
gnu
/
gcc
/
1f16a020acbea0af26209478990b83b1a1ba3a2b
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
pad_source_3.f
blob: 8fbdae0d67d0bcbb8c64361c782e1745e01f38da [
file
] [
log
] [
blame
]
c
{
dg
-
do
run
}
c
{
dg
-
skip
-
if
"non-standard options"
{
*-*-*
}
{
"-ffixed-line-length*"
}
}
c
{
dg
-
options
"-fno-pad-source"
}
character
(
80
)
a
a
=
'abc
+def'
if
(
a
.
ne
.
'abcdef'
)
stop
1
end