Merge pull request #2098 from larsbrinkhoff/fortran

Tweak heuristic for free-form Fortran.
This commit is contained in:
Arfon Smith
2015-02-10 15:06:44 -06:00

View File

@@ -157,7 +157,7 @@ module Linguist
disambiguate "FORTRAN", "Forth" do |data| disambiguate "FORTRAN", "Forth" do |data|
if /^: /.match(data) if /^: /.match(data)
Language["Forth"] Language["Forth"]
elsif /^([c*][^a-z]| (subroutine|program)\s|!)/i.match(data) elsif /^([c*][^a-z]| (subroutine|program)\s|\s*!)/i.match(data)
Language["FORTRAN"] Language["FORTRAN"]
end end
end end