Fix Flow and Idris tests for Windows

This commit is contained in:
w0rp
2017-10-01 18:41:41 +01:00
parent 5731616cd2
commit 4634b1be93
2 changed files with 29 additions and 25 deletions

View File

@@ -12,7 +12,11 @@ After:
call ale#linter#Reset()
Execute(The idris handler should parse messages that reference a single column):
call ale#test#SetFilename('/tmp/foo.idr')
if has('win32')
call ale#test#SetFilename($TEMP . '\foo.idr')
else
call ale#test#SetFilename('/tmp/foo.idr')
endif
AssertEqual
\ [
@@ -24,21 +28,21 @@ Execute(The idris handler should parse messages that reference a single column):
\ }
\ ],
\ ale_linters#idris#idris#Handle(bufnr(''), [
\ '/tmp/foo.idr:4:5:',
\ 'When checking right hand side of main with expected type',
\ ' IO ()',
\ '',
\ 'When checking an application of function Prelude.Monad.>>=:',
\ ' Type mismatch between',
\ ' IO () (Type of putStrLn _)',
\ ' and',
\ ' _ -> _ (Is putStrLn _ applied to too many arguments?)',
\ '',
\ ' Specifically:',
\ ' Type mismatch between',
\ ' IO',
\ ' and',
\ ' \uv => _ -> uv',
\ expand('%:p') . ':4:5:',
\ 'When checking right hand side of main with expected type',
\ ' IO ()',
\ '',
\ 'When checking an application of function Prelude.Monad.>>=:',
\ ' Type mismatch between',
\ ' IO () (Type of putStrLn _)',
\ ' and',
\ ' _ -> _ (Is putStrLn _ applied to too many arguments?)',
\ '',
\ ' Specifically:',
\ ' Type mismatch between',
\ ' IO',
\ ' and',
\ ' \uv => _ -> uv',
\ ])
Execute(The idris handler should parse messages that reference a column range):
@@ -54,9 +58,9 @@ Execute(The idris handler should parse messages that reference a column range):
\ }
\ ],
\ ale_linters#idris#idris#Handle(bufnr(''), [
\ '/tmp/foo.idr:11:11-13:',
\ 'When checking right hand side of Main.case block in main at /tmp/foo.idr:10:10 with expected type',
\ ' IO ()',
\ '',
\ 'Last statement in do block must be an expression',
\ expand('%:p') . ':11:11-13:',
\ 'When checking right hand side of Main.case block in main at /tmp/foo.idr:10:10 with expected type',
\ ' IO ()',
\ '',
\ 'Last statement in do block must be an expression',
\ ])