Gecko [ sachasauda.akalacademy.ac.in ]

Name	Size	Permission
README.txt	1.6 KB	-rw-r--r--
aap.vim	265 B	-rw-r--r--
ada.vim	10.89 KB	-rw-r--r--
ant.vim	290 B	-rw-r--r--
automake.vim	231 B	-rw-r--r--
awk.vim	7.57 KB	-rw-r--r--
bib.vim	346 B	-rw-r--r--
bst.vim	1.87 KB	-rw-r--r--
c.vim	325 B	-rw-r--r--
cdl.vim	4.07 KB	-rw-r--r--
ch.vim	470 B	-rw-r--r--
chaiscript.vim	1.11 KB	-rw-r--r--
changelog.vim	264 B	-rw-r--r--
clojure.vim	11.85 KB	-rw-r--r--
cmake.vim	2.69 KB	-rw-r--r--
cobol.vim	8 KB	-rw-r--r--
config.vim	2.12 KB	-rw-r--r--
cpp.vim	329 B	-rw-r--r--
cs.vim	327 B	-rw-r--r--
css.vim	1.68 KB	-rw-r--r--
cucumber.vim	2.56 KB	-rw-r--r--
cuda.vim	305 B	-rw-r--r--
d.vim	510 B	-rw-r--r--
dictconf.vim	325 B	-rw-r--r--
dictdconf.vim	326 B	-rw-r--r--
docbk.vim	324 B	-rw-r--r--
dtd.vim	11.39 KB	-rw-r--r--
dtrace.vim	451 B	-rw-r--r--
dylan.vim	2.6 KB	-rw-r--r--
eiffel.vim	3.13 KB	-rw-r--r--
erlang.vim	45.15 KB	-rw-r--r--
eruby.vim	2.11 KB	-rw-r--r--
eterm.vim	638 B	-rw-r--r--
falcon.vim	13.65 KB	-rw-r--r--
fortran.vim	6.41 KB	-rw-r--r--
framescript.vim	786 B	-rw-r--r--
gitconfig.vim	817 B	-rw-r--r--
gitolite.vim	996 B	-rw-r--r--
haml.vim	2.14 KB	-rw-r--r--
hamster.vim	1.37 KB	-rw-r--r--
html.vim	14.46 KB	-rw-r--r--
htmldjango.vim	273 B	-rw-r--r--
idlang.vim	1.53 KB	-rw-r--r--
ishd.vim	1.8 KB	-rw-r--r--
java.vim	4.02 KB	-rw-r--r--
javascript.vim	336 B	-rw-r--r--
jsp.vim	462 B	-rw-r--r--
ld.vim	1.71 KB	-rw-r--r--
lifelines.vim	637 B	-rw-r--r--
liquid.vim	1.83 KB	-rw-r--r--
lisp.vim	353 B	-rw-r--r--
logtalk.vim	1.65 KB	-rw-r--r--
lua.vim	1.87 KB	-rw-r--r--
mail.vim	308 B	-rw-r--r--
make.vim	3.35 KB	-rw-r--r--
matlab.vim	1.88 KB	-rw-r--r--
mma.vim	2.17 KB	-rw-r--r--
mp.vim	6.37 KB	-rw-r--r--
objc.vim	1.61 KB	-rw-r--r--
ocaml.vim	8.9 KB	-rw-r--r--
occam.vim	4.53 KB	-rw-r--r--
pascal.vim	5.52 KB	-rw-r--r--
perl.vim	5.67 KB	-rw-r--r--
perl6.vim	3.42 KB	-rw-r--r--
php.vim	18.97 KB	-rw-r--r--
postscr.vim	1.58 KB	-rw-r--r--
pov.vim	2.58 KB	-rw-r--r--
prolog.vim	1.42 KB	-rw-r--r--
pyrex.vim	326 B	-rw-r--r--
python.vim	5.61 KB	-rw-r--r--
r.vim	14.44 KB	-rw-r--r--
readline.vim	681 B	-rw-r--r--
rpl.vim	1.79 KB	-rw-r--r--
rst.vim	1.35 KB	-rw-r--r--
ruby.vim	17.13 KB	-rw-r--r--
sass.vim	1018 B	-rw-r--r--
scheme.vim	241 B	-rw-r--r--
scss.vim	191 B	-rw-r--r--
sdl.vim	2.7 KB	-rw-r--r--
sh.vim	3.95 KB	-rw-r--r--
sml.vim	6.27 KB	-rw-r--r--
sql.vim	1.18 KB	-rw-r--r--
sqlanywhere.vim	12.77 KB	-rw-r--r--
tcl.vim	1.56 KB	-rw-r--r--
tcsh.vim	1.21 KB	-rw-r--r--
tex.vim	9.47 KB	-rw-r--r--
tf.vim	1.46 KB	-rw-r--r--
tilde.vim	994 B	-rw-r--r--
treetop.vim	677 B	-rw-r--r--
vb.vim	2 KB	-rw-r--r--
verilog.vim	7.44 KB	-rw-r--r--
vhdl.vim	13.48 KB	-rw-r--r--
vim.vim	2.76 KB	-rw-r--r--
xf86conf.vim	679 B	-rw-r--r--
xhtml.vim	269 B	-rw-r--r--
xinetd.vim	1.17 KB	-rw-r--r--
xml.vim	2.77 KB	-rw-r--r--
xsd.vim	253 B	-rw-r--r--
xslt.vim	297 B	-rw-r--r--
yacc.vim	769 B	-rw-r--r--
yaml.vim	4.02 KB	-rw-r--r--
zimbu.vim	3.8 KB	-rw-r--r--
zsh.vim	231 B	-rw-r--r--

Code Editor : mp.vim

" MetaPost indent file
" Language:	MetaPost
" Maintainer:	Eugene Minkovskii <emin@mccme.ru>
" Last Change:	2012 May 18
" Version: 0.1
" ==========================================================================

" Identation Rules: {{{1
" First of all, MetaPost language don't expect any identation rules.
" This screept need for you only if you (not MetaPost) need to do
" exactly code. If you don't need to use indentation, see
" :help filetype-indent-off
"
" Note: Every rules of identation in MetaPost or TeX languages (and in some
" other of course) is very subjective. I can release only my vision of this
" promlem.
"
" ..........................................................................
" Example of correct (by me) identation {{{2
" shiftwidth=4
" ==========================================================================
" for i=0 upto 99:
"     z[i] = (0,1u) rotated (i*360/100);
" endfor
" draw z0 -- z10 -- z20
"         withpen ...     % <- 2sw because breaked line
"         withcolor ...;  % <- same as previous
" draw z0 for i=1 upto 99:
"             -- z[i]             % <- 1sw from left end of 'for' satement
"         endfor withpen ...      % <- 0sw from left end of 'for' satement
"                 withcolor ...;  % <- 2sw because breaked line
" draw if One:     % <- This is internal if (like 'for' above)
"          one
"      elsif Other:
"          other
"      fi withpen ...;
" if one:          % <- This is external if
"     draw one;
" elseif other:
"     draw other;
" fi
" draw z0; draw z1;
" }}}
" }}}

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

setlocal indentexpr=GetMetaPostIndent()
setlocal indentkeys+=;,<:>,=if,=for,=def,=end,=else,=fi

" Only define the function once.
if exists("*GetMetaPostIndent")
  finish
endif
let s:keepcpo= &cpo
set cpo&vim

" Auxiliary Definitions: {{{1
function! MetaNextNonblankNoncomment(pos)
  " Like nextnonblank() but ignore comment lines
  let tmp = nextnonblank(a:pos)
  while tmp && getline(tmp) =~ '^\s*%'
    let tmp = nextnonblank(tmp+1)
  endwhile
  return tmp
endfunction

function! MetaPrevNonblankNoncomment(pos)
  " Like prevnonblank() but ignore comment lines
  let tmp = prevnonblank(a:pos)
  while tmp && getline(tmp) =~ '^\s*%'
    let tmp = prevnonblank(tmp-1)
  endwhile
  return tmp
endfunction

function! MetaSearchNoncomment(pattern, ...)
  " Like search() but ignore commented areas
  if a:0
    let flags = a:1
  elseif &wrapscan
    let flags = "w"
  else
    let flags = "W"
  endif
  let cl  = line(".")
  let cc  = col(".")
  let tmp = search(a:pattern, flags)
  while tmp && synIDattr(synID(line("."), col("."), 1), "name") =~
        \ 'm[fp]$Comment\|TeXinsert\|String$'
    let tmp = search(a:pattern, flags)
  endwhile
  if !tmp
    call cursor(cl,cc)
  endif
  return tmp
endfunction
" }}}

function! GetMetaPostIndent()
  " not indent in comment ???
  if synIDattr(synID(line("."), col("."), 1), "name") =~
        \ 'm[fp]$Comment\|TeXinsert\|String$'
    return -1
  endif
  " Some RegExps: {{{1
  " end_of_item: all of end by ';'
  "            + all of end by :endfor, :enddef, :endfig, :endgroup, :fi
  "            + all of start by :beginfig(num), :begingroup
  "            + all of start by :for, :if, :else, :elseif and end by ':'
  "            + all of start by :def, :vardef             and end by '='
  let end_of_item = '$'                              .
        \ ';\|'                                       .
        \ '\<\(end\(for\|def\|fig\|group$\|fi\)\>\|' .
        \ '\<begin$group\>\|fig\s*(\s*\d\+\s*)$\|'  .
        \ '\<$for\|if\|else\(if$\=\)\>.\+:\|'       .
        \ '\<$var$\=def\>.\+='                      . '\)'
  " }}}
  " Save: current position {{{1
  let cl = line   (".")
  let cc = col    (".")
  let cs = getline(".")
  " if it is :beginfig or :endfig use zero indent
  if  cs =~ '^\s*$begin\|end$fig\>'
    return 0
  endif
  " }}}
  " Initialise: ind variable {{{1
  " search previous item not in current line
  let p_semicol_l = MetaSearchNoncomment(end_of_item,"bW")
  while p_semicol_l == cl
    let p_semicol_l = MetaSearchNoncomment(end_of_item,"bW")
  endwhile
  " if this is first item in program use zero indent
  if !p_semicol_l
    return 0
  endif
  " if this is multiline item, remember first indent
  if MetaNextNonblankNoncomment(p_semicol_l+1) < cl
    let ind = indent(MetaNextNonblankNoncomment(p_semicol_l+1))
  " else --- search pre-previous item for search first line in previous item
  else
    " search pre-previous item not in current line
    let pp_semicol_l = MetaSearchNoncomment(end_of_item,"bW")
    while pp_semicol_l == p_semicol_l
      let pp_semicol_l = MetaSearchNoncomment(end_of_item,"bW")
    endwhile
    " if we find pre-previous item, remember indent of previous item
    " else --- remember zero
    if pp_semicol_l
      let ind = indent(MetaNextNonblankNoncomment(line(".")+1))
    else
      let ind = 0
    endif
  endif
  " }}}
  " Increase Indent: {{{1
  " if it is an internal/external :for or :if statements {{{2
  let pnn_s = getline(MetaPrevNonblankNoncomment(cl-1))
  if  pnn_s =~ '\<$for\|if$\>.\+:\s*$$\|%$'
    let ind = match(pnn_s, '\<$for\|if$\>.\+:\s*$$\|%$') + &sw
  " }}}
  " if it is a :def, :vardef, :beginfig, :begingroup, :else, :elseif {{{2
  elseif pnn_s =~ '^\s*$'                       .
        \ '\(var$\=def\|'                       .
        \ 'begin$group\|fig\s*(\s*\d\+\s*)$\|' .
        \ 'else$if$\='                         . '\)\>'
    let ind = ind + &sw
  " }}}
  " if it is a broken line {{{2
  elseif pnn_s !~ end_of_item.'\s*$$\|%$'
    let ind = ind + (2 * &sw)
  endif
  " }}}
  " }}}
  " Decrease Indent: {{{1
  " if this is :endfor or :enddef statements {{{2
  " this is correct because :def cannot be inside :for
  if  cs  =~ '\<end$for\|def$\=\>'
    call MetaSearchNoncomment('\<for\>.\+:\s*$$\|%$' . '\|' .
                            \ '^\s*$var$\=def\>',"bW")
    if col(".") > 1
      let ind = col(".") - 1
    else
      let ind = indent(".")
    endif
  " }}}
  " if this is :fi, :else, :elseif statements {{{2
  elseif cs =~ '\<$else\(if$\=\|fi\)\>'
    call MetaSearchNoncomment('\<if\>.\+:\s*$$\|%$',"bW")
    let ind = col(".") - 1
  " }}}
  " if this is :endgroup statement {{{2
  elseif cs =~ '^\s*endgroup\>'
    let ind = ind - &sw
  endif
  " }}}
  " }}}

return ind
endfunction
"

let &cpo = s:keepcpo
unlet s:keepcpo

" vim:sw=2:fdm=marker

${this.title}

Code Editor : mp.vim