Mercurial > vim

comparison src/testdir/test_comments.vim @ 20990:55b3849ded11 v8.2.1046

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.2.1046: insufficient tests for src/buffer.c Commit: https://github.com/vim/vim/commit/b7e2483655d9b68df0c7349918027d800051a28a Author: Bram Moolenaar <Bram@vim.org> Date: Wed Jun 24 13:37:35 2020 +0200 patch 8.2.1046: insufficient tests for src/buffer.c Problem: Insufficient tests for src/buffer.c. Solution: Add more tests. Move comments related tests to a separate file. (Yegappan Lakshmanan, closes #6325)
author Bram Moolenaar <Bram@vim.org>
date Wed, 24 Jun 2020 13:45:06 +0200
parents
children 1fa23ccd6d9a
comparison
equal deleted inserted replaced
20989:c27f8e4ea9d7 20990:55b3849ded11
1 " Tests for the various flags in the 'comments' option
2
3 " Test for the 'n' flag in 'comments'
4 func Test_comment_nested()
5 new
6 setlocal comments=n:> fo+=ro
7 exe "normal i> B\nD\<C-C>ggOA\<C-C>joC\<C-C>Go\<BS>>>> F\nH"
8 exe "normal 5GOE\<C-C>6GoG"
9 let expected =<< trim END
10 > A
11 > B
12 > C
13 > D
14 >>>> E
15 >>>> F
16 >>>> G
17 >>>> H
18 END
19 call assert_equal(expected, getline(1, '$'))
20 close!
21 endfunc
22
23 " Test for the 'b' flag in 'comments'
24 func Test_comment_blank()
25 new
26 setlocal comments=b:* fo+=ro
27 exe "normal i* E\nF\n\<BS>G\nH\<C-C>ggOC\<C-C>O\<BS>B\<C-C>OA\<C-C>2joD"
28 let expected =<< trim END
29 A
30 *B
31 * C
32 * D
33 * E
34 * F
35 *G
36 H
37 END
38 call assert_equal(expected, getline(1, '$'))
39 close!
40 endfunc
41
42 " Test for the 'f' flag in 'comments' (only the first line has a comment
43 " string)
44 func Test_comment_firstline()
45 new
46 setlocal comments=f:- fo+=ro
47 exe "normal i- B\nD\<C-C>ggoC\<C-C>ggOA\<C-C>"
48 call assert_equal(['A', '- B', ' C', ' D'], getline(1, '$'))
49 %d
50 setlocal comments=:-
51 exe "normal i- B\nD\<C-C>ggoC\<C-C>ggOA\<C-C>"
52 call assert_equal(['- A', '- B', '- C', '- D'], getline(1, '$'))
53 close!
54 endfunc
55
56 " Test for the 's', 'm' and 'e' flags in 'comments'
57 " Test for automatically adding comment leaders in insert mode
58 func Test_comment_threepiece()
59 new
60 setlocal expandtab
61 call setline(1, ["\t/*"])
62 setlocal formatoptions=croql
63 call cursor(1, 3)
64 call feedkeys("A\<cr>\<cr>/", 'tnix')
65 call assert_equal(["\t/*", " *", " */"], getline(1, '$'))
66
67 " If a comment ends in a single line, then don't add it in the next line
68 %d
69 call setline(1, '/* line1 */')
70 call feedkeys("A\<CR>next line", 'xt')
71 call assert_equal(['/* line1 */', 'next line'], getline(1, '$'))
72
73 %d
74 " Copy the trailing indentation from the leader comment to a new line
75 setlocal autoindent noexpandtab
76 call feedkeys("a\t/*\tone\ntwo\n/", 'xt')
77 call assert_equal(["\t/*\tone", "\t *\ttwo", "\t */"], getline(1, '$'))
78 close!
79 endfunc
80
81 " Test for the 'r' flag in 'comments' (right align comment)
82 func Test_comment_rightalign()
83 new
84 setlocal comments=sr:/***,m:**,ex-2:******/ fo+=ro
85 exe "normal i=\<C-C>o\t /***\nD\n/"
86 exe "normal 2GOA\<C-C>joB\<C-C>jOC\<C-C>joE\<C-C>GOF\<C-C>joG"
87 let expected =<< trim END
88 =
89 A
90 /***
91 ** B
92 ** C
93 ** D
94 ** E
95 ** F
96 ******/
97 G
98 END
99 call assert_equal(expected, getline(1, '$'))
100 close!
101 endfunc
102
103 " Test for the 'O' flag in 'comments'
104 func Test_comment_O()
105 new
106 setlocal comments=Ob:* fo+=ro
107 exe "normal i* B\nD\<C-C>kOA\<C-C>joC"
108 let expected =<< trim END
109 A
110 * B
111 * C
112 * D
113 END
114 call assert_equal(expected, getline(1, '$'))
115 close!
116 endfunc
117
118 " Test for using a multibyte character as a comment leader
119 func Test_comment_multibyte_leader()
120 new
121 let t =<< trim END
122 {
123 Ｘ
124 Ｘa
125 ＸaＹ
126 ＸＹ
127 ＸＹＺ
128 Ｘ Ｙ
129 Ｘ ＹＺ
130 ＸＸ
131 ＸＸa
132 ＸＸＹ
133 }
134 END
135 call setline(1, t)
136 call cursor(2, 1)
137
138 set tw=2 fo=cqm comments=n:Ｘ
139 exe "normal gqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgqjgqgq"
140 let t =<< trim END
141 Ｘ
142 Ｘa
143 ＸaＹ
144 ＸＹ
145 ＸＹＺ
146 Ｘ Ｙ
147 Ｘ ＹＺ
148 ＸＸ
149 ＸＸa
150 ＸＸＹ
151 END
152 exe "normal o\n" . join(t, "\n")
153
154 let expected =<< trim END
155 {
156 Ｘ
157 Ｘa
158 Ｘa
159 ＸＹ
160 ＸＹ
161 ＸＹ
162 ＸＺ
163 Ｘ Ｙ
164 Ｘ Ｙ
165 Ｘ Ｚ
166 ＸＸ
167 ＸＸa
168 ＸＸＹ
169
170 Ｘ
171 Ｘa
172 Ｘa
173 ＸＹ
174 ＸＹ
175 ＸＹ
176 ＸＺ
177 Ｘ Ｙ
178 Ｘ Ｙ
179 Ｘ Ｚ
180 ＸＸ
181 ＸＸa
182 ＸＸＹ
183 }
184 END
185 call assert_equal(expected, getline(1, '$'))
186
187 set tw& fo& comments&
188 close!
189 endfunc
190
191 " Test for a space character in 'comments' setting
192 func Test_comment_space()
193 new
194 setlocal comments=b:\ > fo+=ro
195 exe "normal i> B\nD\<C-C>ggOA\<C-C>joC"
196 exe "normal Go > F\nH\<C-C>kOE\<C-C>joG"
197 let expected =<< trim END
198 A
199 > B
200 C
201 D
202 > E
203 > F
204 > G
205 > H
206 END
207 call assert_equal(expected, getline(1, '$'))
208 close!
209 endfunc
210
211 " Test for formatting lines with and without comments
212 func Test_comment_format_lines()
213 new
214 call setline(1, ['one', '/* two */', 'three'])
215 normal gggqG
216 call assert_equal(['one', '/* two */', 'three'], getline(1, '$'))
217 close!
218 endfunc
219
220 " Test for using 'a' in 'formatoptions' with comments
221 func Test_comment_autoformat()
222 new
223 setlocal formatoptions+=a
224 call feedkeys("a- one\n- two\n", 'xt')
225 call assert_equal(['- one', '- two', ''], getline(1, '$'))
226
227 %d
228 call feedkeys("a\none\n", 'xt')
229 call assert_equal(['', 'one', ''], getline(1, '$'))
230
231 setlocal formatoptions+=aw
232 %d
233 call feedkeys("aone \ntwo\n", 'xt')
234 call assert_equal(['one two', ''], getline(1, '$'))
235
236 %d
237 call feedkeys("aone\ntwo\n", 'xt')
238 call assert_equal(['one', 'two', ''], getline(1, '$'))
239
240 close!
241 endfunc
242
243 " Test for joining lines with comments ('j' flag in 'formatoptions')
244 func Test_comment_join_lines_fo_j()
245 new
246 setlocal fo+=j comments=://
247 call setline(1, ['i++; // comment1', ' // comment2'])
248 normal J
249 call assert_equal('i++; // comment1 comment2', getline(1))
250 setlocal fo-=j
251 call setline(1, ['i++; // comment1', ' // comment2'])
252 normal J
253 call assert_equal('i++; // comment1 // comment2', getline(1))
254 " Test with nested comments
255 setlocal fo+=j comments=n:>,n:)
256 call setline(1, ['i++; > ) > ) comment1', ' > ) comment2'])
257 normal J
258 call assert_equal('i++; > ) > ) comment1 comment2', getline(1))
259 close!
260 endfunc
261
262 " Test for formatting lines where only the first line has a comment.
263 func Test_comment_format_firstline_comment()
264 new
265 setlocal formatoptions=tcq
266 call setline(1, ['- one two', 'three'])
267 normal gggqG
268 call assert_equal(['- one two three'], getline(1, '$'))
269
270 %d
271 call setline(1, ['- one', '- two'])
272 normal gggqG
273 call assert_equal(['- one', '- two'], getline(1, '$'))
274 close!
275 endfunc
276
277 " vim: shiftwidth=2 sts=2 expandtab