Module:siwa-noun/common: Difference between revisions

Module:siwa-noun/common (view source)

Revision as of 17:58, 30 July 2021

403 bytes removed , 30 July 2021

no edit summary

Sware

Bureaucrats, Administrators

45,660

edits

@@ Line 1: / Line 1: @@
+local gsub = mw.ustring.gsub
 local export = {}
@@ Line 26: / Line 28: @@
 	}
 	for regex, repl in pairs(lenition_patterns) do
-		lenited = mw.ustring.gsub(word, regex, repl, 1)
+		lenited = word:gsub(regex, repl, 1)
 		if lenited ~= word then return lenited end
 	end
@@ Line 35: / Line 37: @@
 function export.coalescence(word, stress)
 	local diphthongs = { -- TODO: [ůy]V > ỷ in stressed
-		["[aę]▫[aę]"] = "ả", ["e▫e"] = "ẻ", ["i▫i"] = "ỉ", ["[yů]▫[yů]"] = "ỷ", ["[uyů]▫[uyů]"] = "ủ",
+		["[aę]▫[aę]"] = "ả", ["e▫e"] = "ẻ", ["i▫i"] = "ỉ", ["u▫[yuů]"] = "ủ", ["[yů]▫u"] = "ủ",
-		["[ei]▫[aę]"] = "ia", ["([ou])▫[aę]"] = "%1a", ["[ůy]▫[aę]"] = "ůa", ["a▫[ei]"] = "ai", ["a▫[ou]"] = "au", ["[aę]▫[yůu]"] = "ay",
+		["a▫e"] = "ai", ["a▫o"] = "au", ["ę▫[uů]"] = "ay",
-		["[eę]▫[ei]"] = "ei", ["[ie]▫o"] = "io", ["[eę]▫[ou]"] = "eu", [""] = "oi",
+		["ę▫[ei]"] = "ei", ["ę▫o"] = "eu",
+		["e▫[aę]"] = "ia", ["e▫o"] = "io", ["i▫y"] = "iů",
-		["aa"] = "ā", ["aę"] = "ā", ["ae"] = "ai", ["ai"] = "ai", ["ao"] = "au", ["au"] = "au", ["a[yů]"] = "ay",
+		["[uo]▫e"] = "oi", ["o▫ů"] = "ou",
-		["ęa"] = "ā", ["ęę"] = "ā", ["ęe"] = "ei", ["ęi"] = "ei", ["ęo"] = "eu", ["ęu"] = "ay", ["ę[yů]"] = "ay",
+		["[yůo]▫o"] = "uo",
-		["ea"] = "ia", ["eę"] = "ia", ["ee"] = "ē", ["ei"] = "ei", ["eo"] = "io", ["eu"] = "eu", ["e[yů]"] = "ey",
+		["[yů]▫[yů]"] = "ỷ",
-		["ia"] = "ia", ["ię"] = "ia", ["ie"] = "ie", ["ii"] = "ī", ["io"] = "io", ["iu"] = "iu", ["i[yů]"] = "iů",
+		["([ae])▫ů"] = "%1y", ["([iou])▫ę"] = "%1a",
-		["oa"] = "oa", ["oę"] = "oa", ["oe"] = "oi", ["oi"] = "oi", ["oo"] = "uo", ["ou"] = "ou", ["o[yů]"] = "ou",
+		["[yů]▫a"] = "ů▫a", ["[yů]▫ę"] = "ů▫a", ["[yů]▫e"] = "ů▫i", ["[yů]▫i"] = "ů▫i", -- to screen out stressed vs. unstressed
-		["ua"] = "ua", ["uę"] = "ua", ["ue"] = "ui", ["ui"] = "ui", ["uo"] = "uo", ["uu"] = "ū", ["u[yů]"] = "ū",
-		["[yů]a"] = "ůa", ["[yů]ę"] = "ůa", ["[yů]e"] = "ůi", ["[yů]i"] = "ůi", ["[yů]o"] = "uo", ["[yů]u"] = "ū", ["[yů][yů]"] = "ȳ",
 	}
+	for regex, repl in pairs(diphthongs) do
+		word = word:gsub(regex, repl, 1)
+	end
+	if stress then
+		word = word:gsub("[ůy]▫.", "ỷ")
+	end
+	word = word:gsub("▫", "")
+	return word
 end