annotate src/testdir/test_normal.vim @ 29903:08cbdf656975

Added tag v9.0.0289 for changeset ab2d83e147ca5f32fada66dcf5a3b69bfd033abf
author Bram Moolenaar <Bram@vim.org>
date Sat, 27 Aug 2022 23:00:03 +0200
parents 23f44007f65d
children 13b02c1ea0f7
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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
16089
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3 source shared.vim
18767
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18736
diff changeset
4 source check.vim
19852
12518b40c161 patch 8.2.0482: channel and sandbox code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19738
diff changeset
5 source view_util.vim
27457
4c16acb2525f patch 8.2.4257: Vim9: finding global function without g: prefix inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 27400
diff changeset
6 import './vim9.vim' as v9
29179
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
7 source screendump.vim
16089
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
8
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
9 func Setup_NewWindow()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 endfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
14 func MyFormatExpr()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 " 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
16 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
17 let line = getline(ln)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 if getline(ln) =~# '\d\s\+$'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 call setline(ln, substitute(line, '\s\+$', '', '') . '->$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 endfor
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
22 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
24 func CountSpaces(type, ...)
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 " for testing operatorfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 " will count the number of spaces
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 " and return the result in g:a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 let sel_save = &selection
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 let &selection = "inclusive"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 let reg_save = @@
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32 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
33 silent exe "normal! gvy"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 elseif a:type == 'line'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 silent exe "normal! '[V']y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 else
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 silent exe "normal! `[v`]y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38 endif
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
39 let g:a = strlen(substitute(@@, '[^ ]', '', 'g'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 let &selection = sel_save
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 let @@ = reg_save
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
42 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
43
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
44 func OpfuncDummy(type, ...)
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
45 " for testing operatorfunc
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
46 let g:opt = &linebreak
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
47
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
48 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
49 silent exe "normal! gvy"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
50 elseif a:type == 'line'
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
51 silent exe "normal! '[V']y"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
52 else
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
53 silent exe "normal! `[v`]y"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
54 endif
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
55 " Create a new dummy window
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
56 new
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
57 let g:bufnr = bufnr('%')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
58 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
59
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
60 func Test_normal00_optrans()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 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
63 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64 exe "norm! Sfoobar\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
65 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
66 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
67 exe "norm! $vbsone"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
68 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
69 norm! VS Second line here
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
70 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
71 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
72 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
73 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
74
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
75 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
76 norm! 2D
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
77 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
78 set cpo+=#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
79 norm! 4D
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
80 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
81
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83 set cpo-=#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
84 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
85 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
86
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
87 func Test_normal01_keymodel()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
88 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
89 " 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
90 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
91 call feedkeys("V\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
92 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
93 set keymodel=startsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
94 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
95 call feedkeys("V\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
96 call assert_equal(['49', '50'], getline("'<", "'>"))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
97 " 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
98 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
99 call feedkeys("\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
100 call assert_equal(['49', '5'], getreg(0, 0, 1))
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
101 " Use the different Shift special keys
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
102 50
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
103 call feedkeys("\<S-Right>\<S-Left>\<S-Up>\<S-Down>\<S-Home>\<S-End>y", 'tx')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
104 call assert_equal(['50'], getline("'<", "'>"))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
105 call assert_equal(['50', ''], getreg(0, 0, 1))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
106
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
107 " 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
108 set keymodel=
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
109 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
110 call feedkeys("\<S-Up>y$", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
111 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
112 " Stop visual mode when keymodel=stopsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
113 set keymodel=stopsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
114 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
115 call feedkeys("Vkk\<Up>yy", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
116 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
117
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
118 set keymodel=
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
119 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
120 call feedkeys("Vkk\<Up>yy", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
121 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
122
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
123 " Test for using special keys to start visual selection
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
124 %d
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
125 call setline(1, ['red fox tail', 'red fox tail', 'red fox tail'])
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
126 set keymodel=startsel
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
127 " Test for <S-PageUp> and <S-PageDown>
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
128 call cursor(1, 1)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
129 call feedkeys("\<S-PageDown>y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
130 call assert_equal([0, 1, 1, 0], getpos("'<"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
131 call assert_equal([0, 3, 1, 0], getpos("'>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
132 call feedkeys("Gz\<CR>8|\<S-PageUp>y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
133 call assert_equal([0, 2, 1, 0], getpos("'<"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
134 call assert_equal([0, 3, 8, 0], getpos("'>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
135 " Test for <S-C-Home> and <S-C-End>
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
136 call cursor(2, 12)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
137 call feedkeys("\<S-C-Home>y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
138 call assert_equal([0, 1, 1, 0], getpos("'<"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
139 call assert_equal([0, 2, 12, 0], getpos("'>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
140 call cursor(1, 4)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
141 call feedkeys("\<S-C-End>y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
142 call assert_equal([0, 1, 4, 0], getpos("'<"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
143 call assert_equal([0, 3, 13, 0], getpos("'>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
144 " Test for <S-C-Left> and <S-C-Right>
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
145 call cursor(2, 5)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
146 call feedkeys("\<S-C-Right>y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
147 call assert_equal([0, 2, 5, 0], getpos("'<"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
148 call assert_equal([0, 2, 9, 0], getpos("'>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
149 call cursor(2, 9)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
150 call feedkeys("\<S-C-Left>y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
151 call assert_equal([0, 2, 5, 0], getpos("'<"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
152 call assert_equal([0, 2, 9, 0], getpos("'>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
153
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
154 set keymodel&
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
155
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
156 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
157 bw!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
158 endfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
159
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
160 func Test_normal03_join()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
161 " basic join test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
162 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
163 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
164 norm! VJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
165 call assert_equal('50 51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
166 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
167 norm! J
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
168 call assert_equal('100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
169 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
170 norm! V9-gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
171 call assert_equal('919293949596979899100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
172 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
173 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
174 :j 10
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
175 call assert_equal('100', getline('.'))
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
176 call assert_beeps('normal GVJ')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
177 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
178 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
179 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
180
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
181 " basic filter test
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
182 func Test_normal04_filter()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
183 " only test on non windows platform
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
184 CheckNotMSWindows
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
185 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
186 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
187 call feedkeys("!!sed -e 's/^/| /'\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
188 call assert_equal('| 1', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
189 90
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
190 :sil :!echo one
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
191 call feedkeys('.', 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
192 call assert_equal('| 90', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
193 95
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
194 set cpo+=!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
195 " 2 <CR>, 1: for executing the command,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
196 " 2: clear hit-enter-prompt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
197 call feedkeys("!!\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
198 call feedkeys(":!echo one\n\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
199 call feedkeys(".", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
200 call assert_equal('one', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
201 set cpo-=!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
202 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
203 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
204
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
205 func Test_normal05_formatexpr()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
206 " basic formatexpr test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
207 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
208 %d_
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
209 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
210 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
211 set formatexpr=MyFormatExpr()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
212 norm! gqG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
213 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
214 set formatexpr=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
215 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
216 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
217
10104
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
218 func Test_normal05_formatexpr_newbuf()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
219 " 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
220 new
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
221 func! Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
222 edit another
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
223 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
224 set formatexpr=Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
225 norm gqG
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
226 bw!
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
227 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
228 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
229
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
230 func Test_normal05_formatexpr_setopt()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
231 " 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
232 new
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
233 func! Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
234 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
235 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
236 set formatexpr=Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
237 norm gqG
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
238 bw!
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
239 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
240 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
241
20261
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
242 " When 'formatexpr' returns non-zero, internal formatting is used.
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
243 func Test_normal_formatexpr_returns_nonzero()
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
244 new
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
245 call setline(1, ['one', 'two'])
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
246 func! Format()
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
247 return 1
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
248 endfunc
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
249 setlocal formatexpr=Format()
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
250 normal VGgq
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
251 call assert_equal(['one two'], getline(1, '$'))
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
252 setlocal formatexpr=
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
253 delfunc Format
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
254 close!
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
255 endfunc
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
256
26743
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
257 " Test for using a script-local function for 'formatexpr'
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
258 func Test_formatexpr_scriptlocal_func()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
259 func! s:Format()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
260 let g:FormatArgs = [v:lnum, v:count]
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
261 endfunc
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
262 set formatexpr=s:Format()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
263 call assert_equal(expand('<SID>') .. 'Format()', &formatexpr)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
264 new | only
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
265 call setline(1, range(1, 40))
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
266 let g:FormatArgs = []
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
267 normal! 2GVjgq
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
268 call assert_equal([2, 2], g:FormatArgs)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
269 bw!
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
270 set formatexpr=<SID>Format()
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
271 call assert_equal(expand('<SID>') .. 'Format()', &formatexpr)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
272 new | only
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
273 call setline(1, range(1, 40))
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
274 let g:FormatArgs = []
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
275 normal! 4GVjgq
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
276 call assert_equal([4, 2], g:FormatArgs)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
277 bw!
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
278 let &formatexpr = 's:Format()'
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
279 new | only
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
280 call setline(1, range(1, 40))
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
281 let g:FormatArgs = []
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
282 normal! 6GVjgq
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
283 call assert_equal([6, 2], g:FormatArgs)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
284 bw!
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
285 let &formatexpr = '<SID>Format()'
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
286 new | only
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
287 call setline(1, range(1, 40))
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
288 let g:FormatArgs = []
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
289 normal! 8GVjgq
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
290 call assert_equal([8, 2], g:FormatArgs)
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
291 setlocal formatexpr=
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
292 delfunc s:Format
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
293 bw!
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
294 endfunc
c2c40cefc17b patch 8.2.3900: it is not easy to use a script-local function for an option
Bram Moolenaar <Bram@vim.org>
parents: 26721
diff changeset
295
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
296 " basic test for formatprg
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
297 func Test_normal06_formatprg()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
298 " only test on non windows platform
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
299 CheckNotMSWindows
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
300
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
301 " uses sed to number non-empty lines
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
302 call writefile(['#!/bin/sh', 'sed ''/./=''|sed ''/./{', 'N', 's/\n/ /', '}'''], 'Xsed_format.sh')
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
303 call system('chmod +x ./Xsed_format.sh')
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
304 let text = ['a', '', 'c', '', ' ', 'd', 'e']
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
305 let expected = ['1 a', '', '3 c', '', '5 ', '6 d', '7 e']
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
306
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
307 10new
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
308 call setline(1, text)
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
309 set formatprg=./Xsed_format.sh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
310 norm! gggqG
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
311 call assert_equal(expected, getline(1, '$'))
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
312 %d
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
313
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
314 call setline(1, text)
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
315 set formatprg=donothing
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
316 setlocal formatprg=./Xsed_format.sh
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
317 norm! gggqG
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
318 call assert_equal(expected, getline(1, '$'))
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
319 %d
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
320
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
321 " Check for the command-line ranges added to 'formatprg'
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
322 set formatprg=cat
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
323 call setline(1, ['one', 'two', 'three', 'four', 'five'])
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
324 call feedkeys('gggqG', 'xt')
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
325 call assert_equal('.,$!cat', @:)
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
326 call feedkeys('2Ggq2j', 'xt')
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
327 call assert_equal('.,.+2!cat', @:)
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
328
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
329 bw!
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
330 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
331 set formatprg=
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
332 setlocal formatprg=
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
333 call delete('Xsed_format.sh')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
334 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
335
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
336 func Test_normal07_internalfmt()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
337 " 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
338 let list=range(1,11)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
339 call map(list, 'v:val." "')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
340 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
341 call setline(1, list)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
342 set tw=12
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
343 norm! ggVGgq
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
344 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
345 " clean up
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
346 set tw=0
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
347 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
348 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
349
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
350 " basic tests for foldopen/folddelete
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
351 func Test_normal08_fold()
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
352 CheckFeature folding
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
353 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
354 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
355 setl foldenable fdm=marker
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
356 " First fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
357 norm! V4jzf
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
358 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
359 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
360 " Second fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
361 46
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
362 norm! V10jzf
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
363 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
364 call assert_equal('46/*{{{*/', getline(46))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
365 call assert_equal('60/*}}}*/', getline(60))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
366 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
367 call assert_equal('45', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
368 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
369 call assert_equal('46/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
370 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
371 call assert_equal('61', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
372 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
373 " open a fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
374 norm! Vzo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
375 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
376 call assert_equal('45', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
377 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
378 call assert_equal('46/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
379 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
380 call assert_equal('47', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
381 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
382 norm! zcVzO
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
383 call assert_equal('46/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
384 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
385 call assert_equal('47', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
386 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
387 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
388 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
389 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
390 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
391 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
392 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
393 call assert_equal('51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
394 " delete folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
395 :46
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
396 " collapse fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
397 norm! V14jzC
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
398 " delete all folds recursively
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
399 norm! VzD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
400 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
401
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
402 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
403 setl nofoldenable fdm=marker
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
404 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
405 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
406
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
407 func Test_normal09a_operatorfunc()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
408 " Test operatorfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
409 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
410 " Add some spaces for counting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
411 50,60s/$/ /
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
412 unlet! g:a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
413 let g:a=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
414 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
415 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
416 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
417 norm V2j,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
418 call assert_equal(6, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
419 norm V,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
420 call assert_equal(2, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
421 norm ,,l
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
422 call assert_equal(0, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
423 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
424 exe "norm 0\<c-v>10j2l,,"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
425 call assert_equal(11, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
426 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
427 norm V10j,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
428 call assert_equal(22, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
429
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
430 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
431 unmap <buffer> ,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
432 set opfunc=
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
433 unlet! g:a
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
434 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
435 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
436
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
437 func Test_normal09b_operatorfunc()
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
438 " Test operatorfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
439 call Setup_NewWindow()
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
440 " Add some spaces for counting
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
441 50,60s/$/ /
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
442 unlet! g:opt
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
443 set linebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
444 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
445 50
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
446 norm ,,j
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
447 exe "bd!" g:bufnr
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
448 call assert_true(&linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
449 call assert_equal(g:opt, &linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
450 set nolinebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
451 norm ,,j
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
452 exe "bd!" g:bufnr
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
453 call assert_false(&linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
454 call assert_equal(g:opt, &linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
455
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
456 " clean up
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
457 unmap <buffer> ,,
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
458 set opfunc=
19932
2c4d9ca33769 patch 8.2.0522: several errors are not tested for
Bram Moolenaar <Bram@vim.org>
parents: 19852
diff changeset
459 call assert_fails('normal Vg@', 'E774:')
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
460 bw!
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
461 unlet! g:opt
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
462 endfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
463
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
464 func OperatorfuncRedo(_)
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
465 let g:opfunc_count = v:count
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
466 endfunc
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
467
26903
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
468 func Underscorize(_)
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
469 normal! '[V']r_
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
470 endfunc
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
471
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
472 func Test_normal09c_operatorfunc()
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
473 " Test redoing operatorfunc
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
474 new
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
475 call setline(1, 'some text')
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
476 set operatorfunc=OperatorfuncRedo
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
477 normal v3g@
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
478 call assert_equal(3, g:opfunc_count)
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
479 let g:opfunc_count = 0
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
480 normal .
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
481 call assert_equal(3, g:opfunc_count)
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
482
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
483 bw!
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
484 unlet g:opfunc_count
26903
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
485
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
486 " Test redoing Visual mode
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
487 set operatorfunc=Underscorize
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
488 new
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
489 call setline(1, ['first', 'first', 'third', 'third', 'second'])
26923
85b4bd8f8e5d patch 8.2.3990: testing wrong operator
Bram Moolenaar <Bram@vim.org>
parents: 26903
diff changeset
490 normal! 1GVjg@
26903
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
491 normal! 5G.
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
492 normal! 3G.
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
493 call assert_equal(['_____', '_____', '_____', '_____', '______'], getline(1, '$'))
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
494 bwipe!
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
495 set operatorfunc=
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
496 endfunc
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
497
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
498 " Test for different ways of setting the 'operatorfunc' option
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
499 func Test_opfunc_callback()
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
500 new
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
501 func OpFunc1(callnr, type)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
502 let g:OpFunc1Args = [a:callnr, a:type]
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
503 endfunc
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
504 func OpFunc2(type)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
505 let g:OpFunc2Args = [a:type]
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
506 endfunc
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
507
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
508 let lines =<< trim END
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
509 #" Test for using a function name
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
510 LET &opfunc = 'g:OpFunc2'
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
511 LET g:OpFunc2Args = []
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
512 normal! g@l
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
513 call assert_equal(['char'], g:OpFunc2Args)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
514
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
515 #" Test for using a function()
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
516 set opfunc=function('g:OpFunc1',\ [10])
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
517 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
518 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
519 call assert_equal([10, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
520
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
521 #" Using a funcref variable to set 'operatorfunc'
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
522 VAR Fn = function('g:OpFunc1', [11])
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
523 LET &opfunc = Fn
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
524 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
525 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
526 call assert_equal([11, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
527
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
528 #" Using a string(funcref_variable) to set 'operatorfunc'
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
529 LET Fn = function('g:OpFunc1', [12])
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
530 LET &operatorfunc = string(Fn)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
531 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
532 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
533 call assert_equal([12, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
534
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
535 #" Test for using a funcref()
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
536 set operatorfunc=funcref('g:OpFunc1',\ [13])
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
537 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
538 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
539 call assert_equal([13, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
540
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
541 #" Using a funcref variable to set 'operatorfunc'
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
542 LET Fn = funcref('g:OpFunc1', [14])
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
543 LET &opfunc = Fn
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
544 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
545 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
546 call assert_equal([14, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
547
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
548 #" Using a string(funcref_variable) to set 'operatorfunc'
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
549 LET Fn = funcref('g:OpFunc1', [15])
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
550 LET &opfunc = string(Fn)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
551 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
552 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
553 call assert_equal([15, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
554
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
555 #" Test for using a lambda function using set
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
556 VAR optval = "LSTART a LMIDDLE OpFunc1(16, a) LEND"
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
557 LET optval = substitute(optval, ' ', '\\ ', 'g')
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
558 exe "set opfunc=" .. optval
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
559 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
560 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
561 call assert_equal([16, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
562
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
563 #" Test for using a lambda function using LET
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
564 LET &opfunc = LSTART a LMIDDLE OpFunc1(17, a) LEND
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
565 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
566 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
567 call assert_equal([17, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
568
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
569 #" Set 'operatorfunc' to a string(lambda expression)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
570 LET &opfunc = 'LSTART a LMIDDLE OpFunc1(18, a) LEND'
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
571 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
572 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
573 call assert_equal([18, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
574
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
575 #" Set 'operatorfunc' to a variable with a lambda expression
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
576 VAR Lambda = LSTART a LMIDDLE OpFunc1(19, a) LEND
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
577 LET &opfunc = Lambda
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
578 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
579 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
580 call assert_equal([19, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
581
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
582 #" Set 'operatorfunc' to a string(variable with a lambda expression)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
583 LET Lambda = LSTART a LMIDDLE OpFunc1(20, a) LEND
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
584 LET &opfunc = string(Lambda)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
585 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
586 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
587 call assert_equal([20, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
588
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
589 #" Try to use 'operatorfunc' after the function is deleted
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
590 func g:TmpOpFunc1(type)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
591 let g:TmpOpFunc1Args = [21, a:type]
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
592 endfunc
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
593 LET &opfunc = function('g:TmpOpFunc1')
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
594 delfunc g:TmpOpFunc1
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
595 call test_garbagecollect_now()
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
596 LET g:TmpOpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
597 call assert_fails('normal! g@l', 'E117:')
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
598 call assert_equal([], g:TmpOpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
599
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
600 #" Try to use a function with two arguments for 'operatorfunc'
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
601 func g:TmpOpFunc2(x, y)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
602 let g:TmpOpFunc2Args = [a:x, a:y]
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
603 endfunc
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
604 set opfunc=TmpOpFunc2
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
605 LET g:TmpOpFunc2Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
606 call assert_fails('normal! g@l', 'E119:')
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
607 call assert_equal([], g:TmpOpFunc2Args)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
608 delfunc TmpOpFunc2
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
609
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
610 #" Try to use a lambda function with two arguments for 'operatorfunc'
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
611 LET &opfunc = LSTART a, b LMIDDLE OpFunc1(22, b) LEND
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
612 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
613 call assert_fails('normal! g@l', 'E119:')
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
614 call assert_equal([], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
615
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
616 #" Test for clearing the 'operatorfunc' option
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
617 set opfunc=''
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
618 set opfunc&
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
619 call assert_fails("set opfunc=function('abc')", "E700:")
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
620 call assert_fails("set opfunc=funcref('abc')", "E700:")
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
621
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
622 #" set 'operatorfunc' to a non-existing function
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
623 LET &opfunc = function('g:OpFunc1', [23])
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
624 call assert_fails("set opfunc=function('NonExistingFunc')", 'E700:')
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
625 call assert_fails("LET &opfunc = function('NonExistingFunc')", 'E700:')
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
626 LET g:OpFunc1Args = []
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
627 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
628 call assert_equal([23, 'char'], g:OpFunc1Args)
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
629 END
27457
4c16acb2525f patch 8.2.4257: Vim9: finding global function without g: prefix inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 27400
diff changeset
630 call v9.CheckTransLegacySuccess(lines)
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
631
26618
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
632 " Test for using a script-local function name
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
633 func s:OpFunc3(type)
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
634 let g:OpFunc3Args = [a:type]
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
635 endfunc
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
636 set opfunc=s:OpFunc3
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
637 let g:OpFunc3Args = []
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
638 normal! g@l
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
639 call assert_equal(['char'], g:OpFunc3Args)
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
640
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
641 let &opfunc = 's:OpFunc3'
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
642 let g:OpFunc3Args = []
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
643 normal! g@l
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
644 call assert_equal(['char'], g:OpFunc3Args)
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
645 delfunc s:OpFunc3
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
646
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
647 " Using Vim9 lambda expression in legacy context should fail
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
648 set opfunc=(a)\ =>\ OpFunc1(24,\ a)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
649 let g:OpFunc1Args = []
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
650 call assert_fails('normal! g@l', 'E117:')
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
651 call assert_equal([], g:OpFunc1Args)
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
652
26518
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
653 " set 'operatorfunc' to a partial with dict. This used to cause a crash.
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
654 func SetOpFunc()
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
655 let operator = {'execute': function('OperatorExecute')}
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
656 let &opfunc = operator.execute
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
657 endfunc
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
658 func OperatorExecute(_) dict
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
659 endfunc
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
660 call SetOpFunc()
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
661 call test_garbagecollect_now()
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
662 set operatorfunc=
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
663 delfunc SetOpFunc
13ba00ef7687 patch 8.2.3788: lambda for option that is a function may be freed
Bram Moolenaar <Bram@vim.org>
parents: 26456
diff changeset
664 delfunc OperatorExecute
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
665
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
666 " Vim9 tests
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
667 let lines =<< trim END
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
668 vim9script
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
669
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
670 def g:Vim9opFunc(val: number, type: string): void
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
671 g:OpFunc1Args = [val, type]
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
672 enddef
26618
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
673
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
674 # Test for using a def function with opfunc
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
675 set opfunc=function('g:Vim9opFunc',\ [60])
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
676 g:OpFunc1Args = []
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
677 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
678 assert_equal([60, 'char'], g:OpFunc1Args)
26618
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
679
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
680 # Test for using a global function name
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
681 &opfunc = g:OpFunc2
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
682 g:OpFunc2Args = []
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
683 normal! g@l
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
684 assert_equal(['char'], g:OpFunc2Args)
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
685 bw!
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
686
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
687 # Test for using a script-local function name
27671
19367412787c patch 8.2.4361: Vim9: some tests fail
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
688 def LocalOpFunc(type: string): void
26618
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
689 g:LocalOpFuncArgs = [type]
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
690 enddef
27671
19367412787c patch 8.2.4361: Vim9: some tests fail
Bram Moolenaar <Bram@vim.org>
parents: 27457
diff changeset
691 &opfunc = LocalOpFunc
26618
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
692 g:LocalOpFuncArgs = []
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
693 normal! g@l
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
694 assert_equal(['char'], g:LocalOpFuncArgs)
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
695 bw!
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
696 END
27457
4c16acb2525f patch 8.2.4257: Vim9: finding global function without g: prefix inconsistent
Bram Moolenaar <Bram@vim.org>
parents: 27400
diff changeset
697 call v9.CheckScriptSuccess(lines)
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
698
26721
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
699 " setting 'opfunc' to a script local function outside of a script context
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
700 " should fail
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
701 let cleanup =<< trim END
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
702 call writefile([execute('messages')], 'Xtest.out')
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
703 qall
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
704 END
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
705 call writefile(cleanup, 'Xverify.vim')
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
706 call RunVim([], [], "-c \"set opfunc=s:abc\" -S Xverify.vim")
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
707 call assert_match('E81: Using <SID> not in a', readfile('Xtest.out')[0])
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
708 call delete('Xtest.out')
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
709 call delete('Xverify.vim')
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
710
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
711 " cleanup
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
712 set opfunc&
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
713 delfunc OpFunc1
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
714 delfunc OpFunc2
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
715 unlet g:OpFunc1Args g:OpFunc2Args
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
716 %bw!
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
717 endfunc
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
718
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
719 func Test_normal10_expand()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
720 " Test for expand()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
721 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
722 call setline(1, ['1', 'ifooar,,cbar'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
723 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
724 norm! $
12421
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
725 call assert_equal('cbar', expand('<cword>'))
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
726 call assert_equal('ifooar,,cbar', expand('<cWORD>'))
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
727
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
728 call setline(1, ['prx = list[idx];'])
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
729 1
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
730 let expected = ['', 'prx', 'prx', 'prx',
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
731 \ 'list', 'list', 'list', 'list', 'list', 'list', 'list',
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
732 \ 'idx', 'idx', 'idx', 'idx',
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
733 \ 'list[idx]',
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
734 \ '];',
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
735 \ ]
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
736 for i in range(1, 16)
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
737 exe 'norm ' . i . '|'
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
738 call assert_equal(expected[i], expand('<cexpr>'), 'i == ' . i)
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
739 endfor
da55ea30842c patch 8.0.1090: cannot get the text under the cursor like v:beval_text
Christian Brabandt <cb@256bit.org>
parents: 11339
diff changeset
740
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
741 " Test for <cexpr> in state.val and ptr->val
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
742 call setline(1, 'x = state.val;')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
743 call cursor(1, 10)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
744 call assert_equal('state.val', expand('<cexpr>'))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
745 call setline(1, 'x = ptr->val;')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
746 call cursor(1, 9)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
747 call assert_equal('ptr->val', expand('<cexpr>'))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
748
13086
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
749 if executable('echo')
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
750 " Test expand(`...`) i.e. backticks command expansion.
18473
0eeaa9a6e4e7 patch 8.1.2230: MS-Windows: testing external commands can be improved
Bram Moolenaar <Bram@vim.org>
parents: 18291
diff changeset
751 call assert_equal('abcde', expand('`echo abcde`'))
13086
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
752 endif
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
753
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
754 " Test expand(`=...`) i.e. backticks expression expansion
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
755 call assert_equal('5', expand('`=2+3`'))
19724
b3e93a05c3ca patch 8.2.0418: code in eval.c not sufficiently covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 19625
diff changeset
756 call assert_equal('3.14', expand('`=3.14`'))
13086
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
757
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
758 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
759 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
760 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
761
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
762 " Test for expand() in latin1 encoding
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
763 func Test_normal_expand_latin1()
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
764 new
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
765 let save_enc = &encoding
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
766 set encoding=latin1
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
767 call setline(1, 'val = item->color;')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
768 call cursor(1, 11)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
769 call assert_equal('color', expand("<cword>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
770 call assert_equal('item->color', expand("<cexpr>"))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
771 let &encoding = save_enc
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
772 bw!
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
773 endfunc
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
774
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
775 func Test_normal11_showcmd()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
776 " test for 'showcmd'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
777 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
778 exe "norm! ofoobar\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
779 call assert_equal(2, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
780 set showcmd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
781 exe "norm! ofoobar2\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
782 call assert_equal(3, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
783 exe "norm! VAfoobar3\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
784 call assert_equal(3, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
785 exe "norm! 0d3\<del>2l"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
786 call assert_equal('obar2foobar3', getline('.'))
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
787 " test for the visual block size displayed in the status line
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
788 call setline(1, ['aaaaa', 'bbbbb', 'ccccc'])
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
789 call feedkeys("ggl\<C-V>lljj", 'xt')
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
790 redraw!
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
791 call assert_match('3x3$', Screenline(&lines))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
792 call feedkeys("\<C-V>", 'xt')
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
793 " test for visually selecting a multi-byte character
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
794 call setline(1, ["\U2206"])
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
795 call feedkeys("ggv", 'xt')
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
796 redraw!
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
797 call assert_match('1-3$', Screenline(&lines))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
798 call feedkeys("v", 'xt')
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
799 " test for visually selecting the end of line
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
800 call setline(1, ["foobar"])
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
801 call feedkeys("$vl", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
802 redraw!
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
803 call assert_match('2$', Screenline(&lines))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
804 call feedkeys("y", 'xt')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
805 call assert_equal("r\n", @")
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
806 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
807 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
808
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
809 " Test for nv_error and normal command errors
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
810 func Test_normal12_nv_error()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
811 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
812 call setline(1, range(1,5))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
813 " should not do anything, just beep
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
814 call assert_beeps('exe "norm! <c-k>"')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
815 call assert_equal(map(range(1,5), 'string(v:val)'), getline(1,'$'))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
816 call assert_beeps('normal! G2dd')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
817 call assert_beeps("normal! g\<C-A>")
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
818 call assert_beeps("normal! g\<C-X>")
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
819 call assert_beeps("normal! g\<C-B>")
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
820 call assert_beeps("normal! vQ\<Esc>")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
821 call assert_beeps("normal! 2[[")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
822 call assert_beeps("normal! 2]]")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
823 call assert_beeps("normal! 2[]")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
824 call assert_beeps("normal! 2][")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
825 call assert_beeps("normal! 4[z")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
826 call assert_beeps("normal! 4]z")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
827 call assert_beeps("normal! 4[c")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
828 call assert_beeps("normal! 4]c")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
829 call assert_beeps("normal! 200%")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
830 call assert_beeps("normal! %")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
831 call assert_beeps("normal! 2{")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
832 call assert_beeps("normal! 2}")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
833 call assert_beeps("normal! r\<Right>")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
834 call assert_beeps("normal! 8ry")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
835 call assert_beeps('normal! "@')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
836 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
837 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
838
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
839 func Test_normal13_help()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
840 " Test for F1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
841 call assert_equal(1, winnr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
842 call feedkeys("\<f1>", 'txi')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
843 call assert_match('help\.txt', bufname('%'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
844 call assert_equal(2, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
845 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
846 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
847
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
848 func Test_normal14_page()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
849 " 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
850 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
851 exe "norm! \<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
852 call assert_equal('9', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
853 exe "norm! 2\<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
854 call assert_equal('25', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
855 exe "norm! 2\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
856 call assert_equal('18', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
857 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
858 set scrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
859 exe "norm! 2\<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
860 call assert_equal('21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
861 exe "norm! \<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
862 call assert_equal('13', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
863 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
864 set scrolloff=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
865 exe "norm! \<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
866 call assert_equal('13', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
867 set scrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
868 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
869 exe "norm! $\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
870 call assert_equal('92', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
871 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
872 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
873 set nostartofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
874 exe "norm! $\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
875 call assert_equal('92', getline('.'))
26881
fb67cd7d30a7 patch 8.2.3969: value of MAXCOL not available in Vim script
Bram Moolenaar <Bram@vim.org>
parents: 26749
diff changeset
876 call assert_equal([0, 92, 2, 0, v:maxcol], getcurpos())
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
877 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
878 set startofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
879 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
880 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
881
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
882 func Test_normal14_page_eol()
10102
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
883 10new
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
884 norm oxxxxxxx
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
885 exe "norm 2\<c-f>"
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
886 " 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
887 exe "norm 2\<c-b>"
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
888 bw!
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
889 endfunc
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
890
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
891 " Test for errors with z command
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
892 func Test_normal_z_error()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
893 call assert_beeps('normal! z2p')
24752
1ce39e257f1b patch 8.2.2914: cannot paste a block without adding padding
Bram Moolenaar <Bram@vim.org>
parents: 24731
diff changeset
894 call assert_beeps('normal! zq')
27400
722db0819111 patch 8.2.4228: no tests for clicking in the GUI tabline
Bram Moolenaar <Bram@vim.org>
parents: 26923
diff changeset
895 call assert_beeps('normal! cz1')
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
896 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
897
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
898 func Test_normal15_z_scroll_vert()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
899 " 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
900 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
901 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
902 norm! >>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
903 " Test for z<cr>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
904 exe "norm! z\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
905 call assert_equal(' 100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
906 call assert_equal(100, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
907 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
908
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
909 " Test for zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
910 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
911 norm! >>0zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
912 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
913 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
914 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
915
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
916 " Test for zb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
917 30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
918 norm! >>$ztzb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
919 call assert_equal(' 30', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
920 call assert_equal(30, winsaveview()['topline']+winheight(0)-1)
26881
fb67cd7d30a7 patch 8.2.3969: value of MAXCOL not available in Vim script
Bram Moolenaar <Bram@vim.org>
parents: 26749
diff changeset
921 call assert_equal([0, 30, 3, 0, v:maxcol], getcurpos())
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
922
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
923 " Test for z-
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
924 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
925 30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
926 norm! 0z-
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
927 call assert_equal(' 30', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
928 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
929 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
930
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
931 " Test for z{height}<cr>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
932 call assert_equal(10, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
933 exe "norm! z12\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
934 call assert_equal(12, winheight(0))
27400
722db0819111 patch 8.2.4228: no tests for clicking in the GUI tabline
Bram Moolenaar <Bram@vim.org>
parents: 26923
diff changeset
935 exe "norm! z15\<Del>0\<cr>"
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
936 call assert_equal(10, winheight(0))
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 z.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
939 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
940 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
941 norm! 0z.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
942 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
943 call assert_equal(17, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
944 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
945
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
946 " Test for zz
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
947 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
948 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
949 norm! 0zz
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
950 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
951 call assert_equal(17, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
952 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
953
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
954 " Test for z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
955 11
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
956 norm! zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
957 norm! z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
958 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
959 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
960 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
961
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
962 " Test for [count]z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
963 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
964 norm! 21z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
965 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
966 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
967 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
968
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
969 " Test for z+ with [count] greater than buffer size
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
970 1
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
971 norm! 1000z+
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
972 call assert_equal(' 100', getline('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
973 call assert_equal(100, winsaveview()['topline'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
974 call assert_equal([0, 100, 2, 0, 9], getcurpos())
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
975
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
976 " Test for z+ from the last buffer line
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
977 norm! Gz.z+
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
978 call assert_equal(' 100', getline('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
979 call assert_equal(100, winsaveview()['topline'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
980 call assert_equal([0, 100, 2, 0, 9], getcurpos())
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
981
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
982 " Test for z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
983 norm! 22z+0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
984 norm! z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
985 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
986 call assert_equal(12, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
987 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
988
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
989 " Test for z^ from first buffer line
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
990 norm! ggz^
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
991 call assert_equal('1', getline('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
992 call assert_equal(1, winsaveview()['topline'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
993 call assert_equal([0, 1, 1, 0, 1], getcurpos())
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
994
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
995 " Test for [count]z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
996 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
997 norm! 30z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
998 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
999 call assert_equal(12, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1000 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
1001
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1002 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1003 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1004 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1005
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1006 func Test_normal16_z_scroll_hor()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1007 " 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
1008 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1009 15vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1010 set nowrap listchars=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1011 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1012 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1013 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1014 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1015 1d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1016
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1017 " Test for zl and zh with a count
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1018 norm! 0z10l
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1019 call assert_equal([11, 1], [col('.'), wincol()])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1020 norm! z4h
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1021 call assert_equal([11, 5], [col('.'), wincol()])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1022 normal! 2gg
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1023
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1024 " Test for zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1025 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1026 norm! 5zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1027 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1028 call assert_equal(6, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1029 call assert_equal(5, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1030 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1031 call assert_equal('f', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1032
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1033 " Test for zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1034 norm! 2zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1035 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1036 call assert_equal(6, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1037 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1038 call assert_equal('f', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1039 call assert_equal(3, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1040
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1041 " Test for zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1042 norm! zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1043 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1044 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1045 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1046 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1047 norm! 2zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1048 call assert_equal(25, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1049 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1050 call assert_equal('y', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1051 call assert_equal(24, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1052
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1053 " Test for zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1054 norm! 2zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1055 call assert_equal(25, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1056 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1057 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1058 call assert_equal('y', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1059
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1060 " Test for zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1061 norm! $zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1062 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1063 call assert_equal(25, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1064 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1065 call assert_equal('z', @0)
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 ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1068 norm! ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1069 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1070 call assert_equal(11, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1071 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1072 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1073
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1074 " Test for zs and ze with folds
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1075 %fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1076 norm! $zs
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1077 call assert_equal(26, col('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1078 call assert_equal(0, winsaveview()['leftcol'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1079 norm! yl
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1080 call assert_equal('z', @0)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1081 norm! ze
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1082 call assert_equal(26, col('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1083 call assert_equal(0, winsaveview()['leftcol'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1084 norm! yl
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1085 call assert_equal('z', @0)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1086
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1087 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1088 set wrap listchars=eol:$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1089 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1090 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1091
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1092 func Test_normal17_z_scroll_hor2()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1093 " 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
1094 " using 'sidescrolloff' setting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1095 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1096 20vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1097 set nowrap listchars= sidescrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1098 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1099 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1100 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1101 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1102 1d
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 zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1105 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1106 norm! 5zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1107 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1108 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1109 call assert_equal(5, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1110 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1111 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1112
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1113 " Test for zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1114 norm! 2zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1115 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1116 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1117 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1118 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1119 call assert_equal(3, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1120
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1121 " Test for zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1122 norm! 0zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1123 call assert_equal(16, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1124 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1125 call assert_equal('p', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1126 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1127 norm! 2zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1128 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1129 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1130 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1131 call assert_equal(15, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1132
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1133 " Test for zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1134 norm! 2zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1135 call assert_equal(15, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1136 call assert_equal(0, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1137 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1138 call assert_equal('o', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1139
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1140 " Test for zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1141 norm! $zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1142 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1143 call assert_equal(20, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1144 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1145 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1146
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1147 " Test for ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1148 norm! ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1149 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1150 call assert_equal(11, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1151 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1152 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1153
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1154 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1155 set wrap listchars=eol:$ sidescrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1156 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1157 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1158
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1159 " Test for commands that scroll the window horizontally. Test with folds.
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1160 " H, M, L, CTRL-E, CTRL-Y, CTRL-U, CTRL-D, PageUp, PageDown commands
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1161 func Test_vert_scroll_cmds()
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1162 15new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1163 call setline(1, range(1, 100))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1164 exe "normal! 30ggz\<CR>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1165 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1166 33,36fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1167 40,43fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1168 46,49fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1169 let h = winheight(0)
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1170
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1171 " Test for H, M and L commands
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1172 " Top of the screen = 30
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1173 " Folded lines = 9
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1174 " Bottom of the screen = 30 + h + 9 - 1
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1175 normal! 4L
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1176 call assert_equal(35 + h, line('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1177 normal! 4H
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1178 call assert_equal(33, line('.'))
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1179
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1180 " Test for using a large count value
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1181 %d
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1182 call setline(1, range(1, 4))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1183 norm! 6H
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1184 call assert_equal(4, line('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1185
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1186 " Test for 'M' with folded lines
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1187 %d
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1188 call setline(1, range(1, 20))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1189 1,5fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1190 norm! LM
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1191 call assert_equal(12, line('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1192
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1193 " Test for the CTRL-E and CTRL-Y commands with folds
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1194 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1195 call setline(1, range(1, 10))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1196 3,5fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1197 exe "normal 6G3\<C-E>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1198 call assert_equal(6, line('w0'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1199 exe "normal 2\<C-Y>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1200 call assert_equal(2, line('w0'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1201
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1202 " Test for CTRL-Y on a folded line
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1203 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1204 call setline(1, range(1, 100))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1205 exe (h + 2) .. "," .. (h + 4) .. "fold"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1206 exe h + 5
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1207 normal z-
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1208 exe "normal \<C-Y>\<C-Y>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1209 call assert_equal(h + 1, line('w$'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1210
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1211 " Test for CTRL-Y from the first line and CTRL-E from the last line
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1212 %d
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1213 set scrolloff=2
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1214 call setline(1, range(1, 4))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1215 exe "normal gg\<C-Y>"
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1216 call assert_equal(1, line('w0'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1217 call assert_equal(1, line('.'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1218 exe "normal G4\<C-E>\<C-E>"
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1219 call assert_equal(4, line('w$'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1220 call assert_equal(4, line('.'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1221 set scrolloff&
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1222
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1223 " Using <PageUp> and <PageDown> in an empty buffer should beep
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1224 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1225 call assert_beeps('exe "normal \<PageUp>"')
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1226 call assert_beeps('exe "normal \<C-B>"')
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1227 call assert_beeps('exe "normal \<PageDown>"')
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1228 call assert_beeps('exe "normal \<C-F>"')
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1229
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1230 " Test for <C-U> and <C-D> with fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1231 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1232 call setline(1, range(1, 100))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1233 10,35fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1234 set scroll=10
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1235 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1236 call assert_equal(36, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1237 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1238 call assert_equal(46, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1239 exe "normal \<C-U>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1240 call assert_equal(36, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1241 exe "normal \<C-U>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1242 call assert_equal(10, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1243 exe "normal \<C-U>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1244 call assert_equal(1, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1245 set scroll&
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1246
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1247 " Test for scrolling to the top of the file with <C-U> and a fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1248 10
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1249 normal ztL
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1250 exe "normal \<C-U>\<C-U>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1251 call assert_equal(1, line('w0'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1252
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1253 " Test for CTRL-D on a folded line
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1254 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1255 call setline(1, range(1, 100))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1256 50,100fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1257 75
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1258 normal z-
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1259 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1260 call assert_equal(50, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1261 call assert_equal(100, line('w$'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1262 normal z.
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1263 let lnum = winline()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1264 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1265 call assert_equal(lnum, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1266 call assert_equal(50, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1267 normal zt
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1268 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1269 call assert_equal(50, line('w0'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1270
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1271 " Test for <S-CR>. Page down.
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1272 %d
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1273 call setline(1, range(1, 100))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1274 call feedkeys("\<S-CR>", 'xt')
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1275 call assert_equal(14, line('w0'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1276 call assert_equal(28, line('w$'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1277
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1278 " Test for <S-->. Page up.
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1279 call feedkeys("\<S-->", 'xt')
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1280 call assert_equal(1, line('w0'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1281 call assert_equal(15, line('w$'))
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1282
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1283 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1284 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1285 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1286
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1287 func Test_scroll_in_ex_mode()
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1288 " This was using invalid memory because w_botline was invalid.
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1289 let lines =<< trim END
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1290 diffsplit
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1291 norm os00(
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1292 call writefile(['done'], 'Xdone')
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1293 qa!
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1294 END
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1295 call writefile(lines, 'Xscript')
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1296 call assert_equal(1, RunVim([], [], '--clean -X -Z -e -s -S Xscript'))
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1297 call assert_equal(['done'], readfile('Xdone'))
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1298
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1299 call delete('Xscript')
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1300 call delete('Xdone')
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1301 endfunc
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1302
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1303 " Test for the 'sidescroll' option
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1304 func Test_sidescroll_opt()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1305 new
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1306 20vnew
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1307
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1308 " scroll by 2 characters horizontally
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1309 set sidescroll=2 nowrap
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1310 call setline(1, repeat('a', 40))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1311 normal g$l
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1312 call assert_equal(19, screenpos(0, 1, 21).col)
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1313 normal l
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1314 call assert_equal(20, screenpos(0, 1, 22).col)
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1315 normal g0h
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1316 call assert_equal(2, screenpos(0, 1, 2).col)
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1317 call assert_equal(20, screenpos(0, 1, 20).col)
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1318
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1319 " when 'sidescroll' is 0, cursor positioned at the center
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1320 set sidescroll=0
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1321 normal g$l
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1322 call assert_equal(11, screenpos(0, 1, 21).col)
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1323 normal g0h
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1324 call assert_equal(10, screenpos(0, 1, 10).col)
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1325
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1326 %bw!
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1327 set wrap& sidescroll&
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1328 endfunc
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1329
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
1330 " basic tests for foldopen/folddelete
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1331 func Test_normal18_z_fold()
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
1332 CheckFeature folding
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1333 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1334 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1335 setl foldenable fdm=marker foldlevel=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1336
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1337 call assert_beeps('normal! zj')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1338 call assert_beeps('normal! zk')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1339
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1340 " Test for zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1341 " First fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1342 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1343 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1344 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
1345
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1346 " Test for zd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1347 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1348 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1349 call assert_equal(2, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1350 norm! kzd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1351 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
1352 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1353 call assert_equal(1, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1354
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1355 " Test for zD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1356 " also deletes partially selected folds recursively
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1357 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1358 norm! zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1359 call assert_equal(2, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1360 norm! kV2jzD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1361 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
1362
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1363 " Test for zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1364 85
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1365 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1366 86
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1367 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1368 90
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1369 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1370 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
1371 norm! zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1372 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
1373
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1374 " Test for zn
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1375 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1376 set foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1377 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1378 norm! zn
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1379 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1380 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1381 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1382 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1383 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1384 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1385 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1386 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1387 call assert_equal(0, &foldenable)
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 zN
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1390 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1391 norm! zN
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1392 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1393 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1394 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1395 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1396 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1397 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1398
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1399 " Test for zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1400 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1401 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1402 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1403 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1404 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1405 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1406 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1407 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1408
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1409 " Test for za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1410 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1411 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1412 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1413 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1414 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1415 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1416 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1417 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1418 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1419 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1420 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1421 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1422 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1423 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1424 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1425 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1426 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1427 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1428
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1429 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1430 norm! 5zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1431 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1432 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1433 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1434 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1435 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1436 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1437 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1438 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1439 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1440 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1441 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1442 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1443 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1444 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1445 " close fold and set foldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1446 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1447 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1448
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1449 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1450 " 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
1451 norm! 2za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1452 norm! 2k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1453 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1454 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1455 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1456 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1457 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1458 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1459 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1460 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1461 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1462
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1463 " Test for zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1464 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1465 set foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1466 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1467 norm! zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1468 norm! 2k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1469 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1470 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1471 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1472 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1473 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1474 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1475 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1476 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1477 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1478
26211
485c7c4afeb7 patch 8.2.3637: typos in test files
Bram Moolenaar <Bram@vim.org>
parents: 26175
diff changeset
1479 " zA on an opened fold when foldenable is not set
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1480 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1481 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1482 norm! zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1483 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1484 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1485 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1486 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1487 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1488 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1489 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1490
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1491 " Test for zc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1492 norm! zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1493 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1494 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1495 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1496 norm! 5zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1497 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1498 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1499 " There most likely is a bug somewhere:
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1500 " 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
1501 " 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
1502 norm! zc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1503 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1504 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1505 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1506 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1507 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1508 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1509 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1510 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1511 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1512 norm! Vjzc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1513 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1514 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1515 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1516 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1517 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1518 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1519
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1520 " Test for zC
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1521 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1522 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1523 norm! zCk
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1524 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1525 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1526 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1527 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1528 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1529
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1530 " Test for zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1531 " 1) close folds at line 49-54
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1532 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1533 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1534 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1535 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1536 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1537 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1538 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1539 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1540
11327
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
1541 " 2) do not close fold under cursor
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1542 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1543 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1544 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1545 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1546 norm! 3k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1547 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1548 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1549 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1550 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1551 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1552 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1553 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1554 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1555 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1556 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1557 call assert_equal('53', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1558 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1559 call assert_equal('54/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1560 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1561 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1562
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1563 " 3) close one level of folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1564 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1565 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1566 set foldlevel=1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1567 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1568 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1569 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1570 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1571 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1572 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1573 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1574 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1575 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1576 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1577 call assert_equal('53', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1578 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1579 call assert_equal('54/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1580 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1581 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1582
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1583 " Test for zX
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1584 " Close all folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1585 set foldlevel=0 nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1586 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1587 norm! zX
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1588 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1589 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1590 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1591 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1592 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1593 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1594 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1595
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1596 " Test for zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1597 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1598 set nofoldenable foldlevel=2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1599 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1600 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1601 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1602 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1603 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1604 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1605 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1606 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1607 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1608 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1609 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1610 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1611 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1612
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1613 " Test for zm with a count
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1614 50
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1615 set foldlevel=2
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1616 norm! 3zm
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1617 call assert_equal(0, &foldlevel)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1618 call assert_equal(49, foldclosed(line('.')))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1619
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1620 " Test for zM
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1621 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1622 set nofoldenable foldlevel=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1623 norm! zM
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1624 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1625 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1626 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1627 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1628 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1629 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1630 call assert_equal('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1631
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1632 " Test for zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1633 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1634 set nofoldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1635 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1636 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1637 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1638 set foldlevel=0 foldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1639 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1640 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1641 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1642 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1643 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1644 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1645 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1646 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1647 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1648 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1649 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1650 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1651 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1652 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1653
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1654 " Test for zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1655 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1656 set nofoldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1657 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1658 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1659 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1660 set foldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1661 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1662 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1663 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1664 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1665 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1666 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1667 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1668 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1669 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1670 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1671 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1672 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1673 call append(50, ['a /*{{{*/', 'b /*}}}*/'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1674 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1675 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1676 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1677 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1678 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1679 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1680 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1681 call assert_equal('a /*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1682 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1683 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1684 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1685 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1686 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1687 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1688 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1689 call assert_equal(3, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1690 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1691 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1692 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1693 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1694 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1695 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1696 call assert_equal('a /*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1697 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1698 call assert_equal('b /*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1699 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1700 call assert_equal('51/*}}}*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1701 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1702 call assert_equal('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1703
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1704 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1705 setl nofoldenable fdm=marker foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1706 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1707 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1708
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1709 func Test_normal20_exmode()
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
1710 " Reading from redirected file doesn't work on MS-Windows
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
1711 CheckNotMSWindows
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1712 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
1713 call writefile(['1', '2'], 'Xfile')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17682
diff changeset
1714 call system(GetVimCommand() .. ' -e -s < Xscript Xfile')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1715 let a=readfile('Xfile2')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1716 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
1717
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1718 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1719 for file in ['Xfile', 'Xfile2', 'Xscript']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1720 call delete(file)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1721 endfor
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1722 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1723 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1724
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1725 func Test_normal21_nv_hat()
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1726
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1727 " Edit a fresh file and wipe the buffer list so that there is no alternate
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1728 " file present. Next, check for the expected command failures.
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1729 edit Xfoo | %bw
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
1730 call assert_fails(':buffer #', 'E86:')
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
1731 call assert_fails(':execute "normal! \<C-^>"', 'E23:')
20990
55b3849ded11 patch 8.2.1046: insufficient tests for src/buffer.c
Bram Moolenaar <Bram@vim.org>
parents: 20978
diff changeset
1732 call assert_fails("normal i\<C-R>#", 'E23:')
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1733
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1734 " Test for the expected behavior when switching between two named buffers.
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1735 edit Xfoo | edit Xbar
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1736 call feedkeys("\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1737 call assert_equal('Xfoo', fnamemodify(bufname('%'), ':t'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1738 call feedkeys("\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1739 call assert_equal('Xbar', fnamemodify(bufname('%'), ':t'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1740
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1741 " Test for the expected behavior when only one buffer is named.
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1742 enew | let l:nr = bufnr('%')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1743 call feedkeys("\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1744 call assert_equal('Xbar', fnamemodify(bufname('%'), ':t'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1745 call feedkeys("\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1746 call assert_equal('', bufname('%'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1747 call assert_equal(l:nr, bufnr('%'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1748
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1749 " Test that no action is taken by "<C-^>" when an operator is pending.
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1750 edit Xfoo
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1751 call feedkeys("ci\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1752 call assert_equal('Xfoo', fnamemodify(bufname('%'), ':t'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1753
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1754 %bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1755 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1756
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1757 func Test_normal22_zet()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1758 " Test for ZZ
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1759 " let shell = &shell
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1760 " let &shell = 'sh'
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1761 call writefile(['1', '2'], 'Xfile')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17682
diff changeset
1762 let args = ' -N -i NONE --noplugins -X --not-a-term'
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17682
diff changeset
1763 call system(GetVimCommand() .. args .. ' -c "%d" -c ":norm! ZZ" Xfile')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1764 let a = readfile('Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1765 call assert_equal([], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1766 " Test for ZQ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1767 call writefile(['1', '2'], 'Xfile')
17698
131f1d8c5860 patch 8.1.1846: inconsistently using GetVimCommand() and v:progpath
Bram Moolenaar <Bram@vim.org>
parents: 17682
diff changeset
1768 call system(GetVimCommand() . args . ' -c "%d" -c ":norm! ZQ" Xfile')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1769 let a = readfile('Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1770 call assert_equal(['1', '2'], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1771
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1772 " Unsupported Z command
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1773 call assert_beeps('normal! ZW')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1774
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1775 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1776 for file in ['Xfile']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1777 call delete(file)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1778 endfor
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1779 " let &shell = shell
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1780 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1781
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1782 func Test_normal23_K()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1783 " Test for K command
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1784 new
10330
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1785 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
1786 let k = &keywordprg
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1787 set keywordprg=:help
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1788 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1789 norm! VK
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1790 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
1791 call assert_equal('help', &ft)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1792 call assert_match('\*version8.txt\*', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1793 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1794 norm! 0K
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1795 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
1796 call assert_equal('help', &ft)
13963
1174611ad715 Vim 8.1 release
Christian Brabandt <cb@256bit.org>
parents: 13272
diff changeset
1797 call assert_match('\*version8\.\d\*', getline('.'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1798 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1799
10330
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1800 set keywordprg=:new
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1801 set iskeyword+=%
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1802 set iskeyword+=\|
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1803 2
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1804 norm! K
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1805 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
1806 bwipe!
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1807 3
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1808 norm! K
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1809 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
1810 bwipe!
10338
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1811 if !has('win32')
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1812 4
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1813 norm! K
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1814 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
1815 bwipe!
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1816 endif
10330
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1817 set iskeyword-=%
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1818 set iskeyword-=\|
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1819
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1820 " Test for specifying a count to K
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1821 1
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1822 com! -nargs=* Kprog let g:Kprog_Args = <q-args>
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1823 set keywordprg=:Kprog
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1824 norm! 3K
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1825 call assert_equal('3 version8', g:Kprog_Args)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1826 delcom Kprog
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1827
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1828 " 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
1829 if !has("unix")
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1830 let &keywordprg = k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1831 bw!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1832 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1833 endif
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1834
18736
97d534e17874 patch 8.1.2358: tests fail on Cirrus CI for FreeBSD
Bram Moolenaar <Bram@vim.org>
parents: 18730
diff changeset
1835 let not_gnu_man = has('mac') || has('bsd')
97d534e17874 patch 8.1.2358: tests fail on Cirrus CI for FreeBSD
Bram Moolenaar <Bram@vim.org>
parents: 18730
diff changeset
1836 if not_gnu_man
26211
485c7c4afeb7 patch 8.2.3637: typos in test files
Bram Moolenaar <Bram@vim.org>
parents: 26175
diff changeset
1837 " In macOS and BSD, the option for specifying a pager is different
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1838 set keywordprg=man\ -P\ cat
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1839 else
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1840 set keywordprg=man\ --pager=cat
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1841 endif
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1842 " Test for using man
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1843 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1844 let a = execute('unsilent norm! K')
18736
97d534e17874 patch 8.1.2358: tests fail on Cirrus CI for FreeBSD
Bram Moolenaar <Bram@vim.org>
parents: 18730
diff changeset
1845 if not_gnu_man
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1846 call assert_match("man -P cat 'man'", a)
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1847 else
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1848 call assert_match("man --pager=cat 'man'", a)
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1849 endif
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1850
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1851 " Error cases
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1852 call setline(1, '#$#')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1853 call assert_fails('normal! ggK', 'E349:')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1854 call setline(1, '---')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1855 call assert_fails('normal! ggv2lK', 'E349:')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1856 call setline(1, ['abc', 'xyz'])
21265
6a4806e326dd patch 8.2.1183: assert_fails() checks the last error message
Bram Moolenaar <Bram@vim.org>
parents: 20990
diff changeset
1857 call assert_fails("normal! gg2lv2h\<C-]>", 'E433:')
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1858 call assert_beeps("normal! ggVjK")
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1859 norm! V
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1860 call assert_beeps("norm! cK")
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1861
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1862 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1863 let &keywordprg = k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1864 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1865 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1866
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1867 func Test_normal24_rot13()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1868 " Testing for g?? g?g?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1869 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1870 call append(0, 'abcdefghijklmnopqrstuvwxyzäüö')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1871 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1872 norm! g??
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1873 call assert_equal('nopqrstuvwxyzabcdefghijklmäüö', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1874 norm! g?g?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1875 call assert_equal('abcdefghijklmnopqrstuvwxyzäüö', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1876
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1877 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1878 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1879 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1880
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1881 func Test_normal25_tag()
18767
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18736
diff changeset
1882 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18736
diff changeset
1883
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1884 " Testing for CTRL-] g CTRL-] g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1885 " 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
1886 h
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1887 " Test for CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1888 call search('\<x\>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1889 exe "norm! \<c-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1890 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
1891 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1892 call assert_equal("*x*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1893 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1894
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1895 " Test for g_CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1896 call search('\<v_u\>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1897 exe "norm! g\<c-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1898 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
1899 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1900 call assert_equal("*v_u*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1901 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1902
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1903 " Test for g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1904 call search('\<i_<Esc>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1905 let a = execute(":norm! g]")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1906 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
1907
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1908 if !empty(exepath('cscope')) && has('cscope')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1909 " setting cscopetag changes how g] works
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1910 set cst
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1911 exe "norm! g]"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1912 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
1913 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1914 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1915 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1916 " Test for CTRL-W g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1917 exe "norm! \<C-W>g]"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1918 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
1919 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1920 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1921 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1922 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1923 set nocst
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1924 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1925
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1926 " Test for CTRL-W g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1927 let a = execute("norm! \<C-W>g]")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1928 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
1929
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1930 " Test for CTRL-W CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1931 exe "norm! \<C-W>\<C-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1932 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
1933 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1934 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1935 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1936 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1937
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1938 " Test for CTRL-W g CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1939 exe "norm! \<C-W>g\<C-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1940 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
1941 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1942 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1943 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1944 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1945
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1946 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1947 helpclose
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1948 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1949
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1950 func Test_normal26_put()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1951 " Test for ]p ]P [p and [P
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1952 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1953 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
1954 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1955 /Error/y a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1956 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1957 norm! "a]pj"a[p
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1958 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
1959 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1960 /^\s\{4}/
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1961 exe "norm! \"a]P3Eldt'"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1962 exe "norm! j\"a[P2Eldt'"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1963 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
1964
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1965 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1966 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1967 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1968
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
1969 func Test_normal27_bracket()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1970 " Test for [' [` ]' ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1971 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1972 1,21s/.\+/ & b/
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1973 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1974 norm! $ma
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1975 5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1976 norm! $mb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1977 10
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1978 norm! $mc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1979 15
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1980 norm! $md
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1981 20
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1982 norm! $me
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1983
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1984 " Test for ['
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1985 9
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1986 norm! 2['
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1987 call assert_equal(' 1 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1988 call assert_equal(1, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1989 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1990
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1991 " Test for ]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1992 norm! ]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1993 call assert_equal(' 5 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1994 call assert_equal(5, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1995 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1996
29401
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
1997 " No mark before line 1, cursor moves to first non-blank on current line
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
1998 1
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
1999 norm! 5|['
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2000 call assert_equal(' 1 b', getline('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2001 call assert_equal(1, line('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2002 call assert_equal(3, col('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2003
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2004 " No mark after line 21, cursor moves to first non-blank on current line
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2005 21
29401
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2006 norm! 5|]'
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2007 call assert_equal(' 21 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2008 call assert_equal(21, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2009 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2010
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2011 " Test for [`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2012 norm! 2[`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2013 call assert_equal(' 15 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2014 call assert_equal(15, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2015 call assert_equal(8, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2016
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2017 " Test for ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2018 norm! ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2019 call assert_equal(' 20 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2020 call assert_equal(20, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2021 call assert_equal(8, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2022
29401
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2023 " No mark before line 1, cursor does not move
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2024 1
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2025 norm! 5|[`
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2026 call assert_equal(' 1 b', getline('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2027 call assert_equal(1, line('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2028 call assert_equal(5, col('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2029
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2030 " No mark after line 21, cursor does not move
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2031 21
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2032 norm! 5|]`
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2033 call assert_equal(' 21 b', getline('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2034 call assert_equal(21, line('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2035 call assert_equal(5, col('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2036
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2037 " Count too large for [`
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2038 " cursor moves to first lowercase mark
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2039 norm! 99[`
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2040 call assert_equal(' 1 b', getline('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2041 call assert_equal(1, line('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2042 call assert_equal(7, col('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2043
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2044 " Count too large for ]`
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2045 " cursor moves to last lowercase mark
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2046 norm! 99]`
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2047 call assert_equal(' 20 b', getline('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2048 call assert_equal(20, line('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2049 call assert_equal(8, col('.'))
23f44007f65d patch 9.0.0043: insufficient testing for bracket commands
Bram Moolenaar <Bram@vim.org>
parents: 29369
diff changeset
2050
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2051 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2052 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2053 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2054
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2055 " Test for ( and ) sentence movements
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
2056 func Test_normal28_parenthesis()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2057 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2058 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
2059
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2060 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2061 norm! d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2062 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
2063 norm! 2d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2064 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
2065 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2066 norm! 0d)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2067 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
2068
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2069 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
2070 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2071 norm! $d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2072 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
2073
20199
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2074 " Move to the next sentence from a paragraph macro
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2075 %d
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2076 call setline(1, ['.LP', 'blue sky!. blue sky.', 'blue sky. blue sky.'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2077 call cursor(1, 1)
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2078 normal )
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2079 call assert_equal([2, 1], [line('.'), col('.')])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2080 normal )
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2081 call assert_equal([2, 12], [line('.'), col('.')])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2082 normal ((
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2083 call assert_equal([1, 1], [line('.'), col('.')])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2084
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2085 " It is an error if a next sentence is not found
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2086 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2087 call setline(1, '.SH')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2088 call assert_beeps('normal )')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2089
20199
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2090 " If only dot is present, don't treat that as a sentence
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2091 call setline(1, '. This is a sentence.')
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2092 normal $((
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2093 call assert_equal(3, col('.'))
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2094
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2095 " Jumping to a fold should open the fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2096 call setline(1, ['', '', 'one', 'two', 'three'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2097 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2098 2,$fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2099 call feedkeys(')', 'xt')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2100 call assert_equal(3, line('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2101 call assert_equal(1, foldlevel('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2102 call assert_equal(-1, foldclosed('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2103 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2104
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2105 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2106 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2107 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2108
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2109 " Test for { and } paragraph movements
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2110 func Test_normal29_brace()
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2111 let text =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2112 A paragraph begins after each empty line, and also at each of a set of
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2113 paragraph macros, specified by the pairs of characters in the 'paragraphs'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2114 option. The default is "IPLPPPQPP TPHPLIPpLpItpplpipbp", which corresponds to
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2115 the macros ".IP", ".LP", etc. (These are nroff macros, so the dot must be in
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2116 the first column). A section boundary is also a paragraph boundary.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2117 Note that a blank line (only containing white space) is NOT a paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2118 boundary.
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2119
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2120
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2121 Also note that this does not include a '{' or '}' in the first column. When
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2122 the '{' flag is in 'cpoptions' then '{' in the first column is used as a
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2123 paragraph boundary |posix|.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2124 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2125 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2126 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2127 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2128 }
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2129 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2130 The nroff macros IP separates a paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2131 That means, it must be a '.'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2132 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2133 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2134 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2135 .SHAlso section boundaries from the nroff
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2136 macros terminate a paragraph. That means
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2137 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2138 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2139 End of text here
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2140 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2141
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2142 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2143 call append(0, text)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2144 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2145 norm! 0d2}
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2146
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2147 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2148 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2149 The nroff macros IP separates a paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2150 That means, it must be a '.'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2151 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2152 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2153 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2154 .SHAlso section boundaries from the nroff
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2155 macros terminate a paragraph. That means
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2156 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2157 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2158 End of text here
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2159
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2160 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2161 call assert_equal(expected, getline(1, '$'))
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2162
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2163 norm! 0d}
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2164
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2165 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2166 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2167 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2168 .SHAlso section boundaries from the nroff
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2169 macros terminate a paragraph. That means
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2170 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2171 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2172 End of text here
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2173
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2174 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2175 call assert_equal(expected, getline(1, '$'))
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2176
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2177 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2178 norm! d{
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2179
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2180 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2181 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2182 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2183 .SHAlso section boundaries from the nroff
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2184 macros terminate a paragraph. That means
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2185 a character like this:
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2186
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2187 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2188 call assert_equal(expected, getline(1, '$'))
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2189
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2190 norm! d{
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2191
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2192 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2193 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2194 more characters follow.
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2195
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2196 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2197 call assert_equal(expected, getline(1, '$'))
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2198
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2199 " Test with { in cpooptions
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2200 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2201 call append(0, text)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2202 set cpo+={
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2203 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2204 norm! 0d2}
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2205
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2206 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2207 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2208 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2209 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2210 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2211 }
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2212 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2213 The nroff macros IP separates a paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2214 That means, it must be a '.'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2215 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2216 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2217 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2218 .SHAlso section boundaries from the nroff
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2219 macros terminate a paragraph. That means
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2220 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2221 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2222 End of text here
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2223
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2224 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2225 call assert_equal(expected, getline(1, '$'))
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2226
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2227 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2228 norm! d}
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2229
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2230 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2231 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2232 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2233 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2234 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2235 }
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2236 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2237 The nroff macros IP separates a paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2238 That means, it must be a '.'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2239 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2240 .LPIt does not matter, if afterwards some
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2241 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2242 .SHAlso section boundaries from the nroff
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2243 macros terminate a paragraph. That means
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2244 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2245 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2246 End of text here
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2247
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2248 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2249 call assert_equal(expected, getline(1, '$'))
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2250
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2251 norm! gg}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2252 norm! d5}
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2253
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2254 let expected =<< trim [DATA]
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2255 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2256 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2257 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2258 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2259 }
16720
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2260
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2261 [DATA]
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2262 call assert_equal(expected, getline(1, '$'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2263
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2264 " Jumping to a fold should open the fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2265 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2266 call setline(1, ['', 'one', 'two', ''])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2267 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2268 2,$fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2269 call feedkeys('}', 'xt')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2270 call assert_equal(4, line('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2271 call assert_equal(1, foldlevel('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2272 call assert_equal(-1, foldclosed('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2273 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2274
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2275 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2276 set cpo-={
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2277 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2278 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2279
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2280 " Test for section movements
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2281 func Test_normal_section()
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2282 new
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2283 let lines =<< trim [END]
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2284 int foo()
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2285 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2286 if (1)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2287 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2288 a = 1;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2289 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2290 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2291 [END]
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2292 call setline(1, lines)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2293
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2294 " jumping to a folded line using [[ should open the fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2295 2,3fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2296 call cursor(5, 1)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2297 call feedkeys("[[", 'xt')
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2298 call assert_equal(2, line('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2299 call assert_equal(-1, foldclosedend(line('.')))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2300
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2301 close!
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2302 endfunc
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2303
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
2304 " Test for changing case using u, U, gu, gU and ~ (tilde) commands
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2305 func Test_normal30_changecase()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2306 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2307 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
2308 norm! 1ggVu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2309 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
2310 norm! VU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2311 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
2312 norm! guu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2313 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
2314 norm! gUgU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2315 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
2316 norm! gugu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2317 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
2318 norm! gUU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2319 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
2320 norm! 010~
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2321 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
2322 norm! V~
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2323 call assert_equal('THIS IS A simple test: äüöss', getline('.'))
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
2324 call assert_beeps('norm! c~')
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
2325 %d
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
2326 call assert_beeps('norm! ~')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2327
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2328 " Test for changing case across lines using 'whichwrap'
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2329 call setline(1, ['aaaaaa', 'aaaaaa'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2330 normal! gg10~
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2331 call assert_equal(['AAAAAA', 'aaaaaa'], getline(1, 2))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2332 set whichwrap+=~
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2333 normal! gg10~
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2334 call assert_equal(['aaaaaa', 'AAAAaa'], getline(1, 2))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2335 set whichwrap&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2336
24725
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2337 " try changing the case with a double byte encoding (DBCS)
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2338 %bw!
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2339 let enc = &enc
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2340 set encoding=cp932
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2341 call setline(1, "\u8470")
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2342 normal ~
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2343 normal gU$gu$gUgUg~g~gugu
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2344 call assert_equal("\u8470", getline(1))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2345 let &encoding = enc
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2346
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2347 " clean up
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2348 bw!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2349 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2350
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2351 " Turkish ASCII turns to multi-byte. On some systems Turkish locale
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2352 " is available but toupper()/tolower() don't do the right thing.
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2353 func Test_normal_changecase_turkish()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2354 new
14669
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2355 try
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2356 lang tr_TR.UTF-8
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2357 set casemap=
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2358 let iupper = toupper('i')
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2359 if iupper == "\u0130"
11335
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2360 call setline(1, 'iI')
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2361 1normal gUU
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2362 call assert_equal("\u0130I", getline(1))
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2363 call assert_equal("\u0130I", toupper("iI"))
11333
fef09eb74832 patch 8.0.0552: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11327
diff changeset
2364
11335
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2365 call setline(1, 'iI')
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2366 1normal guu
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2367 call assert_equal("i\u0131", getline(1))
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2368 call assert_equal("i\u0131", tolower("iI"))
14669
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2369 elseif iupper == "I"
11337
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2370 call setline(1, 'iI')
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2371 1normal gUU
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2372 call assert_equal("II", getline(1))
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2373 call assert_equal("II", toupper("iI"))
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2374
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2375 call setline(1, 'iI')
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2376 1normal guu
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2377 call assert_equal("ii", getline(1))
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2378 call assert_equal("ii", tolower("iI"))
14669
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2379 else
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2380 call assert_true(false, "expected toupper('i') to be either 'I' or '\u0130'")
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2381 endif
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2382 set casemap&
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2383 call setline(1, 'iI')
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2384 1normal gUU
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2385 call assert_equal("II", getline(1))
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2386 call assert_equal("II", toupper("iI"))
11337
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2387
14669
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2388 call setline(1, 'iI')
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2389 1normal guu
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2390 call assert_equal("ii", getline(1))
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2391 call assert_equal("ii", tolower("iI"))
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2392
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2393 lang en_US.UTF-8
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2394 catch /E197:/
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2395 " can't use Turkish locale
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2396 throw 'Skipped: Turkish locale not available'
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2397 endtry
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2398 close!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2399 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2400
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2401 " Test for r (replace) command
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2402 func Test_normal31_r_cmd()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2403 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2404 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
2405 exe "norm! 1gg$r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2406 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
2407 exe "norm! 1gg2wlr\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2408 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
2409 exe "norm! 2gg0W5r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2410 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
2411 set autoindent
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2412 call setline(2, ['simple test: abc', ''])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2413 exe "norm! 2gg0W5r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2414 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
2415 exe "norm! 1ggVr\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2416 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
2417 call setline(1, 'This is a')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2418 exe "norm! 1gg05rf"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2419 call assert_equal('fffffis a', getline(1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2420
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2421 " When replacing characters, copy characters from above and below lines
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2422 " using CTRL-Y and CTRL-E.
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2423 " Different code paths are used for utf-8 and latin1 encodings
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2424 set showmatch
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2425 for enc in ['latin1', 'utf-8']
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2426 enew!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2427 let &encoding = enc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2428 call setline(1, [' {a}', 'xxxxxxxxxx', ' [b]'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2429 exe "norm! 2gg5r\<C-Y>l5r\<C-E>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2430 call assert_equal(' {a}x [b]x', getline(2))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2431 endfor
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2432 set showmatch&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2433
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2434 " r command should fail in operator pending mode
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2435 call assert_beeps('normal! cr')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2436
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2437 " replace a tab character in visual mode
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2438 %d
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2439 call setline(1, ["a\tb", "c\td", "e\tf"])
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2440 normal gglvjjrx
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2441 call assert_equal(['axx', 'xxx', 'xxf'], getline(1, '$'))
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2442
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2443 " replace with a multibyte character (with multiple composing characters)
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2444 %d
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2445 new
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2446 call setline(1, 'aaa')
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2447 exe "normal $ra\u0328\u0301"
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2448 call assert_equal("aaa\u0328\u0301", getline(1))
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2449
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2450 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2451 set noautoindent
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2452 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2453 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2454
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2455 " Test for g*, g#
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
2456 func Test_normal32_g_cmd1()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2457 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2458 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
2459 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2460 norm! $g*
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2461 call assert_equal('x_foo', @/)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2462 call assert_equal('x_foobar.abc', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2463 norm! $g#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2464 call assert_equal('abc', @/)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2465 call assert_equal('abc.x_foo', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2466
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2467 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2468 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2469 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2470
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2471 " Test for g`, g;, g,, g&, gv, gk, gj, gJ, g0, g^, g_, gm, g$, gM, g CTRL-G,
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2472 " gi and gI commands
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2473 func Test_normal33_g_cmd2()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2474 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2475 " Test for g`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2476 clearjumps
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2477 norm! ma10j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2478 let a=execute(':jumps')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2479 " empty jumplist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2480 call assert_equal('>', a[-1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2481 norm! g`a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2482 call assert_equal('>', a[-1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2483 call assert_equal(1, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2484 call assert_equal('1', getline('.'))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2485 call cursor(10, 1)
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2486 norm! g'a
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2487 call assert_equal('>', a[-1:])
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2488 call assert_equal(1, line('.'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2489
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2490 " Test for g; and g,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2491 norm! g;
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2492 " 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
2493 " currently, when we setup the window
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2494 call assert_equal(2, line('.'))
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
2495 call assert_fails(':norm! g;', 'E662:')
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
2496 call assert_fails(':norm! g,', 'E663:')
29179
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
2497 let &ul = &ul
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2498 call append('$', ['a', 'b', 'c', 'd'])
29179
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
2499 let &ul = &ul
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2500 call append('$', ['Z', 'Y', 'X', 'W'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2501 let a = execute(':changes')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2502 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
2503 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
2504 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
2505 norm! 3g;
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2506 call assert_equal(2, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2507 norm! 2g,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2508 call assert_equal(105, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2509
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2510 " Test for g& - global substitute
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2511 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2512 call setline(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2513 call append('$', ['a', 'b', 'c', 'd'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2514 $s/\w/&&/g
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2515 exe "norm! /[1-8]\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2516 norm! g&
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2517 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
2518
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2519 " Jumping to a fold using gg should open the fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2520 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2521 set foldopen+=jump
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2522 5,8fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2523 call feedkeys('6gg', 'xt')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2524 call assert_equal(1, foldlevel('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2525 call assert_equal(-1, foldclosed('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2526 set foldopen-=jump
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2527 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2528
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2529 " Test for gv
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2530 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2531 call append('$', repeat(['abcdefgh'], 8))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2532 exe "norm! 2gg02l\<c-v>2j2ly"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2533 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
2534 " 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
2535 exe "norm! G0\<c-v>4k4lgvd"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2536 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
2537 exe "norm! G0\<c-v>4k4ly"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2538 exe "norm! gvood"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2539 call assert_equal(['', 'abfgh', 'abfgh', 'abfgh', 'fgh', 'fgh', 'fgh', 'fgh', 'fgh'], getline(1,'$'))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2540 " gv cannot be used in operator pending mode
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2541 call assert_beeps('normal! cgv')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2542 " gv should beep without a previously selected visual area
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2543 new
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2544 call assert_beeps('normal! gv')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2545 close
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2546
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2547 " Test for gk/gj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2548 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2549 15vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2550 set wrap listchars= sbr=
24731
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2551 let lineA = 'abcdefghijklmnopqrstuvwxyz'
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2552 let lineB = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2553 let lineC = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz01234567890123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789'
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2554 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2555 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2556
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2557 norm! 3gg0dgk
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2558 call assert_equal(['', 'abcdefghijklmno', '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2559 set nu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2560 norm! 3gg0gjdgj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2561 call assert_equal(['', 'abcdefghijklmno', '0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2562
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2563 " Test for gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2564 norm! 2gggJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2565 call assert_equal(['', 'abcdefghijklmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2566 call assert_equal(16, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2567 " shouldn't do anything
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2568 norm! 10gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2569 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2570
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2571 " Test for g0 g^ gm g$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2572 exe "norm! 2gg0gji "
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2573 call assert_equal(['', 'abcdefghijk lmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2574 norm! g0yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2575 call assert_equal(12, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2576 call assert_equal(' ', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2577 norm! g$yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2578 call assert_equal(22, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2579 call assert_equal('3', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2580 norm! gmyl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2581 call assert_equal(17, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2582 call assert_equal('n', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2583 norm! g^yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2584 call assert_equal(15, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2585 call assert_equal('l', getreg(0))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2586 call assert_beeps('normal 5g$')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2587
24731
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2588 " Test for g$ with double-width character half displayed
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2589 vsplit
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2590 9wincmd |
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2591 setlocal nowrap nonumber
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2592 call setline(2, 'asdfasdfヨ')
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2593 2
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2594 normal 0g$
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2595 call assert_equal(8, col('.'))
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2596 10wincmd |
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2597 normal 0g$
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2598 call assert_equal(9, col('.'))
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2599
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2600 setlocal signcolumn=yes
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2601 11wincmd |
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2602 normal 0g$
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2603 call assert_equal(8, col('.'))
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2604 12wincmd |
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2605 normal 0g$
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2606 call assert_equal(9, col('.'))
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2607
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2608 close
a6a4224902f5 patch 8.2.2904: "g$" causes scroll if half a double width char is visible
Bram Moolenaar <Bram@vim.org>
parents: 24725
diff changeset
2609
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2610 " Test for g_
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2611 call assert_beeps('normal! 100g_')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2612 call setline(2, [' foo ', ' foobar '])
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2613 normal! 2ggg_
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2614 call assert_equal(5, col('.'))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2615 normal! 2g_
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2616 call assert_equal(8, col('.'))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2617
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2618 norm! 2ggdG
18475
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2619 $put =lineC
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2620
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2621 " Test for gM
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2622 norm! gMyl
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2623 call assert_equal(73, col('.'))
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2624 call assert_equal('0', getreg(0))
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2625 " Test for 20gM
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2626 norm! 20gMyl
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2627 call assert_equal(29, col('.'))
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2628 call assert_equal('S', getreg(0))
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2629 " Test for 60gM
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2630 norm! 60gMyl
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2631 call assert_equal(87, col('.'))
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2632 call assert_equal('E', getreg(0))
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2633
26749
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2634 " Test for gM with Tab characters
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2635 call setline('.', "\ta\tb\tc\td\te\tf")
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2636 norm! gMyl
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2637 call assert_equal(6, col('.'))
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2638 call assert_equal("c", getreg(0))
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2639
18475
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2640 " Test for g Ctrl-G
26749
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2641 call setline('.', lineC)
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2642 norm! 60gMyl
18475
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2643 set ff=unix
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2644 let a=execute(":norm! g\<c-g>")
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2645 call assert_match('Col 87 of 144; Line 2 of 2; Word 1 of 1; Byte 88 of 146', a)
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2646
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2647 " Test for gI
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2648 norm! gIfoo
18475
709c6b0dc78f patch 8.1.2231: not easy to move to the middle of a text line
Bram Moolenaar <Bram@vim.org>
parents: 18473
diff changeset
2649 call assert_equal(['', 'foo0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz01234567890123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789'], getline(1,'$'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2650
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2651 " Test for gi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2652 wincmd c
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2653 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2654 set tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2655 call setline(1, ['foobar', 'new line'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2656 norm! A next word
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2657 $put ='third line'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2658 norm! gi another word
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2659 call assert_equal(['foobar next word another word', 'new line', 'third line'], getline(1,'$'))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2660 call setline(1, 'foobar')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2661 normal! Ggifirst line
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2662 call assert_equal('foobarfirst line', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2663 " Test gi in 'virtualedit' mode with cursor after the end of the line
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2664 set virtualedit=all
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2665 call setline(1, 'foo')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2666 exe "normal! Abar\<Right>\<Right>\<Right>\<Right>"
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2667 call setline(1, 'foo')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2668 normal! Ggifirst line
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2669 call assert_equal('foo first line', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2670 set virtualedit&
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2671
26211
485c7c4afeb7 patch 8.2.3637: typos in test files
Bram Moolenaar <Bram@vim.org>
parents: 26175
diff changeset
2672 " Test for aborting a g command using CTRL-\ CTRL-G
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2673 exe "normal! g\<C-\>\<C-G>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2674 call assert_equal('foo first line', getline('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2675
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2676 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2677 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2678 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2679
28293
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2680 func Test_normal_ex_substitute()
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2681 " This was hanging on the substitute prompt.
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2682 new
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2683 call setline(1, 'a')
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2684 exe "normal! gggQs/a/b/c\<CR>"
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2685 call assert_equal('a', getline(1))
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2686 bwipe!
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2687 endfunc
aa533dc41223 patch 8.2.4672: using :normal with Ex mode may make :substitute hang
Bram Moolenaar <Bram@vim.org>
parents: 27671
diff changeset
2688
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2689 " Test for g CTRL-G
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
2690 func Test_g_ctrl_g()
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2691 new
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2692
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2693 let a = execute(":norm! g\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2694 call assert_equal("\n--No lines in buffer--", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2695
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2696 " Test for CTRL-G (same as :file)
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2697 let a = execute(":norm! \<c-g>")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2698 call assert_equal("\n\n\"[No Name]\" --No lines in buffer--", a)
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2699
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2700 call setline(1, ['first line', 'second line'])
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2701
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2702 " Test g CTRL-g with dos, mac and unix file type.
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2703 norm! gojll
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2704 set ff=dos
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2705 let a = execute(":norm! g\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2706 call assert_equal("\nCol 3 of 11; Line 2 of 2; Word 3 of 4; Byte 15 of 25", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2707
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2708 set ff=mac
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2709 let a = execute(":norm! g\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2710 call assert_equal("\nCol 3 of 11; Line 2 of 2; Word 3 of 4; Byte 14 of 23", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2711
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2712 set ff=unix
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2713 let a = execute(":norm! g\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2714 call assert_equal("\nCol 3 of 11; Line 2 of 2; Word 3 of 4; Byte 14 of 23", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2715
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2716 " Test g CTRL-g in visual mode (v)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2717 let a = execute(":norm! gojllvlg\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2718 call assert_equal("\nSelected 1 of 2 Lines; 1 of 4 Words; 2 of 23 Bytes", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2719
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2720 " Test g CTRL-g in visual mode (CTRL-V) with end col > start col
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2721 let a = execute(":norm! \<Esc>gojll\<C-V>kllg\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2722 call assert_equal("\nSelected 3 Cols; 2 of 2 Lines; 2 of 4 Words; 6 of 23 Bytes", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2723
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2724 " Test g_CTRL-g in visual mode (CTRL-V) with end col < start col
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2725 let a = execute(":norm! \<Esc>goll\<C-V>jhhg\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2726 call assert_equal("\nSelected 3 Cols; 2 of 2 Lines; 2 of 4 Words; 6 of 23 Bytes", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2727
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2728 " Test g CTRL-g in visual mode (CTRL-V) with end_vcol being MAXCOL
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2729 let a = execute(":norm! \<Esc>gojll\<C-V>k$g\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2730 call assert_equal("\nSelected 2 of 2 Lines; 4 of 4 Words; 17 of 23 Bytes", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2731
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2732 " There should be one byte less with noeol
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2733 set bin noeol
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2734 let a = execute(":norm! \<Esc>gog\<c-g>")
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2735 call assert_equal("\nCol 1 of 10; Line 1 of 2; Word 1 of 4; Char 1 of 23; Byte 1 of 22", a)
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2736 set bin & eol&
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2737
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2738 call setline(1, ['Français', '日本語'])
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2739
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2740 let a = execute(":norm! \<Esc>gojlg\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2741 call assert_equal("\nCol 4-3 of 9-6; Line 2 of 2; Word 2 of 2; Char 11 of 13; Byte 16 of 20", a)
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2742
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2743 let a = execute(":norm! \<Esc>gojvlg\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2744 call assert_equal("\nSelected 1 of 2 Lines; 1 of 2 Words; 2 of 13 Chars; 6 of 20 Bytes", a)
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2745
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2746 let a = execute(":norm! \<Esc>goll\<c-v>jlg\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2747 call assert_equal("\nSelected 4 Cols; 2 of 2 Lines; 2 of 2 Words; 6 of 13 Chars; 11 of 20 Bytes", a)
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2748
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2749 set fenc=utf8 bomb
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2750 let a = execute(":norm! \<Esc>gojlg\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2751 call assert_equal("\nCol 4-3 of 9-6; Line 2 of 2; Word 2 of 2; Char 11 of 13; Byte 16 of 20(+3 for BOM)", a)
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2752
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2753 set fenc=utf16 bomb
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2754 let a = execute(":norm! g\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2755 call assert_equal("\nCol 4-3 of 9-6; Line 2 of 2; Word 2 of 2; Char 11 of 13; Byte 16 of 20(+2 for BOM)", a)
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2756
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2757 set fenc=utf32 bomb
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2758 let a = execute(":norm! g\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2759 call assert_equal("\nCol 4-3 of 9-6; Line 2 of 2; Word 2 of 2; Char 11 of 13; Byte 16 of 20(+4 for BOM)", a)
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2760
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2761 set fenc& bomb&
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2762
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2763 set ff&
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2764 bwipe!
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2765 endfunc
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2766
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2767 " Test for g8
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2768 func Test_normal34_g_cmd3()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2769 new
11327
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2770 let a=execute(':norm! 1G0g8')
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2771 call assert_equal("\nNUL", a)
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2772
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2773 call setline(1, 'abcdefghijklmnopqrstuvwxyzäüö')
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2774 let a=execute(':norm! 1G$g8')
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2775 call assert_equal("\nc3 b6 ", a)
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2776
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2777 call setline(1, "a\u0302")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2778 let a=execute(':norm! 1G0g8')
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2779 call assert_equal("\n61 + cc 82 ", a)
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2780
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2781 " clean up
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2782 bw!
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2783 endfunc
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2784
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2785 " Test 8g8 which finds invalid utf8 at or after the cursor.
11327
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2786 func Test_normal_8g8()
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2787 new
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2788
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2789 " With invalid byte.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2790 call setline(1, "___\xff___")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2791 norm! 1G08g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2792 call assert_equal([0, 1, 4, 0, 1], getcurpos())
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2793
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2794 " With invalid byte before the cursor.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2795 call setline(1, "___\xff___")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2796 norm! 1G$h8g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2797 call assert_equal([0, 1, 6, 0, 9], getcurpos())
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2798
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2799 " With truncated sequence.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2800 call setline(1, "___\xE2\x82___")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2801 norm! 1G08g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2802 call assert_equal([0, 1, 4, 0, 1], getcurpos())
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2803
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2804 " With overlong sequence.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2805 call setline(1, "___\xF0\x82\x82\xAC___")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2806 norm! 1G08g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2807 call assert_equal([0, 1, 4, 0, 1], getcurpos())
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2808
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2809 " With valid utf8.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2810 call setline(1, "café")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2811 norm! 1G08g8
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2812 call assert_equal([0, 1, 1, 0, 1], getcurpos())
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2813
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2814 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2815 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2816
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2817 " Test for g<
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2818 func Test_normal35_g_cmd4()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2819 " Cannot capture its output,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2820 " 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
2821 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
2822 echo "a\nb\nc\nd"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2823 let b=execute(':norm! g<')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2824 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
2825 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2826
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2827 " Test for gp gP go
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2828 func Test_normal36_g_cmd5()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2829 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2830 call append(0, 'abcdefghijklmnopqrstuvwxyz')
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
2831 set ff=unix
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2832 " Test for gp gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2833 call append(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2834 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2835 norm! 1yy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2836 3
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2837 norm! gp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2838 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
2839 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2840 norm! gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2841 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
2842
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2843 " Test for go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2844 norm! 26go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2845 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
2846 norm! 27go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2847 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
2848 norm! 28go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2849 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
2850 set ff=dos
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2851 norm! 29go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2852 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
2853 set ff=unix
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2854 norm! gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2855 norm! 101go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2856 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
2857 norm! 103go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2858 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
2859 " count > buffer content
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2860 norm! 120go
26881
fb67cd7d30a7 patch 8.2.3969: value of MAXCOL not available in Vim script
Bram Moolenaar <Bram@vim.org>
parents: 26749
diff changeset
2861 call assert_equal([0, 14, 1, 0, v:maxcol], getcurpos())
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2862 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2863 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2864 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2865
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2866 " Test for gt and gT
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2867 func Test_normal37_g_cmd6()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2868 tabnew 1.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2869 tabnew 2.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2870 tabnew 3.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2871 norm! 1gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2872 call assert_equal(1, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2873 norm! 3gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2874 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2875 norm! 1gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2876 " 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
2877 " 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
2878 call assert_equal(2, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2879 " wrap around
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2880 norm! 3gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2881 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2882 " gt does not wrap around
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2883 norm! 5gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2884 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2885
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2886 for i in range(3)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2887 tabclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2888 endfor
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2889 " clean up
19425
67fbe280a502 patch 8.2.0270: some code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 19407
diff changeset
2890 call assert_fails(':tabclose', 'E784:')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2891 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2892
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2893 " Test for <Home> and <C-Home> key
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2894 func Test_normal38_nvhome()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2895 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2896 call setline(1, range(10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2897 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2898 setl et sw=2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2899 norm! V10>$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2900 " count is ignored
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2901 exe "norm! 10\<home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2902 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2903 exe "norm! \<home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2904 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
2905 exe "norm! 5\<c-home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2906 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
2907 exe "norm! \<c-home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2908 call assert_equal([0, 1, 1, 0, 1], getcurpos())
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2909 exe "norm! G\<c-kHome>"
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2910 call assert_equal([0, 1, 1, 0, 1], getcurpos())
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2911
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2912 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2913 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2914 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2915
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2916 " Test for <End> and <C-End> keys
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2917 func Test_normal_nvend()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2918 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2919 call setline(1, map(range(1, 10), '"line" .. v:val'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2920 exe "normal! \<End>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2921 call assert_equal(5, col('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2922 exe "normal! 4\<End>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2923 call assert_equal([4, 5], [line('.'), col('.')])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2924 exe "normal! \<C-End>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2925 call assert_equal([10, 6], [line('.'), col('.')])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2926 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2927 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2928
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2929 " Test for cw cW ce
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2930 func Test_normal39_cw()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2931 " Test for cw and cW on whitespace
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2932 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2933 set tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2934 call append(0, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2935 norm! 1gg0elcwZZZ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2936 call assert_equal('hereZZZare some words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2937 norm! 1gg0elcWYYY
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2938 call assert_equal('hereZZZareYYYsome words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2939 norm! 2gg0cwfoo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2940 call assert_equal('foo', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2941
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2942 call setline(1, 'one; two')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2943 call cursor(1, 1)
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2944 call feedkeys('cwvim', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2945 call assert_equal('vim; two', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2946 call feedkeys('0cWone', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2947 call assert_equal('one two', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2948 "When cursor is at the end of a word 'ce' will change until the end of the
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2949 "next word, but 'cw' will change only one character
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2950 call setline(1, 'one two')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2951 call feedkeys('0ecwce', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2952 call assert_equal('once two', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2953 call setline(1, 'one two')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2954 call feedkeys('0ecely', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2955 call assert_equal('only', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2956
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2957 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2958 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2959 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2960
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2961 " Test for CTRL-\ commands
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2962 func Test_normal40_ctrl_bsl()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2963 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2964 call append(0, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2965 exe "norm! 1gg0a\<C-\>\<C-N>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2966 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2967 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2968 call assert_equal('', visualmode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2969 exe "norm! 1gg0viw\<C-\>\<C-N>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2970 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2971 call assert_equal(4, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2972 exe "norm! 1gg0a\<C-\>\<C-G>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2973 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2974 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2975 "imap <buffer> , <c-\><c-n>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2976 set im
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2977 exe ":norm! \<c-\>\<c-n>dw"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2978 set noim
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2979 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
2980 call assert_false(&insertmode)
25252
acda780ffc3e patch 8.2.3162: Vim9: argument types are not checked at compile time
Bram Moolenaar <Bram@vim.org>
parents: 24756
diff changeset
2981 call assert_beeps("normal! \<C-\>\<C-A>")
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2982
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2983 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2984 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2985 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2986
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2987 " Test for <c-r>=, <c-r><c-r>= and <c-r><c-o>= in insert mode
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2988 func Test_normal41_insert_reg()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2989 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2990 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
2991 call append(0, ["aaa\tbbb\tccc", '', '', ''])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2992 let a=getline(1)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2993 norm! 2gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2994 exe "norm! a\<c-r>=a\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2995 norm! 3gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2996 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
2997 norm! 4gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2998 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
2999 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
3000
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3001 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3002 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
3003 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3004 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3005
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3006 " Test for Ctrl-D and Ctrl-U
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3007 func Test_normal42_halfpage()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3008 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3009 call assert_equal(5, &scroll)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3010 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3011 call assert_equal('6', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3012 exe "norm! 2\<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3013 call assert_equal('8', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3014 call assert_equal(2, &scroll)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3015 set scroll=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3016 exe "norm! \<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3017 call assert_equal('3', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3018 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3019 set scrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3020 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3021 call assert_equal('10', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3022 exe "norm! \<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3023 call assert_equal('5', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3024 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3025 set scrolloff=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3026 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3027 call assert_equal('10', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3028 set scrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3029 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3030 exe "norm! $\<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3031 call assert_equal('95', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3032 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
3033 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3034 set nostartofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3035 exe "norm! $\<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3036 call assert_equal('95', getline('.'))
26881
fb67cd7d30a7 patch 8.2.3969: value of MAXCOL not available in Vim script
Bram Moolenaar <Bram@vim.org>
parents: 26749
diff changeset
3037 call assert_equal([0, 95, 2, 0, v:maxcol], getcurpos())
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3038 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3039 set startofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3040 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3041 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3042
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3043 func Test_normal45_drop()
13270
f3fb8dae30f1 patch 8.0.1509: test for failing drag-n-drop command no longer fails
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3044 if !has('dnd')
13272
abaebba89fd4 patch 8.0.1510: cannot test if a command causes a beep
Christian Brabandt <cb@256bit.org>
parents: 13270
diff changeset
3045 " The ~ register does not exist
abaebba89fd4 patch 8.0.1510: cannot test if a command causes a beep
Christian Brabandt <cb@256bit.org>
parents: 13270
diff changeset
3046 call assert_beeps('norm! "~')
13270
f3fb8dae30f1 patch 8.0.1509: test for failing drag-n-drop command no longer fails
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3047 return
f3fb8dae30f1 patch 8.0.1509: test for failing drag-n-drop command no longer fails
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3048 endif
f3fb8dae30f1 patch 8.0.1509: test for failing drag-n-drop command no longer fails
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3049
f3fb8dae30f1 patch 8.0.1509: test for failing drag-n-drop command no longer fails
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3050 " basic test for drag-n-drop
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3051 " 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
3052 " 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
3053 new
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3054 call assert_fails(':norm! "~p', 'E353:')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3055 call assert_equal([], getreg('~', 1, 1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3056 " the ~ register is read only
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3057 call assert_fails(':let @~="1"', 'E354:')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3058 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3059 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3060
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3061 func Test_normal46_ignore()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3062 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3063 " How to test this?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3064 " 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
3065 " does not change
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3066 call feedkeys("\<c-s>", 't')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3067 call assert_equal([''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3068
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3069 " no valid commands
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3070 exe "norm! \<char-0x100>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3071 call assert_equal([''], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3072
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3073 exe "norm! ä"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3074 call assert_equal([''], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3075
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3076 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3077 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3078 endfunc
10154
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3079
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3080 func Test_normal47_visual_buf_wipe()
10154
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3081 " 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
3082 enew!
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3083 call setline(1,'xxx')
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3084 normal $
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3085 new
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3086 call setline(1, range(1,2))
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3087 2
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3088 exe "norm \<C-V>$"
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3089 bw!
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3090 norm yp
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3091 set nomodified
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3092 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3093
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3094 func Test_normal48_wincmd()
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3095 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3096 exe "norm! \<c-w>c"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3097 call assert_equal(1, winnr('$'))
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3098 call assert_fails(":norm! \<c-w>c", 'E444:')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3099 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3100
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3101 func Test_normal49_counts()
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3102 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3103 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
3104 1
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3105 norm! 3d2w
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3106 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
3107 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3108 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3109
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3110 func Test_normal50_commandline()
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3111 CheckFeature timers
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3112 CheckFeature cmdline_hist
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3113 func! DoTimerWork(id)
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3114 call assert_equal('[Command Line]', bufname(''))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3115 " 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
3116 "call feedkeys("\<c-^>", 'tm')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3117
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3118 " should also fail with E11
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3119 call assert_fails(":wincmd p", 'E11:')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3120 " return from commandline window
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3121 call feedkeys("\<cr>")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3122 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3123
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3124 let oldlang=v:lang
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3125 lang C
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3126 set updatetime=20
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3127 call timer_start(100, 'DoTimerWork')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3128 try
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3129 " throws E23, for whatever reason...
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3130 call feedkeys('q:', 'x!')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3131 catch /E23/
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3132 " no-op
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3133 endtry
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3134 " clean up
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3135 set updatetime=4000
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3136 exe "lang" oldlang
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3137 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3138 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3139
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3140 func Test_normal51_FileChangedRO()
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3141 CheckFeature autocmd
10807
82c43bca568e patch 8.0.0293: some tests have a one or three second wait
Christian Brabandt <cb@256bit.org>
parents: 10579
diff changeset
3142 " Don't sleep after the warning message.
82c43bca568e patch 8.0.0293: some tests have a one or three second wait
Christian Brabandt <cb@256bit.org>
parents: 10579
diff changeset
3143 call test_settime(1)
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3144 call writefile(['foo'], 'Xreadonly.log')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3145 new Xreadonly.log
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3146 setl ro
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3147 au FileChangedRO <buffer> :call feedkeys("\<c-^>", 'tix')
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3148 call assert_fails(":norm! Af", 'E788:')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3149 call assert_equal(['foo'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3150 call assert_equal('Xreadonly.log', bufname(''))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3151
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3152 " cleanup
10807
82c43bca568e patch 8.0.0293: some tests have a one or three second wait
Christian Brabandt <cb@256bit.org>
parents: 10579
diff changeset
3153 call test_settime(0)
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3154 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3155 call delete("Xreadonly.log")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3156 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3157
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3158 func Test_normal52_rl()
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3159 CheckFeature rightleft
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3160 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3161 call setline(1, 'abcde fghij klmnopq')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3162 norm! 1gg$
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3163 set rl
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3164 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3165 call feedkeys('l', 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3166 call assert_equal(18, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3167 call feedkeys('h', 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3168 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3169 call feedkeys("\<right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3170 call assert_equal(18, col('.'))
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3171 call feedkeys("\<left>", 'tx')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3172 call assert_equal(19, col('.'))
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3173 call feedkeys("\<s-right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3174 call assert_equal(13, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3175 call feedkeys("\<c-right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3176 call assert_equal(7, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3177 call feedkeys("\<c-left>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3178 call assert_equal(13, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3179 call feedkeys("\<s-left>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3180 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3181 call feedkeys("<<", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3182 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
3183 call feedkeys(">>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3184 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
3185
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3186 " cleanup
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3187 set norl
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3188 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3189 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3190
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3191 func Test_normal54_Ctrl_bsl()
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3192 new
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3193 call setline(1, 'abcdefghijklmn')
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3194 exe "norm! df\<c-\>\<c-n>"
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3195 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3196 exe "norm! df\<c-\>\<c-g>"
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3197 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3198 exe "norm! df\<c-\>m"
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3199 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
3200
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3201 call setline(2, 'abcdefghijklmnāf')
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3202 norm! 2gg0
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3203 exe "norm! df\<Char-0x101>"
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3204 call assert_equal(['abcdefghijklmn', 'f'], getline(1,'$'))
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3205 norm! 1gg0
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3206 exe "norm! df\<esc>"
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3207 call assert_equal(['abcdefghijklmn', 'f'], getline(1,'$'))
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3208
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3209 " clean up
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3210 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3211 endfunc
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3212
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3213 func Test_normal_large_count()
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3214 " This may fail with 32bit long, how do we detect that?
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3215 new
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3216 normal o
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3217 normal 6666666666dL
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3218 bwipe!
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3219 endfunc
11275
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3220
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3221 func Test_delete_until_paragraph()
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3222 new
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3223 normal grádv}
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3224 call assert_equal('á', getline(1))
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3225 normal grád}
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3226 call assert_equal('', getline(1))
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3227 bwipe!
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3228 endfunc
12788
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3229
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3230 " Test for the gr (virtual replace) command
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3231 " Test for the bug fixed by 7.4.387
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3232 func Test_gr_command()
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3233 enew!
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3234 let save_cpo = &cpo
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3235 call append(0, ['First line', 'Second line', 'Third line'])
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3236 exe "normal i\<C-G>u"
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3237 call cursor(2, 1)
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3238 set cpo-=X
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3239 normal 4gro
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3240 call assert_equal('oooond line', getline(2))
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3241 undo
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3242 set cpo+=X
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3243 normal 4gro
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3244 call assert_equal('ooooecond line', getline(2))
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3245 let &cpo = save_cpo
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3246 normal! ggvegrx
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3247 call assert_equal('xxxxx line', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3248 exe "normal! gggr\<C-V>122"
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3249 call assert_equal('zxxxx line', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3250 set virtualedit=all
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3251 normal! 15|grl
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3252 call assert_equal('zxxxx line l', getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3253 set virtualedit&
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3254 set nomodifiable
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3255 call assert_fails('normal! grx', 'E21:')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3256 call assert_fails('normal! gRx', 'E21:')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3257 set modifiable&
12788
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3258 enew!
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3259 endfunc
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3260
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3261 func Test_nv_hat_count()
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3262 %bwipeout!
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3263 let l:nr = bufnr('%') + 1
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3264 call assert_fails(':execute "normal! ' . l:nr . '\<C-^>"', 'E92:')
15006
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3265
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3266 edit Xfoo
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3267 let l:foo_nr = bufnr('Xfoo')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3268
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3269 edit Xbar
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3270 let l:bar_nr = bufnr('Xbar')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3271
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3272 " Make sure we are not just using the alternate file.
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3273 edit Xbaz
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3274
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3275 call feedkeys(l:foo_nr . "\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3276 call assert_equal('Xfoo', fnamemodify(bufname('%'), ':t'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3277
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3278 call feedkeys(l:bar_nr . "\<C-^>", 'tx')
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3279 call assert_equal('Xbar', fnamemodify(bufname('%'), ':t'))
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3280
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3281 %bwipeout!
1fd8e32532f7 patch 8.1.0514: CTRL-W ^ does not work when alternate buffer has no name
Bram Moolenaar <Bram@vim.org>
parents: 14669
diff changeset
3282 endfunc
16089
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3283
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3284 func Test_message_when_using_ctrl_c()
16095
4673f22da44d patch 8.1.1052: test for CTRL-C message sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 16089
diff changeset
3285 " Make sure no buffers are changed.
4673f22da44d patch 8.1.1052: test for CTRL-C message sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 16089
diff changeset
3286 %bwipe!
4673f22da44d patch 8.1.1052: test for CTRL-C message sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 16089
diff changeset
3287
16089
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3288 exe "normal \<C-C>"
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3289 call assert_match("Type :qa and press <Enter> to exit Vim", Screenline(&lines))
16095
4673f22da44d patch 8.1.1052: test for CTRL-C message sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 16089
diff changeset
3290
16089
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3291 new
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3292 cal setline(1, 'hi!')
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3293 exe "normal \<C-C>"
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3294 call assert_match("Type :qa! and press <Enter> to abandon all changes and exit Vim", Screenline(&lines))
16095
4673f22da44d patch 8.1.1052: test for CTRL-C message sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 16089
diff changeset
3295
16089
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3296 bwipe!
4411c38f3d16 patch 8.1.1049: when user tries to exit with CTRL-C message is confusing
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
3297 endfunc
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3298
29179
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3299 func Test_mode_updated_after_ctrl_c()
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3300 CheckScreendump
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3301
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3302 let buf = RunVimInTerminal('', {'rows': 5})
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3303 call term_sendkeys(buf, "i")
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3304 call term_sendkeys(buf, "\<C-O>")
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3305 " wait a moment so that the "-- (insert) --" message is displayed
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3306 call TermWait(buf, 50)
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3307 call term_sendkeys(buf, "\<C-C>")
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3308 call VerifyScreenDump(buf, 'Test_mode_updated_1', {})
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3309
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3310 call StopVimInTerminal(buf)
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3311 endfunc
432e1535ef2c patch 8.2.5109: mode not updated after CTRL-O CTRL-C in Insert mode
Bram Moolenaar <Bram@vim.org>
parents: 29026
diff changeset
3312
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3313 " Test for '[m', ']m', '[M' and ']M'
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3314 " Jumping to beginning and end of methods in Java-like languages
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3315 func Test_java_motion()
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3316 new
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3317 call assert_beeps('normal! [m')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3318 call assert_beeps('normal! ]m')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3319 call assert_beeps('normal! [M')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3320 call assert_beeps('normal! ]M')
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3321 let lines =<< trim [CODE]
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3322 Piece of Java
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3323 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3324 tt m1 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3325 t1;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3326 } e1
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3327
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3328 tt m2 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3329 t2;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3330 } e2
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3331
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3332 tt m3 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3333 if (x)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3334 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3335 t3;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3336 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3337 } e3
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3338 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3339 [CODE]
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3340 call setline(1, lines)
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3341
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3342 normal gg
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3343
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3344 normal 2]maA
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3345 call assert_equal("\ttt m1 {A", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3346 call assert_equal([3, 9, 16], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3347
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3348 normal j]maB
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3349 call assert_equal("\ttt m2 {B", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3350 call assert_equal([7, 9, 16], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3351
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3352 normal ]maC
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3353 call assert_equal("\ttt m3 {C", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3354 call assert_equal([11, 9, 16], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3355
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3356 normal [maD
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3357 call assert_equal("\ttt m3 {DC", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3358 call assert_equal([11, 9, 16], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3359
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3360 normal k2[maE
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3361 call assert_equal("\ttt m1 {EA", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3362 call assert_equal([3, 9, 16], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3363
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3364 normal 3[maF
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3365 call assert_equal("{F", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3366 call assert_equal([2, 2, 2], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3367
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3368 normal ]MaG
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3369 call assert_equal("\t}G e1", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3370 call assert_equal([5, 3, 10], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3371
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3372 normal j2]MaH
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3373 call assert_equal("\t}H e3", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3374 call assert_equal([16, 3, 10], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3375
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3376 normal ]M]M
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3377 normal aI
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3378 call assert_equal("}I", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3379 call assert_equal([17, 2, 2], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3380
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3381 normal 2[MaJ
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3382 call assert_equal("\t}JH e3", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3383 call assert_equal([16, 3, 10], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3384
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3385 normal k[MaK
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3386 call assert_equal("\t}K e2", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3387 call assert_equal([9, 3, 10], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3388
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3389 normal 3[MaL
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3390 call assert_equal("{LF", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3391 call assert_equal([2, 2, 2], [line('.'), col('.'), virtcol('.')])
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3392
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3393 call cursor(2, 1)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3394 call assert_beeps('norm! 5]m')
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3395
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3396 " jumping to a method in a fold should open the fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3397 6,10fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3398 call feedkeys("gg3]m", 'xt')
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3399 call assert_equal([7, 8, 15], [line('.'), col('.'), virtcol('.')])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3400 call assert_equal(-1, foldclosedend(7))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3401
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3402 close!
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3403 endfunc
17520
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3404
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3405 " Tests for g cmds
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3406 func Test_normal_gdollar_cmd()
17520
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3407 call Setup_NewWindow()
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3408 " Make long lines that will wrap
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3409 %s/$/\=repeat(' foobar', 10)/
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3410 20vsp
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3411 set wrap
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3412 " Test for g$ with count
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3413 norm! gg
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3414 norm! 0vg$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3415 call assert_equal(20, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3416 call assert_equal('1 foobar foobar foob', getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3417 norm! gg
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3418 norm! 0v4g$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3419 call assert_equal(72, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3420 call assert_equal('1 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.."\n", getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3421 norm! gg
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3422 norm! 0v6g$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3423 call assert_equal(40, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3424 call assert_equal('1 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3425 \ '2 foobar foobar foobar foobar foobar foo', getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3426 set nowrap
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3427 " clean up
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3428 norm! gg
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3429 norm! 0vg$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3430 call assert_equal(20, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3431 call assert_equal('1 foobar foobar foob', getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3432 norm! gg
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3433 norm! 0v4g$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3434 call assert_equal(20, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3435 call assert_equal('1 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3436 \ '2 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3437 \ '3 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3438 \ '4 foobar foobar foob', getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3439 norm! gg
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3440 norm! 0v6g$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3441 call assert_equal(20, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3442 call assert_equal('1 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3443 \ '2 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3444 \ '3 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3445 \ '4 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3446 \ '5 foobar foobar foobar foobar foobar foobar foobar foobar foobar foobar'.. "\n"..
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3447 \ '6 foobar foobar foob', getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3448 " Move to last line, also down movement is not possible, should still move
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3449 " the cursor to the last visible char
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3450 norm! G
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3451 norm! 0v6g$y
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3452 call assert_equal(20, col("'>"))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3453 call assert_equal('100 foobar foobar fo', getreg(0))
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3454 bw!
827d29c8f7e8 patch 8.1.1758: count of g$ not used correctly when text is not wrapped
Bram Moolenaar <Bram@vim.org>
parents: 17172
diff changeset
3455 endfunc
18154
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3456
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3457 func Test_normal_gk_gj()
18154
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3458 " needs 80 column new window
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3459 new
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3460 vert 80new
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3461 call assert_beeps('normal gk')
18154
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3462 put =[repeat('x',90)..' {{{1', 'x {{{1']
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3463 norm! gk
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3464 " In a 80 column wide terminal the window will be only 78 char
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3465 " (because Vim will leave space for the other window),
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3466 " but if the terminal is larger, it will be 80 chars, so verify the
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3467 " cursor column correctly.
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3468 call assert_equal(winwidth(0)+1, col('.'))
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3469 call assert_equal(winwidth(0)+1, virtcol('.'))
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3470 norm! j
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3471 call assert_equal(6, col('.'))
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3472 call assert_equal(6, virtcol('.'))
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3473 norm! gk
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3474 call assert_equal(95, col('.'))
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3475 call assert_equal(95, virtcol('.'))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3476 %bw!
18291
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3477
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3478 " needs 80 column new window
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3479 new
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3480 vert 80new
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3481 call assert_beeps('normal gj')
18291
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3482 set number
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3483 set numberwidth=10
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3484 set cpoptions+=n
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3485 put =[repeat('0',90), repeat('1',90)]
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3486 norm! 075l
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3487 call assert_equal(76, col('.'))
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3488 norm! gk
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3489 call assert_equal(1, col('.'))
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3490 norm! gk
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3491 call assert_equal(76, col('.'))
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3492 norm! gk
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3493 call assert_equal(1, col('.'))
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3494 norm! gj
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3495 call assert_equal(76, col('.'))
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3496 norm! gj
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3497 call assert_equal(1, col('.'))
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3498 norm! gj
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3499 call assert_equal(76, col('.'))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3500 " When 'nowrap' is set, gk and gj behave like k and j
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3501 set nowrap
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3502 normal! gk
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3503 call assert_equal([2, 76], [line('.'), col('.')])
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3504 normal! gj
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3505 call assert_equal([3, 76], [line('.'), col('.')])
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3506 %bw!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3507 set cpoptions& number& numberwidth& wrap&
18154
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3508 endfunc
19407
2f4be7ca1b1b patch 8.2.0261: some code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18767
diff changeset
3509
19471
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3510 " Test for using : to run a multi-line Ex command in operator pending mode
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3511 func Test_normal_yank_with_excmd()
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3512 new
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3513 call setline(1, ['foo', 'bar', 'baz'])
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3514 let @a = ''
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3515 call feedkeys("\"ay:if v:true\<CR>normal l\<CR>endif\<CR>", 'xt')
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3516 call assert_equal('f', @a)
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3517 close!
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3518 endfunc
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3519
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3520 " Test for supplying a count to a normal-mode command across a cursorhold call
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3521 func Test_normal_cursorhold_with_count()
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3522 func s:cHold()
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3523 let g:cHold_Called += 1
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3524 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3525 new
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3526 augroup normalcHoldTest
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3527 au!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3528 au CursorHold <buffer> call s:cHold()
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3529 augroup END
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3530 let g:cHold_Called = 0
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3531 call feedkeys("3\<CursorHold>2ix", 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3532 call assert_equal(1, g:cHold_Called)
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3533 call assert_equal(repeat('x', 32), getline(1))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3534 augroup normalcHoldTest
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3535 au!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3536 augroup END
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3537 au! normalcHoldTest
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3538 close!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3539 delfunc s:cHold
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3540 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3541
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3542 " Test for using a count and a command with CTRL-W
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3543 func Test_wincmd_with_count()
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3544 call feedkeys("\<C-W>12n", 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3545 call assert_equal(12, winheight(0))
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3546 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3547
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3548 " Test for 'b', 'B' 'ge' and 'gE' commands
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3549 func Test_horiz_motion()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3550 new
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3551 normal! gg
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3552 call assert_beeps('normal! b')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3553 call assert_beeps('normal! B')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3554 call assert_beeps('normal! gE')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3555 call assert_beeps('normal! ge')
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3556 " <S-Backspace> moves one word left and <C-Backspace> moves one WORD left
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3557 call setline(1, 'one ,two ,three')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3558 exe "normal! $\<S-BS>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3559 call assert_equal(11, col('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3560 exe "normal! $\<C-BS>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3561 call assert_equal(10, col('.'))
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3562 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3563 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3564
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3565 " Test for using a : command in operator pending mode
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3566 func Test_normal_colon_op()
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3567 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3568 call setline(1, ['one', 'two'])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3569 call assert_beeps("normal! Gc:d\<CR>")
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3570 close!
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3571 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3572
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3573 " Test for d and D commands
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3574 func Test_normal_delete_cmd()
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3575 new
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3576 " D in an empty line
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3577 call setline(1, '')
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3578 normal D
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3579 call assert_equal('', getline(1))
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3580 " D in an empty line in virtualedit mode
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3581 set virtualedit=all
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3582 normal D
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3583 call assert_equal('', getline(1))
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3584 set virtualedit&
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3585 " delete to a readonly register
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3586 call setline(1, ['abcd'])
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3587 call assert_beeps('normal ":d2l')
24101
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3588
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3589 " D and d with 'nomodifiable'
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3590 call setline(1, ['abcd'])
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3591 setlocal nomodifiable
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3592 call assert_fails('normal D', 'E21:')
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3593 call assert_fails('normal d$', 'E21:')
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3594
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3595 close!
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3596 endfunc
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3597
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3598 " Test for deleting or changing characters across lines with 'whichwrap'
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3599 " containing 's'. Should count <EOL> as one character.
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3600 func Test_normal_op_across_lines()
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3601 new
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3602 set whichwrap&
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3603 call setline(1, ['one two', 'three four'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3604 exe "norm! $3d\<Space>"
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3605 call assert_equal(['one twhree four'], getline(1, '$'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3606
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3607 call setline(1, ['one two', 'three four'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3608 exe "norm! $3c\<Space>x"
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3609 call assert_equal(['one twxhree four'], getline(1, '$'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3610
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3611 set whichwrap+=l
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3612 call setline(1, ['one two', 'three four'])
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3613 exe "norm! $3x"
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3614 call assert_equal(['one twhree four'], getline(1, '$'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3615 close!
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3616 set whichwrap&
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3617 endfunc
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3618
20199
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3619 " Test for 'w' and 'b' commands
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3620 func Test_normal_word_move()
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3621 new
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3622 call setline(1, ['foo bar a', '', 'foo bar b'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3623 " copy a single character word at the end of a line
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3624 normal 1G$yw
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3625 call assert_equal('a', @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3626 " copy a single character word at the end of a file
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3627 normal G$yw
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3628 call assert_equal('b', @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3629 " check for a word movement handling an empty line properly
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3630 normal 1G$vwy
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3631 call assert_equal("a\n\n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3632
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3633 " copy using 'b' command
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3634 %d
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3635 " non-empty blank line at the start of file
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3636 call setline(1, [' ', 'foo bar'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3637 normal 2Gyb
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3638 call assert_equal(" \n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3639 " try to copy backwards from the start of the file
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3640 call setline(1, ['one two', 'foo bar'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3641 call assert_beeps('normal ggyb')
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3642 " 'b' command should stop at an empty line
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3643 call setline(1, ['one two', '', 'foo bar'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3644 normal 3Gyb
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3645 call assert_equal("\n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3646 normal 3Gy2b
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3647 call assert_equal("two\n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3648 " 'b' command should not stop at a non-empty blank line
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3649 call setline(1, ['one two', ' ', 'foo bar'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3650 normal 3Gyb
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3651 call assert_equal("two\n ", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3652
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3653 close!
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3654 endfunc
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3655
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3656 " Test for 'scrolloff' with a long line that doesn't fit in the screen
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3657 func Test_normal_scroloff()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3658 10new
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3659 80vnew
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3660 call setline(1, repeat('a', 1000))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3661 set scrolloff=10
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3662 normal gg10gj
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3663 call assert_equal(8, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3664 normal 10gj
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3665 call assert_equal(10, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3666 normal 10gk
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3667 call assert_equal(3, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3668 set scrolloff&
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3669 close!
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3670 endfunc
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3671
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3672 " Test for vertical scrolling with CTRL-F and CTRL-B with a long line
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3673 func Test_normal_vert_scroll_longline()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3674 10new
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3675 80vnew
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3676 call setline(1, range(1, 10))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3677 call append(5, repeat('a', 1000))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3678 exe "normal gg\<C-F>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3679 call assert_equal(6, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3680 exe "normal \<C-F>\<C-F>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3681 call assert_equal(11, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3682 call assert_equal(1, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3683 exe "normal \<C-B>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3684 call assert_equal(10, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3685 call assert_equal(3, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3686 exe "normal \<C-B>\<C-B>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3687 call assert_equal(5, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3688 call assert_equal(5, winline())
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3689 close!
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3690 endfunc
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3691
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3692 " Test for jumping in a file using %
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3693 func Test_normal_percent_jump()
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3694 new
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3695 call setline(1, range(1, 100))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3696
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3697 " jumping to a folded line should open the fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3698 25,75fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3699 call feedkeys('50%', 'xt')
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3700 call assert_equal(50, line('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3701 call assert_equal(-1, foldclosedend(50))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3702 close!
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3703 endfunc
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3704
24725
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3705 " Test for << and >> commands to shift text by 'shiftwidth'
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3706 func Test_normal_shift_rightleft()
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3707 new
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3708 call setline(1, ['one', '', "\t", ' two', "\tthree", ' four'])
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3709 set shiftwidth=2 tabstop=8
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3710 normal gg6>>
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3711 call assert_equal([' one', '', "\t ", ' two', "\t three", "\tfour"],
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3712 \ getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3713 normal ggVG2>>
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3714 call assert_equal([' one', '', "\t ", "\ttwo",
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3715 \ "\t three", "\t four"], getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3716 normal gg6<<
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3717 call assert_equal([' one', '', "\t ", ' two', "\t three",
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3718 \ "\t four"], getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3719 normal ggVG2<<
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3720 call assert_equal(['one', '', "\t", ' two', "\tthree", ' four'],
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3721 \ getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3722 set shiftwidth& tabstop&
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3723 bw!
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3724 endfunc
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3725
24756
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3726 " Some commands like yy, cc, dd, >>, << and !! accept a count after
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3727 " typing the first letter of the command.
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3728 func Test_normal_count_after_operator()
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3729 new
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3730 setlocal shiftwidth=4 tabstop=8 autoindent
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3731 call setline(1, ['one', 'two', 'three', 'four', 'five'])
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3732 let @a = ''
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3733 normal! j"ay4y
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3734 call assert_equal("two\nthree\nfour\nfive\n", @a)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3735 normal! 3G>2>
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3736 call assert_equal(['one', 'two', ' three', ' four', 'five'],
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3737 \ getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3738 exe "normal! 3G0c2cred\nblue"
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3739 call assert_equal(['one', 'two', ' red', ' blue', 'five'],
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3740 \ getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3741 exe "normal! gg<8<"
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3742 call assert_equal(['one', 'two', 'red', 'blue', 'five'],
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3743 \ getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3744 exe "normal! ggd3d"
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3745 call assert_equal(['blue', 'five'], getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3746 call setline(1, range(1, 4))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3747 call feedkeys("gg!3!\<C-B>\"\<CR>", 'xt')
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3748 call assert_equal('".,.+2!', @:)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3749 call feedkeys("gg!1!\<C-B>\"\<CR>", 'xt')
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3750 call assert_equal('".!', @:)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3751 call feedkeys("gg!9!\<C-B>\"\<CR>", 'xt')
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3752 call assert_equal('".,$!', @:)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3753 bw!
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3754 endfunc
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3755
26094
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3756 func Test_normal_gj_on_extra_wide_char()
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3757 new | 25vsp
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3758 let text='1 foooooooo ar e ins‍zwe1 foooooooo ins‍zwei' .
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3759 \ ' i drei vier fünf sechs sieben acht un zehn elf zwöfl' .
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3760 \ ' dreizehn v ierzehn fünfzehn'
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3761 put =text
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3762 call cursor(2,1)
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3763 norm! gj
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3764 call assert_equal([0,2,25,0], getpos('.'))
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3765 bw!
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3766 endfunc
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3767
26256
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3768 func Test_normal_count_out_of_range()
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3769 new
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3770 call setline(1, 'text')
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3771 normal 44444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3772 call assert_equal(999999999, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3773 normal 444444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3774 call assert_equal(999999999, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3775 normal 4444444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3776 call assert_equal(999999999, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3777 normal 4444444444444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3778 call assert_equal(999999999, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3779
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3780 normal 9y99999999|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3781 call assert_equal(899999991, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3782 normal 10y99999999|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3783 call assert_equal(999999999, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3784 normal 44444444444y44444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3785 call assert_equal(999999999, v:count)
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3786 bwipe!
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3787 endfunc
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3788
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3789 " vim: shiftwidth=2 sts=2 expandtab