git.oblomov.eu Git - ohcount/blob - test/expected_dir/fortranfree.f

   1 fortranfree     comment ! -*- F90 -*-
   2 fortranfree     comment !     Just a comment, whee.
   3 fortranfree     code          program foofree
   4 fortranfree     code          integer:: c
   5 fortranfree     blank
   6 fortranfree     comment !     Many languages seem to count split lines as multiple lines,
   7 fortranfree     comment !     so we should, too.
   8 fortranfree     code          write (*,*) 1 &
   9 fortranfree     code         & + 1
  10 fortranfree     blank
  11 fortranfree     code    C = 1 ! Not a comment.
  12 fortranfree     blank
  13 fortranfree     comment ! And I've never seen Fortran code that wraps strings; I'm
  14 fortranfree     comment ! not even sure fixed form allows it.
  15 fortranfree     code          write (*,*) 'But we might as well test for it in&
  16 fortranfree     code                      & free format.'
  17 fortranfree     blank
  18 fortranfree     code    end