xref: /vim-8.2.3635/runtime/indent/vim.vim (revision 3b0ef8cf)
1" Vim indent file
2" Language:	Vim script
3" Maintainer:	Bram Moolenaar <[email protected]>
4" Last Change:	2019 Oct 31
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\\,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
34let s:lineContPat = '^\s*\(\\\|"\\ \)'
35
36function GetVimIndentIntern()
37  " Find a non-blank line above the current line.
38  let lnum = prevnonblank(v:lnum - 1)
39
40  " If the current line doesn't start with '\' or '"\ ' and below a line that
41  " starts with '\' or '"\ ', use the indent of the line above it.
42  let cur_text = getline(v:lnum)
43  if cur_text !~ s:lineContPat
44    while lnum > 0 && getline(lnum) =~ s:lineContPat
45      let lnum = lnum - 1
46    endwhile
47  endif
48
49  " At the start of the file use zero indent.
50  if lnum == 0
51    return 0
52  endif
53  let prev_text = getline(lnum)
54
55  " Add a 'shiftwidth' after :if, :while, :try, :catch, :finally, :function
56  " and :else.  Add it three times for a line that starts with '\' or '"\ '
57  " after a line that doesn't (or g:vim_indent_cont if it exists).
58  let ind = indent(lnum)
59
60  " In heredoc indenting works completely differently.
61  if has('syntax_items')
62    let syn_here = synIDattr(synID(v:lnum, 1, 1), "name")
63    if syn_here =~ 'vimLetHereDocStop'
64      " End of heredoc: use indent of matching start line
65      let lnum = v:lnum - 1
66      while lnum > 0
67	if synIDattr(synID(lnum, 1, 1), "name") !~ 'vimLetHereDoc'
68	  return indent(lnum)
69	endif
70	let lnum -= 1
71      endwhile
72      return 0
73    endif
74    if syn_here =~ 'vimLetHereDoc'
75      if synIDattr(synID(lnum, 1, 1), "name") !~ 'vimLetHereDoc'
76	" First line in heredoc: increase indent
77	return ind + shiftwidth()
78      endif
79      " Heredoc continues: no change in indent
80      return ind
81    endif
82  endif
83
84  if cur_text =~ s:lineContPat && v:lnum > 1 && prev_text !~ s:lineContPat
85    if exists("g:vim_indent_cont")
86      let ind = ind + g:vim_indent_cont
87    else
88      let ind = ind + shiftwidth() * 3
89    endif
90  elseif prev_text =~ '^\s*aug\%[roup]\s\+' && prev_text !~ '^\s*aug\%[roup]\s\+[eE][nN][dD]\>'
91    let ind = ind + shiftwidth()
92  else
93    " A line starting with :au does not increment/decrement indent.
94    if prev_text !~ '^\s*au\%[tocmd]'
95      let i = match(prev_text, '\(^\||\)\s*\({\|\(if\|wh\%[ile]\|for\|try\|cat\%[ch]\|fina\%[lly]\|fu\%[nction]\|def\|el\%[seif]\)\>\)')
96      if i >= 0
97	let ind += shiftwidth()
98	if strpart(prev_text, i, 1) == '|' && has('syntax_items')
99	      \ && synIDattr(synID(lnum, i, 1), "name") =~ '\(Comment\|String\)$'
100	  let ind -= shiftwidth()
101	endif
102      endif
103    endif
104  endif
105
106  " If the previous line contains an "end" after a pipe, but not in an ":au"
107  " command.  And not when there is a backslash before the pipe.
108  " And when syntax HL is enabled avoid a match inside a string.
109  let i = match(prev_text, '[^\\]|\s*\(ene\@!\)')
110  if i > 0 && prev_text !~ '^\s*au\%[tocmd]'
111    if !has('syntax_items') || synIDattr(synID(lnum, i + 2, 1), "name") !~ '\(Comment\|String\)$'
112      let ind = ind - shiftwidth()
113    endif
114  endif
115
116
117  " Subtract a 'shiftwidth' on a :endif, :endwhile, :catch, :finally, :endtry,
118  " :endfun, :enddef, :else and :augroup END.
119  if cur_text =~ '^\s*\(ene\@!\|}\|cat\|fina\|el\|aug\%[roup]\s\+[eE][nN][dD]\)'
120    let ind = ind - shiftwidth()
121  endif
122
123  return ind
124endfunction
125
126let &cpo = s:keepcpo
127unlet s:keepcpo
128
129" vim:sw=2
130