Module:kilta-headword: Difference between revisions

Module:kilta-headword (view source)

332 bytes added , 15 May 2024

no edit summary

48,407

edits

@@ Line 17: / Line 17: @@
 end
-local function plural(word, n)
+local function plural(word, n, pos)
-	local w = split(word, "%s")
+	local w = split(word, " ")
+	n = tonumber(n)
+	if n > #w then error("Word index outside bounds.") end
-	if w[n]:match("[kh]wa$") or w[n]:match("a$") then
+	if pos == "n" then
-		w[n] = sub(w[n], 1, -1) .. "úr"
+		if w[n]:match("[kh]wa$") then
-	elseif w[n]:match("ës$") or w[n]:match("uin$") or w[n]:match("[str]$") then
+			w[n] = sub(w[n], 1, -3) .. "úr"
-		w[n] = w[n] .. "á"
+		elseif w[n]:match("a$") then
-	elseif w[n]:match("[nml]$") then
+			w[n] = sub(w[n], 1, -2) .. "úr"
-		w[n] = w[n] .. "ur"
+		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
+	elseif pos == "adj" then
+		if w[n]:match("[kh]win$") then
+			w[n] = sub(w[n], 1, -4) .. "ú"
+		elseif w[n]:match("in$") then
+			w[n] = sub(w[n], 1, -3) .. "u"
+		end
 	end
@@ Line 59: / Line 71: @@
 			table.insert(data.inflections, pl)
 		else
-			table.insert(data.inflections, plural(word, 3))
+			table.insert(data.inflections, plural(word, args.n, pos))
 		end
 	end