|
|
Execute(The ghc handler should handle hdevtools output):
|
|
|
call ale#test#SetFilename('foo.hs')
|
|
|
|
|
|
AssertEqual
|
|
|
\ [
|
|
|
\ {
|
|
|
\ 'lnum': 147,
|
|
|
\ 'type': 'W',
|
|
|
\ 'col': 62,
|
|
|
\ 'text': '• Couldnt match type ‘a -> T.Text’ with ‘T.Text’ Expected type: [T.Text]',
|
|
|
\ },
|
|
|
\ ],
|
|
|
\ ale#handlers#haskell#HandleGHCFormat(bufnr(''), [
|
|
|
\ '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):
|
|
|
call ale#test#SetFilename('src/Appoint/Lib.hs')
|
|
|
|
|
|
AssertEqual
|
|
|
\ [
|
|
|
\ {
|
|
|
\ '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#haskell#HandleGHCFormat(bufnr(''), [
|
|
|
\ '',
|
|
|
\ '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):
|
|
|
call ale#test#SetFilename('src/Main.hs')
|
|
|
|
|
|
AssertEqual
|
|
|
\ [
|
|
|
\ {
|
|
|
\ 'lnum': 168,
|
|
|
\ 'type': 'E',
|
|
|
\ 'col': 1,
|
|
|
\ 'text': 'parse error (possibly incorrect indentation or mismatched brackets)',
|
|
|
\ },
|
|
|
\ {
|
|
|
\ 'lnum': 84,
|
|
|
\ 'col': 1,
|
|
|
\ 'type': 'W',
|
|
|
\ 'text': 'Top-level binding with no type signature:^@ myLayout :: Choose Tall (Choose (Mirror Tall) Full) a',
|
|
|
\ },
|
|
|
\ {
|
|
|
\ 'lnum': 94,
|
|
|
\ 'col': 5,
|
|
|
\ 'type': 'E',
|
|
|
\ 'text': 'Some other error',
|
|
|
\ },
|
|
|
\ ],
|
|
|
\ ale#handlers#haskell#HandleGHCFormat(bufnr(''), [
|
|
|
\ 'src/Main.hs:168:1:',
|
|
|
\ ' parse error (possibly incorrect indentation or mismatched brackets)',
|
|
|
\ 'src/Main.hs:84:1:Warning: Top-level binding with no type signature:^@ myLayout :: Choose Tall (Choose (Mirror Tall) Full) a',
|
|
|
\ 'src/Main.hs:94:5:Error:',
|
|
|
\ ' Some other error',
|
|
|
\ ])
|