Module:ca-IPA/testcases

local tests = require("Module:UnitTests")
local driver = require("Module:ca-IPA/testcases/driver")

--[=[
Each line of the example text is either a high-level header beginning with ###, a subheader beginning with ##, a comment
beginning with #, a blank line or an example. Examples consist of three tab-separated fields, followed by an optional
comment to be shown along with the example (delimited by a # preceded by whitespace). The first field is the actual
spelling of the term in question. The second field is the respelling. The third field is the expected phonemic IPA
pronunciation.

See ] for more detailed information on the format of examples, along with information
on how to create a new subset of testcases.
]=]

local examples = [==[
### Specific letter combinations

## Voicing assimilation before m
abisme	+	əˈβiz.mə
admetre	ê	ədˈmɛ.tɾə
curtmetratge		ˌkurd.məˈtɾa.dʒə
sordmut		ˌsordˈmut
sotmetre	ê	sudˈmɛ.tɾə
diferentment	+	di.fəˌɾenˈmen
ammonit	+	əm.muˈnit
apotegma	è	ə.puˈtɛɡ.mə
fragment	+	fɾəɡˈmen
augmentar	+	əwɡ.mənˈta
llargmetratge	+	ˌʎarɡ.məˈtɾa.dʒə
Caixmir		kəʒˈmir
algoritme	+	əl.ɣuˈɾid.mə
setmana		səmˈma.nə
setmesó		ˌsed.məˈzo
tmesi	è	ˈdmɛ.zi
wàttmetre		ˈbad.mə.tɾə
istme	+	ˈiz.mə
dracma	+	ˈdɾaɡ.mə
francmaçó	+	ˌfɾã.məˈso
turcman	+	turɡˈman
Turkmenistan	+	turɡ.mə.nisˈtan
khmer		ˈkmer
submarí	+	sum.məɾˈi


## Voicing assimilation before n
hafni	+	ˈav.ni
ovni	ò	ˈɔv.ni
abnegació	+	əm.nə.ɣə.siˈo
subnormal	+	sum.nurˈmal
estibnita	+	əs.timˈni.tə
acne	+	ˈaŋ.nə
aràcnid	+	əˈɾaŋ.nit
electrotècnia		əˌlɛk.tɾuˈtɛŋ.ni.ə
pícnic	+	ˈpiŋ.nik
Agnès	+	əŋˈnɛs
cigne	+	ˈsiŋ.nə
apnea	é	əbˈne.ə
dispnea	é	dizmˈne.ə
hipnosi	ò	imˈnɔ.zi
pneumàtic	+	nəwˈma.tik

## Voicing assimilation before l, r
afluent	+	ə.fluˈen
deslleial	+	dəz.ʎəˈjal
becllarg	+	beɡˈʎaɾk
Israel	è	iz.rəˈɛl
sahrauí	+	sə.rəˈwi

## Voicing assimilation before stops
afganès	+	əv.ɣəˈnɛs
dubtar	+	dupˈta

## Elision of consonants in post- (and subsequent voicing assimilation)
postgrau		ˌpɔzˈɡɾaw
postguerra		ˌpɔzˈɡɛ.rə
postludi		ˌpɔzˈlu.ði
posttraumàtic		ˌpɔs.tɾəwˈma.tik
presumpció	+	pɾə.zum.siˈo

## Reduction of a/e next to another vowel
preeminent	+	pɾə.ə.miˈnen
meteor		mə.teˈɔɾ
meteorit	+	mə.te.uˈɾit
aerologia	+	ə.e.ɾu.luˈʒi.ə
aeròmetre	+	ə.eˈɾɔ.mə.tɾə
realista	+	re.əˈlis.tə
neòfit	+	neˈɔ.fit
neolític	+	ne.uˈli.tik

## Sequences of t + m/n/l/ll
setmana		səmˈma.nə
setmana		seˈma.na	val
aritmètic	+	ə.ɾidˈmɛ.tik
aritmètic	+	a.ɾidˈmɛ.tik	val
tmesi	è	ˈdmɛ.zi
tmesi	è	ˈmɛ.zi	val
ametlla		əmˈmɛʎ.ʎə
ametlla		aˈmeʎ.ʎa	val
bitllet	ê	biʎˈʎɛt
bitllet	ê	biˈʎet	val
atlàntic	+	əlˈlan.tik
atlàntic	+	adˈlan.tik	val
decatló	+	də.kəlˈlo
decatló	+	de.kadˈlo	val
motle	ò	ˈmɔl.le	val
vietnamita	+	bi.ən.nəˈmi.tə
vietnamita	+	vi.ed.naˈmi.ta	val
cotna	ó	ˈkon.nə
cotna	ó	ˈkon.na	val
]==]

function tests:check_ipa(spelling, respelling, expected, comment)
	return driver.check_ipa(self, spelling, respelling, expected, comment)
end

function tests:test()
	self:iterate(driver.parse(examples), "check_ipa")
end

return tests