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 checking the source code style.
def Test_source_files()
for fname in glob('../*.[ch]', 0, 1)
exe 'edit ' .. fname
cursor(1, 1)
var lnum = search(' \t')
assert_equal(0, lnum, fname .. ': space before tab')
cursor(1, 1)
lnum = search('\s$')
assert_equal(0, lnum, fname .. ': trailing white space')
# some files don't stick to the Vim style rules
if fname =~ 'iscygpty.c'
continue
endif
# Examples in comments use "condition) {", skip them.
# Skip if a double quote or digit comes after the "{".
# Skip specific string used in os_unix.c.
# Also skip fold markers.
var skip = 'getline(".") =~ "condition) {" || getline(".") =~ "vimglob_func" || getline(".") =~ "{\"" || getline(".") =~ "{\\d" || getline(".") =~ "{{{"'
cursor(1, 1)
lnum = search(')\s*{', '', 0, 0, skip)
assert_equal(0, lnum, fname .. ': curly after closing paren')
cursor(1, 1)
# Examples in comments use double quotes.
skip = "getline('.') =~ '\"'"
# Avoid examples that contain: "} else
lnum = search('[^"]}\s*else', '', 0, 0, skip)
assert_equal(0, lnum, fname .. ': curly before "else"')
cursor(1, 1)
lnum = search('else\s*{', '', 0, 0, skip)
assert_equal(0, lnum, fname .. ': curly after "else"')
endfor
bwipe!
enddef
def Test_test_files()
for fname in glob('*.vim', 0, 1)
exe 'edit ' .. fname
# some files intentionally have misplaced white space
if fname =~ 'test_cindent.vim' || fname =~ 'test_join.vim'
continue
endif
# skip files that are known to have a space before a tab
if fname !~ 'test_comments.vim'
&& fname !~ 'test_listchars.vim'
&& fname !~ 'test_visual.vim'
cursor(1, 1)
var lnum = search(fname =~ "test_regexp_latin" ? '[^á] \t' : ' \t')
assert_equal(0, lnum, 'testdir/' .. fname .. ': space before tab')
endif
# skip files that are known to have trailing white space
if fname !~ 'test_cmdline.vim'
&& fname !~ 'test_let.vim'
&& fname !~ 'test_tagjump.vim'
&& fname !~ 'test_vim9_cmd.vim'
cursor(1, 1)
var lnum = search(
fname =~ 'test_vim9_assign.vim' ? '[^=]\s$'
: fname =~ 'test_vim9_class.vim' ? '[^)]\s$'
: fname =~ 'test_vim9_script.vim' ? '[^,:3]\s$'
: fname =~ 'test_visual.vim' ? '[^/]\s$'
: '[^\\]\s$')
assert_equal(0, lnum, 'testdir/' .. fname .. ': trailing white space')
endif
endfor
bwipe!
enddef
def Test_help_files()
var lnum: number
set nowrapscan
for fpath in glob('../../runtime/doc/*.txt', 0, 1)
exe 'edit ' .. fpath
var fname = fnamemodify(fpath, ":t")
# todo.txt is for developers, it's not need a strictly check
# version*.txt is a history and large size, so it's not checked
if fname == 'todo.txt' || fname =~ 'version.*\.txt'
continue
endif
# Check for mixed tabs and spaces
cursor(1, 1)
while 1
lnum = search('[^/] \t')
if fname == 'visual.txt' && getline(lnum) =~ "STRING \tjkl"
|| fname == 'usr_27.txt' && getline(lnum) =~ "\[^\? \t\]"
continue
endif
assert_equal(0, lnum, fpath .. ': space before tab')
if lnum == 0
break
endif
endwhile
# Check for unnecessary whitespace at the end of a line
cursor(1, 1)
while 1
lnum = search('[^/~\\]\s$')
# skip line that are known to have trailing white space
if fname == 'map.txt' && getline(lnum) =~ "unmap @@ $"
|| fname == 'usr_12.txt' && getline(lnum) =~ "^\t/ \t$"
|| fname == 'usr_41.txt' && getline(lnum) =~ "map <F4> o#include $"
|| fname == 'change.txt' && getline(lnum) =~ "foobar bla $"
continue
endif
assert_equal(0, lnum, fpath .. ': trailing white space')
if lnum == 0
break
endif
endwhile
# TODO: Do check and fix help files
# # Check over 80 columns
# cursor(1, 1)
# while 1
# lnum = search('\%>80v.*$')
# assert_equal(0, lnum, fpath .. ': line over 80 columns')
# if lnum == 0
# break
# endif
# endwhile
endfor
set wrapscan&vim
bwipe!
enddef
" vim: shiftwidth=2 sts=2 expandtab
|
