Codebase list ohcount / e0259188-7180-4bbc-a711-b2cd8983feeb/main test / detect_files / fortranfree.f
e0259188-7180-4bbc-a711-b2cd8983feeb/main

Tree @e0259188-7180-4bbc-a711-b2cd8983feeb/main (Download .tar.gz)

fortranfree.f @e0259188-7180-4bbc-a711-b2cd8983feeb/mainraw · history · blame

1
2
3
4
5
6
7
8
! -*- F90 -*-
program fortranfreecheck
!     Simple check.  Not valid fixed form thanks to code starting in first column.
    write(*,*) 2 + &
        & 2
    goto 22
 22   write(*,*) 'bar'
end program fortranfreecheck