forked from aniani/vim
e2e4075fad
Problem: Tests do not check the error number properly.0 Solution: Add a colon after the error number. (closes #6869)
68 lines
1.8 KiB
VimL
68 lines
1.8 KiB
VimL
" Test for v:hlsearch
|
|
|
|
source check.vim
|
|
|
|
func Test_hlsearch()
|
|
new
|
|
call setline(1, repeat(['aaa'], 10))
|
|
set hlsearch nolazyredraw
|
|
" redraw is needed to make hlsearch highlight the matches
|
|
exe "normal! /aaa\<CR>" | redraw
|
|
let r1 = screenattr(1, 1)
|
|
nohlsearch | redraw
|
|
call assert_notequal(r1, screenattr(1,1))
|
|
let v:hlsearch=1 | redraw
|
|
call assert_equal(r1, screenattr(1,1))
|
|
let v:hlsearch=0 | redraw
|
|
call assert_notequal(r1, screenattr(1,1))
|
|
set hlsearch | redraw
|
|
call assert_equal(r1, screenattr(1,1))
|
|
let v:hlsearch=0 | redraw
|
|
call assert_notequal(r1, screenattr(1,1))
|
|
exe "normal! n" | redraw
|
|
call assert_equal(r1, screenattr(1,1))
|
|
let v:hlsearch=0 | redraw
|
|
call assert_notequal(r1, screenattr(1,1))
|
|
exe "normal! /\<CR>" | redraw
|
|
call assert_equal(r1, screenattr(1,1))
|
|
set nohls
|
|
exe "normal! /\<CR>" | redraw
|
|
call assert_notequal(r1, screenattr(1,1))
|
|
call assert_fails('let v:hlsearch=[]', 'E745:')
|
|
call garbagecollect(1)
|
|
call getchar(1)
|
|
enew!
|
|
endfunc
|
|
|
|
func Test_hlsearch_hangs()
|
|
CheckFunction reltimefloat
|
|
|
|
" This pattern takes a long time to match, it should timeout.
|
|
new
|
|
call setline(1, ['aaa', repeat('abc ', 1000), 'ccc'])
|
|
let start = reltime()
|
|
set hlsearch nolazyredraw redrawtime=101
|
|
let @/ = '\%#=1a*.*X\@<=b*'
|
|
redraw
|
|
let elapsed = reltimefloat(reltime(start))
|
|
call assert_true(elapsed > 0.1)
|
|
call assert_true(elapsed < 1.0)
|
|
set nohlsearch redrawtime&
|
|
bwipe!
|
|
endfunc
|
|
|
|
func Test_hlsearch_eol_highlight()
|
|
new
|
|
call append(1, repeat([''], 9))
|
|
set hlsearch nolazyredraw
|
|
exe "normal! /$\<CR>" | redraw
|
|
let attr = screenattr(1, 1)
|
|
for row in range(2, 10)
|
|
call assert_equal(attr, screenattr(row, 1), 'in line ' . row)
|
|
endfor
|
|
set nohlsearch
|
|
bwipe!
|
|
endfunc
|
|
|
|
" vim: shiftwidth=2 sts=2 expandtab
|