2 C { dg-options "-fd-lines-as-code" }
3 C Verifies that column numbers are dealt with correctly when handling D lines.
5 d i = 0 ! this may not move to the left
6 d 1 + 1 ! this should be a continuation line
8 d23450continue ! statement labels are correctly identified