12 setlocal indentexpr=GetBstIndent(v:lnum)
24 function! s:prevgood(lnum)  argument
27     let lnum = a:lnum
28     while lnum > 0
29         let lnum = prevnonblank(lnum - 1)
30         if getline(lnum) !~ '^\s*%.*$'
34     return lnum
37 function! s:strip(lnum)  argument
38     let line = getline(a:lnum)
50 function! GetBstIndent(lnum) abort  argument
51     if a:lnum == 1
54     let lnum = s:prevgood(a:lnum)
55     if lnum <= 0
56         return indent(a:lnum - 1)
58     let line = s:strip(lnum)
59     let cline = s:strip(a:lnum)
61         call cursor(a:lnum,indent(a:lnum))
71     let ind = indent(lnum)