11 lines
332 B
Fortran
11 lines
332 B
Fortran
C { dg-do compile }
|
|
C { dg-options "-fd-lines-as-code" }
|
|
C Verifies that column numbers are dealt with correctly when handling D lines.
|
|
C234567890
|
|
d i = 0 ! this may not move to the left
|
|
d 1 + 1 ! this should be a continuation line
|
|
goto 2345
|
|
d23450continue ! statement labels are correctly identified
|
|
end
|
|
|