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