Mercurial > vim

annotate src/testdir/test_virtualedit.vim @ 19613:9c15be376631 v8.2.0363

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.0363: some Normal mode commands not tested Commit: https://github.com/vim/vim/commit/f5f1e10d0d39890298cdf27f664d466c8872b87e Author: Bram Moolenaar <Bram@vim.org> Date: Sun Mar 8 05:13:15 2020 +0100 patch 8.2.0363: some Normal mode commands not tested Problem: Some Normal mode commands not tested. Solution: Add more tests. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/5746)
author Bram Moolenaar <Bram@vim.org>
date Sun, 08 Mar 2020 05:15:04 +0100
parents f966b20bb74d
children b07672d13ff9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
12164
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Tests for 'virtualedit'.
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 func Test_yank_move_change()
12279
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
4 new
12164
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5 call setline(1, [
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 \ "func foo() error {",
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 \ "\tif n, err := bar();",
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 \ "\terr != nil {",
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 \ "\t\treturn err",
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 \ "\t}",
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11 \ "\tn = n * n",
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 \ ])
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 set virtualedit=all
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 set ts=4
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 function! MoveSelectionDown(count) abort
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 normal! m`
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17 silent! exe "'<,'>move'>+".a:count
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 norm! ``
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
19 endfunction
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
20
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
21 xmap ]e :<C-U>call MoveSelectionDown(v:count1)<CR>
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 2
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 normal 2gg
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24 normal J
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 normal jVj
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 normal ]e
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 normal ce
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28 bwipe!
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 set virtualedit=
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 set ts=8
5d82470552ce patch 8.0.0962: crash with virtualedit and joining lines
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 endfunc
12279
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
32
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
33 func Test_paste_end_of_line()
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
34 new
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
35 set virtualedit=all
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
36 call setline(1, ['456', '123'])
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
37 normal! gg0"ay$
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
38 exe "normal! 2G$lllA\<C-O>:normal! \"agP\r"
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
39 call assert_equal('123456', getline(2))
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
40
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
41 bwipe!
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
42 set virtualedit=
57e0b701611e patch 8.0.1019: pasting in virtual edit happens in the wrong place
Christian Brabandt <cb@256bit.org>
parents: 12164
diff changeset
43 endfunc
13786
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
44
14216
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
45 func Test_replace_end_of_line()
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
46 new
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
47 set virtualedit=all
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
48 call setline(1, range(20))
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
49 exe "normal! gg2jv10lr-"
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
50 call assert_equal(["1", "-----------", "3"], getline(2,4))
15607
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 14216
diff changeset
51 call setline(1, range(20))
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 14216
diff changeset
52 exe "normal! gg2jv10lr\<c-k>hh"
2dcaa860e3fc patch 8.1.0811: too many #ifdefs
Bram Moolenaar <Bram@vim.org>
parents: 14216
diff changeset
53 call assert_equal(["1", "───────────", "3"], getline(2,4))
14216
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
54
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
55 bwipe!
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
56 set virtualedit=
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
57 endfunc
12bdbf9f7e20 patch 8.1.0125: virtual edit replace with multi-byte fails at end of line
Christian Brabandt <cb@256bit.org>
parents: 13786
diff changeset
58
13786
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
59 func Test_edit_CTRL_G()
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
60 new
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
61 set virtualedit=insert
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
62 call setline(1, ['123', '1', '12'])
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
63 exe "normal! ggA\<c-g>jx\<c-g>jx"
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
64 call assert_equal(['123', '1 x', '12 x'], getline(1,'$'))
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
65
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
66 set virtualedit=all
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
67 %d_
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
68 call setline(1, ['1', '12'])
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
69 exe "normal! ggllix\<c-g>jx"
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
70 call assert_equal(['1 x', '12x'], getline(1,'$'))
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
71
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
72
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
73 bwipe!
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
74 set virtualedit=
0fa21ba32e21 patch 8.0.1765: CTRL-G j in Insert mode is incorrect when 'virtualedit' set
Christian Brabandt <cb@256bit.org>
parents: 12279
diff changeset
75 endfunc
18481
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
76
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
77 func Test_edit_change()
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
78 new
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
79 set virtualedit=all
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
80 call setline(1, "\t⒌")
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
81 normal Cx
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
82 call assert_equal('x', getline(1))
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
83 bwipe!
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
84 set virtualedit=
18481
26256dcadd77 patch 8.1.2235: "C" with 'virtualedit' set does not include multi-byte char
Bram Moolenaar <Bram@vim.org>
parents: 15607
diff changeset
85 endfunc
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
86
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
87 " Tests for pasting at the beginning, end and middle of a tab character
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
88 " in virtual edit mode.
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
89 func Test_paste_in_tab()
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
90 new
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
91 call append(0, '')
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
92 set virtualedit=all
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
93
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
94 " Tests for pasting a register with characterwise mode type
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
95 call setreg('"', 'xyz', 'c')
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
96
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
97 " paste (p) unnamed register at the beginning of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
98 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
99 call cursor(1, 2, 0)
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
100 normal p
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
101 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
102
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
103 " paste (P) unnamed register at the beginning of a tab
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
104 call setline(1, "a\tb")
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
105 call cursor(1, 2, 0)
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
106 normal P
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
107 call assert_equal("axyz\tb", getline(1))
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
108
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
109 " paste (p) unnamed register at the end of a tab
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
110 call setline(1, "a\tb")
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
111 call cursor(1, 2, 6)
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
112 normal p
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
113 call assert_equal("a\txyzb", getline(1))
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
114
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
115 " paste (P) unnamed register at the end of a tab
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
116 call setline(1, "a\tb")
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
117 call cursor(1, 2, 6)
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
118 normal P
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
119 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
120
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
121 " Tests for pasting a register with blockwise mode type
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
122 call setreg('"', 'xyz', 'b')
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
123
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
124 " paste (p) unnamed register at the beginning of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
125 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
126 call cursor(1, 2, 0)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
127 normal p
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
128 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
129
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
130 " paste (P) unnamed register at the beginning of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
131 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
132 call cursor(1, 2, 0)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
133 normal P
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
134 call assert_equal("axyz\tb", getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
135
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
136 " paste (p) unnamed register at the end of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
137 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
138 call cursor(1, 2, 6)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
139 normal p
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
140 call assert_equal("a\txyzb", getline(1))
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
141
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
142 " paste (P) unnamed register at the end of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
143 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
144 call cursor(1, 2, 6)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
145 normal P
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
146 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
147
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
148 " Tests for pasting with gp and gP in virtual edit mode
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
149
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
150 " paste (gp) unnamed register at the beginning of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
151 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
152 call cursor(1, 2, 0)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
153 normal gp
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
154 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
155 call assert_equal([0, 1, 12, 0, 12], getcurpos())
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
156
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
157 " paste (gP) unnamed register at the beginning of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
158 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
159 call cursor(1, 2, 0)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
160 normal gP
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
161 call assert_equal("axyz\tb", getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
162 call assert_equal([0, 1, 5, 0, 5], getcurpos())
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
163
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
164 " paste (gp) unnamed register at the end of a tab
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
165 call setline(1, "a\tb")
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
166 call cursor(1, 2, 6)
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
167 normal gp
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
168 call assert_equal("a\txyzb", getline(1))
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
169 call assert_equal([0, 1, 6, 0, 12], getcurpos())
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
170
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
171 " paste (gP) unnamed register at the end of a tab
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
172 call setline(1, "a\tb")
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
173 call cursor(1, 2, 6)
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
174 normal gP
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
175 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
176 call assert_equal([0, 1, 12, 0, 12], getcurpos())
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
177
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
178 " Tests for pasting a named register
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
179 let @r = 'xyz'
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
180
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
181 " paste (gp) named register in the middle of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
182 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
183 call cursor(1, 2, 2)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
184 normal "rgp
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
185 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
186 call assert_equal([0, 1, 8, 0, 8], getcurpos())
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
187
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
188 " paste (gP) named register in the middle of a tab
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
189 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
190 call cursor(1, 2, 2)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
191 normal "rgP
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
192 call assert_equal('a xyz b', getline(1))
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
193 call assert_equal([0, 1, 7, 0, 7], getcurpos())
18771
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
194
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
195 bwipe!
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
196 set virtualedit=
50fde4e20790 patch 8.1.2375: no suffucient testing for registers
Bram Moolenaar <Bram@vim.org>
parents: 18481
diff changeset
197 endfunc
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
198
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
199 " Test for yanking a few spaces within a tab to a register
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
200 func Test_yank_in_tab()
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
201 new
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
202 let @r = ''
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
203 call setline(1, "a\tb")
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
204 set virtualedit=all
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
205 call cursor(1, 2, 2)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
206 normal "ry5l
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
207 call assert_equal(' ', @r)
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
208
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
209 bwipe!
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
210 set virtualedit=
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
211 endfunc
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
212
18791
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
213 " Insert "keyword keyw", ESC, C CTRL-N, shows "keyword ykeyword".
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
214 " Repeating CTRL-N fixes it. (Mary Ellen Foster)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
215 func Test_ve_completion()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
216 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
217 set completeopt&vim
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
218 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
219 exe "normal ikeyword keyw\<Esc>C\<C-N>"
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
220 call assert_equal('keyword keyword', getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
221 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
222 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
223 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
224
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
225 " Using "C" then then <CR> moves the last remaining character to the next
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
226 " line. (Mary Ellen Foster)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
227 func Test_ve_del_to_eol()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
228 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
229 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
230 call append(0, 'all your base are belong to us')
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
231 call search('are', 'w')
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
232 exe "normal C\<CR>are belong to vim"
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
233 call assert_equal(['all your base ', 'are belong to vim'], getline(1, 2))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
234 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
235 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
236 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
237
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
238 " When past the end of a line that ends in a single character "b" skips
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
239 " that word.
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
240 func Test_ve_b_past_eol()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
241 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
242 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
243 call append(0, '1 2 3 4 5 6')
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
244 normal gg^$15lbC7
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
245 call assert_equal('1 2 3 4 5 7', getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
246 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
247 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
248 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
249
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
250 " Make sure 'i', 'C', 'a', 'A' and 'D' works
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
251 func Test_ve_ins_del()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
252 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
253 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
254 call append(0, ["'i'", "'C'", "'a'", "'A'", "'D'"])
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
255 call cursor(1, 1)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
256 normal $4lix
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
257 call assert_equal("'i' x", getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
258 call cursor(2, 1)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
259 normal $4lCx
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
260 call assert_equal("'C' x", getline(2))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
261 call cursor(3, 1)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
262 normal $4lax
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
263 call assert_equal("'a' x", getline(3))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
264 call cursor(4, 1)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
265 normal $4lAx
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
266 call assert_equal("'A'x", getline(4))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
267 call cursor(5, 1)
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
268 normal $4lDix
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
269 call assert_equal("'D' x", getline(5))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
270 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
271 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
272 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
273
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
274 " Test for yank bug reported by Mark Waggoner.
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
275 func Test_yank_block()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
276 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
277 set virtualedit=block
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
278 call append(0, repeat(['this is a test'], 3))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
279 exe "normal gg^2w\<C-V>3jy"
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
280 call assert_equal("a\na\na\n ", @")
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
281 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
282 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
283 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
284
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
285 " Test "r" beyond the end of the line
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
286 func Test_replace_after_eol()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
287 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
288 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
289 call append(0, '"r"')
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
290 normal gg$5lrxa
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
291 call assert_equal('"r" x', getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
292 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
293 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
294 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
295
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
296 " Test "r" on a tab
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
297 " Note that for this test, 'ts' must be 8 (the default).
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
298 func Test_replace_on_tab()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
299 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
300 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
301 call append(0, "'r'\t")
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
302 normal gg^5lrxAy
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
303 call assert_equal("'r' x y", getline(1))
19613
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 18791
diff changeset
304 call setline(1, 'aaaaaaaaaaaa')
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 18791
diff changeset
305 exe "normal! gg2lgR\<Tab>"
9c15be376631 patch 8.2.0363: some Normal mode commands not tested
Bram Moolenaar <Bram@vim.org>
parents: 18791
diff changeset
306 call assert_equal("aa\taaaa", getline(1))
18791
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
307 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
308 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
309 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
310
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
311 " Test to make sure 'x' can delete control characters
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
312 func Test_ve_del_ctrl_chars()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
313 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
314 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
315 call append(0, "a\<C-V>b\<CR>sd")
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
316 set display=uhex
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
317 normal gg^xxxxxxi[text]
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
318 set display=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
319 call assert_equal('[text]', getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
320 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
321 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
322 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
323
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
324 " Test for ^Y/^E due to bad w_virtcol value, reported by
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
325 " Roy <royl@netropolis.net>.
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
326 func Test_ins_copy_char()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
327 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
328 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
329 call append(0, 'abcv8efi.him2kl')
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
330 exe "normal gg^O\<Esc>3li\<C-E>\<Esc>4li\<C-E>\<Esc>4li\<C-E> <--"
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
331 exe "normal j^o\<Esc>4li\<C-Y>\<Esc>4li\<C-Y>\<Esc>4li\<C-Y> <--"
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
332 call assert_equal(' v i m <--', getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
333 call assert_equal(' 8 . 2 <--', getline(3))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
334 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
335 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
336 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
337
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
338 " Test for yanking and pasting using the small delete register
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
339 func Test_yank_paste_small_del_reg()
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
340 new
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
341 set virtualedit=all
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
342 call append(0, "foo, bar")
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
343 normal ggdewve"-p
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
344 call assert_equal(', foo', getline(1))
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
345 bwipe!
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
346 set virtualedit=
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
347 endfunc
f966b20bb74d patch 8.1.2384: test 48 is old style
Bram Moolenaar <Bram@vim.org>
parents: 18784
diff changeset
348
18784
7b57a80f70f6 patch 8.1.2381: not all register related code is covered by tests
Bram Moolenaar <Bram@vim.org>
parents: 18771
diff changeset
349 " vim: shiftwidth=2 sts=2 expandtab