Unit tests for Literate Haskell

[ohcount] / test / detect_files / fortranfixed.f

      PROGRAM fortranfixedcheck
!     Simple check.  Not valid free-form because of the continuation.
      WRITE(*,*)
     + 'foo'
      GOTO 22
 22   WRITE(*,*) 'bar'
      END