annotate src/testdir/test_ex_z.vim @ 32762:6ee6de3bbc94 v9.0.1700

patch 9.0.1700: Cannot compile with dynamic perl < 5.38 Commit: https://github.com/vim/vim/commit/32f586eec1a48784566f8e7aad5cab0ad6105b02 Author: K.Takata <kentkt@csc.jp> Date: Sun Aug 13 10:15:05 2023 +0200 patch 9.0.1700: Cannot compile with dynamic perl < 5.38 Problem: Cannot compile with dynamic perl < 5.38 (after 9.0.1681) Solution: Fix if_perl/dyn from perl 5.32 to 5.38 closes: #12755 Signed-off-by: Christian Brabandt <cb@256bit.org> Co-authored-by: K.Takata <kentkt@csc.jp>
author Christian Brabandt <cb@256bit.org>
date Sun, 13 Aug 2023 10:30:05 +0200
parents 0f93e9423890
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11303
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
1 " Test :z
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
2
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
3 func Test_z()
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
4 call setline(1, range(1, 100))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
5
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
6 let a = execute('20z3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
7 call assert_equal("\n20\n21\n22", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
8 call assert_equal(22, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
9 " 'window' should be set to the {count} value.
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
10 call assert_equal(3, &window)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
11
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
12 " If there is only one window, then twice the amount of 'scroll' is used.
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
13 set scroll=2
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
14 let a = execute('20z')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
15 call assert_equal("\n20\n21\n22\n23", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
16 call assert_equal(23, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
17
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
18 let a = execute('20z+3')
25729
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
19 " FIXME: I would expect the same result as '20z3' since 'help z'
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
20 " says: Specifying no mark at all is the same as "+".
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
21 " However it " gives "\n21\n22\n23" instead. Bug in Vim or in ":help :z"?
11303
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
22 "call assert_equal("\n20\n21\n22", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
23 "call assert_equal(22, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
24
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
25 let a = execute('20z-3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
26 call assert_equal("\n18\n19\n20", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
27 call assert_equal(20, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
28
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
29 let a = execute('20z=3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
30 call assert_match("^\n18\n19\n-\\+\n20\n-\\+\n21\n22$", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
31 call assert_equal(20, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
32
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
33 let a = execute('20z^3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
34 call assert_equal("\n14\n15\n16\n17", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
35 call assert_equal(17, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
36
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
37 let a = execute('20z.3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
38 call assert_equal("\n19\n20\n21", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
39 call assert_equal(21, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
40
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
41 let a = execute('20z#3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
42 call assert_equal("\n 20 20\n 21 21\n 22 22", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
43 call assert_equal(22, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
44
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
45 let a = execute('20z#-3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
46 call assert_equal("\n 18 18\n 19 19\n 20 20", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
47 call assert_equal(20, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
48
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
49 let a = execute('20z#=3')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
50 call assert_match("^\n 18 18\n 19 19\n-\\+\n 20 20\n-\\+\n 21 21\n 22 22$", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
51 call assert_equal(20, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
52
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
53 " Test with {count} bigger than the number of lines in buffer.
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
54 let a = execute('20z1000')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
55 call assert_match("^\n20\n21\n.*\n99\n100$", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
56 call assert_equal(100, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
57
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
58 let a = execute('20z-1000')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
59 call assert_equal(20, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
60
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
61 let a = execute('20z=1000')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
62 call assert_match("^\n1\n.*\n-\\+\n20\n-\\\+\n.*\n100$", a)
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
63 call assert_equal(20, line('.'))
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
64
25729
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
65 " Tests with multiple windows.
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
66 5split
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
67 call setline(1, range(1, 100))
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
68 " Without a count, the number line is window height - 3.
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
69 let a = execute('20z')
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
70 call assert_equal("\n20\n21", a)
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
71 call assert_equal(21, line('.'))
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
72 " If window height - 3 is less than 1, it should be clamped to 1.
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
73 resize 2
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
74 let a = execute('20z')
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
75 call assert_equal("\n20", a)
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
76 call assert_equal(20, line('.'))
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
77
11303
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
78 call assert_fails('20z=a', 'E144:')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
79
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
80 set window& scroll&
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
81 bw!
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
82 endfunc
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
83
25729
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
84 " :z! is the same as :z but count uses the Vim window height when not specified.
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
85 func Test_z_bang()
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
86 4split
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
87 call setline(1, range(1, 20))
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
88
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
89 let a = execute('10z!')
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
90 call assert_equal("\n10\n11\n12\n13\n14\n15\n16\n17\n18\n19\n20", a)
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
91
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
92 let a = execute('10z!#')
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
93 call assert_equal("\n 10 10\n 11 11\n 12 12\n 13 13\n 14 14\n 15 15\n 16 16\n 17 17\n 18 18\n 19 19\n 20 20", a)
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
94
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
95 let a = execute('10z!3')
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
96 call assert_equal("\n10\n11\n12", a)
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
97
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
98 %bwipe!
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
99 endfunc
0f93e9423890 patch 8.2.3400: ":z!" is not supported
Bram Moolenaar <Bram@vim.org>
parents: 21765
diff changeset
100
11372
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
101 func Test_z_overflow()
11303
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
102 " This used to access invalid memory as a result of an integer overflow
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
103 " and freeze vim.
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
104 normal ox
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
105 normal Heat
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
106 z777777776666666
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
107 ')
ef32a5c74515 patch 8.0.0537: illegal memory access with :z and large count
Christian Brabandt <cb@256bit.org>
parents:
diff changeset
108 endfunc
11372
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
109
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
110 func Test_z_negative_lnum()
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
111 new
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
112 z^
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
113 call assert_equal(1, line('.'))
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
114 bwipe!
1074f58e1673 patch 8.0.0571: negative line number when using :z^ in an empty buffer
Christian Brabandt <cb@256bit.org>
parents: 11303
diff changeset
115 endfunc
21765
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 11372
diff changeset
116
08940efa6b4e patch 8.2.1432: various inconsistencies in test files
Bram Moolenaar <Bram@vim.org>
parents: 11372
diff changeset
117 " vim: shiftwidth=2 sts=2 expandtab