adding new stuff

plugins/bundle/xptemplate/ftplugin/lua/lua.xpt.vim

@@ -0,0 +1,143 @@
+XPTemplate priority=lang
+
+let s:f = g:XPTfuncs()
+
+XPTvar $TRUE          1
+XPTvar $FALSE         0
+XPTvar $NULL          NULL
+XPTvar $UNDEFINED     NULL
+
+XPTvar $VOID_LINE  /* void */;
+XPTvar $CURSOR_PH      -- cursor
+
+XPTvar $BRif     \n
+XPTvar $BRloop    \n
+XPTvar $BRloop  \n
+XPTvar $BRstc \n
+XPTvar $BRfun   \n
+
+XPTvar $CS    --
+
+XPTinclude
+      \ _common/common
+      \ _comment/singleSign
+
+
+" ========================= Function and Variables =============================
+
+" Remove an item if its value hasn't change
+fun! s:f.RemoveIfUnchanged() "{{{
+  let v = self.V()
+  let [lft, rt] = self.ItemEdges()
+  if v == lft . self.N() . rt
+    return ''
+  else
+    return v
+  end
+endfunction "}}}
+
+" ================================= Snippets ===================================
+
+
+
+XPT do " do ... end
+do
+    `cursor^
+end
+
+
+XPT fn " function \(..) .. end
+XSET arg*|post=ExpandIfNotEmpty(', ', 'arg*')
+function (`arg*^) `cursor^ end
+
+
+XPT for " for ..=..,.. do ... end
+XSET step?|post=EchoIfNoChange('')
+for `var^ = `0^, `10^`, `step?^ do
+    `cursor^
+end
+
+
+XPT forin " for .. in .. do ... end
+XSET var*|post=ExpandIfNotEmpty(', ', 'var*')
+for `var*^ in `expr^ do
+    `cursor^
+end
+
+
+XPT forip " for ..,.. in ipairs\(..) do ... end
+for `key^, `value^ in ipairs(`table^) do
+    `cursor^
+end
+
+
+XPT forp " for ..,.. in pairs\(..) do ... end
+for `key^, `value^ in pairs(`table^) do
+    `cursor^
+end
+
+
+XPT fun " function ..\(..) .. end
+XSET arg*|post=ExpandIfNotEmpty(', ', 'arg*')
+function `name^(`arg*^)
+    `cursor^
+end
+
+
+XPT if " if .. then .. end
+if `cond^ then
+    `cursor^
+end
+
+
+XPT ife " if .. then .. else .. end
+XSET job=$CS job
+if `cond^ then
+    `job^
+else
+    `cursor^
+end
+
+
+XPT ifei " if .. then .. elseif .. else .. end
+XSET job=$CS job
+if `cond^ then`
+    `job^
+``elseif...`
+{{^elseif `comparison^ then
+    `job^
+``elseif...`
+^`}}^``else...`
+{{^else
+    `cursor^
+`}}^end
+
+
+XPT locf " local function ..\(..) ... end
+XSET arg*|post=ExpandIfNotEmpty(', ', 'arg*')
+local function `name^(`arg*^)
+    `cursor^
+end
+
+
+" !!! snippet ends with a space !!!
+XPT locv " local .. = ..
+local `var^ = 
+
+
+XPT p " print\(..)
+print(`cursor^)
+
+
+XPT repeat " repeat .. until ..
+repeat
+    `cursor^
+until
+
+
+XPT while " while .. do ... end
+while `cond^ do
+    `cursor^
+end
+
+