Mercurial > vim
view src/testdir/test_hlsearch.vim @ 33758:75176b7f8170 v9.0.2101
patch 9.0.2101: CI: test_termdebug may still fail
Commit: https://github.com/vim/vim/commit/fdbadea4b60e5e1a0bf192dc5ee04d8ab06f4399
Author: shane.xb.qian <shane.qian@foxmail.com>
Date: Sun Nov 12 09:42:12 2023 +0100
patch 9.0.2101: CI: test_termdebug may still fail
Problem: CI: test_termdebug may still fail
Solution: use term_wait() to make it more robust
closes: #13529
Signed-off-by: shane.xb.qian <shane.qian@foxmail.com>
Signed-off-by: Christian Brabandt <cb@256bit.org>
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Sun, 12 Nov 2023 09:45:05 +0100 |
parents | 695b50472e85 |
children |
line wrap: on
line source
" Test for v:hlsearch source check.vim source screendump.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 " So, it turns out that Windows 7 implements TimerQueue timers differently " and they can expire *before* the requested time has elapsed. So allow for " the timeout occurring after 80 ms (5 * 16 (the typical clock tick)). if has("win32") let min_timeout = 0.08 else let min_timeout = 0.1 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_inrange(min_timeout, 1.0, elapsed) 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 func Test_hlsearch_Ctrl_R() CheckRunVimInTerminal let lines =<< trim END set incsearch hlsearch let @" = "text" put END call writefile(lines, 'XhlsearchCtrlR', 'D') let buf = RunVimInTerminal('-S XhlsearchCtrlR', #{rows: 6, cols: 60}) call term_sendkeys(buf, "/\<C-R>\<C-R>\"") call VerifyScreenDump(buf, 'Test_hlsearch_ctrlr_1', {}) call term_sendkeys(buf, "\<Esc>") call StopVimInTerminal(buf) endfunc func Test_hlsearch_clipboard() CheckRunVimInTerminal CheckFeature clipboard_working let lines =<< trim END set incsearch hlsearch let @* = "text" put * END call writefile(lines, 'XhlsearchClipboard', 'D') let buf = RunVimInTerminal('-S XhlsearchClipboard', #{rows: 6, cols: 60}) call term_sendkeys(buf, "/\<C-R>*") call VerifyScreenDump(buf, 'Test_hlsearch_ctrlr_1', {}) call term_sendkeys(buf, "\<Esc>") call StopVimInTerminal(buf) endfunc " vim: shiftwidth=2 sts=2 expandtab