Mercurial > vim
view src/testdir/test_hlsearch.vim @ 14864:40ef13331e02
Update runtime files.
commit https://github.com/vim/vim/commit/95bafa296ae97bf420d5c74dd6db517b404c5df7
Author: Bram Moolenaar <Bram@vim.org>
Date: Tue Oct 2 13:26:25 2018 +0200
Update runtime files.
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Tue, 02 Oct 2018 13:30:07 +0200 |
parents | 04c168a6d998 |
children | 63b02fcf1361 |
line wrap: on
line source
" Test for v:hlsearch function! 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! endfunction func Test_hlsearch_hangs() if !has('reltime') || !has('float') return endif " 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