Merge pull request #42 from Ziaw/detect-nemerle-language

Detect nemerle language
This commit is contained in:
Joshua Peek
2011-07-08 09:38:33 -07:00
5 changed files with 20 additions and 0 deletions

View File

@@ -527,6 +527,11 @@ Myghty:
extensions: extensions:
- .myt - .myt
Nemerle:
type: programming
extensions:
- .n
Nimrod: Nimrod:
extensions: extensions:
- .nim - .nim

View File

@@ -54,4 +54,5 @@ text/cache-manifest @manifest
text/plain @cu,cxx text/plain @cu,cxx
text/x-nimrod @nim text/x-nimrod @nim
text/x-ocaml @ml,mli,mll,mly,sig,sml text/x-ocaml @ml,mli,mll,mly,sig,sml
text/x-nemerle @n
text/x-scheme @rkt,scm,sls,sps,ss text/x-scheme @rkt,scm,sls,sps,ss

9
test/fixtures/hello.n vendored Normal file
View File

@@ -0,0 +1,9 @@
using System.Console;
module Program
{
Main() : void
{
WriteLine("Hello world");
}
}

View File

@@ -293,6 +293,9 @@ class TestBlob < Test::Unit::TestCase
# https://github.com/googleapi/googleapi/blob/master/demos/gmail_demo/gmail.dpr # https://github.com/googleapi/googleapi/blob/master/demos/gmail_demo/gmail.dpr
assert_equal Language['Delphi'], blob("program.dpr").language assert_equal Language['Delphi'], blob("program.dpr").language
# https://github.com/philiplaureano/Nemerle.FizzBuzz/blob/master/FizzBuzz/FizzBuzzer.n
assert_equal Language['Nemerle'], blob("hello.n").language
# https://github.com/dharmatech/agave/blob/master/demos/asteroids.sps # https://github.com/dharmatech/agave/blob/master/demos/asteroids.sps
assert_equal Language['Scheme'], blob("asteroids.sps").language assert_equal Language['Scheme'], blob("asteroids.sps").language
end end

View File

@@ -48,6 +48,7 @@ class TestMime < Test::Unit::TestCase
assert_equal 'application/xaml+xml', Mime.mime_for('.xaml') assert_equal 'application/xaml+xml', Mime.mime_for('.xaml')
assert_equal 'text/cache-manifest', Mime.mime_for('.manifest') assert_equal 'text/cache-manifest', Mime.mime_for('.manifest')
assert_equal 'text/html', Mime.mime_for('.html') assert_equal 'text/html', Mime.mime_for('.html')
assert_equal 'text/nemerle', Mime.mime_for('.n')
assert_equal 'text/nimrod', Mime.mime_for('.nim') assert_equal 'text/nimrod', Mime.mime_for('.nim')
assert_equal 'text/ocaml', Mime.mime_for('.ml') assert_equal 'text/ocaml', Mime.mime_for('.ml')
assert_equal 'text/ocaml', Mime.mime_for('.sig') assert_equal 'text/ocaml', Mime.mime_for('.sig')
@@ -156,6 +157,7 @@ class TestMime < Test::Unit::TestCase
assert Mime.text?('text/javascript') assert Mime.text?('text/javascript')
assert Mime.text?('text/plain') assert Mime.text?('text/plain')
assert Mime.text?('text/x-nimrod') assert Mime.text?('text/x-nimrod')
assert Mime.text?('text/x-nemerle')
# Legacy. Prefer testing mime types instead of extensions. # Legacy. Prefer testing mime types instead of extensions.
assert Mime.text?('.cu') assert Mime.text?('.cu')