Module:Road data/testcases explained

local p =

local live = require('Module:Road data')local sandbox = require('Module:Road data/sandbox')

local p =

local function showArgs(args) local out =

for _, arg in ipairs(args) do out = out .. mw.getCurrentFrame:preprocess('' .. mw.dumpObject(arg) .. '') end return outend

local function addTest(out, functionName, ...) out = out .. '|-\n' out = out .. '| ' .. functionName .. ' with parameters:' .. showArgs(arg) .. '\n' -- out = out .. '| ' .. live[functionName](unpack(arg)) .. '\n' out = out .. '| ' .. sandbox[functionName](unpack(arg)) .. '\n' return outend

local function startTable(out) out = out .. '

Lua' .. '\n' -- out = out .. '! Live' out = out .. '	Sandbox' .. '\n' return outend local function endTable(out) out = out .. '

\n' return outend

local NIL = setmetatable

function p.test(frame) local out = out = out .. '

shield

\n' out = startTable(out) out = addTest(out, 'shield',) out = addTest(out, 'shield',, NIL, 'jct') out = addTest(out, 'shield',, NIL, 'jct') out = addTest(out, 'shield',, 'normal (or anything)', 'jct') out = addTest(out, 'shield',, 'list', 'jct') out = addTest(out, 'shield',, 'main', 'jct') out = addTest(out, 'shield',, NIL, 'jct') out = addTest(out, 'shield',, 'main', 'jct') out = addTest(out, 'shield',, NIL, 'jct') out = addTest(out, 'shield',, 'main', 'infobox', true) out = addTest(out, 'shield',, 'main', 'infobox', true) out = addTest(out, 'shield',) out = addTest(out, 'shield',) out = addTest(out, 'shield',) out = addTest(out, 'shield',) out = addTest(out, 'shield',, NIL, '120px') out = addTest(out, 'shield',, 'main', 'rdt') out = endTable(out) out = out .. '

link

\n' out = startTable(out) out = addTest(out, 'link',) out = addTest(out, 'link',, true) out = addTest(out, 'link',) out = addTest(out, 'link',) out = addTest(out, 'link',, true) out = addTest(out, 'link',) out = endTable(out) return outend

return p