1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
|
" Test for various indent options
func Test_preserveindent()
new
" Test for autoindent copying indent from the previous line
setlocal autoindent
call setline(1, [repeat(' ', 16) .. 'line1'])
call feedkeys("A\nline2", 'xt')
call assert_equal("\t\tline2", getline(2))
setlocal autoindent&
" Test for using CTRL-T with and without 'preserveindent'
set shiftwidth=4
call cursor(1, 1)
call setline(1, " \t ")
call feedkeys("Al\<C-T>", 'xt')
call assert_equal("\t\tl", getline(1))
set preserveindent
call setline(1, " \t ")
call feedkeys("Al\<C-T>", 'xt')
call assert_equal(" \t \tl", getline(1))
set pi& sw&
" Test for using CTRL-T with 'expandtab' and 'preserveindent'
call cursor(1, 1)
call setline(1, "\t \t")
set shiftwidth=4 expandtab preserveindent
call feedkeys("Al\<C-T>", 'xt')
call assert_equal("\t \t l", getline(1))
set sw& et& pi&
close!
endfunc
" Test for indent()
func Test_indent_func()
call assert_equal(-1, indent(-1))
new
call setline(1, "\tabc")
call assert_equal(8, indent(1))
call setline(1, " abc")
call assert_equal(4, indent(1))
call setline(1, " \t abc")
call assert_equal(12, indent(1))
close!
endfunc
" Test for reindenting a line using the '=' operator
func Test_reindent()
new
call setline(1, 'abc')
set nomodifiable
call assert_fails('normal ==', 'E21:')
set modifiable
call setline(1, ['foo', 'bar'])
call feedkeys('ggVG=', 'xt')
call assert_equal(['foo', 'bar'], getline(1, 2))
close!
endfunc
" Test for shifting a line with a preprocessor directive ('#')
func Test_preproc_indent()
new
set sw=4
call setline(1, '#define FOO 1')
normal >>
call assert_equal(' #define FOO 1', getline(1))
" with 'smartindent'
call setline(1, '#define FOO 1')
set smartindent
normal >>
call assert_equal('#define FOO 1', getline(1))
set smartindent&
" with 'cindent'
set cindent
normal >>
call assert_equal('#define FOO 1', getline(1))
set cindent&
close!
endfunc
" Test for 'copyindent'
func Test_copyindent()
new
set shiftwidth=4 autoindent expandtab copyindent
call setline(1, " \t abc")
call feedkeys("ol", 'xt')
call assert_equal(" \t l", getline(2))
set noexpandtab
call setline(1, " \t abc")
call feedkeys("ol", 'xt')
call assert_equal(" \t l", getline(2))
set sw& ai& et& ci&
close!
endfunc
" Test for changing multiple lines with lisp indent
func Test_lisp_indent_change_multiline()
new
setlocal lisp autoindent
call setline(1, ['(if a', ' (if b', ' (return 5)))'])
normal! jc2j(return 4))
call assert_equal(' (return 4))', getline(2))
close!
endfunc
func Test_lisp_indent()
new
setlocal lisp autoindent
call setline(1, ['(if a', ' ;; comment', ' \ abc', '', ' " str1\', ' " st\b', ' (return 5)'])
normal! jo;; comment
normal! jo\ abc
normal! jo;; ret
normal! jostr1"
normal! jostr2"
call assert_equal([' ;; comment', ' ;; comment', ' \ abc', ' \ abc', '', ' ;; ret', ' " str1\', ' str1"', ' " st\b', ' str2"'], getline(2, 11))
close!
endfunc
" Test for setting the 'indentexpr' from a modeline
func Test_modeline_indent_expr()
let modeline = &modeline
set modeline
func GetIndent()
return line('.') * 2
endfunc
call writefile(['# vim: indentexpr=GetIndent()'], 'Xfile.txt')
set modelineexpr
new Xfile.txt
call assert_equal('GetIndent()', &indentexpr)
exe "normal Oa\nb\n"
call assert_equal([' a', ' b'], getline(1, 2))
set modelineexpr&
delfunc GetIndent
let &modeline = modeline
close!
call delete('Xfile.txt')
endfunc
" vim: shiftwidth=2 sts=2 expandtab
|