11 lines
332 B
FortranFixed
11 lines
332 B
FortranFixed
|
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
|
||
|
|