KevinMidboe/linguist
1
0
Fork 0
mirror of https://github.com/KevinMidboe/linguist.git synced 2026-01-08 18:35:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

Heuristics for Common Lisp and NewLisp

Browse Source
This commit is contained in:
Paul Chaignon
2014-04-28 11:45:24 +02:00
parent e1064b13c0
commit e4975fc476
2 changed files with 22 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
test/test_heuristics.rb
View File

@@ -75,6 +75,18 @@ class TestHeuristcs < Test::Unit::TestCase
assert_equal Language["XML"], results.first
end
def test_lsp_commonlisp_by_heuristics
languages = ["Common Lisp", "NewLisp"]
results = Heuristics.disambiguate_lsp(fixture("Common Lisp/sample.lsp"), languages)
assert_equal Language["Common Lisp"], results.first
end
def test_lsp_newlisp_by_heuristics
languages = ["Common Lisp", "NewLisp"]
results = Heuristics.disambiguate_lsp(fixture("NewLisp/irc.lsp"), languages)
assert_equal Language["NewLisp"], results.first
end
def test_cl_by_heuristics
languages = ["Common Lisp", "OpenCL"]
languages.each do |language|