Codebase list ohcount / 420c4794-75b8-4551-a2c5-42f5fb1d3fbf/main test / detect_files / fortranfixed.f
420c4794-75b8-4551-a2c5-42f5fb1d3fbf/main

Tree @420c4794-75b8-4551-a2c5-42f5fb1d3fbf/main (Download .tar.gz)

fortranfixed.f @420c4794-75b8-4551-a2c5-42f5fb1d3fbf/mainraw · history · blame

1
2
3
4
5
6
7
      PROGRAM fortranfixedcheck
!     Simple check.  Not valid free-form because of the continuation.
      WRITE(*,*)
     + 'foo'
      GOTO 22
 22   WRITE(*,*) 'bar'
      END