vim: src/testdir/test_normal.vim annotate

annotate src/testdir/test_normal.vim @ 10342:ae0faad76f9a v8.0.0066

commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Nov 5 21:55:13 2016 +0100 patch 8.0.0066 Problem: when calling an operator function when 'linebreak' is set, it is internally reset before calling the operator function. Solution: Restore 'linebreak' before calling op_function(). (Christian Brabandt)

author	Christian Brabandt <cb@256bit.org>
date	Sat, 05 Nov 2016 22:00:04 +0100
parents	e8a6a3bbd212
children	688b97124d23

rev	line source
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1 " Test for various Normal mode commands
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	3 func! Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	4 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	5 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	6 endfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	7
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	8 func! MyFormatExpr()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	9 " Adds '->$' at lines having numbers followed by trailing whitespace
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	10 for ln in range(v:lnum, v:lnum+v:count-1)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	11 let line = getline(ln)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	12 if getline(ln) =~# '\d\s\+$'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	13 call setline(ln, substitute(line, '\s\+$', '', '') . '->$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	14 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	15 endfor
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	16 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	17
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	18 func! CountSpaces(type, ...)
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	19 " for testing operatorfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	20 " will count the number of spaces
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	21 " and return the result in g:a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	22 let sel_save = &selection
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	23 let &selection = "inclusive"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	24 let reg_save = @@
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	25
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	26 if a:0 " Invoked from Visual mode, use gv command.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	27 silent exe "normal! gvy"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	28 elseif a:type == 'line'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	29 silent exe "normal! '[V']y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	30 else
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	31 silent exe "normal! `[v`]y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	32 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	33 let g:a=strlen(substitute(@@, '[^ ]', '', 'g'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	34 let &selection = sel_save
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	35 let @@ = reg_save
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	36 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	37
10342 ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	38 func! OpfuncDummy(type, ...)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	39 " for testing operatorfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	40 let g:opt=&linebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	41
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	42 if a:0 " Invoked from Visual mode, use gv command.
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	43 silent exe "normal! gvy"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	44 elseif a:type == 'line'
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	45 silent exe "normal! '[V']y"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	46 else
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	47 silent exe "normal! `[v`]y"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	48 endif
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	49 " Create a new dummy window
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	50 new
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	51 let g:bufnr=bufnr('%')
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	52 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	53
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	54 fun! Test_normal00_optrans()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	55 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	56 call append(0, ['1 This is a simple test: abcd', '2 This is the second line', '3 this is the third line'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	57 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	58 exe "norm! Sfoobar\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	59 call assert_equal(['foobar', '2 This is the second line', '3 this is the third line', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	60 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	61 exe "norm! $vbsone"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	62 call assert_equal(['foobar', '2 This is the second one', '3 this is the third line', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	63 norm! VS Second line here
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	64 call assert_equal(['foobar', ' Second line here', '3 this is the third line', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	65 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	66 call append(0, ['4 This is a simple test: abcd', '5 This is the second line', '6 this is the third line'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	67 call append(0, ['1 This is a simple test: abcd', '2 This is the second line', '3 this is the third line'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	68
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	69 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	70 norm! 2D
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	71 call assert_equal(['3 this is the third line', '4 This is a simple test: abcd', '5 This is the second line', '6 this is the third line', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	72 set cpo+=#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	73 norm! 4D
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	74 call assert_equal(['', '4 This is a simple test: abcd', '5 This is the second line', '6 this is the third line', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	75
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	76 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	77 set cpo-=#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	78 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	79 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	80
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	81 func! Test_normal01_keymodel()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	82 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	83 " Test 1: depending on 'keymodel' <s-down> does something different
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	84 50
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	85 call feedkeys("V\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	86 call assert_equal(['47', '48', '49', '50'], getline("'<", "'>"))
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	87 set keymodel=startsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	88 50
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	89 call feedkeys("V\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	90 call assert_equal(['49', '50'], getline("'<", "'>"))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	91 " Start visual mode when keymodel = startsel
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	92 50
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	93 call feedkeys("\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	94 call assert_equal(['49', '5'], getreg(0, 0, 1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	95 " Do not start visual mode when keymodel=
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	96 set keymodel=
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	97 50
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	98 call feedkeys("\<S-Up>y$", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	99 call assert_equal(['42'], getreg(0, 0, 1))
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	100 " Stop visual mode when keymodel=stopsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	101 set keymodel=stopsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	102 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	103 call feedkeys("Vkk\<Up>yy", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	104 call assert_equal(['47'], getreg(0, 0, 1))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	105
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	106 set keymodel=
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	107 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	108 call feedkeys("Vkk\<Up>yy", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	109 call assert_equal(['47', '48', '49', '50'], getreg(0, 0, 1))
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	110
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	111 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	112 bw!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	113 endfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	114
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	115 func! Test_normal02_selectmode()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	116 " some basic select mode tests
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	117 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	118 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	119 norm! gHy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	120 call assert_equal('y51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	121 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	122 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	123 exe ":norm! V9jo\<c-g>y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	124 call assert_equal('y60', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	125 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	126 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	127 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	128
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	129 func! Test_normal02_selectmode2()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	130 " some basic select mode tests
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	131 call Setup_NewWindow()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	132 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	133 call feedkeys(":set im\n\<c-o>gHc\<c-o>:set noim\n", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	134 call assert_equal('c51', getline('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	135 " clean up
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	136 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	137 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	138
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	139 func! Test_normal03_join()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	140 " basic join test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	141 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	142 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	143 norm! VJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	144 call assert_equal('50 51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	145 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	146 norm! J
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	147 call assert_equal('100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	148 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	149 norm! V9-gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	150 call assert_equal('919293949596979899100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	151 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	152 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	153 :j 10
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	154 call assert_equal('100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	155 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	156 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	157 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	158
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	159 func! Test_normal04_filter()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	160 " basic filter test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	161 " only test on non windows platform
10342 ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	162 if has('win32')
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	163 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	164 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	165 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	166 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	167 call feedkeys("!!sed -e 's/^/\| /'\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	168 call assert_equal('\| 1', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	169 90
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	170 :sil :!echo one
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	171 call feedkeys('.', 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	172 call assert_equal('\| 90', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	173 95
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	174 set cpo+=!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	175 " 2 <CR>, 1: for executing the command,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	176 " 2: clear hit-enter-prompt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	177 call feedkeys("!!\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	178 call feedkeys(":!echo one\n\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	179 call feedkeys(".", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	180 call assert_equal('one', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	181 set cpo-=!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	182 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	183 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	184
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	185 func! Test_normal05_formatexpr()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	186 " basic formatexpr test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	187 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	188 %d_
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	189 call setline(1, ['here: 1 ', '2', 'here: 3 ', '4', 'not here: '])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	190 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	191 set formatexpr=MyFormatExpr()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	192 norm! gqG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	193 call assert_equal(['here: 1->$', '2', 'here: 3->$', '4', 'not here: '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	194 set formatexpr=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	195 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	196 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	197
10104 b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	198 func Test_normal05_formatexpr_newbuf()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	199 " Edit another buffer in the 'formatexpr' function
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	200 new
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	201 func! Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	202 edit another
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	203 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	204 set formatexpr=Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	205 norm gqG
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	206 bw!
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	207 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	208 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	209
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	210 func Test_normal05_formatexpr_setopt()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	211 " Change the 'formatexpr' value in the function
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	212 new
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	213 func! Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	214 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	215 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	216 set formatexpr=Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	217 norm gqG
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	218 bw!
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	219 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	220 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2 Christian Brabandt <cb@256bit.org> parents: 10102 diff changeset	221
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	222 func! Test_normal06_formatprg()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	223 " basic test for formatprg
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	224 " only test on non windows platform
10342 ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	225 if has('win32')
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	226 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	227 else
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	228 " uses sed to number non-empty lines
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	229 call writefile(['#!/bin/sh', 'sed ''/./=''\|sed ''/./{', 'N', 's/\n/ /', '}'''], 'Xsed_format.sh')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	230 call system('chmod +x ./Xsed_format.sh')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	231 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	232 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	233 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	234 call setline(1, ['a', '', 'c', '', ' ', 'd', 'e'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	235 set formatprg=./Xsed_format.sh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	236 norm! gggqG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	237 call assert_equal(['1 a', '', '3 c', '', '5 ', '6 d', '7 e'], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	238 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	239 set formatprg=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	240 call delete('Xsed_format.sh')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	241 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	242 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	243
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	244 func! Test_normal07_internalfmt()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	245 " basic test for internal formmatter to textwidth of 12
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	246 let list=range(1,11)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	247 call map(list, 'v:val." "')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	248 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	249 call setline(1, list)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	250 set tw=12
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	251 norm! gggqG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	252 call assert_equal(['1 2 3', '4 5 6', '7 8 9', '10 11 '], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	253 " clean up
10124 f6942ed9e998 commit https://github.com/vim/vim/commit/31845093b7f1b33e0c7e9e592bef65528674a1f2 Christian Brabandt <cb@256bit.org> parents: 10104 diff changeset	254 set formatprg= tw=0
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	255 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	256 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	257
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	258 func! Test_normal08_fold()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	259 " basic tests for foldopen/folddelete
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	260 if !has("folding")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	261 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	262 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	263 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	264 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	265 setl foldenable fdm=marker
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	266 " First fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	267 norm! V4jzf
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	268 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	269 call assert_equal(['50/{{{/', '51', '52', '53', '54/}}}/'], getline(50,54))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	270 " Second fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	271 46
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	272 norm! V10jzf
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	273 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	274 call assert_equal('46/{{{/', getline(46))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	275 call assert_equal('60/}}}/', getline(60))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	276 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	277 call assert_equal('45', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	278 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	279 call assert_equal('46/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	280 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	281 call assert_equal('61', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	282 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	283 " open a fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	284 norm! Vzo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	285 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	286 call assert_equal('45', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	287 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	288 call assert_equal('46/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	289 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	290 call assert_equal('47', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	291 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	292 norm! zcVzO
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	293 call assert_equal('46/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	294 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	295 call assert_equal('47', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	296 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	297 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	298 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	299 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	300 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	301 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	302 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	303 call assert_equal('51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	304 " delete folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	305 :46
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	306 " collapse fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	307 norm! V14jzC
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	308 " delete all folds recursively
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	309 norm! VzD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	310 call assert_equal(['46', '47', '48', '49', '50', '51', '52', '53', '54', '55', '56', '57', '58', '59', '60'], getline(46,60))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	311
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	312 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	313 setl nofoldenable fdm=marker
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	314 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	315 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	316
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	317 func! Test_normal09_operatorfunc()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	318 " Test operatorfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	319 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	320 " Add some spaces for counting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	321 50,60s/$/ /
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	322 unlet! g:a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	323 let g:a=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	324 nmap <buffer><silent> ,, :set opfunc=CountSpaces<CR>g@
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	325 vmap <buffer><silent> ,, :<C-U>call CountSpaces(visualmode(), 1)<CR>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	326 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	327 norm V2j,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	328 call assert_equal(6, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	329 norm V,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	330 call assert_equal(2, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	331 norm ,,l
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	332 call assert_equal(0, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	333 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	334 exe "norm 0\<c-v>10j2l,,"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	335 call assert_equal(11, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	336 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	337 norm V10j,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	338 call assert_equal(22, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	339
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	340 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	341 unmap <buffer> ,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	342 set opfunc=
10342 ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	343 unlet! g:a
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	344 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	345 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	346
10342 ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	347 func! Test_normal09a_operatorfunc()
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	348 " Test operatorfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	349 call Setup_NewWindow()
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	350 " Add some spaces for counting
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	351 50,60s/$/ /
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	352 unlet! g:opt
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	353 set linebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	354 nmap <buffer><silent> ,, :set opfunc=OpfuncDummy<CR>g@
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	355 50
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	356 norm ,,j
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	357 exe "bd!" g:bufnr
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	358 call assert_true(&linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	359 call assert_equal(g:opt, &linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	360 set nolinebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	361 norm ,,j
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	362 exe "bd!" g:bufnr
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	363 call assert_false(&linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	364 call assert_equal(g:opt, &linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	365
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	366 " clean up
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	367 unmap <buffer> ,,
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	368 set opfunc=
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	369 bw!
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	370 unlet! g:opt
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	371 endfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5 Christian Brabandt <cb@256bit.org> parents: 10338 diff changeset	372
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	373 func! Test_normal10_expand()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	374 " Test for expand()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	375 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	376 call setline(1, ['1', 'ifooar,,cbar'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	377 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	378 norm! $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	379 let a=expand('<cword>')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	380 let b=expand('<cWORD>')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	381 call assert_equal('cbar', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	382 call assert_equal('ifooar,,cbar', b)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	383 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	384 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	385 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	386
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	387 func! Test_normal11_showcmd()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	388 " test for 'showcmd'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	389 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	390 exe "norm! ofoobar\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	391 call assert_equal(2, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	392 set showcmd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	393 exe "norm! ofoobar2\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	394 call assert_equal(3, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	395 exe "norm! VAfoobar3\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	396 call assert_equal(3, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	397 exe "norm! 0d3\<del>2l"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	398 call assert_equal('obar2foobar3', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	399 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	400 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	401
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	402 func! Test_normal12_nv_error()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	403 " Test for nv_error
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	404 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	405 call setline(1, range(1,5))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	406 " should not do anything, just beep
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	407 exe "norm! <c-k>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	408 call assert_equal(map(range(1,5), 'string(v:val)'), getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	409 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	410 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	411
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	412 func! Test_normal13_help()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	413 " Test for F1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	414 call assert_equal(1, winnr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	415 call feedkeys("\<f1>", 'txi')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	416 call assert_match('help\.txt', bufname('%'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	417 call assert_equal(2, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	418 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	419 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	420
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	421 func! Test_normal14_page()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	422 " basic test for Ctrl-F and Ctrl-B
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	423 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	424 exe "norm! \<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	425 call assert_equal('9', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	426 exe "norm! 2\<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	427 call assert_equal('25', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	428 exe "norm! 2\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	429 call assert_equal('18', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	430 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	431 set scrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	432 exe "norm! 2\<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	433 call assert_equal('21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	434 exe "norm! \<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	435 call assert_equal('13', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	436 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	437 set scrolloff=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	438 exe "norm! \<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	439 call assert_equal('13', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	440 set scrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	441 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	442 exe "norm! $\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	443 call assert_equal('92', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	444 call assert_equal([0, 92, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	445 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	446 set nostartofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	447 exe "norm! $\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	448 call assert_equal('92', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	449 call assert_equal([0, 92, 2, 0, 2147483647], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	450 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	451 set startofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	452 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	453 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	454
10102 b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	455 func! Test_normal14_page_eol()
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	456 10new
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	457 norm oxxxxxxx
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	458 exe "norm 2\<c-f>"
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	459 " check with valgrind that cursor is put back in column 1
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	460 exe "norm 2\<c-b>"
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	461 bw!
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	462 endfunc
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2 Christian Brabandt <cb@256bit.org> parents: 10092 diff changeset	463
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	464 func! Test_normal15_z_scroll_vert()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	465 " basic test for z commands that scroll the window
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	466 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	467 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	468 norm! >>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	469 " Test for z<cr>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	470 exe "norm! z\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	471 call assert_equal(' 100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	472 call assert_equal(100, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	473 call assert_equal([0, 100, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	474
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	475 " Test for zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	476 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	477 norm! >>0zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	478 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	479 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	480 call assert_equal([0, 21, 1, 0, 8], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	481
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	482 " Test for zb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	483 30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	484 norm! >>$ztzb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	485 call assert_equal(' 30', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	486 call assert_equal(30, winsaveview()['topline']+winheight(0)-1)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	487 call assert_equal([0, 30, 3, 0, 2147483647], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	488
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	489 " Test for z-
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	490 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	491 30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	492 norm! 0z-
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	493 call assert_equal(' 30', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	494 call assert_equal(30, winsaveview()['topline']+winheight(0)-1)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	495 call assert_equal([0, 30, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	496
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	497 " Test for z{height}<cr>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	498 call assert_equal(10, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	499 exe "norm! z12\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	500 call assert_equal(12, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	501 exe "norm! z10\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	502 call assert_equal(10, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	503
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	504 " Test for z.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	505 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	506 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	507 norm! 0z.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	508 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	509 call assert_equal(17, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	510 call assert_equal([0, 21, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	511
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	512 " Test for zz
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	513 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	514 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	515 norm! 0zz
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	516 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	517 call assert_equal(17, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	518 call assert_equal([0, 21, 1, 0, 8], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	519
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	520 " Test for z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	521 11
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	522 norm! zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	523 norm! z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	524 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	525 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	526 call assert_equal([0, 21, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	527
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	528 " Test for [count]z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	529 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	530 norm! 21z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	531 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	532 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	533 call assert_equal([0, 21, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	534
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	535 " Test for z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	536 norm! 22z+0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	537 norm! z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	538 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	539 call assert_equal(12, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	540 call assert_equal([0, 21, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	541
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	542 " Test for [count]z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	543 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	544 norm! 30z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	545 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	546 call assert_equal(12, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	547 call assert_equal([0, 21, 2, 0, 9], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	548
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	549 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	550 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	551 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	552
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	553 func! Test_normal16_z_scroll_hor()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	554 " basic test for z commands that scroll the window
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	555 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	556 15vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	557 set nowrap listchars=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	558 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	559 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	560 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	561 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	562 1d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	563
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	564 " Test for zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	565 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	566 norm! 5zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	567 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	568 call assert_equal(6, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	569 call assert_equal(5, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	570 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	571 call assert_equal('f', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	572
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	573 " Test for zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	574 norm! 2zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	575 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	576 call assert_equal(6, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	577 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	578 call assert_equal('f', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	579 call assert_equal(3, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	580
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	581 " Test for zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	582 norm! zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	583 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	584 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	585 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	586 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	587 norm! 2zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	588 call assert_equal(25, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	589 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	590 call assert_equal('y', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	591 call assert_equal(24, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	592
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	593 " Test for zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	594 norm! 2zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	595 call assert_equal(25, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	596 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	597 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	598 call assert_equal('y', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	599
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	600 " Test for zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	601 norm! $zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	602 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	603 call assert_equal(25, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	604 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	605 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	606
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	607 " Test for ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	608 norm! ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	609 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	610 call assert_equal(11, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	611 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	612 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	613
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	614 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	615 set wrap listchars=eol:$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	616 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	617 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	618
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	619 func! Test_normal17_z_scroll_hor2()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	620 " basic test for z commands that scroll the window
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	621 " using 'sidescrolloff' setting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	622 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	623 20vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	624 set nowrap listchars= sidescrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	625 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	626 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	627 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	628 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	629 1d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	630
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	631 " Test for zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	632 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	633 norm! 5zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	634 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	635 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	636 call assert_equal(5, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	637 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	638 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	639
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	640 " Test for zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	641 norm! 2zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	642 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	643 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	644 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	645 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	646 call assert_equal(3, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	647
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	648 " Test for zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	649 norm! 0zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	650 call assert_equal(16, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	651 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	652 call assert_equal('p', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	653 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	654 norm! 2zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	655 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	656 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	657 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	658 call assert_equal(15, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	659
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	660 " Test for zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	661 norm! 2zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	662 call assert_equal(15, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	663 call assert_equal(0, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	664 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	665 call assert_equal('o', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	666
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	667 " Test for zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	668 norm! $zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	669 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	670 call assert_equal(20, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	671 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	672 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	673
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	674 " Test for ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	675 norm! ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	676 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	677 call assert_equal(11, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	678 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	679 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	680
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	681 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	682 set wrap listchars=eol:$ sidescrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	683 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	684 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	685
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	686 func! Test_normal18_z_fold()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	687 " basic tests for foldopen/folddelete
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	688 if !has("folding")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	689 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	690 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	691 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	692 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	693 setl foldenable fdm=marker foldlevel=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	694
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	695 " Test for zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	696 " First fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	697 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	698 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	699 call assert_equal(['50/{{{/', '51', '52', '53/}}}/'], getline(50,53))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	700
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	701 " Test for zd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	702 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	703 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	704 call assert_equal(2, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	705 norm! kzd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	706 call assert_equal(['50', '51/{{{/', '52/}}}/', '53'], getline(50,53))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	707 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	708 call assert_equal(1, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	709
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	710 " Test for zD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	711 " also deletes partially selected folds recursively
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	712 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	713 norm! zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	714 call assert_equal(2, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	715 norm! kV2jzD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	716 call assert_equal(['50', '51', '52', '53'], getline(50,53))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	717
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	718 " Test for zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	719 85
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	720 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	721 86
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	722 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	723 90
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	724 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	725 call assert_equal(['85/{{{/', '86/{{{/', '87/}}}/', '88/}}}/', '89', '90/{{{/', '91', '92', '93/}}}/'], getline(85,93))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	726 norm! zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	727 call assert_equal(['85', '86', '87', '88', '89', '90', '91', '92', '93'], getline(85,93))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	728
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	729 " Test for zn
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	730 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	731 set foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	732 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	733 norm! zn
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	734 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	735 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	736 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	737 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	738 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	739 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	740 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	741 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	742 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	743
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	744 " Test for zN
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	745 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	746 norm! zN
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	747 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	748 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	749 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	750 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	751 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	752 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	753
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	754 " Test for zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	755 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	756 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	757 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	758 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	759 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	760 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	761 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	762 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	763
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	764 " Test for za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	765 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	766 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	767 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	768 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	769 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	770 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	771 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	772 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	773 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	774 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	775 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	776 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	777 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	778 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	779 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	780 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	781 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	782 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	783
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	784 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	785 norm! 5zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	786 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	787 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	788 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	789 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	790 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	791 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	792 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	793 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	794 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	795 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	796 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	797 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	798 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	799 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	800 " close fold and set foldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	801 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	802 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	803
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	804 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	805 " have to use {count}za to open all folds and make the cursor visible
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	806 norm! 2za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	807 norm! 2k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	808 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	809 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	810 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	811 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	812 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	813 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	814 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	815 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	816 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	817
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	818 " Test for zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	819 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	820 set foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	821 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	822 norm! zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	823 norm! 2k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	824 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	825 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	826 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	827 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	828 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	829 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	830 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	831 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	832 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	833
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	834 " zA on a opened fold when foldenale is not set
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	835 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	836 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	837 norm! zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	838 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	839 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	840 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	841 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	842 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	843 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	844 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	845
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	846 " Test for zc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	847 norm! zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	848 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	849 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	850 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	851 norm! 5zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	852 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	853 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	854 " There most likely is a bug somewhere:
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	855 " https://groups.google.com/d/msg/vim_dev/v2EkfJ_KQjI/u-Cvv94uCAAJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	856 " TODO: Should this only close the inner most fold or both folds?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	857 norm! zc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	858 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	859 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	860 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	861 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	862 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	863 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	864 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	865 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	866 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	867 norm! Vjzc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	868 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	869 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	870 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	871 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	872 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	873 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	874
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	875 " Test for zC
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	876 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	877 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	878 norm! zCk
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	879 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	880 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	881 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	882 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	883 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	884
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	885 " Test for zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	886 " 1) close folds at line 49-54
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	887 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	888 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	889 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	890 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	891 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	892 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	893 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	894 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	895
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	896 " 2) do not close fold under curser
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	897 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	898 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	899 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	900 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	901 norm! 3k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	902 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	903 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	904 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	905 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	906 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	907 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	908 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	909 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	910 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	911 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	912 call assert_equal('53', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	913 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	914 call assert_equal('54/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	915 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	916 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	917
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	918 " 3) close one level of folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	919 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	920 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	921 set foldlevel=1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	922 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	923 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	924 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	925 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	926 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	927 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	928 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	929 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	930 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	931 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	932 call assert_equal('53', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	933 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	934 call assert_equal('54/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	935 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	936 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	937
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	938 " Test for zX
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	939 " Close all folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	940 set foldlevel=0 nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	941 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	942 norm! zX
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	943 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	944 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	945 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	946 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	947 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	948 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	949 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	950
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	951 " Test for zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	952 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	953 set nofoldenable foldlevel=2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	954 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	955 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	956 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	957 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	958 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	959 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	960 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	961 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	962 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	963 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	964 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	965 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	966 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	967
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	968 " Test for zM
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	969 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	970 set nofoldenable foldlevel=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	971 norm! zM
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	972 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	973 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	974 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	975 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	976 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	977 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	978 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	979
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	980 " Test for zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	981 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	982 set nofoldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	983 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	984 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	985 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	986 set foldlevel=0 foldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	987 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	988 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	989 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	990 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	991 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	992 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	993 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	994 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	995 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	996 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	997 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	998 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	999 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1000 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1001
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1002 " Test for zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1003 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1004 set nofoldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1005 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1006 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1007 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1008 set foldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1009 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1010 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1011 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1012 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1013 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1014 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1015 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1016 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1017 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1018 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1019 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1020 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1021 call append(50, ['a /{{{/', 'b /}}}/'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1022 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1023 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1024 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1025 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1026 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1027 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1028 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1029 call assert_equal('a /{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1030 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1031 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1032 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1033 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1034 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1035 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1036 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1037 call assert_equal(3, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1038 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1039 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1040 call assert_equal('49/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1041 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1042 call assert_equal('50/{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1043 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1044 call assert_equal('a /{{{/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1045 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1046 call assert_equal('b /}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1047 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1048 call assert_equal('51/}}}/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1049 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1050 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1051
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1052 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1053 setl nofoldenable fdm=marker foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1054 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1055 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1056
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1057 func! Test_normal19_z_spell()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1058 if !has("spell") \|\| !has('syntax')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1059 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1060 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1061 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1062 call append(0, ['1 good', '2 goood', '3 goood'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1063 set spell spellfile=./Xspellfile.add spelllang=en
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1064 let oldlang=v:lang
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1065 lang C
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1066
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1067 " Test for zg
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1068 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1069 norm! ]s
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1070 call assert_equal('2 goood', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1071 norm! zg
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1072 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1073 let a=execute('unsilent :norm! ]s')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1074 call assert_equal('1 good', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1075 call assert_equal('search hit BOTTOM, continuing at TOP', a[1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1076 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1077 call assert_equal('goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1078
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1079 " Test for zw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1080 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1081 norm! $zw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1082 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1083 norm! ]s
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1084 call assert_equal('2 goood', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1085 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1086 call assert_equal('#oood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1087 call assert_equal('goood/!', cnt[1])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1089 " Test for zg in visual mode
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1090 let a=execute('unsilent :norm! V$zg')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1091 call assert_equal("Word '2 goood' added to ./Xspellfile.add", a[1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1092 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1093 norm! ]s
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1094 call assert_equal('3 goood', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1095 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1096 call assert_equal('2 goood', cnt[2])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1097 " Remove "2 good" from spellfile
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1098 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1099 let a=execute('unsilent norm! V$zw')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1100 call assert_equal("Word '2 goood' added to ./Xspellfile.add", a[1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1101 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1102 call assert_equal('2 goood/!', cnt[3])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1103
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1104 " Test for zG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1105 let a=execute('unsilent norm! V$zG')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1106 call assert_match("Word '2 goood' added to .*", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1107 let fname=matchstr(a, 'to\s\+\zs\f\+$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1108 let cnt=readfile(fname)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1109 call assert_equal('2 goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1110
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1111 " Test for zW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1112 let a=execute('unsilent norm! V$zW')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1113 call assert_match("Word '2 goood' added to .*", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1114 let cnt=readfile(fname)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1115 call assert_equal('# goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1116 call assert_equal('2 goood/!', cnt[1])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1117
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1118 " Test for zuW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1119 let a=execute('unsilent norm! V$zuW')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1120 call assert_match("Word '2 goood' removed from .*", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1121 let cnt=readfile(fname)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1122 call assert_equal('# goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1123 call assert_equal('# goood/!', cnt[1])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1124
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1125 " Test for zuG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1126 let a=execute('unsilent norm! $zG')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1127 call assert_match("Word 'goood' added to .*", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1128 let cnt=readfile(fname)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1129 call assert_equal('# goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1130 call assert_equal('# goood/!', cnt[1])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1131 call assert_equal('goood', cnt[2])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1132 let a=execute('unsilent norm! $zuG')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1133 let cnt=readfile(fname)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1134 call assert_match("Word 'goood' removed from .*", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1135 call assert_equal('# goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1136 call assert_equal('# goood/!', cnt[1])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1137 call assert_equal('#oood', cnt[2])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1138 " word not found in wordlist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1139 let a=execute('unsilent norm! V$zuG')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1140 let cnt=readfile(fname)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1141 call assert_match("", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1142 call assert_equal('# goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1143 call assert_equal('# goood/!', cnt[1])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1144 call assert_equal('#oood', cnt[2])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1145
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1146 " Test for zug
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1147 call delete('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1148 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1149 let a=execute('unsilent norm! $zg')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1150 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1151 call assert_equal('goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1152 let a=execute('unsilent norm! $zug')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1153 call assert_match("Word 'goood' removed from \./Xspellfile.add", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1154 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1155 call assert_equal('#oood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1156 " word not in wordlist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1157 let a=execute('unsilent norm! V$zug')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1158 call assert_match('', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1159 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1160 call assert_equal('#oood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1161
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1162 " Test for zuw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1163 call delete('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1164 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1165 let a=execute('unsilent norm! Vzw')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1166 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1167 call assert_equal('2 goood/!', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1168 let a=execute('unsilent norm! Vzuw')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1169 call assert_match("Word '2 goood' removed from \./Xspellfile.add", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1170 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1171 call assert_equal('# goood/!', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1172 " word not in wordlist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1173 let a=execute('unsilent norm! $zug')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1174 call assert_match('', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1175 let cnt=readfile('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1176 call assert_equal('# goood/!', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1177
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1178 " add second entry to spellfile setting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1179 set spellfile=./Xspellfile.add,./Xspellfile2.add
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1180 call delete('./Xspellfile.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1181 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1182 let a=execute('unsilent norm! $2zg')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1183 let cnt=readfile('./Xspellfile2.add')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1184 call assert_match("Word 'goood' added to ./Xspellfile2.add", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1185 call assert_equal('goood', cnt[0])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1186
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1187 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1188 exe "lang" oldlang
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1189 call delete("./Xspellfile.add")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1190 call delete("./Xspellfile2.add")
10130 de20f2434807 commit https://github.com/vim/vim/commit/df0db16cf74281a83a9ea3388a2ef9aedccd013c Christian Brabandt <cb@256bit.org> parents: 10124 diff changeset	1191 call delete("./Xspellfile.add.spl")
de20f2434807 commit https://github.com/vim/vim/commit/df0db16cf74281a83a9ea3388a2ef9aedccd013c Christian Brabandt <cb@256bit.org> parents: 10124 diff changeset	1192 call delete("./Xspellfile2.add.spl")
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1193
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1194 " zux -> no-op
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1195 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1196 norm! $zux
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1197 call assert_equal([], glob('Xspellfile.add',0,1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1198 call assert_equal([], glob('Xspellfile2.add',0,1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1199
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1200 set spellfile=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1201 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1202 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1203
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1204 func! Test_normal20_exmode()
10092 d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1205 if !has("unix")
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1206 " Reading from redirected file doesn't work on MS-Windows
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1207 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1208 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1209 call writefile(['1a', 'foo', 'bar', '.', 'w! Xfile2', 'q!'], 'Xscript')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1210 call writefile(['1', '2'], 'Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1211 call system(v:progpath .' -e -s < Xscript Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1212 let a=readfile('Xfile2')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1213 call assert_equal(['1', 'foo', 'bar', '2'], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1214
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1215 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1216 for file in ['Xfile', 'Xfile2', 'Xscript']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1217 call delete(file)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1218 endfor
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1219 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1220 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1221
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1222 func! Test_normal21_nv_hat()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1223 set hidden
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1224 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1225 " to many buffers opened already, will not work
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1226 "call assert_fails(":b#", 'E23')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1227 "call assert_equal('', @#)
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1228 e Xfoobar
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1229 e Xfile2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1230 call feedkeys("\<c-^>", 't')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1231 call assert_equal("Xfile2", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1232 call feedkeys("f\<c-^>", 't')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1233 call assert_equal("Xfile2", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1234 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1235 set nohidden
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1236 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1237 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1238
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1239 func! Test_normal22_zet()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1240 " Test for ZZ
10092 d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1241 " let shell = &shell
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1242 " let &shell = 'sh'
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1243 call writefile(['1', '2'], 'Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1244 let args = ' -u NONE -N -U NONE -i NONE --noplugins -X --not-a-term'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1245 call system(v:progpath . args . ' -c "%d" -c ":norm! ZZ" Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1246 let a = readfile('Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1247 call assert_equal([], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1248 " Test for ZQ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1249 call writefile(['1', '2'], 'Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1250 call system(v:progpath . args . ' -c "%d" -c ":norm! ZQ" Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1251 let a = readfile('Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1252 call assert_equal(['1', '2'], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1253
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1254 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1255 for file in ['Xfile']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1256 call delete(file)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1257 endfor
10092 d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1258 " let &shell = shell
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1259 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1260
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1261 func! Test_normal23_K()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1262 " Test for K command
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1263 new
10330 71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1264 call append(0, ['version8.txt', 'man', 'aa%bb', 'cc\|dd'])
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1265 let k = &keywordprg
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1266 set keywordprg=:help
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1267 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1268 norm! VK
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1269 call assert_equal('version8.txt', fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1270 call assert_equal('help', &ft)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1271 call assert_match('\version8.txt\', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1272 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1273 norm! 0K
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1274 call assert_equal('version8.txt', fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1275 call assert_equal('help', &ft)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1276 call assert_match('\version8\.0\', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1277 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1278
10330 71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1279 set keywordprg=:new
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1280 set iskeyword+=%
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1281 set iskeyword+=\\|
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1282 2
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1283 norm! K
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1284 call assert_equal('man', fnamemodify(bufname('%'), ':t'))
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1285 bwipe!
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1286 3
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1287 norm! K
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1288 call assert_equal('aa%bb', fnamemodify(bufname('%'), ':t'))
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1289 bwipe!
10338 e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b Christian Brabandt <cb@256bit.org> parents: 10330 diff changeset	1290 if !has('win32')
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b Christian Brabandt <cb@256bit.org> parents: 10330 diff changeset	1291 4
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b Christian Brabandt <cb@256bit.org> parents: 10330 diff changeset	1292 norm! K
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b Christian Brabandt <cb@256bit.org> parents: 10330 diff changeset	1293 call assert_equal('cc\|dd', fnamemodify(bufname('%'), ':t'))
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b Christian Brabandt <cb@256bit.org> parents: 10330 diff changeset	1294 bwipe!
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b Christian Brabandt <cb@256bit.org> parents: 10330 diff changeset	1295 endif
10330 71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1296 set iskeyword-=%
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1297 set iskeyword-=\\|
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc Christian Brabandt <cb@256bit.org> parents: 10166 diff changeset	1298
10092 d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1299 " Only expect "man" to work on Unix
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1300 if !has("unix")
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1301 let &keywordprg = k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1302 bw!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1303 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1304 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1305 set keywordprg=man\ --pager=cat
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1306 " Test for using man
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1307 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1308 let a = execute('unsilent norm! K')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1309 call assert_match("man --pager=cat 'man'", a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1310
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1311 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1312 let &keywordprg = k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1313 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1314 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1315
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1316 func! Test_normal24_rot13()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1317 " This test uses multi byte characters
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1318 if !has("multi_byte")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1319 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1320 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1321 " Testing for g?? g?g?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1322 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1323 call append(0, 'abcdefghijklmnopqrstuvwxyzäüö')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1324 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1325 norm! g??
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1326 call assert_equal('nopqrstuvwxyzabcdefghijklmäüö', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1327 norm! g?g?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1328 call assert_equal('abcdefghijklmnopqrstuvwxyzäüö', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1329
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1330 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1331 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1332 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1333
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1334 func! Test_normal25_tag()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1335 " Testing for CTRL-] g CTRL-] g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1336 " CTRL-W g] CTRL-W CTRL-] CTRL-W g CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1337 h
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1338 " Test for CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1339 call search('\<x\>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1340 exe "norm! \<c-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1341 call assert_equal("change.txt", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1342 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1343 call assert_equal("x", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1344 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1345
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1346 " Test for g_CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1347 call search('\<v_u\>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1348 exe "norm! g\<c-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1349 call assert_equal("change.txt", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1350 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1351 call assert_equal("v_u", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1352 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1353
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1354 " Test for g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1355 call search('\<i_<Esc>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1356 let a = execute(":norm! g]")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1357 call assert_match('i_<Esc>.*insert.txt', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1358
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1359 if !empty(exepath('cscope')) && has('cscope')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1360 " setting cscopetag changes how g] works
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1361 set cst
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1362 exe "norm! g]"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1363 call assert_equal("insert.txt", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1364 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1365 call assert_equal("i_<Esc>", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1366 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1367 " Test for CTRL-W g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1368 exe "norm! \<C-W>g]"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1369 call assert_equal("insert.txt", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1370 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1371 call assert_equal("i_<Esc>", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1372 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1373 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1374 set nocst
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1375 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1376
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1377 " Test for CTRL-W g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1378 let a = execute("norm! \<C-W>g]")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1379 call assert_match('i_<Esc>.*insert.txt', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1380
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1381 " Test for CTRL-W CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1382 exe "norm! \<C-W>\<C-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1383 call assert_equal("insert.txt", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1384 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1385 call assert_equal("i_<Esc>", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1386 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1387 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1388
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1389 " Test for CTRL-W g CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1390 exe "norm! \<C-W>g\<C-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1391 call assert_equal("insert.txt", fnamemodify(bufname('%'), ':t'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1392 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1393 call assert_equal("i_<Esc>", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1394 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1395 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1396
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1397 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1398 helpclose
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1399 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1400
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1401 func! Test_normal26_put()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1402 " Test for ]p ]P [p and [P
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1403 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1404 call append(0, ['while read LINE', 'do', ' ((count++))', ' if [ $? -ne 0 ]; then', " echo 'Error writing file'", ' fi', 'done'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1405 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1406 /Error/y a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1407 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1408 norm! "a]pj"a[p
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1409 call assert_equal(['do', "echo 'Error writing file'", " echo 'Error writing file'", ' ((count++))'], getline(2,5))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1410 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1411 /^\s\{4}/
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1412 exe "norm! \"a]P3Eldt'"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1413 exe "norm! j\"a[P2Eldt'"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1414 call assert_equal([' if [ $? -ne 0 ]; then', " echo 'Error writing'", " echo 'Error'", " echo 'Error writing file'", ' fi'], getline(6,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1415
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1416 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1417 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1418 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1419
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1420 func! Test_normal27_bracket()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1421 " Test for [' [` ]' ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1422 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1423 1,21s/.\+/ & b/
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1424 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1425 norm! $ma
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1426 5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1427 norm! $mb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1428 10
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1429 norm! $mc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1430 15
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1431 norm! $md
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1432 20
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1433 norm! $me
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1434
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1435 " Test for ['
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1436 9
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1437 norm! 2['
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1438 call assert_equal(' 1 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1439 call assert_equal(1, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1440 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1441
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1442 " Test for ]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1443 norm! ]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1444 call assert_equal(' 5 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1445 call assert_equal(5, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1446 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1447
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1448 " No mark after line 21, cursor moves to first non blank on current line
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1449 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1450 norm! $]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1451 call assert_equal(' 21 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1452 call assert_equal(21, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1453 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1454
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1455 " Test for [`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1456 norm! 2[`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1457 call assert_equal(' 15 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1458 call assert_equal(15, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1459 call assert_equal(8, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1460
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1461 " Test for ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1462 norm! ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1463 call assert_equal(' 20 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1464 call assert_equal(20, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1465 call assert_equal(8, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1466
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1467 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1468 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1469 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1470
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1471 func! Test_normal28_parenthesis()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1472 " basic testing for ( and )
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1473 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1474 call append(0, ['This is a test. With some sentences!', '', 'Even with a question? And one more. And no sentence here'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1475
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1476 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1477 norm! d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1478 call assert_equal(['This is a test. With some sentences!', '', 'Even with a question? And one more. ', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1479 norm! 2d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1480 call assert_equal(['This is a test. With some sentences!', '', ' ', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1481 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1482 norm! 0d)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1483 call assert_equal(['With some sentences!', '', ' ', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1484
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1485 call append('$', ['This is a long sentence', '', 'spanning', 'over several lines. '])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1486 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1487 norm! $d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1488 call assert_equal(['With some sentences!', '', ' ', '', 'This is a long sentence', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1489
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1490 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1491 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1492 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1493
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1494 fun! Test_normal29_brace()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1495 " basic test for { and } movements
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1496 let text= ['A paragraph begins after each empty line, and also at each of a set of',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1497 \ 'paragraph macros, specified by the pairs of characters in the ''paragraphs''',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1498 \ 'option. The default is "IPLPPPQPP TPHPLIPpLpItpplpipbp", which corresponds to',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1499 \ 'the macros ".IP", ".LP", etc. (These are nroff macros, so the dot must be in',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1500 \ 'the first column). A section boundary is also a paragraph boundary.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1501 \ 'Note that a blank line (only containing white space) is NOT a paragraph',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1502 \ 'boundary.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1503 \ '',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1504 \ '',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1505 \ 'Also note that this does not include a ''{'' or ''}'' in the first column. When',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1506 \ 'the ''{'' flag is in ''cpoptions'' then ''{'' in the first column is used as a',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1507 \ 'paragraph boundary \|posix\|.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1508 \ '{',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1509 \ 'This is no paragaraph',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1510 \ 'unless the ''{'' is set',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1511 \ 'in ''cpoptions''',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1512 \ '}',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1513 \ '.IP',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1514 \ 'The nroff macros IP seperates a paragraph',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1515 \ 'That means, it must be a ''.''',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1516 \ 'followed by IP',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1517 \ '.LPIt does not matter, if afterwards some',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1518 \ 'more characters follow.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1519 \ '.SHAlso section boundaries from the nroff',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1520 \ 'macros terminate a paragraph. That means',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1521 \ 'a character like this:',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1522 \ '.NH',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1523 \ 'End of text here']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1524 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1525 call append(0, text)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1526 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1527 norm! 0d2}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1528 call assert_equal(['.IP',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1529 \ 'The nroff macros IP seperates a paragraph', 'That means, it must be a ''.''', 'followed by IP',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1530 \ '.LPIt does not matter, if afterwards some', 'more characters follow.', '.SHAlso section boundaries from the nroff',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1531 \ 'macros terminate a paragraph. That means', 'a character like this:', '.NH', 'End of text here', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1532 norm! 0d}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1533 call assert_equal(['.LPIt does not matter, if afterwards some', 'more characters follow.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1534 \ '.SHAlso section boundaries from the nroff', 'macros terminate a paragraph. That means',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1535 \ 'a character like this:', '.NH', 'End of text here', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1536 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1537 norm! d{
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1538 call assert_equal(['.LPIt does not matter, if afterwards some', 'more characters follow.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1539 \ '.SHAlso section boundaries from the nroff', 'macros terminate a paragraph. That means', 'a character like this:', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1540 norm! d{
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1541 call assert_equal(['.LPIt does not matter, if afterwards some', 'more characters follow.', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1542 " Test with { in cpooptions
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1543 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1544 call append(0, text)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1545 set cpo+={
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1546 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1547 norm! 0d2}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1548 call assert_equal(['{', 'This is no paragaraph', 'unless the ''{'' is set', 'in ''cpoptions''', '}',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1549 \ '.IP', 'The nroff macros IP seperates a paragraph', 'That means, it must be a ''.''',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1550 \ 'followed by IP', '.LPIt does not matter, if afterwards some', 'more characters follow.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1551 \ '.SHAlso section boundaries from the nroff', 'macros terminate a paragraph. That means',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1552 \ 'a character like this:', '.NH', 'End of text here', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1553 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1554 norm! d}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1555 call assert_equal(['{', 'This is no paragaraph', 'unless the ''{'' is set', 'in ''cpoptions''', '}',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1556 \ '.IP', 'The nroff macros IP seperates a paragraph', 'That means, it must be a ''.''',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1557 \ 'followed by IP', '.LPIt does not matter, if afterwards some', 'more characters follow.',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1558 \ '.SHAlso section boundaries from the nroff', 'macros terminate a paragraph. That means',
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1559 \ 'a character like this:', '.NH', 'End of text here', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1560 norm! gg}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1561 norm! d5}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1562 call assert_equal(['{', 'This is no paragaraph', 'unless the ''{'' is set', 'in ''cpoptions''', '}', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1563
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1564 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1565 set cpo-={
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1566 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1567 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1568
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1569 fun! Test_normal30_changecase()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1570 " This test uses multi byte characters
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1571 if !has("multi_byte")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1572 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1573 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1574 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1575 call append(0, 'This is a simple test: äüöß')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1576 norm! 1ggVu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1577 call assert_equal('this is a simple test: äüöß', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1578 norm! VU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1579 call assert_equal('THIS IS A SIMPLE TEST: ÄÜÖSS', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1580 norm! guu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1581 call assert_equal('this is a simple test: äüöss', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1582 norm! gUgU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1583 call assert_equal('THIS IS A SIMPLE TEST: ÄÜÖSS', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1584 norm! gugu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1585 call assert_equal('this is a simple test: äüöss', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1586 norm! gUU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1587 call assert_equal('THIS IS A SIMPLE TEST: ÄÜÖSS', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1588 norm! 010~
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1589 call assert_equal('this is a SIMPLE TEST: ÄÜÖSS', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1590 norm! V~
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1591 call assert_equal('THIS IS A simple test: äüöss', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1592
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1593 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1594 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1595 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1596
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1597 fun! Test_normal31_r_cmd()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1598 " Test for r command
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1599 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1600 call append(0, 'This is a simple test: abcd')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1601 exe "norm! 1gg$r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1602 call assert_equal(['This is a simple test: abc', '', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1603 exe "norm! 1gg2wlr\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1604 call assert_equal(['This is a', 'simple test: abc', '', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1605 exe "norm! 2gg0W5r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1606 call assert_equal(['This is a', 'simple ', ' abc', '', ''], getline('1', '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1607 set autoindent
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1608 call setline(2, ['simple test: abc', ''])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1609 exe "norm! 2gg0W5r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1610 call assert_equal(['This is a', 'simple ', 'abc', '', '', ''], getline('1', '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1611 exe "norm! 1ggVr\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1612 call assert_equal('^M^M^M^M^M^M^M^M^M', strtrans(getline(1)))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1613 call setline(1, 'This is a')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1614 exe "norm! 1gg05rf"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1615 call assert_equal('fffffis a', getline(1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1616
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1617 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1618 set noautoindent
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1619 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1620 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1621
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1622 func! Test_normal32_g_cmd1()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1623 " Test for g*, g#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1624 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1625 call append(0, ['abc.x_foo', 'x_foobar.abc'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1626 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1627 norm! $g*
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1628 call assert_equal('x_foo', @/)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1629 call assert_equal('x_foobar.abc', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1630 norm! $g#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1631 call assert_equal('abc', @/)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1632 call assert_equal('abc.x_foo', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1633
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1634 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1635 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1636 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1637
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1638 fun! Test_normal33_g_cmd2()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1639 if !has("jumplist")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1640 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1641 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1642 " Tests for g cmds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1643 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1644 " Test for g`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1645 clearjumps
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1646 norm! ma10j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1647 let a=execute(':jumps')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1648 " empty jumplist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1649 call assert_equal('>', a[-1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1650 norm! g`a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1651 call assert_equal('>', a[-1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1652 call assert_equal(1, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1653 call assert_equal('1', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1654
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1655 " Test for g; and g,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1656 norm! g;
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1657 " there is only one change in the changelist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1658 " currently, when we setup the window
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1659 call assert_equal(2, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1660 call assert_fails(':norm! g;', 'E662')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1661 call assert_fails(':norm! g,', 'E663')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1662 let &ul=&ul
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1663 call append('$', ['a', 'b', 'c', 'd'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1664 let &ul=&ul
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1665 call append('$', ['Z', 'Y', 'X', 'W'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1666 let a = execute(':changes')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1667 call assert_match('2\s\+0\s\+2', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1668 call assert_match('101\s\+0\s\+a', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1669 call assert_match('105\s\+0\s\+Z', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1670 norm! 3g;
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1671 call assert_equal(2, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1672 norm! 2g,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1673 call assert_equal(105, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1674
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1675 " Test for g& - global substitute
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1676 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1677 call setline(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1678 call append('$', ['a', 'b', 'c', 'd'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1679 $s/\w/&&/g
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1680 exe "norm! /[1-8]\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1681 norm! g&
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1682 call assert_equal(['11', '22', '33', '44', '55', '66', '77', '88', '9', '110', 'a', 'b', 'c', 'dd'], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1683
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1684 " Test for gv
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1685 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1686 call append('$', repeat(['abcdefgh'], 8))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1687 exe "norm! 2gg02l\<c-v>2j2ly"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1688 call assert_equal(['cde', 'cde', 'cde'], getreg(0, 1, 1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1689 " in visual mode, gv swaps current and last selected region
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1690 exe "norm! G0\<c-v>4k4lgvd"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1691 call assert_equal(['', 'abfgh', 'abfgh', 'abfgh', 'abcdefgh', 'abcdefgh', 'abcdefgh', 'abcdefgh', 'abcdefgh'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1692 exe "norm! G0\<c-v>4k4ly"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1693 exe "norm! gvood"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1694 call assert_equal(['', 'abfgh', 'abfgh', 'abfgh', 'fgh', 'fgh', 'fgh', 'fgh', 'fgh'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1695
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1696 " Test for gk/gj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1697 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1698 15vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1699 set wrap listchars= sbr=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1700 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1701 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1702 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1703 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1704
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1705 norm! 3gg0dgk
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1706 call assert_equal(['', 'abcdefghijklmno', '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1707 set nu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1708 norm! 3gg0gjdgj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1709 call assert_equal(['', 'abcdefghijklmno', '0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1710
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1711 " Test for gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1712 norm! 2gggJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1713 call assert_equal(['', 'abcdefghijklmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1714 call assert_equal(16, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1715 " shouldn't do anything
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1716 norm! 10gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1717 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1718
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1719 " Test for g0 g^ gm g$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1720 exe "norm! 2gg0gji "
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1721 call assert_equal(['', 'abcdefghijk lmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1722 norm! g0yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1723 call assert_equal(12, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1724 call assert_equal(' ', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1725 norm! g$yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1726 call assert_equal(22, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1727 call assert_equal('3', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1728 norm! gmyl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1729 call assert_equal(17, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1730 call assert_equal('n', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1731 norm! g^yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1732 call assert_equal(15, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1733 call assert_equal('l', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1734
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1735 " Test for g Ctrl-G
10092 d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1736 set ff=unix
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1737 let a=execute(":norm! g\<c-g>")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1738 call assert_match('Col 15 of 43; Line 2 of 2; Word 2 of 2; Byte 16 of 45', a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1739
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1740 " Test for gI
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1741 norm! gIfoo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1742 call assert_equal(['', 'fooabcdefghijk lmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1743
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1744 " Test for gi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1745 wincmd c
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1746 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1747 set tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1748 call setline(1, ['foobar', 'new line'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1749 norm! A next word
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1750 $put ='third line'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1751 norm! gi another word
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1752 call assert_equal(['foobar next word another word', 'new line', 'third line'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1753
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1754 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1755 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1756 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1757
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1758 fun! Test_normal34_g_cmd3()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1759 if !has("multi_byte")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1760 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1761 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1762 " Test for g8
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1763 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1764 call append(0, 'abcdefghijklmnopqrstuvwxyzäüö')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1765 let a=execute(':norm! 1gg$g8')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1766 call assert_equal('c3 b6 ', a[1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1767
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1768 " Test for gp gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1769 call append(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1770 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1771 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1772 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1773
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1774 fun! Test_normal35_g_cmd4()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1775 " Test for g<
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1776 " Cannot capture its output,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1777 " probably a bug, therefore, test disabled:
10124 f6942ed9e998 commit https://github.com/vim/vim/commit/31845093b7f1b33e0c7e9e592bef65528674a1f2 Christian Brabandt <cb@256bit.org> parents: 10104 diff changeset	1778 throw "Skipped: output of g< can't be tested currently"
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1779 echo "a\nb\nc\nd"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1780 let b=execute(':norm! g<')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1781 call assert_true(!empty(b), 'failed `execute(g<)`')
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1782 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1783
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1784 fun! Test_normal36_g_cmd5()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1785 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1786 call append(0, 'abcdefghijklmnopqrstuvwxyz')
10092 d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4 Christian Brabandt <cb@256bit.org> parents: 10088 diff changeset	1787 set ff=unix
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1788 " Test for gp gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1789 call append(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1790 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1791 norm! 1yy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1792 3
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1793 norm! gp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1794 call assert_equal([0, 5, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1795 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1796 norm! gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1797 call assert_equal([0, 14, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1798
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1799 " Test for go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1800 norm! 26go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1801 call assert_equal([0, 1, 26, 0, 26], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1802 norm! 27go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1803 call assert_equal([0, 1, 26, 0, 26], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1804 norm! 28go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1805 call assert_equal([0, 2, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1806 set ff=dos
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1807 norm! 29go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1808 call assert_equal([0, 2, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1809 set ff=unix
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1810 norm! gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1811 norm! 101go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1812 call assert_equal([0, 13, 26, 0, 26], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1813 norm! 103go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1814 call assert_equal([0, 14, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1815 " count > buffer content
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1816 norm! 120go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1817 call assert_equal([0, 14, 1, 0, 2147483647], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1818 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1819 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1820 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1821
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1822 fun! Test_normal37_g_cmd6()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1823 " basic test for gt and gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1824 tabnew 1.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1825 tabnew 2.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1826 tabnew 3.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1827 norm! 1gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1828 call assert_equal(1, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1829 norm! 3gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1830 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1831 norm! 1gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1832 " count gT goes not to the absolute tabpagenumber
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1833 " but, but goes to the count previous tabpagenumber
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1834 call assert_equal(2, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1835 " wrap around
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1836 norm! 3gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1837 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1838 " gt does not wrap around
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1839 norm! 5gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1840 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1841
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1842 for i in range(3)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1843 tabclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1844 endfor
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1845 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1846 call assert_fails(':tabclose', 'E784')
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1847 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1848
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1849 fun! Test_normal38_nvhome()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1850 " Test for <Home> and <C-Home> key
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1851 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1852 call setline(1, range(10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1853 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1854 setl et sw=2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1855 norm! V10>$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1856 " count is ignored
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1857 exe "norm! 10\<home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1858 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1859 exe "norm! \<home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1860 call assert_equal([0, 10, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1861 exe "norm! 5\<c-home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1862 call assert_equal([0, 5, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1863 exe "norm! \<c-home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1864 call assert_equal([0, 1, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1865
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1866 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1867 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1868 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1869
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1870 fun! Test_normal39_cw()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1871 " Test for cw and cW on whitespace
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1872 " and cpo+=w setting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1873 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1874 set tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1875 call append(0, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1876 norm! 1gg0elcwZZZ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1877 call assert_equal('hereZZZare some words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1878 norm! 1gg0elcWYYY
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1879 call assert_equal('hereZZZareYYYsome words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1880 set cpo+=w
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1881 call setline(1, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1882 norm! 1gg0elcwZZZ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1883 call assert_equal('hereZZZ are some words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1884 norm! 1gg2elcWYYY
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1885 call assert_equal('hereZZZ areYYY some words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1886 set cpo-=w
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1887 norm! 2gg0cwfoo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1888 call assert_equal('foo', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1889
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1890 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1891 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1892 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1893
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1894 fun! Test_normal40_ctrl_bsl()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1895 " Basic test for CTRL-\ commands
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1896 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1897 call append(0, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1898 exe "norm! 1gg0a\<C-\>\<C-N>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1899 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1900 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1901 call assert_equal('', visualmode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1902 exe "norm! 1gg0viw\<C-\>\<C-N>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1903 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1904 call assert_equal(4, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1905 exe "norm! 1gg0a\<C-\>\<C-G>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1906 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1907 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1908 "imap <buffer> , <c-\><c-n>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1909 set im
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1910 exe ":norm! \<c-\>\<c-n>dw"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1911 set noim
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1912 call assert_equal('are some words', getline(1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1913 call assert_false(&insertmode)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1914
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1915 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1916 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1917 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1918
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1919 fun! Test_normal41_insert_reg()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1920 " Test for <c-r>=, <c-r><c-r>= and <c-r><c-o>=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1921 " in insert mode
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1922 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1923 set sts=2 sw=2 ts=8 tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1924 call append(0, ["aaa\tbbb\tccc", '', '', ''])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1925 let a=getline(1)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1926 norm! 2gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1927 exe "norm! a\<c-r>=a\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1928 norm! 3gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1929 exe "norm! a\<c-r>\<c-r>=a\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1930 norm! 4gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1931 exe "norm! a\<c-r>\<c-o>=a\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1932 call assert_equal(['aaa bbb ccc', 'aaa bbb ccc', 'aaa bbb ccc', 'aaa bbb ccc', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1933
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1934 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1935 set sts=0 sw=8 ts=8
10124 f6942ed9e998 commit https://github.com/vim/vim/commit/31845093b7f1b33e0c7e9e592bef65528674a1f2 Christian Brabandt <cb@256bit.org> parents: 10104 diff changeset	1936 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1937 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1938
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1939 func! Test_normal42_halfpage()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1940 " basic test for Ctrl-D and Ctrl-U
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1941 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1942 call assert_equal(5, &scroll)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1943 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1944 call assert_equal('6', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1945 exe "norm! 2\<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1946 call assert_equal('8', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1947 call assert_equal(2, &scroll)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1948 set scroll=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1949 exe "norm! \<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1950 call assert_equal('3', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1951 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1952 set scrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1953 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1954 call assert_equal('10', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1955 exe "norm! \<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1956 call assert_equal('5', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1957 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1958 set scrolloff=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1959 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1960 call assert_equal('10', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1961 set scrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1962 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1963 exe "norm! $\<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1964 call assert_equal('95', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1965 call assert_equal([0, 95, 1, 0, 1], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1966 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1967 set nostartofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1968 exe "norm! $\<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1969 call assert_equal('95', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1970 call assert_equal([0, 95, 2, 0, 2147483647], getcurpos())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1971 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1972 set startofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1973 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	1974 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1975
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1976 fun! Test_normal43_textobject1()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1977 " basic tests for text object aw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1978 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1979 call append(0, ['foobar,eins,foobar', 'foo,zwei,foo '])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1980 " diw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1981 norm! 1gg0diw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1982 call assert_equal([',eins,foobar', 'foo,zwei,foo ', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1983 " daw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1984 norm! 2ggEdaw
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1985 call assert_equal([',eins,foobar', 'foo,zwei,', ''], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1986 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1987 call append(0, ["foo\teins\tfoobar", "foo\tzwei\tfoo "])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1988 " diW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1989 norm! 2ggwd2iW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1990 call assert_equal(['foo eins foobar', 'foo foo ', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1991 " daW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1992 norm! 1ggd2aW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1993 call assert_equal(['foobar', 'foo foo ', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1994
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1995 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1996 call append(0, ["foo\teins\tfoobar", "foo\tzwei\tfoo "])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1997 " aw in visual line mode switches to characterwise mode
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1998 norm! 2gg$Vawd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	1999 call assert_equal(['foo eins foobar', 'foo zwei foo'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2000 norm! 1gg$Viwd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2001 call assert_equal(['foo eins ', 'foo zwei foo'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2002
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2003 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2004 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2005 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2006
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2007 func! Test_normal44_textobjects2()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2008 " basic testing for is and as text objects
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2009 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2010 call append(0, ['This is a test. With some sentences!', '', 'Even with a question? And one more. And no sentence here'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2011 " Test for dis - does not remove trailing whitespace
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2012 norm! 1gg0dis
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2013 call assert_equal([' With some sentences!', '', 'Even with a question? And one more. And no sentence here', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2014 " Test for das - removes leading whitespace
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2015 norm! 3ggf?ldas
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2016 call assert_equal([' With some sentences!', '', 'Even with a question? And no sentence here', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2017 " when used in visual mode, is made characterwise
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2018 norm! 3gg$Visy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2019 call assert_equal('v', visualmode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2020 " reset visualmode()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2021 norm! 3ggVy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2022 norm! 3gg$Vasy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2023 call assert_equal('v', visualmode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2024 " basic testing for textobjects a< and at
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2025 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2026 call setline(1, ['<div> ','<a href="foobar" class="foo">xyz</a>',' </div>', ' '])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2027 " a<
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2028 norm! 1gg0da<
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2029 call assert_equal([' ', '<a href="foobar" class="foo">xyz</a>', ' </div>', ' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2030 norm! 1pj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2031 call assert_equal([' <div>', '<a href="foobar" class="foo">xyz</a>', ' </div>', ' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2032 " at
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2033 norm! d2at
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2034 call assert_equal([' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2035 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2036 call setline(1, ['<div> ','<a href="foobar" class="foo">xyz</a>',' </div>', ' '])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2037 " i<
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2038 norm! 1gg0di<
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2039 call assert_equal(['<> ', '<a href="foobar" class="foo">xyz</a>', ' </div>', ' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2040 norm! 1Pj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2041 call assert_equal(['<div> ', '<a href="foobar" class="foo">xyz</a>', ' </div>', ' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2042 norm! d2it
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2043 call assert_equal(['<div></div>',' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2044 " basic testing for a[ and i[ text object
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2045 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2046 call setline(1, [' ', '[', 'one [two]', 'thre', ']'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2047 norm! 3gg0di[
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2048 call assert_equal([' ', '[', ']'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2049 call setline(1, [' ', '[', 'one [two]', 'thre', ']'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2050 norm! 3gg0ftd2a[
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2051 call assert_equal([' '], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2052 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2053 " Test for i" when cursor is in front of a quoted object
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2054 call append(0, 'foo "bar"')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2055 norm! 1gg0di"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2056 call assert_equal(['foo ""', ''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2057
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2058 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2059 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2060 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2061
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2062 func! Test_normal45_drop()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2063 if !has("dnd")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2064 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2065 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2066 " basic test for :drop command
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2067 " unfortunately, without a gui, we can't really test much here,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2068 " so simply test that ~p fails (which uses the drop register)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2069 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2070 call assert_fails(':norm! "~p', 'E353')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2071 call assert_equal([], getreg('~', 1, 1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2072 " the ~ register is read only
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2073 call assert_fails(':let @~="1"', 'E354')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2074 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2075 endfunc
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2076
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2077 func! Test_normal46_ignore()
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2078 " This test uses multi byte characters
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2079 if !has("multi_byte")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2080 return
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2081 endif
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2082
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2083 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2084 " How to test this?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2085 " let's just for now test, that the buffer
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2086 " does not change
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2087 call feedkeys("\<c-s>", 't')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2088 call assert_equal([''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2089
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2090 " no valid commands
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2091 exe "norm! \<char-0x100>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2092 call assert_equal([''], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2093
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2094 exe "norm! ä"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2095 call assert_equal([''], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2096
10088 5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2097 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce Christian Brabandt <cb@256bit.org> parents: diff changeset	2098 bw!
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2099 endfunc
10154 4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2100
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2101 func! Test_normal47_visual_buf_wipe()
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2102 " This was causing a crash or ml_get error.
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2103 enew!
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2104 call setline(1,'xxx')
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2105 normal $
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2106 new
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2107 call setline(1, range(1,2))
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2108 2
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2109 exe "norm \<C-V>$"
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2110 bw!
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2111 norm yp
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69 Christian Brabandt <cb@256bit.org> parents: 10130 diff changeset	2112 set nomodified
10166 520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2113 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2114
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2115 func! Test_normal47_autocmd()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2116 " disabled, does not seem to be possible currently
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2117 throw "Skipped: not possible to test cursorhold autocmd while waiting for input in normal_cmd"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2118 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2119 call append(0, repeat('-',20))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2120 au CursorHold * call feedkeys('2l', '')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2121 1
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2122 set updatetime=20
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2123 " should delete 12 chars (d12l)
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2124 call feedkeys('d1', '!')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2125 call assert_equal('--------', getline(1))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2126
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2127 " clean up
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2128 au! CursorHold
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2129 set updatetime=4000
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2130 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2131 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2132
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2133 func! Test_normal48_wincmd()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2134 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2135 exe "norm! \<c-w>c"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2136 call assert_equal(1, winnr('$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2137 call assert_fails(":norm! \<c-w>c", "E444")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2138 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2139
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2140 func! Test_normal49_counts()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2141 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2142 call setline(1, 'one two three four five six seven eight nine ten')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2143 1
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2144 norm! 3d2w
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2145 call assert_equal('seven eight nine ten', getline(1))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2146 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2147 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2148
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2149 func! Test_normal50_commandline()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2150 if !has("timers") \|\| !has("cmdline_hist") \|\| !has("vertsplit")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2151 return
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2152 endif
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2153 func! DoTimerWork(id)
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2154 call assert_equal('[Command Line]', bufname(''))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2155 " should fail, with E11, but does fail with E23?
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2156 "call feedkeys("\<c-^>", 'tm')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2157
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2158 " should also fail with E11
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2159 call assert_fails(":wincmd p", 'E11')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2160 " return from commandline window
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2161 call feedkeys("\<cr>")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2162 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2163
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2164 let oldlang=v:lang
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2165 lang C
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2166 set updatetime=20
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2167 call timer_start(100, 'DoTimerWork')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2168 try
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2169 " throws E23, for whatever reason...
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2170 call feedkeys('q:', 'x!')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2171 catch /E23/
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2172 " no-op
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2173 endtry
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2174 " clean up
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2175 set updatetime=4000
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2176 exe "lang" oldlang
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2177 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2178 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2179
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2180 func! Test_normal51_FileChangedRO()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2181 if !has("autocmd")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2182 return
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2183 endif
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2184 call writefile(['foo'], 'Xreadonly.log')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2185 new Xreadonly.log
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2186 setl ro
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2187 au FileChangedRO <buffer> :call feedkeys("\<c-^>", 'tix')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2188 call assert_fails(":norm! Af", 'E788')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2189 call assert_equal(['foo'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2190 call assert_equal('Xreadonly.log', bufname(''))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2191
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2192 " cleanup
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2193 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2194 call delete("Xreadonly.log")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2195 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2196
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2197 func! Test_normal52_rl()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2198 if !has("rightleft")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2199 return
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2200 endif
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2201 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2202 call setline(1, 'abcde fghij klmnopq')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2203 norm! 1gg$
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2204 set rl
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2205 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2206 call feedkeys('l', 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2207 call assert_equal(18, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2208 call feedkeys('h', 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2209 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2210 call feedkeys("\<right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2211 call assert_equal(18, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2212 call feedkeys("\<s-right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2213 call assert_equal(13, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2214 call feedkeys("\<c-right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2215 call assert_equal(7, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2216 call feedkeys("\<c-left>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2217 call assert_equal(13, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2218 call feedkeys("\<s-left>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2219 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2220 call feedkeys("<<", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2221 call assert_equal(' abcde fghij klmnopq',getline(1))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2222 call feedkeys(">>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2223 call assert_equal('abcde fghij klmnopq',getline(1))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2224
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2225 " cleanup
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2226 set norl
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2227 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2228 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2229
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2230 func! Test_normal53_digraph()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2231 if !has('digraphs')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2232 return
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2233 endif
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2234 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2235 call setline(1, 'abcdefgh\|')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2236 exe "norm! 1gg0f\<c-k>!!"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2237 call assert_equal(9, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2238 set cpo+=D
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2239 exe "norm! 1gg0f\<c-k>!!"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2240 call assert_equal(1, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2241
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2242 set cpo-=D
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2243 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2244 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2245
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2246 func! Test_normal54_Ctrl_bsl()
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2247 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2248 call setline(1, 'abcdefghijklmn')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2249 exe "norm! df\<c-\>\<c-n>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2250 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2251 exe "norm! df\<c-\>\<c-g>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2252 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2253 exe "norm! df\<c-\>m"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2254 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2255 if !has("multi_byte")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2256 return
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2257 endif
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2258 call setline(2, 'abcdefghijklmnāf')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2259 norm! 2gg0
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2260 exe "norm! df\<Char-0x101>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2261 call assert_equal(['abcdefghijklmn', 'f'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2262 norm! 1gg0
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2263 exe "norm! df\<esc>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2264 call assert_equal(['abcdefghijklmn', 'f'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2265
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2266 " clean up
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2267 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f Christian Brabandt <cb@256bit.org> parents: 10154 diff changeset	2268 endfunc

Mercurial > vim

annotate src/testdir/test_normal.vim @ 10342:ae0faad76f9a v8.0.0066