Module:kilta-headword
Documentation for this module may be created at Module:kilta-headword/doc
local match = mw.ustring.match
local u = mw.ustring.char
local gsub = mw.ustring.gsub
local sub = mw.ustring.sub
local split = mw.text.split
local TILDEB = u(0x0330) -- COMBINING TILDE BELOW ̰◌
local export = {}
local lang = require("Module:languages").getByCode("kilta")
local deabb = {["adj"] = "adjectives", ["v"] = "verbs", ["adv"] = "adverbs", ["n"] = "nouns"}
local function glossary_link(entry, text)
text = text or entry
return "[[wikt:Appendix:Glossary#" .. entry .. "|" .. text .. "]]"
end
local function plural(word, n)
local w = split(word, "%s")
if n > tonumber(#w) then error("Word index outside bounds.") end
if w[n]:match("[kh]wa$") or w[n]:match("a$") then
w[n] = sub(w[n], 1, -1) .. "úr"
elseif w[n]:match("ës$") or w[n]:match("uin$") or w[n]:match("[str]$") then
w[n] = w[n] .. "á"
elseif w[n]:match("[nml]$") then
w[n] = w[n] .. "ur"
end
return {label = "plural", table.concat({n}, " ")}
end
function export.show(frame)
local params = {
[1] = {},
["pl"] = {list = true},
["w"] = {default = mw.title.getCurrentTitle().text},
["n"] = {type = number, default = 1}
}
local args = require("Module:parameters").process(frame:getParent().args, params)
local word = args.w
local pos = args[1]; local pl = args.pl
local data = {lang = lang, pos_category = deabb[pos], heads = {word}, categories = {}, inflections = {},}
if pl[1] == '-' then
if pos == "n" then
table.insert(data.inflections, {label = glossary_link("uncountable")})
table.insert(data.categories, lang:getCanonicalName() .. " uncountable " .. deabb[pos])
end
--[=[ elseif pos ~= "v" then
table.insert(data.inflections, {label = glossary_link("comparative"), redup(word)})
if pos == "adv" then table.insert(data.categories, lang:getCanonicalName() .. " comparative " .. deabb[pos]) end ]=]
else
if pl[1] then
pl.label = "plural"
table.insert(data.inflections, pl)
else
table.insert(data.inflections, plural(word, args.n))
end
end
return require('Module:headword').full_headword(data)
end
return export