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\\,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 if cur_text =~ s:lineContPat && v:lnum > 1 && prev_text !~ s:lineContPat 60 if exists("g:vim_indent_cont") 61 let ind = ind + g:vim_indent_cont 62 else 63 let ind = ind + shiftwidth() * 3 64 endif 65 elseif prev_text =~ '^\s*aug\%[roup]\s\+' && prev_text !~ '^\s*aug\%[roup]\s\+[eE][nN][dD]\>' 66 let ind = ind + shiftwidth() 67 else 68 " A line starting with :au does not increment/decrement indent. 69 if prev_text !~ '^\s*au\%[tocmd]' 70 let i = match(prev_text, '\(^\||\)\s*\(if\|wh\%[ile]\|for\|try\|cat\%[ch]\|fina\%[lly]\|fu\%[nction]\|el\%[seif]\)\>') 71 if i >= 0 72 let ind += shiftwidth() 73 if strpart(prev_text, i, 1) == '|' && has('syntax_items') 74 \ && synIDattr(synID(lnum, i, 1), "name") =~ '\(Comment\|String\)$' 75 let ind -= shiftwidth() 76 endif 77 endif 78 endif 79 endif 80 81 " If the previous line contains an "end" after a pipe, but not in an ":au" 82 " command. And not when there is a backslash before the pipe. 83 " And when syntax HL is enabled avoid a match inside a string. 84 let i = match(prev_text, '[^\\]|\s*\(ene\@!\)') 85 if i > 0 && prev_text !~ '^\s*au\%[tocmd]' 86 if !has('syntax_items') || synIDattr(synID(lnum, i + 2, 1), "name") !~ '\(Comment\|String\)$' 87 let ind = ind - shiftwidth() 88 endif 89 endif 90 91 92 " Subtract a 'shiftwidth' on a :endif, :endwhile, :catch, :finally, :endtry, 93 " :endfun, :else and :augroup END. 94 if cur_text =~ '^\s*\(ene\@!\|cat\|fina\|el\|aug\%[roup]\s\+[eE][nN][dD]\)' 95 let ind = ind - shiftwidth() 96 endif 97 98 return ind 99endfunction 100 101let &cpo = s:keepcpo 102unlet s:keepcpo 103 104" vim:sw=2 105