Module:Inflect senra

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

local p = {}

local function change_suffix(word, suffix)
	return (word:gsub("u$", suffix))
end

local i18n = {}

local function template(language, word, tmpl)
	local lang = i18n[language] or i18n.en
	return (tmpl:gsub("[%$-]%w+", function(text)
		local suffix = text:match "%-(.*)"
		local translation = text:match "%$(.*)"
		if suffix then
			return change_suffix(word, suffix)
		elseif translation then
			return lang[translation]
		end
	end))
end

function p.table(frame)
	local language, word = frame.args[1], frame.args[2]
	word = word:gsub("%s*$", "")
	word = word:gsub("^%s*", "")
	if not word:match"u$" then
		error("content word must be lemma (end with -u): "..word)
	end
	return template(language, word, [[<table class="wikitable">
 <caption>$inflections </caption>
 <tr><th> <th>$regular <th>$infinitive <th>$imperative <th>$adverbial
 <tr><th> <td> <td>-u <td> <td>
 <tr><th>$intransitive <td>-i <td>-ui <td>-e <td>-iń
 <tr><th>$transitive <td>-a <td>-ua <td>-ea <td>-ań
</table>]])
end

i18n.en = {
	inflections = "inflections",
	regular = "regular",
	infinitive = "infinitive",
	imperative = "imperative",
	adverbial = "adverbial",
	intransitive = "intransitive",
	transitive = "transitive",
}

i18n.tok = {
	inflections = "ante nimi",
	regular = "pali",
	infinitive = "ijo",
	imperative = "wile",
	adverbial = "ante pali",
	intransitive = "pali tawa ijo ala",
	transitive = "pali tawa ijo",
}

i18n.eo = {
	inflections = "fleksioj",
	regular = "regula",
	infinitive = "infinitiva",
	imperative = "imperativa",
	adverbial = "adverba",
	intransitive = "netransitiva",
	transitive = "transitiva",
}

return p