Make a test fail less

This commit is contained in:
w0rp 2019-05-20 19:27:47 +01:00
parent 5e64acc6ab
commit 781bf1502f
No known key found for this signature in database
GPG Key ID: 0FC1ECAA8C81CD83

View File

@ -1,14 +1,18 @@
Before: Before:
call ale#test#SetDirectory('/testplugin/test') call ale#test#SetDirectory('/testplugin/test')
let g:new_line_test_file = tempname()
After: After:
noautocmd :e! ++ff=unix noautocmd :e! ++ff=unix
setlocal buftype=nofile setlocal buftype=nofile
if filereadable('.newline-test') if filereadable(g:new_line_test_file)
call delete('.newline-test') call delete(g:new_line_test_file)
endif endif
unlet! g:new_line_test_file
call ale#test#RestoreDirectory() call ale#test#RestoreDirectory()
Given(A file with Windows line ending characters): Given(A file with Windows line ending characters):
@ -17,17 +21,17 @@ Given(A file with Windows line ending characters):
third third
Execute(Carriage returns should be included for ale#util#Writefile): Execute(Carriage returns should be included for ale#util#Writefile):
call ale#test#SetFilename('.newline-test') call ale#test#SetFilename(g:new_line_test_file)
setlocal buftype= setlocal buftype=
noautocmd :w noautocmd :w
noautocmd :e! ++ff=dos noautocmd :e! ++ff=dos
call ale#util#Writefile(bufnr(''), getline(1, '$'), '.newline-test') call ale#util#Writefile(bufnr(''), getline(1, '$'), g:new_line_test_file)
AssertEqual AssertEqual
\ ["first\r", "second\r", "third\r", ''], \ ["first\r", "second\r", "third\r", ''],
\ readfile('.newline-test', 'b') \ readfile(g:new_line_test_file, 'b')
Given(A file with extra carriage returns): Given(A file with extra carriage returns):
first first
@ -36,17 +40,17 @@ Given(A file with extra carriage returns):
fourth fourth
Execute(Carriage returns should be de-depulicated): Execute(Carriage returns should be de-depulicated):
call ale#test#SetFilename('.newline-test') call ale#test#SetFilename(g:new_line_test_file)
setlocal buftype= setlocal buftype=
noautocmd :w noautocmd :w
noautocmd :e! ++ff=dos noautocmd :e! ++ff=dos
call ale#util#Writefile(bufnr(''), getline(1, '$'), '.newline-test') call ale#util#Writefile(bufnr(''), getline(1, '$'), g:new_line_test_file)
AssertEqual AssertEqual
\ ["first\r", "second\r", "third\r", "fourth\r", ''], \ ["first\r", "second\r", "third\r", "fourth\r", ''],
\ readfile('.newline-test', 'b') \ readfile(g:new_line_test_file, 'b')
Given(A file with Unix line ending characters): Given(A file with Unix line ending characters):
first first
@ -54,14 +58,14 @@ Given(A file with Unix line ending characters):
third third
Execute(Unix file lines should be written as normal): Execute(Unix file lines should be written as normal):
call ale#test#SetFilename('.newline-test') call ale#test#SetFilename(g:new_line_test_file)
setlocal buftype= setlocal buftype=
noautocmd :w noautocmd :w
noautocmd :e! ++ff=unix noautocmd :e! ++ff=unix
call ale#util#Writefile(bufnr(''), getline(1, '$'), '.newline-test') call ale#util#Writefile(bufnr(''), getline(1, '$'), g:new_line_test_file)
AssertEqual AssertEqual
\ ['first', 'second', 'third', ''], \ ['first', 'second', 'third', ''],
\ readfile('.newline-test', 'b') \ readfile(g:new_line_test_file, 'b')