Mercurial > vim

annotate src/testdir/test_normal.vim @ 27243:c072eed37deb v8.2.4150

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.4150: Coverity warns for using pointer after free Commit: https://github.com/vim/vim/commit/8aa0e6c60da5f7a4b04eaead40d183fd8e5640a4 Author: Bram Moolenaar <Bram@vim.org> Date: Thu Jan 20 11:27:58 2022 +0000 patch 8.2.4150: Coverity warns for using pointer after free Problem: Coverity warns for using pointer after free. Solution: Swap statements, even though using the pointer is no problem.
author Bram Moolenaar <Bram@vim.org>
date Thu, 20 Jan 2022 12:30:07 +0100
parents 85b4bd8f8e5d
children 722db0819111
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
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
6 source vim9.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
7
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
8 func Setup_NewWindow()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 endfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12
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
13 func MyFormatExpr()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 " 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
15 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
16 let line = getline(ln)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 if getline(ln) =~# '\d\s\+$'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 call setline(ln, substitute(line, '\s\+$', '', '') . '->$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20 endfor
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
21 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22
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
23 func CountSpaces(type, ...)
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 " for testing operatorfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 " will count the number of spaces
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 " and return the result in g:a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 let sel_save = &selection
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 let &selection = "inclusive"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 let reg_save = @@
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 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
32 silent exe "normal! gvy"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 elseif a:type == 'line'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 silent exe "normal! '[V']y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 else
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36 silent exe "normal! `[v`]y"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 endif
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
38 let g:a = strlen(substitute(@@, '[^ ]', '', 'g'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 let &selection = sel_save
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40 let @@ = reg_save
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
41 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
42
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
43 func OpfuncDummy(type, ...)
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
44 " 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
45 let g:opt = &linebreak
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
46
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
47 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
48 silent exe "normal! gvy"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
49 elseif a:type == 'line'
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
50 silent exe "normal! '[V']y"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
51 else
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
52 silent exe "normal! `[v`]y"
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
53 endif
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
54 " Create a new dummy window
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
55 new
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
56 let g:bufnr = bufnr('%')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
57 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
58
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
59 func Test_normal00_optrans()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
60 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 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
62 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
63 exe "norm! Sfoobar\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64 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
65 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
66 exe "norm! $vbsone"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
67 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
68 norm! VS Second line here
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
69 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
70 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
71 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
72 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
73
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
74 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
75 norm! 2D
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
76 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
77 set cpo+=#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
78 norm! 4D
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
79 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
80
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
81 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 set cpo-=#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
84 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
85
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
86 func Test_normal01_keymodel()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
87 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
88 " 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
89 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
90 call feedkeys("V\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
91 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
92 set keymodel=startsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
93 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
94 call feedkeys("V\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
95 call assert_equal(['49', '50'], getline("'<", "'>"))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
96 " 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
97 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
98 call feedkeys("\<S-Up>y", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
99 call assert_equal(['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
100 " 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
101 50
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
102 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
103 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
104 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
105
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
106 " 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
107 set keymodel=
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
108 50
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
109 call feedkeys("\<S-Up>y$", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
110 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
111 " Stop visual mode when keymodel=stopsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
112 set keymodel=stopsel
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
113 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
114 call feedkeys("Vkk\<Up>yy", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
115 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
116
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
117 set keymodel=
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
118 50
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
119 call feedkeys("Vkk\<Up>yy", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
120 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
121
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
122 " 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
123 %d
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
124 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
125 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
126 " 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
127 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
128 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
129 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
130 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
131 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
132 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
133 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
134 " 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
135 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
136 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
137 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
138 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
139 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
140 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
141 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
142 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
143 " 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
144 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
145 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
146 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
147 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
148 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
149 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
150 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
151 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
152
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
153 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
154
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
155 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
156 bw!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
157 endfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
158
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
159 func Test_normal03_join()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
160 " basic join test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
161 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
162 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
163 norm! VJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
164 call assert_equal('50 51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
165 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
166 norm! J
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
167 call assert_equal('100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
168 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
169 norm! V9-gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
170 call assert_equal('919293949596979899100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
171 call setline(1, range(1,100))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
172 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
173 :j 10
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
174 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
175 call assert_beeps('normal GVJ')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
176 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
177 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
178 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
179
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
180 " 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
181 func Test_normal04_filter()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
182 " 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
183 CheckNotMSWindows
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
184 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
185 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
186 call feedkeys("!!sed -e 's/^/| /'\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
187 call assert_equal('| 1', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
188 90
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
189 :sil :!echo one
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
190 call feedkeys('.', 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
191 call assert_equal('| 90', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
192 95
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
193 set cpo+=!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
194 " 2 <CR>, 1: for executing the command,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
195 " 2: clear hit-enter-prompt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
196 call feedkeys("!!\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
197 call feedkeys(":!echo one\n\n", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
198 call feedkeys(".", 'tx')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
199 call assert_equal('one', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
200 set cpo-=!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
201 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
202 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
203
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
204 func Test_normal05_formatexpr()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
205 " basic formatexpr test
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
206 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
207 %d_
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
208 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
209 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
210 set formatexpr=MyFormatExpr()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
211 norm! gqG
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
212 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
213 set formatexpr=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
214 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
215 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
216
10104
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
217 func Test_normal05_formatexpr_newbuf()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
218 " 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
219 new
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
220 func! Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
221 edit another
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
222 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
223 set formatexpr=Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
224 norm gqG
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
225 bw!
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
226 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
227 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
228
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
229 func Test_normal05_formatexpr_setopt()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
230 " 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
231 new
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
232 func! Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
233 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
234 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
235 set formatexpr=Format()
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
236 norm gqG
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
237 bw!
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
238 set formatexpr=
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
239 endfunc
b2dbe79639a2 commit https://github.com/vim/vim/commit/d77f9d595eb5f301b39b4373f2900a13c0ca30e2
Christian Brabandt <cb@256bit.org>
parents: 10102
diff changeset
240
20261
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
241 " 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
242 func Test_normal_formatexpr_returns_nonzero()
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
243 new
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
244 call setline(1, ['one', 'two'])
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
245 func! Format()
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
246 return 1
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
247 endfunc
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
248 setlocal formatexpr=Format()
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
249 normal VGgq
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
250 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
251 setlocal formatexpr=
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
252 delfunc Format
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
253 close!
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
254 endfunc
aafedd368f40 patch 8.2.0686: formatoptions not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 20199
diff changeset
255
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
256 " 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
257 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
258 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
259 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
260 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
261 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
262 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
263 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
264 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
265 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
266 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
267 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
268 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
269 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
270 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
271 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
272 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
273 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
274 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
275 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
276 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
277 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
278 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
279 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
280 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
281 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
282 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
283 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
284 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
285 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
286 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
287 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
288 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
289 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
290 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
291 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
292 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
293 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
294
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
295 " 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
296 func Test_normal06_formatprg()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
297 " 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
298 CheckNotMSWindows
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
299
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
300 " 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
301 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
302 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
303 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
304 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
305
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
306 10new
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
307 call setline(1, text)
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
308 set formatprg=./Xsed_format.sh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
309 norm! gggqG
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
310 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
311 %d
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
312
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
313 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
314 set formatprg=donothing
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
315 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
316 norm! gggqG
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
317 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
318 %d
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
319
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
320 " 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
321 set formatprg=cat
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
322 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
323 call feedkeys('gggqG', 'xt')
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
324 call assert_equal('.,$!cat', @:)
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
325 call feedkeys('2Ggq2j', 'xt')
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
326 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
327
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
328 bw!
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
329 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
330 set formatprg=
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
331 setlocal formatprg=
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
332 call delete('Xsed_format.sh')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
333 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
334
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
335 func Test_normal07_internalfmt()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
336 " 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
337 let list=range(1,11)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
338 call map(list, 'v:val." "')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
339 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
340 call setline(1, list)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
341 set tw=12
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
342 norm! ggVGgq
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
343 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
344 " clean up
10579
688b97124d23 patch 8.0.0179: cannot have a local value for 'formatprg'
Christian Brabandt <cb@256bit.org>
parents: 10342
diff changeset
345 set tw=0
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
346 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
347 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
348
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
349 " 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
350 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
351 CheckFeature folding
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
352 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
353 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
354 setl foldenable fdm=marker
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
355 " First fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
356 norm! V4jzf
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
357 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
358 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
359 " Second fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
360 46
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
361 norm! V10jzf
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
362 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
363 call assert_equal('46/*{{{*/', getline(46))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
364 call assert_equal('60/*}}}*/', getline(60))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
365 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
366 call assert_equal('45', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
367 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
368 call assert_equal('46/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
369 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
370 call assert_equal('61', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
371 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
372 " open a fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
373 norm! Vzo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
374 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
375 call assert_equal('45', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
376 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
377 call assert_equal('46/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
378 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
379 call assert_equal('47', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
380 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
381 norm! zcVzO
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
382 call assert_equal('46/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
383 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
384 call assert_equal('47', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
385 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
386 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
387 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
388 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
389 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
390 call assert_equal('50/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
391 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
392 call assert_equal('51', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
393 " delete folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
394 :46
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
395 " collapse fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
396 norm! V14jzC
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
397 " delete all folds recursively
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
398 norm! VzD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
399 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
400
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
401 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
402 setl nofoldenable fdm=marker
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
403 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
404 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
405
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
406 func Test_normal09a_operatorfunc()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
407 " Test operatorfunc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
408 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
409 " Add some spaces for counting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
410 50,60s/$/ /
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
411 unlet! g:a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
412 let g:a=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
413 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
414 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
415 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
416 norm V2j,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
417 call assert_equal(6, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
418 norm V,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
419 call assert_equal(2, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
420 norm ,,l
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
421 call assert_equal(0, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
422 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
423 exe "norm 0\<c-v>10j2l,,"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
424 call assert_equal(11, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
425 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
426 norm V10j,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
427 call assert_equal(22, g:a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
428
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
429 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
430 unmap <buffer> ,,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
431 set opfunc=
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
432 unlet! g:a
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
433 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
434 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
435
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
436 func Test_normal09b_operatorfunc()
10342
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
437 " Test operatorfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
438 call Setup_NewWindow()
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
439 " Add some spaces for counting
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
440 50,60s/$/ /
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
441 unlet! g:opt
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
442 set linebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
443 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
444 50
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
445 norm ,,j
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
446 exe "bd!" g:bufnr
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
447 call assert_true(&linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
448 call assert_equal(g:opt, &linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
449 set nolinebreak
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
450 norm ,,j
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
451 exe "bd!" g:bufnr
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
452 call assert_false(&linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
453 call assert_equal(g:opt, &linebreak)
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
454
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
455 " clean up
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
456 unmap <buffer> ,,
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
457 set opfunc=
19932
2c4d9ca33769 patch 8.2.0522: several errors are not tested for
Bram Moolenaar <Bram@vim.org>
parents: 19852
diff changeset
458 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
459 bw!
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
460 unlet! g:opt
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
461 endfunc
ae0faad76f9a commit https://github.com/vim/vim/commit/4a08b0dc4dd70334056fc1bf069b5e938f2ed7d5
Christian Brabandt <cb@256bit.org>
parents: 10338
diff changeset
462
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
463 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
464 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
465 endfunc
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
466
26903
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
467 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
468 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
469 endfunc
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
470
26226
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
471 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
472 " 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
473 new
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
474 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
475 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
476 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
477 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
478 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
479 normal .
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
480 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
481
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
482 bw!
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
483 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
484
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
485 " 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
486 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
487 new
5aa9e8db975c patch 8.2.3980: if 'operatorfunc' invokes an operator Visual mode is changed
Bram Moolenaar <Bram@vim.org>
parents: 26881
diff changeset
488 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
489 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
490 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
491 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
492 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
493 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
494 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
495 endfunc
9a8e9383e4cd patch 8.2.3644: count for 'operatorfunc' in Visual mode is not redone
Bram Moolenaar <Bram@vim.org>
parents: 26211
diff changeset
496
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
497 " 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
498 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
499 new
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
500 func OpFunc1(callnr, type)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
501 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
502 endfunc
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
503 func OpFunc2(type)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
504 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
505 endfunc
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
506
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
507 let lines =<< trim END
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
508 #" 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
509 LET &opfunc = 'g:OpFunc2'
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
510 LET g:OpFunc2Args = []
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
511 normal! g@l
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
512 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
513
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
514 #" 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
515 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
516 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
517 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
518 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
519
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 #" 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
521 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
522 LET &opfunc = Fn
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
523 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
524 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
525 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
526
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 #" 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
528 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
529 LET &operatorfunc = string(Fn)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
530 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
531 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
532 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
533
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 #" 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
535 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
536 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
537 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
538 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
539
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 #" 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
541 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
542 LET &opfunc = Fn
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
543 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
544 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
545 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
546
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 #" 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
548 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
549 LET &opfunc = string(Fn)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
550 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
551 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
552 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
553
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 #" 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
555 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
556 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
557 exe "set opfunc=" .. optval
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
558 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
559 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
560 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
561
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 #" 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
563 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
564 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
565 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
566 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
567
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 #" 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
569 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
570 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
571 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
572 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
573
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 #" 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
575 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
576 LET &opfunc = Lambda
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
577 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
578 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
579 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
580
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 #" 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
582 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
583 LET &opfunc = string(Lambda)
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
584 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
585 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
586 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
587
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 #" 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
589 func g:TmpOpFunc1(type)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
590 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
591 endfunc
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
592 LET &opfunc = function('g:TmpOpFunc1')
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
593 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
594 call test_garbagecollect_now()
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
595 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
596 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
597 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
598
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 #" 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
600 func g:TmpOpFunc2(x, y)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
601 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
602 endfunc
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
603 set opfunc=TmpOpFunc2
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
604 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
605 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
606 call assert_equal([], g:TmpOpFunc2Args)
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
607 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
608
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 #" 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
610 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
611 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
612 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
613 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
614
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 #" 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
616 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
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 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
619 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
620
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 #" 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
622 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
623 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
624 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
625 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
626 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
627 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
628 END
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 call CheckTransLegacySuccess(lines)
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
630
26618
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
631 " 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
632 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
633 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
634 endfunc
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
635 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
636 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
637 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
638 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
639
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
640 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
641 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
642 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
643 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
644 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
645
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
646 " 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
647 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
648 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
649 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
650 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
651
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
652 " 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
653 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
654 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
655 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
656 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
657 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
658 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
659 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
660 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
661 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
662 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
663 delfunc OperatorExecute
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
664
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
665 " Vim9 tests
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
666 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
667 vim9script
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
668
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
669 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
670 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
671 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
672
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
673 # 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
674 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
675 g:OpFunc1Args = []
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
676 normal! g@l
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
677 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
678
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
679 # 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
680 &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
681 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
682 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
683 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
684 bw!
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
685
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
686 # 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
687 def s:LocalOpFunc(type: string): void
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
688 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
689 enddef
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
690 &opfunc = s:LocalOpFunc
b531c26f728b patch 8.2.3838: cannot use script-local function for setting *func options
Bram Moolenaar <Bram@vim.org>
parents: 26532
diff changeset
691 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
692 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
693 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
694 bw!
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
695 END
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
696 call CheckScriptSuccess(lines)
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
697
26721
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
698 " 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
699 " should fail
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
700 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
701 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
702 qall
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
703 END
9c9b8d95b05f patch 8.2.3889: duplicate code for translating script-local function name
Bram Moolenaar <Bram@vim.org>
parents: 26618
diff changeset
704 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
705 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
706 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
707 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
708 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
709
26456
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
710 " cleanup
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
711 set opfunc&
26526
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
712 delfunc OpFunc1
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
713 delfunc OpFunc2
33d680d372aa patch 8.2.3792: setting *func options insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26518
diff changeset
714 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
715 %bw!
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
716 endfunc
7eaf61a67d18 patch 8.2.3758: options that take a function insufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 26256
diff changeset
717
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
718 func Test_normal10_expand()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
719 " Test for expand()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
720 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
721 call setline(1, ['1', 'ifooar,,cbar'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
722 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
723 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
724 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
725 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
726
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 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
728 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
729 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
730 \ '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
731 \ '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
732 \ '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
733 \ '];',
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 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
736 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
737 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
738 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
739
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
740 " 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
741 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
742 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
743 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
744 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
745 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
746 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
747
13086
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
748 if executable('echo')
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
749 " 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
750 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
751 endif
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
752
4d2ee1564c97 patch 8.0.1418: no test for expanding backticks
Christian Brabandt <cb@256bit.org>
parents: 12788
diff changeset
753 " 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
754 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
755 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
756
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
757 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
758 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
759 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
760
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
761 " 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
762 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
763 new
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
764 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
765 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
766 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
767 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
768 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
769 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
770 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
771 bw!
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
772 endfunc
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
773
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
774 func Test_normal11_showcmd()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
775 " test for 'showcmd'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
776 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
777 exe "norm! ofoobar\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
778 call assert_equal(2, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
779 set showcmd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
780 exe "norm! ofoobar2\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
781 call assert_equal(3, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
782 exe "norm! VAfoobar3\<esc>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
783 call assert_equal(3, line('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
784 exe "norm! 0d3\<del>2l"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
785 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
786 " 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
787 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
788 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
789 redraw!
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
790 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
791 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
792 " 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
793 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
794 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
795 redraw!
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
796 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
797 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
798 " 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
799 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
800 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
801 redraw!
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
802 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
803 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
804 call assert_equal("r\n", @")
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
805 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
806 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
807
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
808 " 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
809 func Test_normal12_nv_error()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
810 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
811 call setline(1, range(1,5))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
812 " 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
813 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
814 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
815 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
816 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
817 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
818 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
819 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
820 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
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! 4[z")
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[c")
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! 200%")
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! %")
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! 2{")
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! r\<Right>")
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! 8ry")
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! "@')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
835 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
836 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
837
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
838 func Test_normal13_help()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
839 " Test for F1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
840 call assert_equal(1, winnr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
841 call feedkeys("\<f1>", 'txi')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
842 call assert_match('help\.txt', bufname('%'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
843 call assert_equal(2, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
844 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
845 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
846
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
847 func Test_normal14_page()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
848 " 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
849 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
850 exe "norm! \<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
851 call assert_equal('9', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
852 exe "norm! 2\<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
853 call assert_equal('25', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
854 exe "norm! 2\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
855 call assert_equal('18', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
856 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
857 set scrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
858 exe "norm! 2\<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
859 call assert_equal('21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
860 exe "norm! \<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
861 call assert_equal('13', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
862 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
863 set scrolloff=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
864 exe "norm! \<c-f>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
865 call assert_equal('13', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
866 set scrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
867 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
868 exe "norm! $\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
869 call assert_equal('92', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
870 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
871 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
872 set nostartofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
873 exe "norm! $\<c-b>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
874 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
875 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
876 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
877 set startofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
878 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
879 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
880
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
881 func Test_normal14_page_eol()
10102
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
882 10new
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
883 norm oxxxxxxx
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
884 exe "norm 2\<c-f>"
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
885 " 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
886 exe "norm 2\<c-b>"
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
887 bw!
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
888 endfunc
b80ad55d62d8 commit https://github.com/vim/vim/commit/bc54f3f3fed4dc3556df8c46cee6739d211b0eb2
Christian Brabandt <cb@256bit.org>
parents: 10092
diff changeset
889
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
890 " 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
891 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
892 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
893 call assert_beeps('normal! zq')
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
894 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
895
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
896 func Test_normal15_z_scroll_vert()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
897 " 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
898 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
899 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
900 norm! >>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
901 " Test for z<cr>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
902 exe "norm! z\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
903 call assert_equal(' 100', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
904 call assert_equal(100, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
905 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
906
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
907 " Test for zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
908 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
909 norm! >>0zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
910 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
911 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
912 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
913
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
914 " Test for zb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
915 30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
916 norm! >>$ztzb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
917 call assert_equal(' 30', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
918 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
919 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
920
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
921 " Test for z-
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
922 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
923 30
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
924 norm! 0z-
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
925 call assert_equal(' 30', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
926 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
927 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
928
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
929 " Test for z{height}<cr>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
930 call assert_equal(10, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
931 exe "norm! z12\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
932 call assert_equal(12, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
933 exe "norm! z10\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
934 call assert_equal(10, winheight(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
935
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
936 " Test for z.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
937 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
938 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
939 norm! 0z.
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
940 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
941 call assert_equal(17, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
942 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
943
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
944 " Test for zz
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
945 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
946 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
947 norm! 0zz
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
948 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
949 call assert_equal(17, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
950 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
951
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
952 " Test for z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
953 11
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
954 norm! zt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
955 norm! z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
956 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
957 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
958 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
959
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
960 " Test for [count]z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
961 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
962 norm! 21z+
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
963 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
964 call assert_equal(21, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
965 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
966
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
967 " 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
968 1
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
969 norm! 1000z+
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
970 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
971 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
972 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
973
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
974 " 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
975 norm! Gz.z+
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
976 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
977 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
978 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
979
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
980 " Test for z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
981 norm! 22z+0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
982 norm! z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
983 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
984 call assert_equal(12, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
985 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
986
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
987 " 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
988 norm! ggz^
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
989 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
990 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
991 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
992
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
993 " Test for [count]z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
994 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
995 norm! 30z^
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
996 call assert_equal(' 21', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
997 call assert_equal(12, winsaveview()['topline'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
998 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
999
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1000 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1001 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1002 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1003
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
1004 func Test_normal16_z_scroll_hor()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1005 " 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
1006 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1007 15vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1008 set nowrap listchars=
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1009 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1010 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1011 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1012 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1013 1d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1014
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1015 " 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
1016 norm! 0z10l
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1017 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
1018 norm! z4h
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, 5], [col('.'), wincol()])
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1020 normal! 2gg
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1021
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1022 " Test for zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1023 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1024 norm! 5zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1025 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1026 call assert_equal(6, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1027 call assert_equal(5, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1028 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1029 call assert_equal('f', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1030
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1031 " Test for zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1032 norm! 2zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1033 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1034 call assert_equal(6, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1035 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1036 call assert_equal('f', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1037 call assert_equal(3, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1038
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1039 " Test for zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1040 norm! zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1041 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1042 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1043 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1044 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1045 norm! 2zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1046 call assert_equal(25, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1047 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1048 call assert_equal('y', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1049 call assert_equal(24, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1050
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1051 " Test for zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1052 norm! 2zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1053 call assert_equal(25, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1054 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1055 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1056 call assert_equal('y', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1057
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1058 " Test for zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1059 norm! $zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1060 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1061 call assert_equal(25, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1062 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1063 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1064
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1065 " Test for ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1066 norm! ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1067 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1068 call assert_equal(11, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1069 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1070 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1071
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1072 " 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
1073 %fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1074 norm! $zs
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1075 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
1076 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
1077 norm! yl
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('z', @0)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1079 norm! ze
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(26, col('.'))
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1081 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
1082 norm! yl
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('z', @0)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1084
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1085 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1086 set wrap listchars=eol:$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1087 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1088 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1089
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
1090 func Test_normal17_z_scroll_hor2()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1091 " 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
1092 " using 'sidescrolloff' setting
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1093 10new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1094 20vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1095 set nowrap listchars= sidescrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1096 let lineA='abcdefghijklmnopqrstuvwxyz'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1097 let lineB='0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1098 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1099 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1100 1d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1101
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1102 " Test for zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1103 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1104 norm! 5zl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1105 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1106 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1107 call assert_equal(5, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1108 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1109 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1110
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1111 " Test for zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1112 norm! 2zh
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1113 call assert_equal(lineA, getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1114 call assert_equal(11, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1115 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1116 call assert_equal('k', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1117 call assert_equal(3, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1118
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1119 " Test for zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1120 norm! 0zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1121 call assert_equal(16, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1122 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1123 call assert_equal('p', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1124 call assert_equal(10, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1125 norm! 2zL
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1126 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1127 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1128 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1129 call assert_equal(15, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1130
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1131 " Test for zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1132 norm! 2zH
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1133 call assert_equal(15, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1134 call assert_equal(0, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1135 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1136 call assert_equal('o', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1137
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1138 " Test for zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1139 norm! $zs
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1140 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1141 call assert_equal(20, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1142 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1143 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1144
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1145 " Test for ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1146 norm! ze
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1147 call assert_equal(26, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1148 call assert_equal(11, winsaveview()['leftcol'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1149 norm! yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1150 call assert_equal('z', @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1151
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1152 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1153 set wrap listchars=eol:$ sidescrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1154 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1155 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1156
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1157 " 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
1158 " 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
1159 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
1160 15new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1161 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
1162 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
1163 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1164 33,36fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1165 40,43fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1166 46,49fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1167 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
1168
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1169 " 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
1170 " 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
1171 " Folded lines = 9
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1172 " 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
1173 normal! 4L
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1174 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
1175 normal! 4H
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(33, line('.'))
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1177
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1178 " 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
1179 %d
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1180 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
1181 norm! 6H
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1182 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
1183
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1184 " 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
1185 %d
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1186 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
1187 1,5fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1188 norm! LM
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1189 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
1190
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1191 " 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
1192 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1193 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
1194 3,5fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1195 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
1196 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
1197 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
1198 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
1199
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1200 " 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
1201 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1202 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
1203 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
1204 exe h + 5
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1205 normal z-
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1206 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
1207 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
1208
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1209 " 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
1210 %d
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1211 set scrolloff=2
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1212 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
1213 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
1214 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
1215 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
1216 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
1217 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
1218 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
1219 set scrolloff&
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1220
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1221 " 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
1222 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1223 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
1224 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
1225 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
1226 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
1227
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1228 " 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
1229 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1230 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
1231 10,35fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1232 set scroll=10
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1233 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1234 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
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(46, 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-U>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1238 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
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(10, 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(1, line('.'))
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1243 set scroll&
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1244
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1245 " 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
1246 10
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1247 normal ztL
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1248 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
1249 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
1250
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1251 " 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
1252 %d
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1253 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
1254 50,100fold
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1255 75
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1256 normal z-
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1257 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1258 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
1259 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
1260 normal z.
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1261 let lnum = winline()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1262 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1263 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
1264 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
1265 normal zt
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1266 exe "normal \<C-D>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1267 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
1268
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1269 " 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
1270 %d
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1271 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
1272 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
1273 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
1274 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
1275
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
1276 " 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
1277 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
1278 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
1279 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
1280
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1281 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1282 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1283 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1284
26061
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1285 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
1286 " 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
1287 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
1288 diffsplit
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1289 norm os00(
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1290 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
1291 qa!
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1292 END
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1293 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
1294 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
1295 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
1296
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1297 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
1298 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
1299 endfunc
787c8061c747 patch 8.2.3564: invalid memory access when scrolling without valid screen
Bram Moolenaar <Bram@vim.org>
parents: 25252
diff changeset
1300
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1301 " 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
1302 func Test_sidescroll_opt()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1303 new
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1304 20vnew
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1305
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1306 " 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
1307 set sidescroll=2 nowrap
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1308 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
1309 normal g$l
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1310 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
1311 normal 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(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
1313 normal g0h
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1314 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
1315 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
1316
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1317 " 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
1318 set sidescroll=0
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1319 normal g$l
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1320 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
1321 normal g0h
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1322 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
1323
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1324 %bw!
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1325 set wrap& sidescroll&
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1326 endfunc
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
1327
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
1328 " 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
1329 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
1330 CheckFeature folding
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1331 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1332 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1333 setl foldenable fdm=marker foldlevel=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1334
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1335 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
1336 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
1337
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1338 " Test for zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1339 " First fold
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1340 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1341 " check that folds have been created
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1342 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
1343
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1344 " Test for zd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1345 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1346 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1347 call assert_equal(2, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1348 norm! kzd
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1349 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
1350 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1351 call assert_equal(1, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1352
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1353 " Test for zD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1354 " also deletes partially selected folds recursively
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1355 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1356 norm! zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1357 call assert_equal(2, foldlevel('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1358 norm! kV2jzD
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1359 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
1360
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1361 " Test for zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1362 85
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1363 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1364 86
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1365 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1366 90
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1367 norm! 4zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1368 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
1369 norm! zE
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
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1372 " Test for zn
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1373 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1374 set foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1375 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1376 norm! zn
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1377 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1378 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1379 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1380 call assert_equal('50/*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1385 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1386
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1387 " Test for zN
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1388 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1389 norm! zN
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1390 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1391 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1392 call assert_equal('50/*{{{*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1395 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1396
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1397 " Test for zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1398 norm! zi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1399 call assert_equal(0, &foldenable)
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(1, &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(0, &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(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1406
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1407 " Test for za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1408 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1409 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1410 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1411 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1412 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1413 call assert_equal('50/*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1418 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1419 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1420 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1421 call assert_equal('49', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1422 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1423 call assert_equal('50/*{{{*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1426
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1427 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1428 norm! 5zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1429 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1430 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1431 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1432 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1435 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1436 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1437 call assert_equal('49/*{{{*/', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1438 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1439 call assert_equal('50/*{{{*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1442 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1443 " close fold and set foldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1444 norm! za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1445 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1446
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1447 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1448 " 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
1449 norm! 2za
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1450 norm! 2k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1451 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1452 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1453 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1460
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1461 " Test for zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1462 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1463 set foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1464 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1465 norm! zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1466 norm! 2k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1467 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1468 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1469 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1476
26211
485c7c4afeb7 patch 8.2.3637: typos in test files
Bram Moolenaar <Bram@vim.org>
parents: 26175
diff changeset
1477 " 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
1478 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1479 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1480 norm! zA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1481 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1482 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1483 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1484 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1485 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1488
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1489 " Test for zc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1490 norm! zE
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1491 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1492 norm! 2zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1493 49
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1494 norm! 5zF
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1495 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1496 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1497 " There most likely is a bug somewhere:
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1498 " 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
1499 " 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
1500 norm! zc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1501 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1502 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1503 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1504 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1505 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1508 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1509 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1510 norm! Vjzc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1511 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1512 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1513 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1514 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1517
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1518 " Test for zC
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1519 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1520 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1521 norm! zCk
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1522 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1523 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1524 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1527
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1528 " Test for zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1529 " 1) close folds at line 49-54
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1530 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1531 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1532 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1533 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1534 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1535 call assert_equal('49/*{{{*/', getline('.'))
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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1538
11327
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
1539 " 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
1540 51
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1541 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1542 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1543 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1544 norm! 3k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1545 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1546 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1547 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('51/*}}}*/', 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('52', 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('53', 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('54/*}}}*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1560
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1561 " 3) close one level of folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1562 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1563 set nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1564 set foldlevel=1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1565 norm! zx
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1566 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1567 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1568 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1569 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('52', 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('53', 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('54/*}}}*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1580
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1581 " Test for zX
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1582 " Close all folds
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1583 set foldlevel=0 nofoldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1584 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1585 norm! zX
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1586 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1587 norm! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1588 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1589 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1590 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1593
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1594 " Test for zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1595 50
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1596 set nofoldenable foldlevel=2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1597 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1598 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1599 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1600 norm! zm
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1601 call assert_equal(0, &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! k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1605 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1606 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1607 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1610
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1611 " 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
1612 50
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1613 set foldlevel=2
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1614 norm! 3zm
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1615 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
1616 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
1617
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1618 " Test for zM
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1619 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1620 set nofoldenable foldlevel=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1621 norm! zM
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1622 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1623 call assert_equal(0, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1624 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1625 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1626 call assert_equal('49/*{{{*/', 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('55', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1629
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1630 " Test for zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1631 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1632 set nofoldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1633 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1634 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1635 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1636 set foldlevel=0 foldenable
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1637 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1638 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1639 call assert_equal(1, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1640 norm! zr
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1641 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1642 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1643 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1644 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1651
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1652 " Test for zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1653 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1654 set nofoldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1655 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1656 call assert_equal(0, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1657 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1658 set foldenable foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1659 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1660 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1661 call assert_equal(2, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1662 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1663 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1664 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1671 call append(50, ['a /*{{{*/', 'b /*}}}*/'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1672 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1673 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1674 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1675 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('a /*{{{*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1684 48
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1685 norm! zR
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1686 call assert_equal(1, &foldenable)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1687 call assert_equal(3, &foldlevel)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1688 call assert_equal('48', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1689 norm! j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1690 call assert_equal('49/*{{{*/', 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('50/*{{{*/', 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('a /*{{{*/', 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('b /*}}}*/', 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('51/*}}}*/', 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('52', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1701
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1702 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1703 setl nofoldenable fdm=marker foldlevel=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1704 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1705 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1706
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
1707 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
1708 " 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
1709 CheckNotMSWindows
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1710 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
1711 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
1712 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
1713 let a=readfile('Xfile2')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1714 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
1715
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1716 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1717 for file in ['Xfile', 'Xfile2', 'Xscript']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1718 call delete(file)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1719 endfor
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1720 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1721 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1722
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
1723 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
1724
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 " 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
1726 " 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
1727 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
1728 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
1729 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
1730 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
1731
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
1732 " 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
1733 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
1734 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
1735 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
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('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
1738
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 " 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
1740 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
1741 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
1742 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
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('', 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
1745 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
1746
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 " 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
1748 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
1749 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
1750 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
1751
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 %bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1753 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1754
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
1755 func Test_normal22_zet()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1756 " Test for ZZ
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1757 " let shell = &shell
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1758 " let &shell = 'sh'
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1759 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
1760 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
1761 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
1762 let a = readfile('Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1763 call assert_equal([], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1764 " Test for ZQ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1765 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
1766 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
1767 let a = readfile('Xfile')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1768 call assert_equal(['1', '2'], a)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1769
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1770 " Unsupported Z command
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1771 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
1772
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1773 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1774 for file in ['Xfile']
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1775 call delete(file)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1776 endfor
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1777 " let &shell = shell
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1778 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1779
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
1780 func Test_normal23_K()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1781 " Test for K command
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1782 new
10330
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1783 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
1784 let k = &keywordprg
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1785 set keywordprg=:help
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1786 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1787 norm! VK
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1788 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
1789 call assert_equal('help', &ft)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1790 call assert_match('\*version8.txt\*', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1791 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1792 norm! 0K
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1793 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
1794 call assert_equal('help', &ft)
13963
1174611ad715 Vim 8.1 release
Christian Brabandt <cb@256bit.org>
parents: 13272
diff changeset
1795 call assert_match('\*version8\.\d\*', getline('.'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1796 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1797
10330
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1798 set keywordprg=:new
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1799 set iskeyword+=%
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1800 set iskeyword+=\|
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1801 2
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1802 norm! K
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1803 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
1804 bwipe!
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1805 3
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1806 norm! K
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1807 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
1808 bwipe!
10338
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1809 if !has('win32')
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1810 4
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1811 norm! K
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1812 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
1813 bwipe!
e8a6a3bbd212 commit https://github.com/vim/vim/commit/eb828d01d9c91791fa1fe217ba651cdc25746d1b
Christian Brabandt <cb@256bit.org>
parents: 10330
diff changeset
1814 endif
10330
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1815 set iskeyword-=%
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1816 set iskeyword-=\|
71ca6a16e818 commit https://github.com/vim/vim/commit/426f3754223c8ff8a1bc51d6ba1eba11e8982ebc
Christian Brabandt <cb@256bit.org>
parents: 10166
diff changeset
1817
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1818 " 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
1819 1
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1820 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
1821 set keywordprg=:Kprog
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1822 norm! 3K
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1823 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
1824 delcom Kprog
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1825
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
1826 " 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
1827 if !has("unix")
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1828 let &keywordprg = k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1829 bw!
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1830 return
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1831 endif
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1832
18736
97d534e17874 patch 8.1.2358: tests fail on Cirrus CI for FreeBSD
Bram Moolenaar <Bram@vim.org>
parents: 18730
diff changeset
1833 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
1834 if not_gnu_man
26211
485c7c4afeb7 patch 8.2.3637: typos in test files
Bram Moolenaar <Bram@vim.org>
parents: 26175
diff changeset
1835 " 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
1836 set keywordprg=man\ -P\ cat
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1837 else
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1838 set keywordprg=man\ --pager=cat
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1839 endif
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1840 " Test for using man
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1841 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1842 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
1843 if not_gnu_man
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1844 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
1845 else
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
1846 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
1847 endif
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1848
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1849 " Error cases
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1850 call setline(1, '#$#')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
1851 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
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! ggv2lK', '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, ['abc', 'xyz'])
21265
6a4806e326dd patch 8.2.1183: assert_fails() checks the last error message
Bram Moolenaar <Bram@vim.org>
parents: 20990
diff changeset
1855 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
1856 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
1857 norm! V
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
1858 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
1859
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1860 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1861 let &keywordprg = k
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1862 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1863 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1864
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
1865 func Test_normal24_rot13()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1866 " Testing for g?? g?g?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1867 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1868 call append(0, 'abcdefghijklmnopqrstuvwxyzäüö')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1869 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1870 norm! g??
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1871 call assert_equal('nopqrstuvwxyzabcdefghijklmäüö', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1872 norm! g?g?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1873 call assert_equal('abcdefghijklmnopqrstuvwxyzäüö', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1874
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1875 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1876 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1877 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1878
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
1879 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
1880 CheckFeature quickfix
068337e86133 patch 8.1.2373: cannot build with +popupwin but without +quickfix
Bram Moolenaar <Bram@vim.org>
parents: 18736
diff changeset
1881
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1882 " Testing for CTRL-] g CTRL-] g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1883 " 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
1884 h
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1885 " Test for CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1886 call search('\<x\>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1887 exe "norm! \<c-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1888 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
1889 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1890 call assert_equal("*x*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1891 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1892
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1893 " Test for g_CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1894 call search('\<v_u\>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1895 exe "norm! g\<c-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1896 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
1897 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1898 call assert_equal("*v_u*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1899 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1900
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1901 " Test for g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1902 call search('\<i_<Esc>$')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1903 let a = execute(":norm! g]")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1904 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
1905
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1906 if !empty(exepath('cscope')) && has('cscope')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1907 " setting cscopetag changes how g] works
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1908 set cst
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1909 exe "norm! g]"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1910 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
1911 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1912 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1913 exe ":norm \<c-o>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1914 " Test for CTRL-W g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1915 exe "norm! \<C-W>g]"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1916 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
1917 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1918 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1919 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1920 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1921 set nocst
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1922 endif
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1923
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1924 " Test for CTRL-W g]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1925 let a = execute("norm! \<C-W>g]")
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1926 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
1927
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1928 " Test for CTRL-W CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1929 exe "norm! \<C-W>\<C-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1930 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
1931 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1932 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1933 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1934 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1935
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1936 " Test for CTRL-W g CTRL-]
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1937 exe "norm! \<C-W>g\<C-]>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1938 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
1939 norm! yiW
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1940 call assert_equal("*i_<Esc>*", @0)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1941 call assert_equal(3, winnr('$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1942 helpclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1943
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1944 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1945 helpclose
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1946 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1947
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
1948 func Test_normal26_put()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1949 " Test for ]p ]P [p and [P
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1950 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1951 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
1952 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1953 /Error/y a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1954 2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1955 norm! "a]pj"a[p
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1956 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
1957 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1958 /^\s\{4}/
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1959 exe "norm! \"a]P3Eldt'"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1960 exe "norm! j\"a[P2Eldt'"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1961 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
1962
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1963 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1964 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
1965 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1966
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
1967 func Test_normal27_bracket()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1968 " Test for [' [` ]' ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1969 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1970 1,21s/.\+/ & b/
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1971 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1972 norm! $ma
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1973 5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1974 norm! $mb
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1975 10
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1976 norm! $mc
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1977 15
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1978 norm! $md
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1979 20
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1980 norm! $me
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1981
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1982 " Test for ['
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1983 9
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1984 norm! 2['
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1985 call assert_equal(' 1 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1986 call assert_equal(1, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1987 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1988
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1989 " Test for ]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1990 norm! ]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1991 call assert_equal(' 5 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1992 call assert_equal(5, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1993 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1994
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1995 " No mark after line 21, cursor moves to first non blank on current line
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1996 21
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1997 norm! $]'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1998 call assert_equal(' 21 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1999 call assert_equal(21, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2000 call assert_equal(3, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2001
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2002 " Test for [`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2003 norm! 2[`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2004 call assert_equal(' 15 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2005 call assert_equal(15, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2006 call assert_equal(8, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2007
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2008 " Test for ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2009 norm! ]`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2010 call assert_equal(' 20 b', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2011 call assert_equal(20, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2012 call assert_equal(8, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2013
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2014 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2015 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2016 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2017
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2018 " 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
2019 func Test_normal28_parenthesis()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2020 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2021 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
2022
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2023 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2024 norm! d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2025 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
2026 norm! 2d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2027 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
2028 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2029 norm! 0d)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2030 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
2031
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2032 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
2033 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2034 norm! $d(
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2035 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
2036
20199
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2037 " 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
2038 %d
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2039 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
2040 call cursor(1, 1)
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2041 normal )
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2042 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
2043 normal )
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2044 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
2045 normal ((
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2046 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
2047
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2048 " 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
2049 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2050 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
2051 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
2052
20199
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2053 " 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
2054 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
2055 normal $((
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2056 call assert_equal(3, col('.'))
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
2057
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2058 " 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
2059 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
2060 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2061 2,$fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2062 call feedkeys(')', 'xt')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2063 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
2064 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
2065 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
2066 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2067
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2068 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2069 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2070 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2071
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2072 " 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
2073 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
2074 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
2075 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
2076 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
2077 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
2078 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
2079 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
2080 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
2081 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
2082
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2083
17172
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2084 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
2085 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
2086 paragraph boundary |posix|.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2087 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2088 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2089 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2090 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2091 }
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2092 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2093 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
2094 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
2095 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2096 .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
2097 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2098 .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
2099 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
2100 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2101 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2102 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
2103 [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
2104
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2105 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2106 call append(0, text)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2107 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2108 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
2109
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2110 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
2111 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2112 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
2113 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
2114 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2115 .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
2116 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2117 .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
2118 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
2119 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2120 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2121 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
2122
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2123 [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
2124 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
2125
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2126 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
2127
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2128 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
2129 .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
2130 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2131 .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
2132 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
2133 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2134 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2135 End of text here
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2136
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
2137 [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
2138 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
2139
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2140 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2141 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
2142
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2143 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
2144 .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
2145 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2146 .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
2147 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
2148 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
2149
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2150 [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
2151 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
2152
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2153 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
2154
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2155 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
2156 .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
2157 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
2158
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 [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
2160 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
2161
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2162 " Test with { in cpooptions
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2163 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2164 call append(0, text)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2165 set cpo+={
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2166 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2167 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
2168
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2169 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
2170 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2171 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2172 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2173 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2174 }
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2175 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2176 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
2177 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
2178 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2179 .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
2180 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2181 .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
2182 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
2183 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2184 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2185 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
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 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2191 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
2192
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2193 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
2194 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2195 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2196 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2197 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2198 }
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2199 .IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2200 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
2201 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
2202 followed by IP
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2203 .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
2204 more characters follow.
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2205 .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
2206 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
2207 a character like this:
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2208 .NH
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2209 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
2210
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2211 [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
2212 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
2213
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2214 norm! gg}
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2215 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
2216
9c90cf08cfa8 patch 8.1.1362: code and data in tests can be hard to read
Bram Moolenaar <Bram@vim.org>
parents: 16419
diff changeset
2217 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
2218 {
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2219 This is no paragraph
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2220 unless the '{' is set
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2221 in 'cpoptions'
6990c1160ea5 patch 8.1.1585: :let-heredoc does not trim enough
Bram Moolenaar <Bram@vim.org>
parents: 16720
diff changeset
2222 }
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, '$'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2226
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2227 " 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
2228 %d
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2229 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
2230 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2231 2,$fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2232 call feedkeys('}', 'xt')
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2233 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
2234 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
2235 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
2236 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2237
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2238 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2239 set cpo-={
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2240 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2241 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2242
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2243 " 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
2244 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
2245 new
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2246 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
2247 int foo()
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2248 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2249 if (1)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2250 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2251 a = 1;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2252 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2253 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2254 [END]
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2255 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
2256
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2257 " 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
2258 2,3fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2259 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
2260 call feedkeys("[[", 'xt')
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2261 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
2262 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
2263
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2264 close!
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2265 endfunc
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
2266
22502
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
2267 " 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
2268 func Test_normal30_changecase()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2269 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2270 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
2271 norm! 1ggVu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2272 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
2273 norm! VU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2274 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
2275 norm! guu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2276 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
2277 norm! gUgU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2278 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
2279 norm! gugu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2280 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
2281 norm! gUU
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2282 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
2283 norm! 010~
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2284 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
2285 norm! V~
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2286 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
2287 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
2288 %d
1503ecd54f8a patch 8.2.1799: some Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22476
diff changeset
2289 call assert_beeps('norm! ~')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2290
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2291 " 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
2292 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
2293 normal! gg10~
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2294 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
2295 set whichwrap+=~
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2296 normal! gg10~
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2297 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
2298 set whichwrap&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2299
24725
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2300 " 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
2301 %bw!
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2302 let enc = &enc
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2303 set encoding=cp932
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2304 call setline(1, "\u8470")
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2305 normal ~
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2306 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
2307 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
2308 let &encoding = enc
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
2309
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2310 " clean up
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2311 bw!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2312 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2313
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2314 " 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
2315 " 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
2316 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
2317 new
14669
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2318 try
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2319 lang tr_TR.UTF-8
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2320 set casemap=
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2321 let iupper = toupper('i')
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2322 if iupper == "\u0130"
11335
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2323 call setline(1, 'iI')
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2324 1normal gUU
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2325 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
2326 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
2327
11335
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2328 call setline(1, 'iI')
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2329 1normal guu
bc8e3fd275be patch 8.0.0553: toupper/tolower test fails on Mac
Christian Brabandt <cb@256bit.org>
parents: 11333
diff changeset
2330 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
2331 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
2332 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
2333 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
2334 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
2335 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
2336 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
2337
f0fbebf19b80 patch 8.0.0554: toupper and tolower don't work properly for Turkish
Christian Brabandt <cb@256bit.org>
parents: 11335
diff changeset
2338 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
2339 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
2340 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
2341 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
2342 else
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2343 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
2344 endif
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2345 set casemap&
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2346 call setline(1, 'iI')
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2347 1normal gUU
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2348 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
2349 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
2350
14669
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2351 call setline(1, 'iI')
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2352 1normal guu
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2353 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
2354 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
2355
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2356 lang en_US.UTF-8
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2357 catch /E197:/
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2358 " can't use Turkish locale
63d5ae57a663 patch 8.1.0347: some tests fail on Solaris
Christian Brabandt <cb@256bit.org>
parents: 14627
diff changeset
2359 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
2360 endtry
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2361 close!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2362 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2363
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2364 " 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
2365 func Test_normal31_r_cmd()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2366 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2367 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
2368 exe "norm! 1gg$r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2369 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
2370 exe "norm! 1gg2wlr\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2371 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
2372 exe "norm! 2gg0W5r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2373 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
2374 set autoindent
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2375 call setline(2, ['simple test: abc', ''])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2376 exe "norm! 2gg0W5r\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2377 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
2378 exe "norm! 1ggVr\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2379 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
2380 call setline(1, 'This is a')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2381 exe "norm! 1gg05rf"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2382 call assert_equal('fffffis a', getline(1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2383
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2384 " 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
2385 " 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
2386 " 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
2387 set showmatch
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2388 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
2389 enew!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2390 let &encoding = enc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2391 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
2392 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
2393 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
2394 endfor
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2395 set showmatch&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2396
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2397 " 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
2398 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
2399
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2400 " 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
2401 %d
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2402 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
2403 normal gglvjjrx
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
2404 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
2405
22524
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2406 " 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
2407 %d
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2408 new
1baf86830e44 patch 8.2.1810: some code in normal.c not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 22502
diff changeset
2409 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
2410 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
2411 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
2412
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2413 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2414 set noautoindent
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2415 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2416 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2417
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2418 " 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
2419 func Test_normal32_g_cmd1()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2420 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2421 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
2422 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2423 norm! $g*
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2424 call assert_equal('x_foo', @/)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2425 call assert_equal('x_foobar.abc', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2426 norm! $g#
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2427 call assert_equal('abc', @/)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2428 call assert_equal('abc.x_foo', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2429
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2430 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2431 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2432 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2433
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2434 " 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
2435 " 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
2436 func Test_normal33_g_cmd2()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2437 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2438 " Test for g`
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2439 clearjumps
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2440 norm! ma10j
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2441 let a=execute(':jumps')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2442 " empty jumplist
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2443 call assert_equal('>', a[-1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2444 norm! g`a
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2445 call assert_equal('>', a[-1:])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2446 call assert_equal(1, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2447 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
2448 call cursor(10, 1)
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2449 norm! g'a
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2450 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
2451 call assert_equal(1, line('.'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2452
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2453 " Test for g; and g,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2454 norm! g;
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2455 " 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
2456 " currently, when we setup the window
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2457 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
2458 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
2459 call assert_fails(':norm! g,', 'E663:')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2460 let &ul=&ul
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2461 call append('$', ['a', 'b', 'c', 'd'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2462 let &ul=&ul
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2463 call append('$', ['Z', 'Y', 'X', 'W'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2464 let a = execute(':changes')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2465 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
2466 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
2467 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
2468 norm! 3g;
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2469 call assert_equal(2, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2470 norm! 2g,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2471 call assert_equal(105, line('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2472
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2473 " Test for g& - global substitute
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2474 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2475 call setline(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2476 call append('$', ['a', 'b', 'c', 'd'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2477 $s/\w/&&/g
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2478 exe "norm! /[1-8]\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2479 norm! g&
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2480 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
2481
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2482 " 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
2483 set foldenable
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2484 set foldopen+=jump
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2485 5,8fold
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2486 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
2487 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
2488 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
2489 set foldopen-=jump
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2490 set foldenable&
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2491
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2492 " Test for gv
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2493 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2494 call append('$', repeat(['abcdefgh'], 8))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2495 exe "norm! 2gg02l\<c-v>2j2ly"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2496 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
2497 " 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
2498 exe "norm! G0\<c-v>4k4lgvd"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2499 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
2500 exe "norm! G0\<c-v>4k4ly"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2501 exe "norm! gvood"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2502 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
2503 " 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
2504 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
2505 " 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
2506 new
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2507 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
2508 close
10088
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 gk/gj
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 15vsp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2513 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
2514 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
2515 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
2516 let lineC = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz01234567890123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789'
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2517 $put =lineA
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2518 $put =lineB
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2519
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2520 norm! 3gg0dgk
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2521 call assert_equal(['', 'abcdefghijklmno', '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ'], getline(1, '$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2522 set nu
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2523 norm! 3gg0gjdgj
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2524 call assert_equal(['', 'abcdefghijklmno', '0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2525
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2526 " Test for gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2527 norm! 2gggJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2528 call assert_equal(['', 'abcdefghijklmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2529 call assert_equal(16, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2530 " shouldn't do anything
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2531 norm! 10gJ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2532 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2533
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2534 " Test for g0 g^ gm g$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2535 exe "norm! 2gg0gji "
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2536 call assert_equal(['', 'abcdefghijk lmno0123456789AMNOPQRSTUVWXYZ'], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2537 norm! g0yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2538 call assert_equal(12, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2539 call assert_equal(' ', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2540 norm! g$yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2541 call assert_equal(22, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2542 call assert_equal('3', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2543 norm! gmyl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2544 call assert_equal(17, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2545 call assert_equal('n', getreg(0))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2546 norm! g^yl
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2547 call assert_equal(15, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2548 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
2549 call assert_beeps('normal 5g$')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2550
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 " 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
2552 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
2553 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
2554 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
2555 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
2556 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
2557 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
2558 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
2559 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
2560 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
2561 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
2562
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
2563 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
2564 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
2565 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
2566 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
2567 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
2568 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
2569 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
2570
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
2571 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
2572
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2573 " Test for g_
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2574 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
2575 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
2576 normal! 2ggg_
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2577 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
2578 normal! 2g_
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2579 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
2580
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2581 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
2582 $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
2583
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
2584 " 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
2585 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
2586 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
2587 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
2588 " 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
2589 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
2590 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
2591 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
2592 " 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
2593 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
2594 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
2595 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
2596
26749
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2597 " 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
2598 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
2599 norm! gMyl
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2600 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
2601 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
2602
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
2603 " 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
2604 call setline('.', lineC)
efe4c8a79502 patch 8.2.3903: "gM" does not count tabs as expected
Bram Moolenaar <Bram@vim.org>
parents: 26743
diff changeset
2605 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
2606 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
2607 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
2608 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
2609
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2610 " Test for gI
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2611 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
2612 call assert_equal(['', 'foo0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz01234567890123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789'], getline(1,'$'))
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2613
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2614 " Test for gi
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2615 wincmd c
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2616 %d
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2617 set tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2618 call setline(1, ['foobar', 'new line'])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2619 norm! A next word
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2620 $put ='third line'
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2621 norm! gi another word
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2622 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
2623 call setline(1, 'foobar')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2624 normal! Ggifirst line
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2625 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
2626 " 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
2627 set virtualedit=all
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2628 call setline(1, 'foo')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2629 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
2630 call setline(1, 'foo')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2631 normal! Ggifirst line
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2632 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
2633 set virtualedit&
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2634
26211
485c7c4afeb7 patch 8.2.3637: typos in test files
Bram Moolenaar <Bram@vim.org>
parents: 26175
diff changeset
2635 " 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
2636 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
2637 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
2638
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2639 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2640 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2641 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2642
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2643 " 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
2644 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
2645 new
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2646
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2647 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
2648 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
2649
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2650 " 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
2651 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
2652 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
2653
14627
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2654 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
2655
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2656 " 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
2657 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
2658 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
2659 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
2660 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
2661
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2662 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
2663 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
2664 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
2665
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2666 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
2667 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
2668 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
2669
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2670 " 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
2671 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
2672 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
2673
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2674 " 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
2675 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
2676 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
2677
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2678 " 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
2679 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
2680 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
2681
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2682 " 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
2683 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
2684 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
2685
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2686 " 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
2687 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
2688 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
2689 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
2690 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
2691
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2692 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
2693
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2694 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
2695 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
2696
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2697 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
2698 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
2699
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2700 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
2701 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
2702
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2703 set fenc=utf8 bomb
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2704 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
2705 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
2706
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2707 set fenc=utf16 bomb
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2708 let a = execute(":norm! g\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2709 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
2710
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2711 set fenc=utf32 bomb
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2712 let a = execute(":norm! g\<c-g>")
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2713 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
2714
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
2715 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
2716
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2717 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
2718 bwipe!
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2719 endfunc
335f32c55ac3 patch 8.1.0327: the "g CTRL-G" command isn't tested much
Christian Brabandt <cb@256bit.org>
parents: 13963
diff changeset
2720
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2721 " 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
2722 func Test_normal34_g_cmd3()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2723 new
11327
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2724 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
2725 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
2726
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2727 call setline(1, 'abcdefghijklmnopqrstuvwxyzäüö')
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2728 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
2729 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
2730
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2731 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
2732 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
2733 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
2734
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2735 " clean up
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2736 bw!
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2737 endfunc
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2738
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2739 " 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
2740 func Test_normal_8g8()
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2741 new
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2742
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2743 " With invalid byte.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2744 call setline(1, "___\xff___")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2745 norm! 1G08g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2746 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
2747
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2748 " 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
2749 call setline(1, "___\xff___")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2750 norm! 1G$h8g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2751 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
2752
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2753 " With truncated sequence.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2754 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
2755 norm! 1G08g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2756 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
2757
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2758 " With overlong sequence.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2759 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
2760 norm! 1G08g8g
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2761 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
2762
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2763 " With valid utf8.
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2764 call setline(1, "café")
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2765 norm! 1G08g8
9e899514e929 patch 8.0.0549: no test for the 8g8 command
Christian Brabandt <cb@256bit.org>
parents: 11275
diff changeset
2766 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
2767
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2768 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2769 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2770
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2771 " 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
2772 func Test_normal35_g_cmd4()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2773 " Cannot capture its output,
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2774 " 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
2775 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
2776 echo "a\nb\nc\nd"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2777 let b=execute(':norm! g<')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2778 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
2779 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2780
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2781 " 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
2782 func Test_normal36_g_cmd5()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2783 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2784 call append(0, 'abcdefghijklmnopqrstuvwxyz')
10092
d7846e9fbf65 commit https://github.com/vim/vim/commit/0913a1089a07ac7b17abc3a1343dfa7cd25613f4
Christian Brabandt <cb@256bit.org>
parents: 10088
diff changeset
2785 set ff=unix
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2786 " Test for gp gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2787 call append(1, range(1,10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2788 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2789 norm! 1yy
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2790 3
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2791 norm! gp
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2792 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
2793 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2794 norm! gP
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2795 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
2796
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2797 " Test for go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2798 norm! 26go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2799 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
2800 norm! 27go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2801 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
2802 norm! 28go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2803 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
2804 set ff=dos
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2805 norm! 29go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2806 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
2807 set ff=unix
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2808 norm! gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2809 norm! 101go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2810 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
2811 norm! 103go
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2812 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
2813 " count > buffer content
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2814 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
2815 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
2816 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2817 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2818 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2819
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2820 " 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
2821 func Test_normal37_g_cmd6()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2822 tabnew 1.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2823 tabnew 2.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2824 tabnew 3.txt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2825 norm! 1gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2826 call assert_equal(1, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2827 norm! 3gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2828 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2829 norm! 1gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2830 " 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
2831 " 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
2832 call assert_equal(2, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2833 " wrap around
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2834 norm! 3gT
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2835 call assert_equal(3, tabpagenr())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2836 " gt does not wrap around
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2837 norm! 5gt
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2838 call assert_equal(3, tabpagenr())
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 for i in range(3)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2841 tabclose
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2842 endfor
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2843 " clean up
19425
67fbe280a502 patch 8.2.0270: some code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 19407
diff changeset
2844 call assert_fails(':tabclose', 'E784:')
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2845 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2846
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2847 " 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
2848 func Test_normal38_nvhome()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2849 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2850 call setline(1, range(10))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2851 $
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2852 setl et sw=2
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2853 norm! V10>$
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2854 " count is ignored
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2855 exe "norm! 10\<home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2856 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2857 exe "norm! \<home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2858 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
2859 exe "norm! 5\<c-home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2860 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
2861 exe "norm! \<c-home>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2862 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
2863 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
2864 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
2865
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2866 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2867 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2868 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2869
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2870 " 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
2871 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
2872 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2873 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
2874 exe "normal! \<End>"
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2875 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
2876 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
2877 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
2878 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
2879 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
2880 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2881 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
2882
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2883 " 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
2884 func Test_normal39_cw()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2885 " Test for cw and cW on whitespace
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2886 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2887 set tw=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2888 call append(0, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2889 norm! 1gg0elcwZZZ
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2890 call assert_equal('hereZZZare some words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2891 norm! 1gg0elcWYYY
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2892 call assert_equal('hereZZZareYYYsome words', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2893 norm! 2gg0cwfoo
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2894 call assert_equal('foo', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2895
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2896 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
2897 call cursor(1, 1)
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2898 call feedkeys('cwvim', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2899 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
2900 call feedkeys('0cWone', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2901 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
2902 "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
2903 "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
2904 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
2905 call feedkeys('0ecwce', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2906 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
2907 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
2908 call feedkeys('0ecely', 'xt')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2909 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
2910
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2911 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2912 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2913 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2914
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2915 " 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
2916 func Test_normal40_ctrl_bsl()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2917 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2918 call append(0, 'here are some words')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2919 exe "norm! 1gg0a\<C-\>\<C-N>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2920 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2921 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2922 call assert_equal('', visualmode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2923 exe "norm! 1gg0viw\<C-\>\<C-N>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2924 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2925 call assert_equal(4, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2926 exe "norm! 1gg0a\<C-\>\<C-G>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2927 call assert_equal('n', mode())
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2928 call assert_equal(1, col('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2929 "imap <buffer> , <c-\><c-n>
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2930 set im
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2931 exe ":norm! \<c-\>\<c-n>dw"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2932 set noim
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2933 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
2934 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
2935 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
2936
23748
93f90f2ff4e9 patch 8.2.2415: no way to check for the cmdwin feature
Bram Moolenaar <Bram@vim.org>
parents: 22524
diff changeset
2937 if has('cmdwin')
93f90f2ff4e9 patch 8.2.2415: no way to check for the cmdwin feature
Bram Moolenaar <Bram@vim.org>
parents: 22524
diff changeset
2938 " Using CTRL-\ CTRL-N in cmd window should close the window
93f90f2ff4e9 patch 8.2.2415: no way to check for the cmdwin feature
Bram Moolenaar <Bram@vim.org>
parents: 22524
diff changeset
2939 call feedkeys("q:\<C-\>\<C-N>", 'xt')
93f90f2ff4e9 patch 8.2.2415: no way to check for the cmdwin feature
Bram Moolenaar <Bram@vim.org>
parents: 22524
diff changeset
2940 call assert_equal('', getcmdwintype())
93f90f2ff4e9 patch 8.2.2415: no way to check for the cmdwin feature
Bram Moolenaar <Bram@vim.org>
parents: 22524
diff changeset
2941 endif
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2942
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2943 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2944 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2945 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2946
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2947 " 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
2948 func Test_normal41_insert_reg()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2949 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2950 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
2951 call append(0, ["aaa\tbbb\tccc", '', '', ''])
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2952 let a=getline(1)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2953 norm! 2gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2954 exe "norm! a\<c-r>=a\<cr>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2955 norm! 3gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2956 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
2957 norm! 4gg0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2958 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
2959 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
2960
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2961 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2962 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
2963 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
2964 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2965
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
2966 " 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
2967 func Test_normal42_halfpage()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2968 call Setup_NewWindow()
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2969 call assert_equal(5, &scroll)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2970 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2971 call assert_equal('6', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2972 exe "norm! 2\<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2973 call assert_equal('8', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2974 call assert_equal(2, &scroll)
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2975 set scroll=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2976 exe "norm! \<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2977 call assert_equal('3', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2978 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2979 set scrolloff=5
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2980 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2981 call assert_equal('10', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2982 exe "norm! \<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2983 call assert_equal('5', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2984 1
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2985 set scrolloff=99
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2986 exe "norm! \<c-d>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2987 call assert_equal('10', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2988 set scrolloff=0
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2989 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2990 exe "norm! $\<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2991 call assert_equal('95', getline('.'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2992 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
2993 100
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2994 set nostartofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2995 exe "norm! $\<c-u>"
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2996 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
2997 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
2998 " cleanup
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2999 set startofline
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3000 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3001 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3002
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
3003 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
3004 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
3005 " 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
3006 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
3007 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
3008 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
3009
f3fb8dae30f1 patch 8.0.1509: test for failing drag-n-drop command no longer fails
Christian Brabandt <cb@256bit.org>
parents: 13268
diff changeset
3010 " basic test for drag-n-drop
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3011 " 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
3012 " 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
3013 new
22087
ff21e2962490 patch 8.2.1593: tests do not check the error number properly
Bram Moolenaar <Bram@vim.org>
parents: 21419
diff changeset
3014 call assert_fails(':norm! "~p', 'E353:')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3015 call assert_equal([], getreg('~', 1, 1))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3016 " 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
3017 call assert_fails(':let @~="1"', 'E354:')
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3018 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3019 endfunc
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3020
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
3021 func Test_normal46_ignore()
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3022 new
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3023 " How to test this?
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3024 " 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
3025 " does not change
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3026 call feedkeys("\<c-s>", 't')
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3027 call assert_equal([''], getline(1,'$'))
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3028
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3029 " no valid commands
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3030 exe "norm! \<char-0x100>"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3031 call assert_equal([''], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3032
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3033 exe "norm! ä"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3034 call assert_equal([''], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3035
10088
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3036 " clean up
5337340beea0 commit https://github.com/vim/vim/commit/87bc3f74598ae8c648957e5755000cc6cdbc89ce
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3037 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3038 endfunc
10154
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3039
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
3040 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
3041 " 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
3042 enew!
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3043 call setline(1,'xxx')
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3044 normal $
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3045 new
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3046 call setline(1, range(1,2))
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3047 2
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3048 exe "norm \<C-V>$"
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3049 bw!
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3050 norm yp
4647267906cc commit https://github.com/vim/vim/commit/c4a908e83690844b0d3a46124ba6af7d23485d69
Christian Brabandt <cb@256bit.org>
parents: 10130
diff changeset
3051 set nomodified
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3052 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3053
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
3054 func Test_normal48_wincmd()
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3055 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3056 exe "norm! \<c-w>c"
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3057 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
3058 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
3059 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
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_normal49_counts()
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3062 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3063 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
3064 1
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3065 norm! 3d2w
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3066 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
3067 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3068 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3069
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
3070 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
3071 CheckFeature timers
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3072 CheckFeature cmdline_hist
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3073 func! DoTimerWork(id)
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3074 call assert_equal('[Command Line]', bufname(''))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3075 " 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
3076 "call feedkeys("\<c-^>", 'tm')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3077
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3078 " 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
3079 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
3080 " return from commandline window
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3081 call feedkeys("\<cr>")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3082 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3083
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3084 let oldlang=v:lang
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3085 lang C
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3086 set updatetime=20
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3087 call timer_start(100, 'DoTimerWork')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3088 try
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3089 " throws E23, for whatever reason...
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3090 call feedkeys('q:', 'x!')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3091 catch /E23/
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3092 " no-op
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3093 endtry
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3094 " clean up
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3095 set updatetime=4000
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3096 exe "lang" oldlang
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3097 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3098 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3099
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
3100 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
3101 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
3102 " 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
3103 call test_settime(1)
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3104 call writefile(['foo'], 'Xreadonly.log')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3105 new Xreadonly.log
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3106 setl ro
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3107 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
3108 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
3109 call assert_equal(['foo'], getline(1,'$'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3110 call assert_equal('Xreadonly.log', bufname(''))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3111
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3112 " 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
3113 call test_settime(0)
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3114 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3115 call delete("Xreadonly.log")
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3116 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3117
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
3118 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
3119 CheckFeature rightleft
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3120 new
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3121 call setline(1, 'abcde fghij klmnopq')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3122 norm! 1gg$
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3123 set rl
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3124 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3125 call feedkeys('l', 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3126 call assert_equal(18, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3127 call feedkeys('h', 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3128 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3129 call feedkeys("\<right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3130 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
3131 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
3132 call assert_equal(19, col('.'))
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3133 call feedkeys("\<s-right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3134 call assert_equal(13, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3135 call feedkeys("\<c-right>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3136 call assert_equal(7, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3137 call feedkeys("\<c-left>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3138 call assert_equal(13, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3139 call feedkeys("\<s-left>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3140 call assert_equal(19, col('.'))
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3141 call feedkeys("<<", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3142 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
3143 call feedkeys(">>", 'tx')
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3144 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
3145
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3146 " cleanup
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3147 set norl
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3148 bw!
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3149 endfunc
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3150
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3151 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
3152 new
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3153 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
3154 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
3155 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
3156 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
3157 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
3158 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
3159 call assert_equal(['abcdefghijklmn'], getline(1,'$'))
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 15006
diff changeset
3160
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3161 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
3162 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
3163 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
3164 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
3165 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
3166 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
3167 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
3168
11260
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3169 " 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
3170 bw!
10166
520e0e732b87 commit https://github.com/vim/vim/commit/2931f2a5df0d962032d41060af84d9fd2cb35c9f
Christian Brabandt <cb@256bit.org>
parents: 10154
diff changeset
3171 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
3172
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3173 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
3174 " 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
3175 new
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3176 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
3177 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
3178 bwipe!
a7b7b21071c6 patch 8.0.0516: a large count on a normal command causes trouble
Christian Brabandt <cb@256bit.org>
parents: 11091
diff changeset
3179 endfunc
11275
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3180
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3181 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
3182 new
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3183 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
3184 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
3185 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
3186 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
3187 bwipe!
5c77ca0cf6a5 patch 8.0.0523: dv} deletes part of a multi-byte character.
Christian Brabandt <cb@256bit.org>
parents: 11260
diff changeset
3188 endfunc
12788
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3189
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3190 " 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
3191 " 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
3192 func Test_gr_command()
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3193 enew!
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3194 let save_cpo = &cpo
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3195 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
3196 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
3197 call cursor(2, 1)
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3198 set cpo-=X
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3199 normal 4gro
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3200 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
3201 undo
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3202 set cpo+=X
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3203 normal 4gro
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3204 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
3205 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
3206 normal! ggvegrx
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3207 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
3208 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
3209 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
3210 set virtualedit=all
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3211 normal! 15|grl
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3212 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
3213 set virtualedit&
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3214 set nomodifiable
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3215 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
3216 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
3217 set modifiable&
12788
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3218 enew!
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3219 endfunc
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3220
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3221 " When splitting a window the changelist position is wrong.
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3222 " Test the changelist position after splitting a window.
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3223 " Test for the bug fixed by 7.4.386
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3224 func Test_changelist()
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3225 let save_ul = &ul
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3226 enew!
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3227 call append('$', ['1', '2'])
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3228 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
3229 exe "normal Gkylpa\<C-G>u"
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3230 set ul=100
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3231 exe "normal Gylpa\<C-G>u"
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3232 set ul=100
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3233 normal gg
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3234 vsplit
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3235 normal g;
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3236 call assert_equal([3, 2], [line('.'), col('.')])
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3237 normal g;
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3238 call assert_equal([2, 2], [line('.'), col('.')])
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3239 call assert_fails('normal g;', 'E662:')
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3240 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3241 call assert_fails('normal g;', 'E664:')
12788
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3242 %bwipe!
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3243 let &ul = save_ul
cb9b2774f21f patch 8.0.1271: still too many old style tests
Christian Brabandt <cb@256bit.org>
parents: 12730
diff changeset
3244 endfunc
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
3245
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
3246 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
3247 %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
3248 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
3249 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
3250
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
3251 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
3252 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
3253
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
3254 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
3255 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
3256
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
3257 " 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
3258 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
3259
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
3260 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
3261 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
3262
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 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
3264 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
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 %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
3267 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
3268
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
3269 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
3270 " 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
3271 %bwipe!
4673f22da44d patch 8.1.1052: test for CTRL-C message sometimes fails
Bram Moolenaar <Bram@vim.org>
parents: 16089
diff changeset
3272
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
3273 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
3274 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
3275
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
3276 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
3277 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
3278 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
3279 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
3280
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
3281 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
3282 endfunc
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3283
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3284 " Test for '[m', ']m', '[M' and ']M'
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3285 " 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
3286 func Test_java_motion()
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3287 new
19625
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3288 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
3289 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
3290 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
3291 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
3292 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
3293 Piece of Java
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3294 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3295 tt m1 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3296 t1;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3297 } e1
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3298
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3299 tt m2 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3300 t2;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3301 } e2
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3302
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3303 tt m3 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3304 if (x)
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3305 {
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3306 t3;
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3307 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3308 } e3
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3309 }
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3310 [CODE]
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3311 call setline(1, lines)
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3312
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3313 normal gg
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3314
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3315 normal 2]maA
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3316 call assert_equal("\ttt m1 {A", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3317 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
3318
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3319 normal j]maB
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3320 call assert_equal("\ttt m2 {B", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3321 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
3322
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3323 normal ]maC
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3324 call assert_equal("\ttt m3 {C", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3325 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
3326
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3327 normal [maD
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3328 call assert_equal("\ttt m3 {DC", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3329 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
3330
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3331 normal k2[maE
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3332 call assert_equal("\ttt m1 {EA", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3333 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
3334
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3335 normal 3[maF
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3336 call assert_equal("{F", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3337 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
3338
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3339 normal ]MaG
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3340 call assert_equal("\t}G e1", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3341 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
3342
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3343 normal j2]MaH
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3344 call assert_equal("\t}H e3", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3345 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
3346
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3347 normal ]M]M
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3348 normal aI
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3349 call assert_equal("}I", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3350 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
3351
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3352 normal 2[MaJ
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3353 call assert_equal("\t}JH e3", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3354 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
3355
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3356 normal k[MaK
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3357 call assert_equal("\t}K e2", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3358 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
3359
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3360 normal 3[MaL
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3361 call assert_equal("{LF", getline('.'))
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3362 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
3363
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3364 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
3365 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
3366
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3367 " 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
3368 6,10fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3369 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
3370 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
3371 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
3372
16419
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3373 close!
aebcd20a8a3f patch 8.1.1214: old style tests
Bram Moolenaar <Bram@vim.org>
parents: 16095
diff changeset
3374 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
3375
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3376 " 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
3377 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
3378 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
3379 " 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
3380 %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
3381 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
3382 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
3383 " 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
3384 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
3385 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
3386 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
3387 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
3388 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
3389 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
3390 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
3391 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
3392 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
3393 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
3394 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
3395 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
3396 \ '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
3397 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
3398 " 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
3399 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
3400 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
3401 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
3402 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
3403 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
3404 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
3405 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
3406 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
3407 \ '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
3408 \ '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
3409 \ '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
3410 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
3411 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
3412 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
3413 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
3414 \ '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
3415 \ '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
3416 \ '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
3417 \ '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
3418 \ '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
3419 " 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
3420 " 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
3421 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
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(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
3424 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
3425 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
3426 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
3427
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3428 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
3429 " 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
3430 new
5e10ee16f4b4 patch 8.1.2072: "gk" moves to start of line instead of upwards
Bram Moolenaar <Bram@vim.org>
parents: 17698
diff changeset
3431 vert 80new
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3432 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
3433 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
3434 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
3435 " 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
3436 " (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
3437 " 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
3438 " 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
3439 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
3440 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
3441 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
3442 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
3443 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
3444 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
3445 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
3446 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
3447 %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
3448
11f68eb58fda patch 8.1.2140: "gk" and "gj" do not work correctly in number column
Bram Moolenaar <Bram@vim.org>
parents: 18154
diff changeset
3449 " 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
3450 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
3451 vert 80new
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3452 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
3453 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
3454 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
3455 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
3456 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
3457 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
3458 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
3459 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
3460 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
3461 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
3462 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
3463 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
3464 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
3465 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
3466 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
3467 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
3468 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
3469 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
3470 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
3471 " 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
3472 set nowrap
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3473 normal! gk
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3474 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
3475 normal! gj
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3476 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
3477 %bw!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3478 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
3479 endfunc
19407
2f4be7ca1b1b patch 8.2.0261: some code not covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18767
diff changeset
3480
19471
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3481 " 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
3482 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
3483 new
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3484 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
3485 let @a = ''
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3486 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
3487 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
3488 close!
cb73f4ae6b7c patch 8.2.0293: various Ex commands not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19425
diff changeset
3489 endfunc
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3490
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3491 " 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
3492 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
3493 func s:cHold()
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3494 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
3495 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3496 new
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3497 augroup normalcHoldTest
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3498 au!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3499 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
3500 augroup END
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3501 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
3502 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
3503 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
3504 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
3505 augroup normalcHoldTest
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3506 au!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3507 augroup END
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3508 au! normalcHoldTest
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3509 close!
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3510 delfunc s:cHold
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3511 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3512
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3513 " 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
3514 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
3515 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
3516 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
3517 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3518
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3519 " 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
3520 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
3521 new
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3522 normal! gg
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3523 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
3524 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
3525 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
3526 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
3527 " <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
3528 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
3529 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
3530 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
3531 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
3532 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
3533 close!
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3534 endfunc
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3535
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3536 " 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
3537 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
3538 new
f70a3c1000bb patch 8.2.0369: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 19613
diff changeset
3539 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
3540 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
3541 close!
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3542 endfunc
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3543
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3544 " 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
3545 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
3546 new
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3547 " 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
3548 call setline(1, '')
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3549 normal D
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3550 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
3551 " 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
3552 set virtualedit=all
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3553 normal D
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3554 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
3555 set virtualedit&
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3556 " 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
3557 call setline(1, ['abcd'])
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3558 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
3559
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3560 " D and d with 'nomodifiable'
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3561 call setline(1, ['abcd'])
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3562 setlocal nomodifiable
6d3dee0d7de5 patch 8.2.2592: code coverage could be improved
Bram Moolenaar <Bram@vim.org>
parents: 23748
diff changeset
3563 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
3564 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
3565
19969
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3566 close!
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3567 endfunc
b07672d13ff9 patch 8.2.0540: regexp and other code not tested
Bram Moolenaar <Bram@vim.org>
parents: 19932
diff changeset
3568
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3569 " 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
3570 " 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
3571 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
3572 new
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3573 set whichwrap&
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3574 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
3575 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
3576 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
3577
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3578 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
3579 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
3580 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
3581
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3582 set whichwrap+=l
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3583 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
3584 exe "norm! $3x"
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3585 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
3586 close!
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3587 set whichwrap&
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3588 endfunc
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3589
20199
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3590 " 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
3591 func Test_normal_word_move()
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3592 new
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3593 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
3594 " 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
3595 normal 1G$yw
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3596 call assert_equal('a', @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3597 " 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
3598 normal G$yw
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3599 call assert_equal('b', @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3600 " 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
3601 normal 1G$vwy
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3602 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
3603
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3604 " copy using 'b' command
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3605 %d
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3606 " 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
3607 call setline(1, [' ', 'foo bar'])
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3608 normal 2Gyb
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3609 call assert_equal(" \n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3610 " 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
3611 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
3612 call assert_beeps('normal ggyb')
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3613 " '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
3614 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
3615 normal 3Gyb
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3616 call assert_equal("\n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3617 normal 3Gy2b
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3618 call assert_equal("two\n", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3619 " '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
3620 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
3621 normal 3Gyb
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3622 call assert_equal("two\n ", @")
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3623
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3624 close!
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3625 endfunc
a4bd28e2cf1d patch 8.2.0655: search code not sufficiently tested
Bram Moolenaar <Bram@vim.org>
parents: 19969
diff changeset
3626
20978
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3627 " 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
3628 func Test_normal_scroloff()
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3629 10new
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3630 80vnew
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3631 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
3632 set scrolloff=10
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3633 normal gg10gj
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3634 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
3635 normal 10gj
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3636 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
3637 normal 10gk
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3638 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
3639 set scrolloff&
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3640 close!
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3641 endfunc
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3642
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3643 " 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
3644 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
3645 10new
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3646 80vnew
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3647 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
3648 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
3649 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
3650 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
3651 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
3652 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
3653 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
3654 exe "normal \<C-B>"
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3655 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
3656 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
3657 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
3658 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
3659 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
3660 close!
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3661 endfunc
2c3e7a6bd6c6 patch 8.2.1040: not enough testing for movement commands
Bram Moolenaar <Bram@vim.org>
parents: 20848
diff changeset
3662
22476
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3663 " 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
3664 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
3665 new
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3666 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
3667
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3668 " 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
3669 25,75fold
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3670 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
3671 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
3672 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
3673 close!
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3674 endfunc
b3751f4d3b26 patch 8.2.1786: various Normal mode commands not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 22087
diff changeset
3675
24725
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3676 " 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
3677 func Test_normal_shift_rightleft()
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3678 new
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3679 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
3680 set shiftwidth=2 tabstop=8
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3681 normal gg6>>
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3682 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
3683 \ getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3684 normal ggVG2>>
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3685 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
3686 \ "\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
3687 normal gg6<<
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3688 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
3689 \ "\t four"], getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3690 normal ggVG2<<
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3691 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
3692 \ getline(1, '$'))
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3693 set shiftwidth& tabstop&
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3694 bw!
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3695 endfunc
3cdbce5ba73f patch 8.2.2901: some operators not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24101
diff changeset
3696
24756
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3697 " 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
3698 " 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
3699 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
3700 new
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3701 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
3702 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
3703 let @a = ''
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3704 normal! j"ay4y
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3705 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
3706 normal! 3G>2>
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3707 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
3708 \ getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3709 exe "normal! 3G0c2cred\nblue"
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3710 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
3711 \ getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3712 exe "normal! gg<8<"
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3713 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
3714 \ getline(1, '$'))
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3715 exe "normal! ggd3d"
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3716 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
3717 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
3718 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
3719 call assert_equal('".,.+2!', @:)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3720 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
3721 call assert_equal('".!', @:)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3722 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
3723 call assert_equal('".,$!', @:)
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3724 bw!
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3725 endfunc
ac7ad168caed patch 8.2.2916: operators are not fully tested
Bram Moolenaar <Bram@vim.org>
parents: 24752
diff changeset
3726
26094
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3727 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
3728 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
3729 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
3730 \ ' 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
3731 \ ' 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
3732 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
3733 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
3734 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
3735 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
3736 bw!
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3737 endfunc
f53f365078dd patch 8.2.3580: gj does not move properly with a wide character
Bram Moolenaar <Bram@vim.org>
parents: 26061
diff changeset
3738
26256
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3739 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
3740 new
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3741 call setline(1, 'text')
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3742 normal 44444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3743 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
3744 normal 444444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3745 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
3746 normal 4444444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3747 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
3748 normal 4444444444444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3749 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
3750
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3751 normal 9y99999999|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3752 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
3753 normal 10y99999999|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3754 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
3755 normal 44444444444y44444444444|
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3756 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
3757 bwipe!
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3758 endfunc
92fbed13ca4d patch 8.2.3659: integer overflow with large line number
Bram Moolenaar <Bram@vim.org>
parents: 26226
diff changeset
3759
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 19471
diff changeset
3760 " vim: shiftwidth=2 sts=2 expandtab