Module:Xpd

Documentation for this module may be created at Module:Xpd/doc

-- Expansion demo, like [[Template:Xpd]]

local p = {}
  
function p.f(frame,sep)
local r=''
local t={}
pframe = frame:getParent() 
for n,v in pframe:argumentPairs() do 
    if type(n)==number then t[n-1]=v else t[n]=v end end
local tplname
tplargs={}
tplargs[1]=''
for n,v in pairs(t) do 
  if n==1 then tplname=v else tplargs[n]=v end
end
table.remove (tplargs,1)
local w=''
w=w..'{{'..tplname
for n,v in pairs(tplargs) do w=w..'|'
    if type(n)~='number' then w=w..n..'=' end
    w=w..v end
w=w..'}}'
r=r..'<code>'..w..'</code> → '
r=r..sep..frame:preprocess (w)
return r
end
 
function p.s(frame)
local sep=''
return p.f(frame,sep)
end

function p.np(frame)
local sep='\n\n'
return p.f(frame,sep)
end

return p