You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
83 lines
1.7 KiB
83 lines
1.7 KiB
" Vim indent file |
|
" Language: EDC |
|
" Maintainer: Viktor Kojouharov |
|
" Latest Revision: 2007 02 24 |
|
|
|
if exists("b:did_indent") |
|
finish |
|
endif |
|
let b:did_indent = 1 |
|
|
|
setlocal indentexpr=GetEDCIndent() |
|
setlocal indentkeys=0{,0},!^F,o,O |
|
|
|
if exists("*GetEDCIndent") |
|
finish |
|
endif |
|
|
|
function s:prevnonblanknoncomment(lnum) |
|
let lnum = a:lnum |
|
while lnum > 1 |
|
let lnum = prevnonblank(lnum) |
|
let line = getline(lnum) |
|
if line =~ '\*/' |
|
while lnum > 1 && line !~ '/\*' |
|
let lnum -= 1 |
|
endwhile |
|
if line =~ '^\s*/\*' |
|
let lnum -= 1 |
|
else |
|
break |
|
endif |
|
elseif line =~ '^\s*//' |
|
let lnum -= 1 |
|
else |
|
break |
|
endif |
|
endwhile |
|
return lnum |
|
endfunction |
|
|
|
function s:count_braces(lnum, count_open) |
|
let n_open = 0 |
|
let n_close = 0 |
|
let line = getline(a:lnum) |
|
let pattern = '[{}]' |
|
let i = match(line, pattern) |
|
while i != -1 |
|
if synIDattr(synID(a:lnum, i + 1, 0), 'name') !~ 'c\%(CommentL\|Comment\|StringQ\{1,2}\)' |
|
if line[i] == '{' |
|
let n_open += 1 |
|
elseif line[i] == '}' |
|
if n_open > 0 |
|
let n_open -= 1 |
|
else |
|
let n_close += 1 |
|
endif |
|
endif |
|
endif |
|
let i = match(line, pattern, i + 1) |
|
endwhile |
|
return a:count_open ? n_open : n_close |
|
endfunction |
|
|
|
function GetEDCIndent() |
|
let line = getline(v:lnum) |
|
if line =~ '^\s*\*' || line =~ '^\s*//' || line =~ '^\s*}' |
|
return cindent(v:lnum) |
|
endif |
|
|
|
let pnum = s:prevnonblanknoncomment(v:lnum - 1) |
|
if pnum == 0 |
|
return 0 |
|
endif |
|
|
|
let ind = indent(pnum) + s:count_braces(pnum, 1) * &sw |
|
|
|
let pline = getline(pnum) |
|
if pline =~ '}\s*$' |
|
let ind -= (s:count_braces(pnum, 0) - (pline =~ '^\s*}' ? 1 : 0)) * &sw |
|
endif |
|
|
|
return ind |
|
endfunction
|
|
|