diff options
Diffstat (limited to '')
| -rw-r--r-- | indent/nim.vim | 146 | 
1 files changed, 146 insertions, 0 deletions
| diff --git a/indent/nim.vim b/indent/nim.vim new file mode 100644 index 00000000..a0eae567 --- /dev/null +++ b/indent/nim.vim @@ -0,0 +1,146 @@ +if !exists('g:polyglot_disabled') || index(g:polyglot_disabled, 'nim') == -1 +   +" Only load this indent file when no other was loaded. +if exists("b:did_indent") +  finish +endif +let b:did_indent = 1 + +" Some preliminary settings +setlocal nolisp         " Make sure lisp indenting doesn't supersede us +setlocal autoindent     " indentexpr isn't much help otherwise + +setlocal indentexpr=GetNimIndent(v:lnum) +setlocal indentkeys=!^F,o,O,<:>,0),0],0},=elif + +" Only define the function once. +if exists("*GetNimIndent") +  finish +endif + +function! s:FindStartLine(fromln, pattern) +  let lnum = a:fromln +  let safechoice = indent(lnum) +  while getline(lnum) !~ a:pattern +    if indent(lnum) == 0 || lnum == 1 +      return safechoice +    endif +    let lnum = lnum - 1 +  endwhile +  return indent(lnum) +endfunction + +function! GetNimIndent(lnum) +  " Search backwards for the previous non-empty line. +  let plnum = prevnonblank(a:lnum - 1) + +  if plnum == 0 +    " This is the first non-empty line, use zero indent. +    return 0 +  endif + +  " If the start of the line is in a string don't change the indent. +  if has('syntax_items') && synIDattr(synID(a:lnum, 1, 1), "name") =~ "String$" +    return -1 +  endif + +  let pline = getline(plnum) +  let cline = getline(a:lnum) +  let pline_len = strlen(pline) +  let plindent = indent(plnum) +  let clindent = indent(a:lnum) + +  " Remove any trailing comment from previous line. +  " Use syntax highlighting attributes when possible. +  if has('syntax_items') +    " If the last character in the line is a comment, do a binary search for +    " the start of the comment.  synID() is slow, a linear search would take +    " too long on a long line. +    if synIDattr(synID(plnum, pline_len, 1), "name") =~ "Comment$" +      let min = 1 +      let max = pline_len +      while min < max +        let col = (min + max) / 2 +        if synIDattr(synID(plnum, col, 1), "name") =~ "Comment$" +          let max = col +        else +          let min = col + 1 +        endif +      endwhile +      let pline = strpart(pline, 0, min - 1) +    endif +  else +    let col = 0 +    while col < pline_len +      if pline[col] == '#' +        let pline = strpart(pline, 0, col) +        break +      endif +      let col = col + 1 +    endwhile +  endif + +  if cline =~ '^\s*\(if\|when\|for\|while\|case\|of\|try\)\>' +    " This is a benign line, do nothing +    return -1 +  endif + +  " If the current line begins with a keyword that lines up with "try" +  if cline =~ '^\s*\(except\|finally\)\>' +    let lnum = a:lnum - 1 +    while lnum >= 1 +      if getline(lnum) =~ '^\s*\(try\|except\)\>' +        let ind = indent(lnum) +        if ind >= clindent +          return -1     " indent is already less than this +        endif +        return ind      " line up with previous try or except +      endif +      let lnum = lnum - 1 +    endwhile +    return -1           " no matching "try"! +  endif + +  " If the current line begins with a header keyword, dedent +  if cline =~ '^\s*\(elif\|else\)\>' +    return s:FindStartLine(a:lnum, '^\s*\(if\|when\|elif\|of\)') +  endif + +  if pline =~ ':\s*$' +    "return s:FindStartLine(plnum, '(^\s*\(if\|when\|else\|elif\|case\|of\|try\|except\|finally\)\>)\|\<do\>') + &sw +    return s:FindStartLine(plnum, '^\s*\(if\|when\|else\|elif\|for\|while\|case\|of\|try\|except\|finally\)\>') + &sw +  endif + +  if pline =~ '=\s*$' +    return s:FindStartLine(plnum, '^\s*\(proc\|template\|macro\|iterator\)\>') + &sw +  endif + +  " if we got here, this should be the begging of a multi-line if expression for example +  if pline =~ '^\s*\(if\|when\|proc\|iterator\|macro\|template\|for\|while\)[^:]*$' +    return plindent + &sw +  endif + +  if pline =~ '\(type\|import\|const\|var\)\s*$' +    \ || pline =~ '=\s*\(object\|enum\|tuple\|generic\)' +    return plindent + &sw +  endif + +  " If the previous line was a stop-execution statement... +  if pline =~ '^\s*\(break\|continue\|raise\|return\)\>' +    " See if the user has already dedented +    if indent(a:lnum) > plindent - &sw +      " If not, recommend one dedent +      return plindent - &sw +    endif +    " Otherwise, trust the user +    return -1 +  endif + +  return -1 + +endfunction + +" vim:sw=2 + + +endif | 
