summaryrefslogtreecommitdiff
path: root/test/handler/test_ghc_handler.vader
diff options
context:
space:
mode:
authorw0rp <devw0rp@gmail.com>2017-04-24 21:11:27 +0100
committerw0rp <devw0rp@gmail.com>2017-04-24 21:11:33 +0100
commit99afe586b3a42adce580011079a83bbdaab675bd (patch)
tree348bed5d0b5e38ca8e908015d7e1b40167dd5184 /test/handler/test_ghc_handler.vader
parent689921d7e3dd562383026c014d69d1ef011deeb9 (diff)
downloadale-99afe586b3a42adce580011079a83bbdaab675bd.zip
Simplify some code and format some tests better
Diffstat (limited to 'test/handler/test_ghc_handler.vader')
-rw-r--r--test/handler/test_ghc_handler.vader33
1 files changed, 24 insertions, 9 deletions
diff --git a/test/handler/test_ghc_handler.vader b/test/handler/test_ghc_handler.vader
index 2350d9e5..b9249744 100644
--- a/test/handler/test_ghc_handler.vader
+++ b/test/handler/test_ghc_handler.vader
@@ -1,8 +1,12 @@
Execute(The ghc handler should handle hdevtools output):
-
AssertEqual
\ [
- \ {'lnum': 147, 'bufnr': 12, 'vcol': 0, 'nr': -1, 'type': 'W', 'col': 62, 'text': '• Couldnt match type ‘a -> T.Text’ with ‘T.Text’ Expected type: [T.Text]'},
+ \ {
+ \ 'lnum': 147,
+ \ 'type': 'W',
+ \ 'col': 62,
+ \ 'text': '• Couldnt match type ‘a -> T.Text’ with ‘T.Text’ Expected type: [T.Text]',
+ \ },
\ ],
\ ale#handlers#HandleGhcFormat(12, [
\ '/path/to/foo.hs:147:62: warning:',
@@ -10,13 +14,21 @@ Execute(The ghc handler should handle hdevtools output):
\ ' Expected type: [T.Text]',
\ ])
-
Execute(The ghc handler should handle ghc 8 output):
-
AssertEqual
\ [
- \ {'lnum': 6, 'bufnr': 47, 'vcol': 0, 'nr': -1, 'type': 'E', 'col': 1, 'text': ' Failed to load interface for ‘GitHub.Data’ Use -v to see a list of the files searched for.'},
- \ {'lnum': 7, 'bufnr': 47, 'vcol': 0, 'nr': -1, 'type': 'W', 'col': 1, 'text': ' Failed to load interface for ‘GitHub.Endpoints.PullRequests’ Use -v to see a list of the files searched for.'},
+ \ {
+ \ 'lnum': 6,
+ \ 'type': 'E',
+ \ 'col': 1,
+ \ 'text': ' Failed to load interface for ‘GitHub.Data’ Use -v to see a list of the files searched for.',
+ \ },
+ \ {
+ \ 'lnum': 7,
+ \ 'type': 'W',
+ \ 'col': 1,
+ \ 'text': ' Failed to load interface for ‘GitHub.Endpoints.PullRequests’ Use -v to see a list of the files searched for.',
+ \ },
\ ],
\ ale#handlers#HandleGhcFormat(47, [
\ '',
@@ -29,12 +41,15 @@ Execute(The ghc handler should handle ghc 8 output):
\ ' Use -v to see a list of the files searched for.',
\ ])
-
Execute(The ghc handler should handle ghc 7 output):
-
AssertEqual
\ [
- \ {'lnum': 168, 'bufnr': 47, 'vcol': 0, 'nr': -1, 'type': 'E', 'col': 1, 'text': ' parse error (possibly incorrect indentation or mismatched brackets)'},
+ \ {
+ \ 'lnum': 168,
+ \ 'type': 'E',
+ \ 'col': 1,
+ \ 'text': ' parse error (possibly incorrect indentation or mismatched brackets)',
+ \ },
\ ],
\ ale#handlers#HandleGhcFormat(47, [
\ 'src/Main.hs:168:1:',