summaryrefslogtreecommitdiff
path: root/test/handler/test_ghc_handler.vader
diff options
context:
space:
mode:
authorw0rp <devw0rp@gmail.com>2017-03-06 23:32:48 +0000
committerw0rp <devw0rp@gmail.com>2017-03-06 23:32:48 +0000
commit663d8f832fb2d59751722dc9f22f5c44dcc84b31 (patch)
tree592f1cf1bf2c8fa67dada4d4062045d9db1f30ab /test/handler/test_ghc_handler.vader
parent75a2dc5ff5f1975b1a80b59704ffdfd1902b050f (diff)
downloadale-663d8f832fb2d59751722dc9f22f5c44dcc84b31.zip
Group handler test cases in a directory
Diffstat (limited to 'test/handler/test_ghc_handler.vader')
-rw-r--r--test/handler/test_ghc_handler.vader42
1 files changed, 42 insertions, 0 deletions
diff --git a/test/handler/test_ghc_handler.vader b/test/handler/test_ghc_handler.vader
new file mode 100644
index 00000000..2350d9e5
--- /dev/null
+++ b/test/handler/test_ghc_handler.vader
@@ -0,0 +1,42 @@
+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]'},
+ \ ],
+ \ ale#handlers#HandleGhcFormat(12, [
+ \ '/path/to/foo.hs:147:62: warning:',
+ \ '• Couldnt match type ‘a -> T.Text’ with ‘T.Text’',
+ \ ' 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.'},
+ \ ],
+ \ ale#handlers#HandleGhcFormat(47, [
+ \ '',
+ \ 'src/Appoint/Lib.hs:6:1: error:',
+ \ ' Failed to load interface for ‘GitHub.Data’',
+ \ ' Use -v to see a list of the files searched for.',
+ \ '',
+ \ 'src/Appoint/Lib.hs:7:1: warning:',
+ \ ' Failed to load interface for ‘GitHub.Endpoints.PullRequests’',
+ \ ' 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)'},
+ \ ],
+ \ ale#handlers#HandleGhcFormat(47, [
+ \ 'src/Main.hs:168:1:',
+ \ ' parse error (possibly incorrect indentation or mismatched brackets)',
+ \ ])