Codebase list ohcount / d4c3f612-6685-4dc0-9339-5433a0a275c0/main test / detect_files / fortranfree.f
d4c3f612-6685-4dc0-9339-5433a0a275c0/main

Tree @d4c3f612-6685-4dc0-9339-5433a0a275c0/main (Download .tar.gz)

fortranfree.f @d4c3f612-6685-4dc0-9339-5433a0a275c0/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