bugfixes and failing tests

friedbrice · Sep 29, 2018 · a3e99a0 · a3e99a0
1 parent a2cdeb2
commit a3e99a0
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 5 deletions.
diff --git a/Haskell.sublime-syntax b/Haskell.sublime-syntax
@@ -99,7 +99,7 @@ contexts:
       scope: constant.numeric.haskell
     - match: '\b([0-9]+|0([xX][0-9a-fA-F]+|[oO][0-7]+))\b'
       scope: constant.numeric.haskell
-    - match: '^\s*(#)\s*\w+'
+    - match: '^(#)\s*\w+'
       comment: In addition to Haskell's "native" syntax, GHC permits the C preprocessor to be run on a source file.
       scope: meta.preprocessor.c
       captures:
@@ -227,13 +227,14 @@ contexts:
   module_exports:
     - match: '\('
       push:
+        - meta_scope: meta.declaration.exports.haskell
         - include: comments
         - match: '\b({{type_id}})(\(.[^\)]*\)|)'
           captures:
             1: storage.type.haskell
-        - match: '{{op_id}}'
-          scope: keyword.operator.haskell
-        - meta_scope: meta.declaration.exports.haskell
+        - match: '\(({{op_id}})\)'
+          captures:
+            1: keyword.operator.haskell
         - match: '\)'
           pop: true
   module_name:

diff --git a/syntax_test_haskell.hs b/syntax_test_haskell.hs
@@ -8,9 +8,9 @@ module Main (
     Fooable(..),
     DeriveMoreThanOne,
     main,
-    addEmUp,
     (-->),
     (+:),
+    addEmUp,
 ) where
 
 import Prelude hiding (Traversable(traverse, sequenceA))