|
7
|
1 " Vim indent file
|
|
|
2 " Language: Lua script
|
|
22
|
3 " Maintainer: Marcus Aurelius Farias <marcus.cf 'at' bol.com.br>
|
|
|
4 " First Author: Max Ischenko <mfi 'at' ukr.net>
|
|
1620
|
5 " Last Change: 2007 Jul 23
|
|
323
|
6
|
|
|
7 " Only load this indent file when no other was loaded.
|
|
|
8 if exists("b:did_indent")
|
|
|
9 finish
|
|
|
10 endif
|
|
|
11 let b:did_indent = 1
|
|
7
|
12
|
|
359
|
13 setlocal indentexpr=GetLuaIndent()
|
|
|
14
|
|
|
15 " To make Vim call GetLuaIndent() when it finds '\s*end' or '\s*until'
|
|
|
16 " on the current line ('else' is default and includes 'elseif').
|
|
|
17 setlocal indentkeys+=0=end,0=until
|
|
|
18
|
|
|
19 setlocal autoindent
|
|
|
20
|
|
7
|
21 " Only define the function once.
|
|
22
|
22 if exists("*GetLuaIndent")
|
|
|
23 finish
|
|
|
24 endif
|
|
7
|
25
|
|
|
26 function! GetLuaIndent()
|
|
|
27 " Find a non-blank line above the current line.
|
|
1620
|
28 let prevlnum = prevnonblank(v:lnum - 1)
|
|
7
|
29
|
|
|
30 " Hit the start of the file, use zero indent.
|
|
1620
|
31 if prevlnum == 0
|
|
7
|
32 return 0
|
|
|
33 endif
|
|
|
34
|
|
359
|
35 " Add a 'shiftwidth' after lines that start a block:
|
|
|
36 " 'function', 'if', 'for', 'while', 'repeat', 'else', 'elseif', '{'
|
|
1620
|
37 let ind = indent(prevlnum)
|
|
|
38 let prevline = getline(prevlnum)
|
|
|
39 let midx = match(prevline, '^\s*\%(if\>\|for\>\|while\>\|repeat\>\|else\>\|elseif\>\|do\>\|then\>\)')
|
|
|
40 if midx == -1
|
|
|
41 let midx = match(prevline, '{\s*$')
|
|
|
42 if midx == -1
|
|
|
43 let midx = match(prevline, '\<function\>\s*\%(\k\|[.:]\)\{-}\s*(')
|
|
|
44 endif
|
|
7
|
45 endif
|
|
|
46
|
|
1620
|
47 if midx != -1
|
|
|
48 " Add 'shiftwidth' if what we found previously is not in a comment and
|
|
|
49 " an "end" or "until" is not present on the same line.
|
|
|
50 if synIDattr(synID(prevlnum, midx + 1, 1), "name") != "luaComment" && prevline !~ '\<end\>\|\<until\>'
|
|
|
51 let ind = ind + &shiftwidth
|
|
|
52 endif
|
|
7
|
53 endif
|
|
|
54
|
|
|
55 " Subtract a 'shiftwidth' on end, else (and elseif), until and '}'
|
|
|
56 " This is the part that requires 'indentkeys'.
|
|
1620
|
57 let midx = match(getline(v:lnum), '^\s*\%(end\|else\|until\|}\)')
|
|
|
58 if midx != -1 && synIDattr(synID(v:lnum, midx + 1, 1), "name") != "luaComment"
|
|
22
|
59 let ind = ind - &shiftwidth
|
|
7
|
60 endif
|
|
|
61
|
|
|
62 return ind
|
|
|
63 endfunction
|
