Mercurial > vim
view src/testdir/test_balloon.vim @ 19042:4be592d96c20 v8.2.0081
patch 8.2.0081: MS-Windows also need the change to support INIT4()
Commit: https://github.com/vim/vim/commit/467c32bd72efea09677f173fef7a3465d9ab7826
Author: Bram Moolenaar <Bram@vim.org>
Date: Fri Jan 3 19:12:09 2020 +0100
patch 8.2.0081: MS-Windows also need the change to support INIT4()
Problem: MS-Windows also need the change to support INIT4().
Solution: Add the ctags arguments. (Ken Takata)
author | Bram Moolenaar <Bram@vim.org> |
---|---|
date | Fri, 03 Jan 2020 19:15:07 +0100 |
parents | 81272918c0ea |
children | c087099e9163 |
line wrap: on
line source
" Tests for 'balloonevalterm'. " A few tests only work in the terminal. source check.vim CheckNotGui CheckFeature balloon_eval_term source screendump.vim CheckScreendump let s:common_script =<< trim [CODE] call setline(1, ["one one one", "two tXo two", "three three three"]) set balloonevalterm balloonexpr=MyBalloonExpr() balloondelay=100 func MyBalloonExpr() return "line " .. v:beval_lnum .. " column " .. v:beval_col .. ":\n" .. v:beval_text endfun redraw [CODE] func Test_balloon_eval_term() " Use <Ignore> after <MouseMove> to return from vgetc() without removing " the balloon. let xtra_lines =<< trim [CODE] set updatetime=300 au CursorHold * echo 'hold fired' func Trigger() call test_setmouse(2, 6) call feedkeys("\<MouseMove>\<Ignore>", "xt") endfunc [CODE] call writefile(s:common_script + xtra_lines, 'XTest_beval') " Check that the balloon shows up after a mouse move let buf = RunVimInTerminal('-S XTest_beval', {'rows': 10, 'cols': 50}) call term_wait(buf, 100) call term_sendkeys(buf, 'll') call term_sendkeys(buf, ":call Trigger()\<CR>") call VerifyScreenDump(buf, 'Test_balloon_eval_term_01', {}) " Make sure the balloon still shows after 'updatetime' passed and CursorHold " was triggered. call term_wait(buf, 300) call VerifyScreenDump(buf, 'Test_balloon_eval_term_01a', {}) " clean up call StopVimInTerminal(buf) call delete('XTest_beval') endfunc func Test_balloon_eval_term_visual() " Use <Ignore> after <MouseMove> to return from vgetc() without removing " the balloon. call writefile(s:common_script + [ \ 'call test_setmouse(3, 6)', \ 'call feedkeys("3Gevfr\<MouseMove>\<Ignore>", "xt")', \ ], 'XTest_beval_visual') " Check that the balloon shows up after a mouse move let buf = RunVimInTerminal('-S XTest_beval_visual', {'rows': 10, 'cols': 50}) call term_wait(buf, 100) call VerifyScreenDump(buf, 'Test_balloon_eval_term_02', {}) " clean up call StopVimInTerminal(buf) call delete('XTest_beval_visual') endfunc