Modul:pt-adj/test

Definition från Wiktionary, den fria ordlistan.
Hoppa till navigering Hoppa till sök

All tests passed. (refresh)

Text Expected Actual
test01_o_or_ol:
Passed mut.test("-o", "pt-adj", "export") {plur_mask="-os", plur_fem="-as", sing_mask="-o", sing_fem="-a"} {plur_mask="-os", plur_fem="-as", sing_mask="-o", sing_fem="-a"}
Passed mut.test("-or", "pt-adj", "export") {plur_mask="-ores", plur_fem="-oras", sing_mask="-or", sing_fem="-ora"} {plur_mask="-ores", plur_fem="-oras", sing_mask="-or", sing_fem="-ora"}
Passed mut.test("-ôr", "pt-adj", "export") {plur_mask="-ôres", plur_fem="-ôras", sing_mask="-ôr", sing_fem="-ôra"} {plur_mask="-ôres", plur_fem="-ôras", sing_mask="-ôr", sing_fem="-ôra"}
Passed mut.test("-ol", "pt-adj", "export") {plur_mask="-óis", plur_fem="-olas", sing_mask="-ol", sing_fem="-ola"} {plur_mask="-óis", plur_fem="-olas", sing_mask="-ol", sing_fem="-ola"}
Text Expected Actual
test02_e_el_es_ez_eu:
Passed mut.test("-e", "pt-adj", "export") {plur_mask="-es", plur_fem="-es", sing_mask="-e", sing_fem="-e"} {plur_mask="-es", plur_fem="-es", sing_mask="-e", sing_fem="-e"}
Passed mut.test("-el", "pt-adj", "export") {plur_mask="-eis", plur_fem="-eis", sing_mask="-el", sing_fem="-el"} {plur_mask="-eis", plur_fem="-eis", sing_mask="-el", sing_fem="-el"}
Passed mut.test("-es", "pt-adj", "export") {plur_mask="-es", plur_fem="-es", sing_mask="-es", sing_fem="-es"} {plur_mask="-es", plur_fem="-es", sing_mask="-es", sing_fem="-es"}
Passed mut.test("-ês", "pt-adj", "export") {plur_mask="-eses", plur_fem="-esas", sing_mask="-ês", sing_fem="-esa"} {plur_mask="-eses", plur_fem="-esas", sing_mask="-ês", sing_fem="-esa"}
Passed mut.test("-ez", "pt-adj", "export") {plur_mask="-ezes", plur_fem="-ezas", sing_mask="-ez", sing_fem="-eza"} {plur_mask="-ezes", plur_fem="-ezas", sing_mask="-ez", sing_fem="-eza"}
Passed mut.test("-eu", "pt-adj", "export") {plur_mask="-us", plur_fem="-eias", sing_mask="-eu", sing_fem="-eia"} {plur_mask="-us", plur_fem="-eias", sing_mask="-eu", sing_fem="-eia"}
Text Expected Actual
test03_al_ar_ao:
Passed mut.test("-al", "pt-adj", "export") {plur_mask="-ais", plur_fem="-ais", sing_mask="-al", sing_fem="-al"} {plur_mask="-ais", plur_fem="-ais", sing_mask="-al", sing_fem="-al"}
Passed mut.test("-ar", "pt-adj", "export") {plur_mask="-ares", plur_fem="-ares", sing_mask="-ar", sing_fem="-ar"} {plur_mask="-ares", plur_fem="-ares", sing_mask="-ar", sing_fem="-ar"}
Passed mut.test("-ão", "pt-adj", "export") {plur_mask="?", plur_fem="?", sing_mask="-ão", sing_fem="?"} {plur_mask="?", plur_fem="?", sing_mask="-ão", sing_fem="?"}
Text Expected Actual
test04_il:
Passed mut.test("-il", "pt-adj", "export") {plur_mask="-is", plur_fem="-is", sing_mask="-il", sing_fem="-il"} {plur_mask="-is", plur_fem="-is", sing_mask="-il", sing_fem="-il"}
Passed mut.test("difícil", "pt-adj", "export") {plur_mask="difíceis", plur_fem="difíceis", sing_mask="difícil", sing_fem="difícil"} {plur_mask="difíceis", plur_fem="difíceis", sing_mask="difícil", sing_fem="difícil"}
Passed mut.test("fértil", "pt-adj", "export") {plur_mask="férteis", plur_fem="férteis", sing_mask="fértil", sing_fem="fértil"} {plur_mask="férteis", plur_fem="férteis", sing_mask="fértil", sing_fem="fértil"}
Passed mut.test("têxtil", "pt-adj", "export") {plur_mask="têxteis", plur_fem="têxteis", sing_mask="têxtil", sing_fem="têxtil"} {plur_mask="têxteis", plur_fem="têxteis", sing_mask="têxtil", sing_fem="têxtil"}
Text Expected Actual
test05_ul:
Passed mut.test("-ul", "pt-adj", "export") {plur_mask="-uis", plur_fem="-uis", sing_mask="-ul", sing_fem="-ul"} {plur_mask="-uis", plur_fem="-uis", sing_mask="-ul", sing_fem="-ul"}
Text Expected Actual
test06_m:
Passed mut.test("-m", "pt-adj", "export") {plur_mask="-ns", plur_fem="?", sing_mask="-m", sing_fem="?"} {plur_mask="-ns", plur_fem="?", sing_mask="-m", sing_fem="?"}
Text Expected Actual
test08_another_vowel:
Passed mut.test("-a", "pt-adj", "export") {plur_mask="-as", plur_fem="-as", sing_mask="-a", sing_fem="-a"} {plur_mask="-as", plur_fem="-as", sing_mask="-a", sing_fem="-a"}
Passed mut.test("esquimó", "pt-adj", "export") {plur_mask="esquimós", plur_fem="esquimós", sing_mask="esquimó", sing_fem="esquimó"} {plur_mask="esquimós", plur_fem="esquimós", sing_mask="esquimó", sing_fem="esquimó"}
Passed mut.test("aborígene", "pt-adj", "export") {plur_mask="aborígenes", plur_fem="aborígenes", sing_mask="aborígene", sing_fem="aborígene"} {plur_mask="aborígenes", plur_fem="aborígenes", sing_mask="aborígene", sing_fem="aborígene"}
Text Expected Actual
test09_the_rest:
Passed mut.test("abc", "pt-adj", "export") {plur_mask="?", plur_fem="?", sing_mask="abc", sing_fem="?"} {plur_mask="?", plur_fem="?", sing_mask="abc", sing_fem="?"}
Text Expected Actual
test11_irreg_comparable:
Passed mut.test("grande", "pt-adj|grande|grande|grandes|grandes|maior|maior|maiores|maiores|o maior|a maior|os maiores|as maiores", "export") {plur_fem_komp="maiores", plur_mask_sup="os maiores", plur_mask_komp="maiores", plur_fem_sup="as maiores", sing_fem_sup="a maior", plur_fem="grandes", sing_fem_komp="maior", sing_fem="grande", plur_mask="grandes", sing_mask_sup="o maior", sing_mask="grande", sing_mask_komp="maior"} {plur_fem_komp="maiores", plur_mask_sup="os maiores", plur_mask_komp="maiores", plur_fem_sup="as maiores", sing_fem_sup="a maior", plur_fem="grandes", sing_fem_komp="maior", sing_fem="grande", plur_mask="grandes", sing_mask_sup="o maior", sing_mask_komp="maior", sing_mask="grande"}
Text Expected Actual
test12_irreg_comparable:
Passed mut.test("pequeno", "pt-adj|pequeno|pequena|pequenos|pequenas|menor|menor|menores|menores|o menor|a menor|os menores|as menores", "export") {plur_fem_komp="menores", plur_mask_sup="os menores", plur_mask_komp="menores", plur_fem_sup="as menores", sing_fem_sup="a menor", plur_fem="pequenas", sing_fem_komp="menor", sing_fem="pequena", plur_mask="pequenos", sing_mask_sup="o menor", sing_mask="pequeno", sing_mask_komp="menor"} {plur_fem_komp="menores", plur_mask_sup="os menores", plur_mask_komp="menores", plur_fem_sup="as menores", sing_fem_sup="a menor", plur_fem="pequenas", sing_fem_komp="menor", sing_fem="pequena", plur_mask="pequenos", sing_mask_sup="o menor", sing_mask_komp="menor", sing_mask="pequeno"}
Text Expected Actual
test13_incomplete_irreg_comparable:
Passed mut.test("testa", "pt-adj|12=test", "export") {plur_fem_komp="?", plur_mask_sup="?", plur_mask_komp="?", plur_fem_sup="test", sing_fem_sup="?", plur_fem="testas", sing_fem_komp="?", sing_fem="testa", plur_mask="testas", sing_mask_sup="?", sing_mask="testa", sing_mask_komp="?"} {plur_fem_komp="?", plur_mask_sup="?", plur_mask_komp="?", plur_fem_sup="test", sing_fem_sup="?", plur_fem="testas", sing_fem_komp="?", sing_fem="testa", plur_mask="testas", sing_mask_sup="?", sing_mask_komp="?", sing_mask="testa"}
local t = require("Modul:UnitTests")
local mut = require("Modul:pt-adj")

local function nowikiPipe(str)
	return mw.ustring.gsub(str, "|", "<nowiki>|</nowiki>")
end

function t:test01_o_or_ol()
	self:equals_deep('mut.test("-o", "pt-adj", "export")', mut.test("-o", "pt-adj", "export"), 
		{
			sing_mask="-o",
			sing_fem="-a",
			plur_mask="-os",
			plur_fem="-as"
		}
	)
	self:equals_deep('mut.test("-or", "pt-adj", "export")', mut.test("-or", "pt-adj", "export"), 
		{
			sing_mask="-or",
			sing_fem="-ora",
			plur_mask="-ores",
			plur_fem="-oras"
		}
	)
	self:equals_deep('mut.test("-ôr", "pt-adj", "export")', mut.test("-ôr", "pt-adj", "export"), 
		{
			sing_mask="-ôr",
			sing_fem="-ôra",
			plur_mask="-ôres",
			plur_fem="-ôras"
		}
	)
	self:equals_deep('mut.test("-ol", "pt-adj", "export")', mut.test("-ol", "pt-adj", "export"), 
		{
			sing_mask="-ol",
			sing_fem="-ola",
			plur_mask="-óis",
			plur_fem="-olas"
		}
	)
end

function t:test02_e_el_es_ez_eu()
	self:equals_deep('mut.test("-e", "pt-adj", "export")', mut.test("-e", "pt-adj", "export"), 
		{
			sing_mask="-e",
			sing_fem="-e",
			plur_mask="-es",
			plur_fem="-es"
		}
	)
	self:equals_deep('mut.test("-el", "pt-adj", "export")', mut.test("-el", "pt-adj", "export"), 
		{
			sing_mask="-el",
			sing_fem="-el",
			plur_mask="-eis",
			plur_fem="-eis"
		}
	)
	self:equals_deep('mut.test("-es", "pt-adj", "export")', mut.test("-es", "pt-adj", "export"), 
		{
			sing_mask="-es",
			sing_fem="-es",
			plur_mask="-es",
			plur_fem="-es"
		}
	)
	self:equals_deep('mut.test("-ês", "pt-adj", "export")', mut.test("-ês", "pt-adj", "export"), 
		{
			sing_mask="-ês",
			sing_fem="-esa",
			plur_mask="-eses",
			plur_fem="-esas"
		}
	)
	self:equals_deep('mut.test("-ez", "pt-adj", "export")', mut.test("-ez", "pt-adj", "export"), 
		{
			sing_mask="-ez",
			sing_fem="-eza",
			plur_mask="-ezes",
			plur_fem="-ezas"
		}
	)
	self:equals_deep('mut.test("-eu", "pt-adj", "export")', mut.test("-eu", "pt-adj", "export"), 
		{
			sing_mask="-eu",
			sing_fem="-eia",
			plur_mask="-us",
			plur_fem="-eias"
		}
	)
end

function t:test03_al_ar_ao()
	self:equals_deep('mut.test("-al", "pt-adj", "export")', mut.test("-al", "pt-adj", "export"), 
		{
			sing_mask="-al",
			sing_fem="-al",
			plur_mask="-ais",
			plur_fem="-ais"
		}
	)
	self:equals_deep('mut.test("-ar", "pt-adj", "export")', mut.test("-ar", "pt-adj", "export"), 
		{
			sing_mask="-ar",
			sing_fem="-ar",
			plur_mask="-ares",
			plur_fem="-ares"
		}
	)
	self:equals_deep('mut.test("-ão", "pt-adj", "export")', mut.test("-ão", "pt-adj", "export"), 
		{
			sing_mask="-ão",
			sing_fem="?",  --manual -ona or -ã
			plur_mask="?", --manual -ões or ães
			plur_fem="?"   --manual -onas or -ãs
		}
	)
end

function t:test04_il()
	self:equals_deep('mut.test("-il", "pt-adj", "export")', mut.test("-il", "pt-adj", "export"), 
		--second last syllable is not stressed and ends with -il, default pattern.
		{
			sing_mask="-il",
			sing_fem="-il",
			plur_mask="-is",
			plur_fem="-is"
		}
	)
	self:equals_deep('mut.test("difícil", "pt-adj", "export")', mut.test("difícil", "pt-adj", "export"),
		--second last syllable is stressed and ends with -il
		{
			sing_mask="difícil",
			sing_fem="difícil",
			plur_mask="difíceis",
			plur_fem="difíceis"
		}
	)
	self:equals_deep('mut.test("fértil", "pt-adj", "export")', mut.test("fértil", "pt-adj", "export"), 
		--second last syllable is stressed and ends with -il
		{
			sing_mask="fértil",
			sing_fem="fértil",
			plur_mask="férteis",
			plur_fem="férteis"
		}
	)
	self:equals_deep('mut.test("têxtil", "pt-adj", "export")', mut.test("têxtil", "pt-adj", "export"), 
		--second last syllable is stressed and ends with -il
		{
			sing_mask="têxtil",
			sing_fem="têxtil",
			plur_mask="têxteis",
			plur_fem="têxteis"
		}
	)
end

function t:test05_ul()
	self:equals_deep('mut.test("-ul", "pt-adj", "export")', mut.test("-ul", "pt-adj", "export"), 
		{
			sing_mask="-ul",
			sing_fem="-ul",
			plur_mask="-uis",
			plur_fem="-uis"
		}
	)
end

function t:test06_m()
	self:equals_deep('mut.test("-m", "pt-adj", "export")', mut.test("-m", "pt-adj", "export"), 
		{
			sing_mask="-m",
			sing_fem="?",  -- manual -m or -na
			plur_mask="-ns", 
			plur_fem="?"   -- manual -ns or -nas
		}
	)
end

function t:test08_another_vowel()
	self:equals_deep('mut.test("-a", "pt-adj", "export")', mut.test("-a", "pt-adj", "export"), 
		{
			sing_mask="-a",
			sing_fem="-a",
			plur_mask="-as",
			plur_fem="-as"
		}
	)
	self:equals_deep('mut.test("esquimó", "pt-adj", "export")', mut.test("esquimó", "pt-adj", "export"), 
		{
			sing_mask="esquimó",
			sing_fem="esquimó",
			plur_mask="esquimós",
			plur_fem="esquimós"
		}
	)
	self:equals_deep('mut.test("aborígene", "pt-adj", "export")', mut.test("aborígene", "pt-adj", "export"), 
		{
			sing_mask="aborígene",
			sing_fem="aborígene",
			plur_mask="aborígenes",
			plur_fem="aborígenes"
		}
	)
end

function t:test09_the_rest()
	self:equals_deep('mut.test("abc", "pt-adj", "export")', mut.test("abc", "pt-adj", "export"), 
		{
			sing_mask="abc",
			sing_fem="?", -- irregular or unknown pattern
			plur_mask="?", -- irregular or unknown pattern
			plur_fem="?" -- irregular or unknown pattern
		}
	)
end

function t:test11_irreg_comparable()
	self:equals_deep('<nowiki>mut.test("grande", "pt-adj|grande|grande|grandes|grandes|maior|maior|maiores|maiores|o maior|a maior|os maiores|as maiores", "export")</nowiki>', mut.test("grande", "pt-adj|grande|grande|grandes|grandes|maior|maior|maiores|maiores|o maior|a maior|os maiores|as maiores", "export"), 
		{
			sing_mask="grande",
			sing_fem="grande",
			plur_mask="grandes",
			plur_fem="grandes",
			sing_mask_komp="maior",
			sing_fem_komp="maior",
			plur_mask_komp="maiores",
			plur_fem_komp="maiores",
			sing_mask_sup="o maior",
			sing_fem_sup="a maior",
			plur_mask_sup="os maiores",
			plur_fem_sup="as maiores"
		}
	)
end

function t:test12_irreg_comparable()
	self:equals_deep('<nowiki>mut.test("pequeno", "pt-adj|pequeno|pequena|pequenos|pequenas|menor|menor|menores|menores|o menor|a menor|os menores|as menores", "export")</nowiki>', mut.test("pequeno", "pt-adj|pequeno|pequena|pequenos|pequenas|menor|menor|menores|menores|o menor|a menor|os menores|as menores", "export"), 
		{
			sing_mask="pequeno",
			sing_fem="pequena",
			plur_mask="pequenos",
			plur_fem="pequenas",
			sing_mask_komp="menor",
			sing_fem_komp="menor",
			plur_mask_komp="menores",
			plur_fem_komp="menores",
			sing_mask_sup="o menor",
			sing_fem_sup="a menor",
			plur_mask_sup="os menores",
			plur_fem_sup="as menores"
		}
	)
end

function t:test13_incomplete_irreg_comparable()
	self:equals_deep('<nowiki>mut.test("testa", "pt-adj|12=test", "export")</nowiki>', mut.test("testa", "pt-adj|12=test", "export"), 
		{
			sing_mask="testa",
			sing_fem="testa",
			plur_mask="testas",
			plur_fem="testas",
			sing_mask_komp="?",
			sing_fem_komp="?",
			plur_mask_komp="?",
			plur_fem_komp="?",
			sing_mask_sup="?",
			sing_fem_sup="?",
			plur_mask_sup="?",
			plur_fem_sup="test"
		}
	)
end

return t