ꦫꦣꦺꦤ꧀ꦄꦤ꧀ꦠꦱꦺꦤ

PATH: usr / share / vim / vim74 / indent

" Vim indent file
" Language:	Zimbu
" Maintainer:	Bram Moolenaar <Bram@vim.org>
" Last Change:	2012 Sep 08

" Only load this indent file when no other was loaded.
if exists("b:did_indent")
   finish
endif
let b:did_indent = 1

setlocal ai nolisp nocin
setlocal indentexpr=GetZimbuIndent(v:lnum)
setlocal indentkeys=0{,0},!^F,o,O,0=ELSE,0=ELSEIF,0=CASE,0=DEFAULT,0=FINALLY

" We impose recommended defaults: no Tabs, 'shiftwidth' = 2
setlocal sw=2 et

let b:undo_indent = "setl et< sw< ai< indentkeys< indentexpr="

" Only define the function once.
if exists("*GetZimbuIndent")
  finish
endif

let s:cpo_save = &cpo
set cpo&vim

" Come here when loading the script the first time.

let s:maxoff = 50	" maximum number of lines to look backwards for ()

func GetZimbuIndent(lnum)
  let prevLnum = prevnonblank(a:lnum - 1)
  if prevLnum == 0
    " This is the first non-empty line, use zero indent.
    return 0
  endif

" Taken from Python indenting:
  " If the previous line is inside parenthesis, use the indent of the starting
  " line.
  " Trick: use the non-existing "dummy" variable to break out of the loop when
  " going too far back.
  call cursor(prevLnum, 1)
  let parlnum = searchpair('(\|{\|\[', '', ')\|}\|\]', 'nbW',
	  \ "line('.') < " . (prevLnum - s:maxoff) . " ? dummy :"
	  \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')"
	  \ . " =~ '\$Comment\\|String\\|Char\$$'")
  if parlnum > 0
    let plindent = indent(parlnum)
    let plnumstart = parlnum
  else
    let plindent = indent(prevLnum)
    let plnumstart = prevLnum
  endif

" When inside parenthesis: If at the first line below the parenthesis add
  " two 'shiftwidth', otherwise same as previous line.
  " i = (a
  "       + b
  "       + c)
  call cursor(a:lnum, 1)
  let p = searchpair('(\|{\|\[', '', ')\|}\|\]', 'bW',
	  \ "line('.') < " . (a:lnum - s:maxoff) . " ? dummy :"
	  \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')"
	  \ . " =~ '\$Comment\\|String\\|Char\$$'")
  if p > 0
    if p == prevLnum
      " When the start is inside parenthesis, only indent one 'shiftwidth'.
      let pp = searchpair('(\|{\|\[', '', ')\|}\|\]', 'bW',
	  \ "line('.') < " . (a:lnum - s:maxoff) . " ? dummy :"
	  \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')"
	  \ . " =~ '\$Comment\\|String\\|Char\$$'")
      if pp > 0
	return indent(prevLnum) + &sw
      endif
      return indent(prevLnum) + &sw * 2
    endif
    if plnumstart == p
      return indent(prevLnum)
    endif
    return plindent
  endif

let prevline = getline(prevLnum)
  let thisline = getline(a:lnum)

" If this line is not a comment and the previous one is then move the
  " previous line further back.
  if thisline !~ '^\s*#'
    while prevline =~ '^\s*#'
      let prevLnum = prevnonblank(prevLnum - 1)
      if prevLnum == 0
	" Only comment lines before this, no indent
	return 0
      endif
      let prevline = getline(prevLnum)
      let plindent = indent(prevLnum)
    endwhile
  endif

if prevline =~ '^\s*$IF\|\|ELSEIF\|ELSE\|GENERATE_IF\|\|GENERATE_ELSEIF\|GENERATE_ELSE\|WHILE\|REPEAT\|TRY\|CATCH\|FINALLY\|FOR\|DO\|SWITCH\|CASE\|DEFAULT\|FUNC\|VIRTUAL\|ABSTRACT\|DEFINE\|REPLACE\|FINAL\|PROC\|MAIN\|NEW\|ENUM\|CLASS\|INTERFACE\|BITS\|MODULE\|SHARED$\>'
    let plindent += &sw
  endif
  if thisline =~ '^\s*$}\|ELSEIF\>\|ELSE\>\|CATCH\|FINALLY\|GENERATE_ELSEIF\>\|GENERATE_ELSE\>\|UNTIL\>$'
    let plindent -= &sw
  endif
  if thisline =~ '^\s*$CASE\>\|DEFAULT\>$' && prevline !~ '^\s*SWITCH\>'
    let plindent -= &sw
  endif

" line up continued comment that started after some code
  "   String something   # comment comment
  "                      # comment
  if a:lnum == prevLnum + 1 && thisline =~ '^\s*#' && prevline !~ '^\s*#'
    let n = match(prevline, '#')
    if n > 1
      let plindent = n
    endif
  endif

return plindent
endfunc

let &cpo = s:cpo_save
unlet s:cpo_save

[-] rpl.vim [edit]
[-] zimbu.vim [edit]
[-] bib.vim [edit]
[-] c.vim [edit]
[-] make.vim [edit]
[-] sml.vim [edit]
[-] logtalk.vim [edit]
[-] postscr.vim [edit]
[-] eruby.vim [edit]
[-] ada.vim [edit]
[-] r.vim [edit]
[-] sql.vim [edit]
[-] liquid.vim [edit]
[-] xsd.vim [edit]
[-] tex.vim [edit]
[-] aap.vim [edit]
[-] matlab.vim [edit]
[-] mma.vim [edit]
[-] ishd.vim [edit]
[+] ..
[-] cs.vim [edit]
[-] dtd.vim [edit]
[-] python.vim [edit]
[-] changelog.vim [edit]
[-] treetop.vim [edit]
[-] tcsh.vim [edit]
[-] xhtml.vim [edit]
[-] sqlanywhere.vim [edit]
[-] perl6.vim [edit]
[-] idlang.vim [edit]
[-] cucumber.vim [edit]
[-] hamster.vim [edit]
[-] verilog.vim [edit]
[-] java.vim [edit]
[-] pov.vim [edit]
[-] cuda.vim [edit]
[-] README.txt [edit]
[-] d.vim [edit]
[-] tf.vim [edit]
[-] gitconfig.vim [edit]
[-] scss.vim [edit]
[-] cmake.vim [edit]
[-] tcl.vim [edit]
[-] yaml.vim [edit]
[-] zsh.vim [edit]
[-] pascal.vim [edit]
[-] objc.vim [edit]
[-] pyrex.vim [edit]
[-] occam.vim [edit]
[-] automake.vim [edit]
[-] xml.vim [edit]
[-] fortran.vim [edit]
[-] xslt.vim [edit]
[-] eiffel.vim [edit]
[-] yacc.vim [edit]
[-] ch.vim [edit]
[-] htmldjango.vim [edit]
[-] lifelines.vim [edit]
[-] ant.vim [edit]
[-] erlang.vim [edit]
[-] vim.vim [edit]
[-] vb.vim [edit]
[-] tilde.vim [edit]
[-] mp.vim [edit]
[-] vhdl.vim [edit]
[-] ocaml.vim [edit]
[-] css.vim [edit]
[-] lua.vim [edit]
[-] chaiscript.vim [edit]
[-] perl.vim [edit]
[-] eterm.vim [edit]
[-] haml.vim [edit]
[-] falcon.vim [edit]
[-] awk.vim [edit]
[-] dictconf.vim [edit]
[-] scheme.vim [edit]
[-] dictdconf.vim [edit]
[-] docbk.vim [edit]
[-] xinetd.vim [edit]
[-] framescript.vim [edit]
[-] rst.vim [edit]
[-] dtrace.vim [edit]
[-] ruby.vim [edit]
[-] javascript.vim [edit]
[-] dylan.vim [edit]
[-] ld.vim [edit]
[-] php.vim [edit]
[-] xf86conf.vim [edit]
[-] sass.vim [edit]
[-] sdl.vim [edit]
[-] gitolite.vim [edit]
[-] prolog.vim [edit]
[-] html.vim [edit]
[-] bst.vim [edit]
[-] config.vim [edit]
[-] cdl.vim [edit]
[-] lisp.vim [edit]
[-] mail.vim [edit]
[-] cpp.vim [edit]
[-] cobol.vim [edit]
[-] clojure.vim [edit]
[-] jsp.vim [edit]
[-] sh.vim [edit]
[-] readline.vim [edit]