mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 17:50:22 +00:00
Merge pull request #2098 from larsbrinkhoff/fortran
Tweak heuristic for free-form Fortran.
This commit is contained in:
@@ -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
|
||||||
|
|||||||
Reference in New Issue
Block a user