Module:For loop

Documentation for this module may be created atModule:For loop/doc

-- This module implements {{for loop}}.

localgetArgs=require('Module:Arguments').getArgs
localyesno=require('Module:Yesno')
localp={}

functionp.main(frame)
localargs=getArgs(frame,{
trim=false,
removeBlanks=false
})
returnp._main(args)
end

functionp._main(args)
localtemplate=args['call']or'void'
localcalltemplates=yesno(args.substallor"",true)ornotmw.isSubsting()
localvariableParam=args.pv
variableParam=tonumber(variableParam)orvariableParamor1-- fix for positional parameters
localvariableValPrefix=args.prefixor''
localvariableValPostfix=args.postfixor''
localsep=args[1]or''
localconstantArgs=p.getConstants(args)
localvariableVals=p.getVariableVals(args)

localresult=''
localaddSeparator=false;
for_,vinipairs(variableVals)do
v=mw.text.trim(v)
if#v>0ornotyesno(args.skipBlanks)then
ifaddSeparatorthen
result=result..sep
end
addSeparator=true;
localtargs=constantArgs
targs[variableParam]=variableValPrefix..v..variableValPostfix
ifcalltemplatesthen
localoutput=p.callTemplate(template,targs)
if#mw.text.trim(output)==0then
addSeparator=false
end
result=result..output
else
localmakeTemplate=require('Module:Template invocation').invocation
result=result..makeTemplate(template,targs)
end
end
end
returnresult
end

functionp.getConstants(args)
localconstantArgNums=p.getArgNums(args,'pc','n')
localconstantArgs={}
for_,numinipairs(constantArgNums)do
localkeyArg='pc'..tostring(num)..'n'
localvalArg='pc'..tostring(num)..'v'
localkey=args[keyArg]
key=tonumber(key)orkey
localvalue=args[valArg]
constantArgs[key]=value
end
returnconstantArgs
end

functionp.getVariableVals(args)
localvariableVals={}
ifargs.startorargs.stoporargs.bythen
ifargs[2]then
error("Both start/stop/by and numbered parameters specified")
end
localstart=tonumber(args.startor1)
localstop=tonumber(args.stopor1)
localby=tonumber(args.byor1)
fori=start,stop,bydo
variableVals[#variableVals+1]=i
end
else
fori,vinipairs(args)do
ifi~=1then
variableVals[i-1]=v
end
end
end
returnvariableVals
end

functionp.getArgNums(args,prefix,suffix)
-- Returns a table containing the numbers of the arguments that exist
-- for the specified prefix and suffix.
localnums={}
localpattern='^'..prefix..'([1-9]%d*)'..suffix..'$'
fork,_inpairs(args)do
localnum=tostring(k):match(pattern)
ifnumthen
nums[#nums+1]=tonumber(num)
end
end
table.sort(nums)
returnnums
end

functionp.callTemplate(template,targs)
returnmw.getCurrentFrame():expandTemplate{title=template,args=targs}
end

returnp