Sign in
gnu
/
gcc
/
e5cfb9cac1d7aba9a8ea73bfe7922cfaff9d61f3
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
g77
/
f77-edit-slash-out.f
blob: 6cc9a8842d6216bd1754a0cdf04efa40ccfa66df [
file
] [
log
] [
blame
]
C
Test
Fortran
77
colon slash descriptor
C
(
ANSI X3
.
9
-
1978
Section
13.5
.
4
)
C
C
Origin
:
David
Billinghurst
<
David
.
Billinghurst@riotinto
.
com
>
C
C
{
dg
-
do
run
}
C
{
dg
-
output
"^123(\n|\r\n|\r)45(\n|\r\n|\r)\$"
}
write
(*,
'(3(I1)/2(I1))'
)
(
I
,
I
=
1
,
5
)
end