local p = require('Module:UnitTests')
--
local function test_patterns_get local cat_from_tag = require('Module:Lang')._category_from_tag -- use Module:Lang to create the 'expected results' local iana_data = mw.loadData('Module:Lang/data/iana languages').active -- use the iana data local code_mask = '^[o-z]%l%l' -- used to limit number of tests local tpats = -- collect test patterns here for code in pairs(iana_data) do -- list of names not needed here local pattern = -- here we assemble the test pattern for
if code:find(code_mask) then -- if code within limits (three-character codes)
table.insert(pattern, code) -- add it to the pattern
table.insert(pattern, cat_from_tag ({code})) -- call module:lang and add the 'expected results' for code to pattern
table.insert(tpats, pattern) -- accumulate in list of patterns
end
end
local function comp(a, b) -- local function used by table.sort
return a[1] < b[1] -- ascending sort by code
end
table.sort(tpats, comp) -- make the list pretty
return tpats -- and done
end
--[[--------------------------< T E S T _ C A T E G O R Y _ F R O M _ T A G >----------------------------------
]]
function p:test_category_from_tag_iso_639_3_3
local test_patterns = test_patterns_get
self:preprocess_equals_preprocess_many('{{#invoke:Lang/sandbox|category_from_tag|', '}}', '', '', test_patterns, {nowiki=1})
end
return p