mirror of
https://github.com/SpaceVim/SpaceVim.git
synced 2025-02-03 03:10:06 +08:00
91 lines
2.4 KiB
VimL
91 lines
2.4 KiB
VimL
|
let s:suite = themis#suite('visual_behaviors')
|
||
|
let s:assert = themis#helper('assert')
|
||
|
|
||
|
" Helper:
|
||
|
function! s:add_line(str)
|
||
|
put! =a:str
|
||
|
endfunction
|
||
|
function! s:add_lines(lines)
|
||
|
for line in reverse(a:lines)
|
||
|
put! =line
|
||
|
endfor
|
||
|
endfunction
|
||
|
function! s:get_pos_char()
|
||
|
return getline('.')[col('.')-1]
|
||
|
endfunction
|
||
|
|
||
|
function! s:reset_buffer()
|
||
|
:1,$ delete
|
||
|
call s:add_lines(copy(s:line_texts))
|
||
|
normal! Gddgg0zt
|
||
|
endfunction
|
||
|
|
||
|
function! s:suite.before()
|
||
|
map / <Plug>(incsearch-forward)
|
||
|
map ? <Plug>(incsearch-backward)
|
||
|
map g/ <Plug>(incsearch-stay)
|
||
|
let s:line_texts = [
|
||
|
\ '1pattern 2pattern'
|
||
|
\ , '3pattern 4pattern'
|
||
|
\ ]
|
||
|
call s:reset_buffer()
|
||
|
endfunction
|
||
|
|
||
|
function! s:suite.before_each()
|
||
|
:1
|
||
|
call setreg(v:register, '')
|
||
|
endfunction
|
||
|
|
||
|
function! s:suite.after()
|
||
|
unmap /
|
||
|
unmap ?
|
||
|
unmap g/
|
||
|
:1,$ delete
|
||
|
endfunction
|
||
|
|
||
|
function! s:suite.forward()
|
||
|
call s:assert.equals(s:get_pos_char(), '1')
|
||
|
exec "normal" "v/2pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "1pattern 2")
|
||
|
normal! gg0
|
||
|
exec "normal" "V/2pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "1pattern 2pattern\n")
|
||
|
normal! gg0
|
||
|
exec "normal" "\<C-v>/4pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "1pattern 2\n3pattern 4")
|
||
|
normal! gg0
|
||
|
exec "normal" "v/2pattern/e\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "1pattern 2pattern")
|
||
|
endfunction
|
||
|
|
||
|
function! s:suite.backward()
|
||
|
normal! G$
|
||
|
exec "normal" "v?3pattern?e\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), 'n 4pattern')
|
||
|
normal! G$
|
||
|
exec "normal" "V?3pattern?e\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "3pattern 4pattern\n")
|
||
|
normal! G$
|
||
|
exec "normal" "\<C-v>?2pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "2pattern\n4pattern")
|
||
|
endfunction
|
||
|
|
||
|
function! s:suite.stay()
|
||
|
call s:assert.equals(getreg(), '')
|
||
|
call s:assert.equals(s:get_pos_char(), '1')
|
||
|
exec "normal" "vg/2pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), '1')
|
||
|
normal! gg0
|
||
|
exec "normal" "vg/2pattern\<Tab>\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), '1pattern 2')
|
||
|
normal! gg0
|
||
|
exec "normal" "veg/3pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), '1pattern')
|
||
|
normal! gg0
|
||
|
exec "normal" "Vg/2pattern\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "1pattern 2pattern\n")
|
||
|
normal! gg0
|
||
|
exec "normal" "\<C-v>g/3pattern/e\<Tab>\<CR>" | normal! y
|
||
|
call s:assert.equals(getreg(), "1pattern\n3pattern")
|
||
|
endfunction
|