Added detection for Prolog and disambiguation for .pl files

This commit is contained in:
Andrei Formiga
2011-07-05 17:33:28 -03:00
parent 302f8763b7
commit b3e7065972
4 changed files with 36 additions and 0 deletions

View File

@@ -228,6 +228,11 @@ class TestBlob < Test::Unit::TestCase
assert_equal Language['R'], blob("hello-r.R").language
assert_equal Language['Rebol'], blob("hello-rebol.r").language
# .pl disambiguation
assert_equal Language['Prolog'], blob("test-prolog.pl").language
assert_equal Language['Perl'], blob("test-perl.pl").language
assert_equal Language['Perl'], blob("test-perl2.pl").language
# ML
assert_equal Language['OCaml'], blob("Foo.ml").language
assert_equal Language['Standard ML'], blob("Foo.sig").language

View File

@@ -81,6 +81,7 @@ class TestLanguage < Test::Unit::TestCase
assert_equal Lexer['Ooc'], Language['ooc'].lexer
assert_equal Lexer['PHP'], Language['PHP'].lexer
assert_equal Lexer['Perl'], Language['Perl'].lexer
assert_equal Lexer['Prolog'], Language['Prolog'].lexer
assert_equal Lexer['Python Traceback'], Language['Python traceback'].lexer
assert_equal Lexer['Python'], Language['Python'].lexer
assert_equal Lexer['REBOL'], Language['Rebol'].lexer
@@ -310,6 +311,7 @@ class TestLanguage < Test::Unit::TestCase
assert Language['Objective-J'].major?
assert Language['PHP'].major?
assert Language['Perl'].major?
assert Language['Prolog'].major?
assert Language['Pure Data'].major?
assert Language['Python'].major?
assert Language['R'].major?