Module:Ustring: Difference between revisions

Safer nicotine wiki Tobacco Harm Reduction
Jump to navigation Jump to search
m (1 revision imported)
(remove new 's<n>' args from "tagargs")
Line 7: Line 7:
end
end
return function(frame)
return function(frame)
local args = frame.args
local fargs = frame.args
for _, v in ipairs(args) do
local fargsused = { tag = true }
args[_] = tonumber(v) or v:gsub("^\\", "", 1)
local args = {}
local str_i = 1
while fargs['s' .. str_i] do
fargsused['s' .. str_i] = true
args[str_i] = fargs['s' .. str_i]
str_i = str_i + 1
end
end
if not args.tag then
for i, v in ipairs(fargs) do
return (what(unpack(args)))
fargsused[i] = true
args[i + str_i - 1] = tonumber(v) or v:gsub("^\\", "", 1)
end
if not fargs.tag then
return (what(unpack(args))) -- Outside parens truncate to first result avoiding tail call
end
end
local tagargs = {}
local tagargs = {}
for x, y in pairs(args) do
for x, y in pairs(fargs) do
if type(x) ~= 'number' and x ~= 'tag' then tagargs[x] = y end
if not fargsused[x] then tagargs[x] = y end
end
end
return frame:extensionTag{name = args.tag, content = what(unpack(args)), args = tagargs}
return frame:extensionTag{name = fargs.tag, content = what(unpack(args)), args = tagargs}
end
end
end
end
})
})

Revision as of 20:53, 11 November 2021

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

require('Module:No globals')
return setmetatable({}, {
	__index = function(t, k)
		local what = mw.ustring[k]
		if type(what) ~= "function" then
			return what
		end
		return function(frame)
			local fargs = frame.args
			local fargsused = { tag = true }
			local args = {}
			local str_i = 1
			while fargs['s' .. str_i] do
				fargsused['s' .. str_i] = true
				args[str_i] = fargs['s' .. str_i]
				str_i = str_i + 1
			end
			for i, v in ipairs(fargs) do
				fargsused[i] = true
				args[i + str_i - 1] = tonumber(v) or v:gsub("^\\", "", 1)
			end
			if not fargs.tag then
				return (what(unpack(args)))		-- Outside parens truncate to first result avoiding tail call
			end
			local tagargs = {}
			for x, y in pairs(fargs) do
				if not fargsused[x] then tagargs[x] = y end
			end
			return frame:extensionTag{name = fargs.tag, content = what(unpack(args)), args = tagargs}
		end
	end
})