Module:Params - Revision history

imported>Grufo: The directives ‘with_pattern_isep’, ‘with_plain_isep’, ‘with_pattern_psep’ and ‘with_plain_psep’ have been renamed respectively to ‘splitter_pattern’, ‘splitter_string’, ‘setter_pattern’, and ‘setter_string’

2025-04-22T02:37:23Z

The directives ‘with_pattern_isep’, ‘with_plain_isep’, ‘with_pattern_psep’ and ‘with_plain_psep’ have been renamed respectively to ‘splitter_pattern’, ‘splitter_string’, ‘setter_pattern’, and ‘setter_string’

Show changes

imported>Grufo: The new modifier ‘providing’ has been added to the module

2024-10-01T18:56:19Z

The new modifier ‘providing’ has been added to the module

@@ Line 940: / Line 940: @@
 	local key = ctx.pipe[1]:match'^%s*(.-)%s*$'
 	ctx.params[tonumber(key) or key] = ctx.pipe[2]
 	return context_iterate(ctx, 3)
 end

imported>Grufo: Code structure, no changes

2024-10-01T09:24:58Z

Code structure, no changes

@@ Line 182: / Line 182: @@
 	--[[ Module's private environment ]]--
 	--------------------------------------
@@ Line 1,757: / Line 1,786: @@
 	--[[ First-position-only functions ]]--
 	---------------------------------------
@@ Line 1,769: / Line 1,797: @@
 	--[[ Public metatable of functions ]]--
 	---------------------------------------
@@ Line 1,780: / Line 1,807: @@
 		if library[fname] == nil then error(ctx.luaname ..
 			': The function ‘' .. fname .. '’ does not exist', 0) end
 		return function (frame)
 			ctx.frame = frame:getParent()
-			ctx.pipe = copy_or_ref_table(frame.args, refpipe[fname])
+			ctx.pipe = copy_or_ref_table(frame.args,
-			ctx.params = copy_or_ref_table(ctx.frame.args, refparams[fname])
+			ctx.params = copy_or_ref_table(ctx.frame.args,
 			main_loop(ctx, func)
 			return ctx.text

imported>Grufo: Comments only, no changes

2024-10-01T09:01:02Z

Comments only, no changes

← Older revision		Revision as of 09:01, 1 October 2024
Line 412:		Line 412:


	-- Map parameters' ~~values~~ using a custom callback and a referenced table		-- Map parameters' names using a custom callback and a referenced table
	local function map_names (tbl, rargs, karg, varg, looptype, fn)		local function map_names (tbl, rargs, karg, varg, looptype, fn)
	local cache = {}		local cache = {}

imported>Grufo: Performance only, no changes

2024-10-01T07:12:38Z

Performance only, no changes

← Older revision		Revision as of 07:12, 1 October 2024
Line 357:		Line 357:

	-- Map parameters' values using a custom callback and a referenced table		-- Map parameters' values using a custom callback and a referenced table
		⚫	local value_maps = {
⚫	local function ~~map_values~~ (tbl, ~~margs~~, karg, varg, looptype, fn)
			[0] = function (tbl, margs, karg, varg, fn)
	if looptype == 1 then
		⚫	for key in pairs(tbl) do tbl[key] = fn() end
		⚫	end,
			[1] = function (tbl, margs, karg, varg, fn)
	for key, val in pairs(tbl) do		for key, val in pairs(tbl) do
	margs[varg] = val		margs[varg] = val
	tbl[key] = fn()		tbl[key] = fn()
	end		end
		⚫	end,
	elseif looptype == 3 then
			[2] = function (tbl, margs, karg, varg, fn)
⚫	for key, val in pairs(tbl) do
		⚫	for key in pairs(tbl) do
	margs[karg] = key		margs[karg] = key
⚫	~~margs~~[varg] = val
	tbl[key] = fn()		tbl[key] = fn()
	end		end
			end,
	elseif looptype == 2 then
			[3] = function (tbl, margs, karg, varg, fn)
⚫	for key in pairs(tbl) do
		⚫	for key, val in pairs(tbl) do
	margs[karg] = key		margs[karg] = key
	~~tbl~~[~~key~~] = ~~fn()~~		margs[varg] = val
⚫	end
	elseif looptype == 0 then
⚫	for key in pairs(tbl) do
	tbl[key] = fn()		tbl[key] = fn()
	end		end
	end		end
			}
⚫	end


			-- Private table for `map_names()`
⚫	-- Map parameters' ~~names~~ using a custom callback and a referenced table
			local name_thieves_maps = {
	~~local~~ function ~~map_names~~ (tbl, rargs, karg, varg~~, looptype~~, fn)		[0] = function (cache, tbl, rargs, karg, varg, fn)
⚫	local ~~cache~~ = {}
	if looptype == 2 then
	for key, val in pairs(tbl) do		for key, val in pairs(tbl) do
⚫	rargs[karg] = key
	steal_if_renamed(val, tbl, key, cache, fn())		steal_if_renamed(val, tbl, key, cache, fn())
	end		end
			end,
	elseif looptype == 3 then
			[1] = function (cache, tbl, rargs, karg, varg, fn)
	for key, val in pairs(tbl) do		for key, val in pairs(tbl) do
	rargs[karg] = key
	rargs[varg] = val		rargs[varg] = val
	steal_if_renamed(val, tbl, key, cache, fn())		steal_if_renamed(val, tbl, key, cache, fn())
	end		end
			end,
	elseif looptype == 1 then
			[2] = function (cache, tbl, rargs, karg, varg, fn)
	for key, val in pairs(tbl) do		for key, val in pairs(tbl) do
	rargs[~~varg~~] = ~~val~~		rargs[karg] = key
	steal_if_renamed(val, tbl, key, cache, fn())		steal_if_renamed(val, tbl, key, cache, fn())
	end		end
			end,
	elseif looptype == 0 then
			[3] = function (cache, tbl, rargs, karg, varg, fn)
	for key, val in pairs(tbl) do		for key, val in pairs(tbl) do
		⚫	rargs[karg] = key
		⚫	rargs[varg] = val
	steal_if_renamed(val, tbl, key, cache, fn())		steal_if_renamed(val, tbl, key, cache, fn())
	end		end
	end		end
			}


		⚫	-- Map parameters' values using a custom callback and a referenced table
		⚫	local function map_names (tbl, rargs, karg, varg, looptype, fn)
			local cache = {}
			name_thieves_maps[looptype](cache, tbl, rargs, karg, varg, fn)
	for key, val in pairs(cache) do tbl[key] = val end		for key, val in pairs(cache) do tbl[key] = val end
	end		end
Line 1,053:		Line 1,063:
	mapping_styles.values_only)		mapping_styles.values_only)
	local model = { title = tname, args = margs }		local model = { title = tname, args = margs }
	~~map_values~~(ctx.params, margs, karg, varg~~, looptype~~, function ()		value_maps[looptype](ctx.params, margs, karg, varg, function ()
	return ctx.frame:expandTemplate(model)		return ctx.frame:expandTemplate(model)
	end)		end)
Line 1,080:		Line 1,090:
	', ‘mapping_by_invoking’: The function ‘' .. fname ..		', ‘mapping_by_invoking’: The function ‘' .. fname ..
	'’ does not exist', 0) end		'’ does not exist', 0) end
	~~map_values~~(ctx.params, margs, karg, varg~~, looptype~~, function ()		value_maps[looptype](ctx.params, margs, karg, varg, function ()
	return mfunc(ctx.frame:newChild(model))		return mfunc(ctx.frame:newChild(model))
	end)		end)
Line 1,098:		Line 1,108:
	local margs, argc, looptype, karg, varg = parse_callback_args(opts, 1,		local margs, argc, looptype, karg, varg = parse_callback_args(opts, 1,
	mapping_styles.values_only)		mapping_styles.values_only)
	~~map_values~~(ctx.params, margs, karg, varg~~, looptype~~, function ()		value_maps[looptype](ctx.params, margs, karg, varg, function ()
	return ctx.frame:callParserFunction(magic, margs)		return ctx.frame:callParserFunction(magic, margs)
	end)		end)

imported>Grufo: The new modifier ‘grouping_by_calling’ has been added to the module; code review

2024-10-01T04:38:45Z

The new modifier ‘grouping_by_calling’ has been added to the module; code review

Show changes

imported>Grufo: The modifiers ‘reassorted’, ‘mapping_by_replacing’ and ‘renaming_by_replacing’ have been added to the module; support for the ‘pattern’ flag has been added to the ‘with_*_matching’ class of modifiers

2024-09-25T00:44:58Z

The modifiers ‘reassorted’, ‘mapping_by_replacing’ and ‘renaming_by_replacing’ have been added to the module; support for the ‘pattern’ flag has been added to the ‘with_*_matching’ class of modifiers

Show changes

imported>Grufo: Typography only (no changes)

2024-09-02T13:38:55Z

Typography only (no changes)

← Older revision		Revision as of 13:38, 2 September 2024
Line 12:		Line 12:
	-- Helper function for `string.gsub()` (for managing zero-padded numbers)		-- Helper function for `string.gsub()` (for managing zero-padded numbers)
	function zero_padded(str)		function zero_padded(str)
	return ("%03d%s"):format(#str, str)		return ('%03d%s'):format(#str, str)
	end		end

Line 18:		Line 18:
	-- Helper function for `table.sort()` (for natural sorting)		-- Helper function for `table.sort()` (for natural sorting)
	function natural_sort(var1, var2)		function natural_sort(var1, var2)
	return tostring(var1):gsub("%d+", zero_padded) <		return tostring(var1):gsub('%d+', zero_padded) <
	tostring(var2):gsub("%d+", zero_padded)		tostring(var2):gsub('%d+', zero_padded)
	end		end

imported>Grufo: Comments only, no changes

2024-06-06T11:25:33Z

Comments only, no changes

← Older revision		Revision as of 11:25, 6 June 2024
Line 163:		Line 163:


	-- Memory slots		-- Memory slots (functions and modifiers MUST avoid these names)
	local memoryslots = {		local memoryslots = {
	i = 'itersep',		i = 'itersep',

imported>Grufo: Make sure that the maximum number of available parameters is never exceeded

2024-06-06T08:44:37Z

Make sure that the maximum number of available parameters is never exceeded

← Older revision		Revision as of 08:44, 6 June 2024
Line 161:		Line 161:
	blindly = { 0, 2, 0, -1, -1, -1, -1 }		blindly = { 0, 2, 0, -1, -1, -1, -1 }
	}		}


⚫	-- Functions and modifiers MUST avoid these names too: `let`



⚫	--[[ Module's private environment ]]--
⚫	--------------------------------------


Line 180:		Line 172:
	n = 'ifngiven'		n = 'ifngiven'
	}		}


		⚫	-- Functions and modifiers MUST avoid these names too: `let`



		⚫	--[[ Module's private environment ]]--
		⚫	--------------------------------------


Line 202:		Line 202:
	ctx.iterfunc = pairs		ctx.iterfunc = pairs
	ctx.firstposonly = static_iface		ctx.firstposonly = static_iface
			ctx.n_available = maxfill
	return ctx		return ctx
	end		end
Line 550:		Line 551:
	end		end
	if nmax ~= nil and nmax - nmin > nnums then		if nmax ~= nil and nmax - nmin > nnums then
	if ~~maxfill~~ + nmin + nnums < nmax ~~then error(ctx.luaname ..~~		ctx.n_available = ctx.n_available + nmin + nnums - nmax
			if ctx.n_available < 0 then error(ctx.luaname ..
	', ‘filling_the_gaps’: It is possible to fill at most ' ..		', ‘filling_the_gaps’: It is possible to fill at most ' ..
	tostring(maxfill) .. ' parameters', 0) end		tostring(maxfill) .. ' parameters', 0) end