Merge branch 'detect_parrot' of https://github.com/leto/linguist into leto-detect_parrot

lib/linguist/languages.yml

@@ -643,16 +643,24 @@ PHP:
   - .phpt
 
 Parrot Internal Representation:
+  type: programming
   lexer: Text only
   search_term: pir
   aliases:
   - pir
-  primary_extension: .pir
+  group: Parrot
   extensions:
-  - .pasm
-  - .pbc
   - .pir
 
+Parrot Assembly:
+  type: programming
+  lexer: Text only
+  group: Parrot
+  aliases:
+  - pasm
+  extensions:
+    - .pasm
+
 Perl:
   type: programming
   overrides:

test/fixtures/hello.pasm

@@ -0,0 +1,5 @@
+#!/usr/bin/env parrot
+
+.pcc_sub :main main:
+    say "Hello!"
+    end

test/fixtures/hello.pir

@@ -0,0 +1,5 @@
+#!/usr/bin/env parrot
+
+.sub 'main' :main
+    say "Hello!"
+.end

test/test_blob.rb

@@ -317,6 +317,10 @@ class TestBlob < Test::Unit::TestCase
 
     # https://github.com/olabini/ioke
     assert_equal Language['Ioke'], blob("hello.ik").language
+
+    # https://github.com/parrot/parrot
+    assert_equal Language['Parrot Internal Representation'], blob("hello.pir").language
+    assert_equal Language['Parrot Assembly'], blob("hello.pasm").language
   end
 
   def test_lexer