adding new stuff

plugins/bundle/xptemplate/autoload/xpt/flt.vim

@@ -0,0 +1,88 @@
+exec xpt#once#init
+let s:oldcpo = &cpo
+set cpo-=< cpo+=B
+let s:log = xpt#debug#Logger( 'warn' )
+let s:log = xpt#debug#Logger( 'debug' )
+let g:EmptyFilter = {}
+let s:proto = { 'force':0, }
+fun! xpt#flt#New(nIndent,text,...)
+	let flt = deepcopy(s:proto)
+	call extend(flt,{ 'nIndent':a:nIndent, 'text':a:text, 'force':a:0 == 1 && a:1, }, 'force' )
+	return flt
+endfunction
+fun! xpt#flt#NewSimple(nIndent,text,...)
+	let flt = { 'nIndent' : a:nIndent, 'text' : a:text, }
+	if a:0 == 1 && a:1
+		let flt.force = 1
+	endif
+	return flt
+endfunction
+fun! xpt#flt#Extend(flt)
+	call extend( a:flt, s:proto, 'keep' )
+endfunction
+fun! xpt#flt#Simplify(flt)
+	call filter( a:flt, 'v:val!=get(s:proto,v:key,-987654)' )
+endfunction
+fun! xpt#flt#Eval(snip,flt,closures)
+	let snipptn = a:snip.ptn
+	let r = { 'rc' : 1, 'parseIndent' : 1, 'nav' : 'stay' }
+	let rst = xpt#eval#Eval(a:flt.text,a:closures)
+	if type(rst) == type(0)
+		let r.rc = 0
+		return r
+	endif
+	if type( rst ) == type( '' )
+		if rst =~ snipptn.lft
+			let r.action = 'build'
+		else
+			let r.action = 'text'
+		endif
+		let r.text = rst
+		return r
+	endif
+	if type(rst) == type([])
+		let r.action = 'pum'
+		let r.pum = rst
+		return r
+	endif
+	call extend( r, rst, 'force' )
+	if ! has_key( r, 'action' ) && has_key( r, 'text' )
+		if r.text =~ snipptn.lft
+			let r.action = 'build'
+		else
+			let r.action = 'text'
+		endif
+	endif
+	let r.action = get( r, 'action', '' )
+	if r.action ==# 'embed'
+		let r.action = 'build'
+	endif
+	if has_key( r, 'cursor' )
+		call xpt#flt#ParseCursorSpec(r)
+	endif
+	return r
+endfunction
+fun! xpt#flt#ParseCursorSpec(flt_rst)
+	let rst = a:flt_rst
+	if type(rst.cursor) == type([]) && type( rst.cursor[ 0 ] ) == type( '' )
+		let rst.cursor = { 'rel' : 1, 'where':rst.cursor[ 0 ], 'offset':get( rst.cursor, 1, [ 0, 0 ] ) }
+	endif
+	let rst.isCursorRel = type(rst.cursor) == type({})
+endfunction
+fun! s:AddIndentToPHs(flt)
+	if a:flt.rst.nIndent == 0
+		return
+	endif
+	let nIndent = a:flt.rst.nIndent
+	let rst = []
+	for ph in a:flt.rst.phs
+		if type( ph ) == type( '' )
+			call add(rst,xpt#util#AddIndent(ph,nIndent))
+		else
+			call add(rst,ph)
+		endif
+		unlet ph
+	endfor
+	let a:flt.rst.phs = rst
+endfunction
+let &cpo = s:oldcpo