infix data ctor

Author: wclr

src/purescript.coffee

@@ -403,14 +403,19 @@ purescriptGrammar =
         patterns: [
             include: '#comments'
           ,
-            include: '#type_name'
+            include: '#data_ctor'
           ,
             name: 'constant.numeric'
             match: /\d+/
           ,
             match: /({operator})/
             captures:
               1: name: 'keyword.other'
+          ,
+            match: /\b(type)\s+({className})\b/
+            captures:
+              1: name: 'keyword.other'
+              2: name: 'entity.name.type'
           ,
             match: /\b(as|type)\b/
             captures:

test/Main.purs

@@ -106,6 +106,9 @@ infixl 6 type Sum as :+: -- comment
 infixl 7 type Product as :*:
 
 
+-- Ctor operators
+infixl 2 Inl as $%
+infixr 2 Inr as %$
 
 -- type class signatures