" PostScript indent file" Language:    PostScript" Maintainer:  Mike Williams <mrw@netcomuk.co.uk>" Last Change: 2nd July 2001" " Only load this indent file when no other was loaded.if exists("b:did_indent")  finishendiflet b:did_indent = 1 setlocal indentexpr=PostscrIndentGet(v:lnum)setlocal indentkeys+=0],0=>>,0=%%,0=end,0=restore,0=grestore indentkeys-=:,0#,e " Catch multiple instantiationsif exists("*PostscrIndentGet")  finishendif function! PostscrIndentGet(lnum)  " Find a non-empty non-comment line above the current line.  " Note: ignores DSC comments as well!  let lnum = a:lnum - 1  while lnum != 0    let lnum = prevnonblank(lnum)    if getline(lnum) !~ '^\s*%.*$'      break    endif    let lnum = lnum - 1  endwhile   " Hit the start of the file, use user indent.  if lnum == 0    return -1  endif   " Start with the indent of the previous line  let ind = indent(lnum)  let pline = getline(lnum)   " Indent for dicts, arrays, and saves with possible trailing comment  if pline =~ '\(begin\|<<\|g\=save\|{\|[\)\s*\(%.*\)\=$'    let ind = ind + &sw  endif   " Remove indent for popped dicts, and restores.  if pline =~ '\(end\|g\=restore\)\s*$'    let ind = ind - &sw   " Else handle immediate dedents of dicts, restores, and arrays.  elseif getline(a:lnum) =~ '\(end\|>>\|g\=restore\|}\|]\)'    let ind = ind - &sw   " Else handle DSC comments - always start of line.  elseif getline(a:lnum) =~ '^\s*%%'    let ind = 0  endif   " For now catch excessive left indents if they occur.  if ind < 0    let ind = -1  endif   return indendfunction " vim:sw=2