xref: /vim-8.2.3635/runtime/indent/vim.vim (revision cb03397a)
1" Vim indent file
2" Language:	Vim script
3" Maintainer:	Bram Moolenaar <[email protected]>
4" Last Change:	2016 Jun 27
5
6" Only load this indent file when no other was loaded.
7if exists("b:did_indent")
8  finish
9endif
10let b:did_indent = 1
11
12setlocal indentexpr=GetVimIndent()
13setlocal indentkeys+==end,=else,=cat,=fina,=END,0\\
14
15let b:undo_indent = "setl indentkeys< indentexpr<"
16
17" Only define the function once.
18if exists("*GetVimIndent")
19  finish
20endif
21let s:keepcpo= &cpo
22set cpo&vim
23
24function GetVimIndent()
25  let ignorecase_save = &ignorecase
26  try
27    let &ignorecase = 0
28    return GetVimIndentIntern()
29  finally
30    let &ignorecase = ignorecase_save
31  endtry
32endfunc
33
34function GetVimIndentIntern()
35  " Find a non-blank line above the current line.
36  let lnum = prevnonblank(v:lnum - 1)
37
38  " If the current line doesn't start with '\' and below a line that starts
39  " with '\', use the indent of the line above it.
40  let cur_text = getline(v:lnum)
41  if cur_text !~ '^\s*\\'
42    while lnum > 0 && getline(lnum) =~ '^\s*\\'
43      let lnum = lnum - 1
44    endwhile
45  endif
46
47  " At the start of the file use zero indent.
48  if lnum == 0
49    return 0
50  endif
51  let prev_text = getline(lnum)
52
53  " Add a 'shiftwidth' after :if, :while, :try, :catch, :finally, :function
54  " and :else.  Add it three times for a line that starts with '\' after
55  " a line that doesn't (or g:vim_indent_cont if it exists).
56  let ind = indent(lnum)
57  if cur_text =~ '^\s*\\' && v:lnum > 1 && prev_text !~ '^\s*\\'
58    if exists("g:vim_indent_cont")
59      let ind = ind + g:vim_indent_cont
60    else
61      let ind = ind + shiftwidth() * 3
62    endif
63  elseif prev_text =~ '^\s*aug\%[roup]\s\+' && prev_text !~ '^\s*aug\%[roup]\s\+[eE][nN][dD]\>'
64    let ind = ind + shiftwidth()
65  else
66    " A line starting with :au does not increment/decrement indent.
67    if prev_text !~ '^\s*au\%[tocmd]'
68      let i = match(prev_text, '\(^\||\)\s*\(if\|wh\%[ile]\|for\|try\|cat\%[ch]\|fina\%[lly]\|fu\%[nction]\|el\%[seif]\)\>')
69      if i >= 0
70	let ind += shiftwidth()
71	if strpart(prev_text, i, 1) == '|' && has('syntax_items')
72	      \ && synIDattr(synID(lnum, i, 1), "name") =~ '\(Comment\|String\)$'
73	  let ind -= shiftwidth()
74	endif
75      endif
76    endif
77  endif
78
79  " If the previous line contains an "end" after a pipe, but not in an ":au"
80  " command.  And not when there is a backslash before the pipe.
81  " And when syntax HL is enabled avoid a match inside a string.
82  let i = match(prev_text, '[^\\]|\s*\(ene\@!\)')
83  if i > 0 && prev_text !~ '^\s*au\%[tocmd]'
84    if !has('syntax_items') || synIDattr(synID(lnum, i + 2, 1), "name") !~ '\(Comment\|String\)$'
85      let ind = ind - shiftwidth()
86    endif
87  endif
88
89
90  " Subtract a 'shiftwidth' on a :endif, :endwhile, :catch, :finally, :endtry,
91  " :endfun, :else and :augroup END.
92  if cur_text =~ '^\s*\(ene\@!\|cat\|fina\|el\|aug\%[roup]\s\+[eE][nN][dD]\)'
93    let ind = ind - shiftwidth()
94  endif
95
96  return ind
97endfunction
98
99let &cpo = s:keepcpo
100unlet s:keepcpo
101
102" vim:sw=2
103