View source for Module:siwa-pron/testcases

local tests = require('Module:UnitTests')
local m_IPA = require('Module:siwa-pron')

local function IPA_style(IPA)
	return '<span style="font-size:110%;font-family:Gentium,\'DejaVu Sans\',\'Segoe UI\',sans-serif>' .. IPA .. '</span>'
end

local function linkup(text)
	return "[[Contionary:" .. text .. "#Siwa|" .. text .. "]]"
end

function tests:check_output(term, expected, noresp)
	return tests:equals(
		noresp and linkup(noresp) .. "<br>(" .. term .. ")" or linkup(term),
		m_IPA.crux(term),
		expected,
		{ display = IPA_style, show_difference = true }
	)
end

function tests:test_example()
	local list = {
		{"Teltsġvi", "ˈtʰɛɬt͡sxwi"},
		{"uįo·kỏesġen", "ˌujɔˈk⁽ʰ⁾ʊːɛsxɛn", "uįokỏesġen"},
		--[["vowels",
		{"kigįini", ""},
		{"kigįo̊ni", ""},
		{"ata", ""},
		{"at", ""},
		{"anta", ""},
		{"gedli", ""},
		{"hiddįuįa", ""},
		{"katsa", ""},
		{"dảdna", ""},
		{"danaka", ""},
		{"ehhama", ""},
		{"ehhakka", ""},
		"short vowels",
		{"gagi", ""},
		{"kulu", ""},
		{"galmot", ""},
		{"kęmes", ""},
		{"megi", ""},
		{"netra", ""},
		{"nitṡa", ""},
		{"pilra", ""},
		{"pohi", ""},
		{"sġodna", ""},
		{"kulu", ""},
		{"nuppua", ""},
		{"půdů", ""},
		{"sůtrů", ""},
		{"tygi", ""},
		{"ymni", ""},
		{"kõhi", ""},
		{"kõḍga", ""},
		"short open vowels",
		{"atra", ""},
		{"sukno", ""},
		{"sungoma", ""},
		{"hallu", ""},
		{"haluka", ""},
		"short closed vowels",
		{"gedna", ""},
		{"genari", ""},
		{"kuspo", ""},
		{"kusoųi", ""},
		{"edġe", ""},
		{"eteri", ""},
		"the archiphoneme ''ɨ''",
		{"tahha", ""},
		{"toahhun", ""},
		{"gasi", ""},
		{"gausun", ""},
		{"gei", ""},
		{"gegįin", ""},
		{"kyṡi", ""},
		{"kůiṡůn", ""},
		"long vowels",
		{"mảra", ""},
		{"mảhra", ""},
		{"pẻsi", ""},
		{"pẻbmui", ""},
		{"pỉni", ""},
		{"pỉdna", ""},
		{"pỏbi", ""},
		{"tỏhni", ""},
		{"ủma", ""},
		{"ủdno", ""},
		{"ẻu", ""},
		{"ẻulbi", ""},
		{"įỷ", ""},
		{"mỷhni", ""},
		{"kõuba", ""},
		{"õut", ""},
		"diphthongs",
		{"sỉubmi", ""},
		{"aubmi", ""},
		{"koakvi", ""},
		{"neulkio", ""},
		{"nianso", ""},
		{"riehpi", ""},
		{"diuksi", ""},
		{"miout", ""},
		{"ųanuahmo", ""},
		{"vuihli", ""},
		{"gaykka", ""},
		{"suvi", ""},
		{"sůỉmo", ""},
		{"huųo", ""},
		{"huoma", ""},
		"semivowel",
		{"igįut", ""},
		{"luvvủ", ""},
		{"oųala", ""},
		{"ovvala", ""},
		{"oula", ""},
		"triphthongs",
		{"tsġiauga", ""},
		{"tõkkiauki", ""},
		{"tieibid", ""},
		{"mieumi", ""},
		{"niue", ""},
		{"toaika", ""},
		{"peuiskvi", ""},
		{"ruoiknei", ""},
		"coalescence",
		{"gảgi", ""},
		{"gęįagi", ""},
		{"geįe", ""},
		{"hego", ""},
		{"hivve", ""},
		{"keugo", ""},
		{"kůbue", ""},
		{"niuba", ""},
		{"nivvadi", ""},
		{"maidi", ""},
		{"magįika", ""},
		{"saiųu", ""},
		{"saịuka", ""},
		{"tiegibi", ""},
		{"tuobi", ""},
		{"tubimo", ""},
		{"vebo", ""},
		{"vivve", ""},
		"apocope",
		{"tsammi", ""},
		{"tsamġa", ""},
		{"tsamṡita", ""},
		{"sira", ""},
		{"sỉhdi", ""},
		{"kori", ""},
		{"kohko", ""},
		{"pyry", ""},
		{"pyhma", ""},
		{"sġaumkka", ""},
		{"ỉltṡemkka", ""},
		"prothesis",
		{"moġa", ""},
		{"amġa", ""},
		{"anomġa", ""},
		"stress",
		{"en·tiebbie", "", "entiebbie"},
		{"m·o·hįeimen·i", "", "mohįeimeni"},
		{"o·sikkami", "", "osikkami"},
		{"o·gauldigge", "", "ogauldigge"},
		{"ogalen", ""},
		{"asġa", ""},
		{"sahha", ""},
		"consonants",
		"/m/",
		{"moni", ""},
		{"lįohma", ""},
		{"mamma", ""},
		{"umna", ""},
		{"ymni", ""},
		{"hįỏmno", ""},
		{"imno", ""},
		{"kůimpa", ""},
		{"tůmkki", ""},
		{"lįemkka", ""},
		{"damu", ""},
		{"damġa", ""},
		{"kaibmu", ""},
		{"kaimka", ""},
		{"gįaukama", ""},
		{"tama", ""},
		{"taintsġi", ""},
		{"dỉmma", ""},
		{"dỉndi", ""},
		{"kinaubmi", ""},
		{"kinaundi", ""},
		"/p/ and /b/",
		{"pila", ""},
		{"laipin", ""},
		{"mẻppi", ""},
		{"oaḍbi", ""},
		{"loba", ""},
		{"iįeppi", ""},
		{"haihpo", ""},
		{"tiehba", ""},
		{"onębbi", ""},
		{"nubmi", ""},
		{"tsảpmi", ""},
		{"nypsiri", ""},
		{"tsảpsiri", ""},
		{"tṡipra", ""},
		{"elepṡia", ""},
		{"gabṡi", ""},
		{"oapi", ""},
		{"oaḍgo", ""},
		{"rapa", ""},
		{"raḍga", ""},
		"/v/",
		{"vỉmi", ""},
		{"savi", ""},
		{"seuvvi", ""},
		{"sůivvi", ""},
		"/n/",
		{"netuba", ""},
		{"tona", ""},
		{"kinįi", ""},
		{"nįa", ""},
		{"hanna", ""},
		{"kůnnįůli", ""},
		{"lỉdna", ""},
		{"igna", ""},
		{"hiamin", ""},
		{"hihlon", ""},
		{"mamna", ""},
		{"obeno", ""},
		{"ono", ""},
		{"sumana", ""},
		{"noni", ""},
		{"nõtṡen", ""},
		{"koni", ""},
		{"kõtsiṡi", ""},
		{"kõtṡi", ""},
		{"bansi", ""},
		{"mani", ""},
		{"mansi", ""},
		{"untsi", ""},
		{"banka", ""},
		{"įanka", ""},
		{"lonhi", ""},
		{"bunhi", ""},
		"/t/",
		{"tatami", ""},
		{"eita", ""},
		{"ỉtita", ""},
		{"kůitton", ""},
		{"sảhta", ""},
		{"hįokot", ""},
		{"ůat", ""},
		{"hait", ""},
		{"sirit", ""},
		{"tabmi", ""},
		{"ủtva", ""},
		{"nỷdednįukli", ""},
		{"hetna", ""},
		{"atsio", ""},
		{"kotsmi", ""},
		{"ỉdla", ""},
		{"dlei", ""},
		{"ġųadlmi", ""},
		{"seidlġa", ""},
		{"půadlva", ""},
		{"sedla", ""},
		{"kotvi", ""},
		{"notvi", ""},
		{"beitsvi", ""},
		{"tvỉmyn", ""},
		{"gautra", ""},
		{"nautra", ""},
		{"setġa", ""},
		{"otka", ""},
		{"tṡotka", ""},
		{"biohtska", ""},
		"/d/",
		{"dedna", ""},
		{"dįẻ", ""},
		{"ida", ""},
		{"iedot", ""},
		{"kendita", ""},
		{"lỉngid", ""},
		{"dlei", ""},
		{"tieibid", ""},
		{"kodi", ""},
		{"edi", ""},
		{"meḍvi", ""},
		{"loḍvot", ""},
		{"idnu", ""},
		{"bảḍga", ""},
		{"gieḍbi", ""},
		{"otoatka", ""},
		{"sitri", ""},
		{"guokveitri", ""},
		"/ð/",
		{"oḍḍo", ""},
		{"saḍḍa", ""},
		{"sieḍḍo", ""},
		{"daḍmi", ""},
		{"heiḍmi", ""},
		{"koḍmi", ""},
		{"koḍḍa", ""},
		{"įeḍka", ""},
		{"siḍbi", ""},
		{"veḍgo", ""},
		{"veḍvo", ""},
		"/s/",
		{"sara", ""},
		{"ussủ", ""},
		{"misas", ""},
		{"mimůkis", ""},
		{"svaḍma", ""},
		{"o·kįasvi", "", "okįasvi"},
		{"įosli", ""},
		{"moskko", ""},
		{"sappiskka", ""},
		"/ɕ/",]]
		"ategeuskus<br />''vowels''",
		{"ataka", "ˈɑtɑɡa"},
		{"atkaka", "ˈatkɑɡa"},
		{"hảppo", "ˈhæːʔpɔ"},
		{"kęmes", "ˈcʰæmɛs"},
		{"kemhi", "ˈcʰɛmhi"},
		{"ảli", "ˈæːli"},
		{"etsa", "ˈet͡sa"},
		{"etsta", "ˈɛt͡stːa"},
		{"ẻ", "ˈeː"},
		{"iri", "ˈiri"},
		{"Irhi", "ˈɪrhi"},
		{"kỉ", "ˈcʰiː"},
		{"mori", "ˈmɔri"},
		{"odlna", "ˈɔtɬnːa"},
		{"kỏi", "ˈkʰʊːi"},
		{"kõhi", "ˈkʰɔ̃ʔi"},
		{"õkkia", "ˈɔ̃ʔcia"},
		{"õut", "ˈɔ̃ːʔ"},
		{"hummi", "ˈhumːi"},
		{"huhmi", "ˈhʊhmi"},
		{"hủdna", "ˈhuːʔt̚na"},
		{"kůnů", "ˈcʰønø"},
		{"lůkků", "ˈlœʔcø"},
		{"sẻu", "ˈsøː"},
		{"tyry", "ˈtʰyry"},
		{"sytka", "ˈsœtka"},
		{"nỷn", "ˈnyːn"},
		"ettategeuskus te neġġateuskus<br />''diphthongs and triphthongs''",
		{"haiddįa", "ˈhɑid͡ʑːa"},
		{"haidni", "ˈhaɪʔt̚ni"},
		{"aurin", "ˈɑurɪn"},
		{"aurko", "ˈaʊrkɔ"},
		{"ayka", "ˈæøɡa"},
		{"ayḍgu", "ˈæœðɡu"},
		{"kei", "ˈcʰei"},
		{"keiḍge", "ˈcʰɛɪðɟe"},
		{"eumaįa", "ˈeumɑja"},
		{"neuḍge", "ˈnɛʊðɟe"},
		{"tey", "ˈtʰeø"},
		{"teylba", "ˈtʰɛœlba"},
		{"piagi", "ˈpʰiɑɟi"},
		{"piatki", "ˈpʰɪatci"},
		{"niebini", "ˈniebini"},
		{"kieska", "ˈcʰɪɛska"},
		{"iohhįa", "ˈiɔhːja"},
		{"iohka", "ˈɪɔhka"},
		{"tiuhhen", "ˈtʰiuhːɛn"},
		{"miudna", "ˈmɪʊʔt̚na"},
		{"męmiů", "ˈmæmiø"},
		{"miůt", "ˈmɪœʔœ̆"},
		{"soaki", "ˈsɔɑɟi"},
		{"soakkia", "ˈsɔaʔcia"},
		{"roihho", "ˈrɔihːɔ"},
		{"loippo", "ˈlɔɪʔpɔ"},
		{"ouġu", "ˈɔuxu"},
		{"lįoubmo", "ˈljɔʊʔp̚mɔ"},
		{"rikkuami", "ˈrɪʔkuɑmi"},
		{"neskuahmi", "ˈnɛskʊahmi"},
		{"belmui", "ˈbɛlmui"},
		{"suikna", "ˈsʊɪʔk̚ŋa"},
		{"pigįuoma", "ˈpʰijːuɔma"},
		{"puolhia", "ˈpʰʊɔlhia"},
		{"tůavven", "ˈtʰøɑwːɛn"},
		{"sůitů", "ˈsøidø"},
		{"ůikků", "ˈœɪʔcø"},
		{"tsġiauga", "ˈt͡sxiɑuɣa"},
		{"biaiḍbakin", "ˈbɪaɪðbɑɟɪn"},
		{"nieigįa", "ˈnieijːa"},
		{"niue", "ˈniue"},
		{"goaiġa", "ˈɡɔɑixa"},
		{"huoibmui", "ˈhʊɔɪʔp̚mui"},
		{"benhueita", "ˈbɛnhueida"},
		"oaḍgeuskus<br />''consonants''",
		{"mamma", "ˈmɑmːa"},
		{"biali", "ˈbiɑli"},
		{"vilvi", "ˈvɪlvi"},
		{"neta", "ˈneta"},
		{"somi", "ˈsɔmi"},
		{"ṡini", "ˈɕini"},
		{"tṡihi", "ˈt͡ɕiʔi"},
		{"hįůdįa", "ˈhjød͡ʑa"},
		{"keḍmi", "ˈcʰɛðmːi"},
		{"rekken", "ˈrɛʔcɛn"},
		{"leḍba", "ˈlɛðba"},
		{"ỉdla", "ˈiːtɬa"},
		{"kengi", "ˈcʰeŋːi"},
		{"nįunni", "ˈɲunːi"},
		{"sġůgįů", "ˈsxøjːø"},
		{"hęni", "ˈhæni"},
		{"poaṡṡi", "ˈpʰɔɑɕːi"},
		{"peyma", "ˈpʰeøma"},
		{"tỏ", "ˈtʰʊː"},
		{"tohhus", "ˈtʰɔhːʊs"},
		{"kemṡi", "ˈcʰɛmɕi"},
		{"kolkon", "ˈkʰɔlkɔn"},
		{"gįosin", "ˈɟɔsɪn"},
		{"gįegįi", "ˈd͡zejːi"},
		{"kika", "ˈcʰika"},
		{"neta", "ˈneta"},
		{"tatami", "ˈtʰɑtɑmi"},
		{"tsepu", "ˈt͡sepu"},
		{"vihi", "ˈviʔi"},
		{"sagįoba", "ˈsɑjːɔba"},
		{"huhhi", "ˈhuhːi"},
		{"opa", "ˈɔpa"},
		{"oapi", "ˈɔɑbi"},
		{"gauta", "ˈɡɑuda"},
		{"keika", "ˈcʰeiɡa"},
		{"keda", "ˈcʰeda"},
		{"keida", "ˈcʰeiða"},
		{"odena", "ˈɔdena"},
		{"oadi", "ˈɔɑd͡ʑi"},
		{"eidda", "ˈeitːa"},
		{"eiddie", "ˈeitːie"},
		{"gegi", "ˈɟeɟi"},
		{"geiga", "ˈɟeiɣa"},
		{"hait", "ˈhaɪt͡ɕ"},
		{"elet", "ˈelɛʔɛ̆"},
		{"lungit", "ˈluŋːɪt͡ɕ"},
		{"tůppů", "ˈtʰœʔpø"},
		{"ůttů", "ˈœʔtø"},
		{"sġoakke", "ˈsxɔaʔce"},
		{"sokubmue", "ˈsɔkʊʔp̚mue"},
		{"sauṡpỉdna", "ˈsaʊɕpiːʔt̚na"},
		{"voakna", "ˈvɔaʔk̚ŋa"},
		{"huvvi", "ˈhuwːi"},
		{"tiebbami", "ˈtʰiepːɑmi"},
		{"oddo", "ˈɔtːɔ"},
		{"mieḍḍa", "ˈmieðːa"},
		{"hesse", "ˈhesːe"},
		{"aṡṡekken", "ˈɑɕːɛʔcɛn"},
		{"kůddįů", "ˈcʰød͡ʑːø"},
		{"mįerru", "ˈmjerːu"},
		{"hollu", "ˈhɔlːu"},
		{"peggů", "ˈpʰecːø"},
		{"toḥḥami", "ˈtʰɔʔːɑmi"},
		{"tahha", "ˈtʰɑhːa"},
		{"ůdlġůt", "ˈœtɬxœʔœ̆"},
		{"niḍgi", "ˈnɪðɟi"},
		{"nedġi", "ˈnɛðxi"},
		--[[{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},
		{"", ""},]]
	}
	self:iterate(list, "check_output")
end

return tests