Module:fr-pron/testcases

local tests = require('Module:UnitTests')
local m_fr_pron = require('Module:fr-pron')
local m_links = require('Module:links')

local lang = require('Module:languages').getByCode('fr')

local function tag_IPA(IPA)
	return '<span class="IPA">' .. IPA .. '</span>'
end

function tests:check_pron(Fr, IPA, respelling, pos)
	local expected = table.concat(m_fr_pron.show(respelling or Fr, pos), ",")
	self:equals(
		m_links.full_link({term = Fr, lang = lang}, nil, true) ..
			(respelling and (" (respelled " .. respelling .. ")") or "") ..
			(pos and ", pos=" .. pos or ""),
		expected, IPA,
		{ nowiki = true, display = tag_IPA }
	)
end

-- Entries here usually look like
--    self:check_pron("FRENCH", "PRONUNCIATION")
--
-- but can also be
--    self:check_pron("FRENCH", "PRONUNCIATION", "RESPELLED-FRENCH")
--
-- e.g.
--    self:check_pron("femme", "fam", "famme")
--
-- They can also include a fourth argument "pos" for a specified part of speech;
-- the only recognized value so far is "v" for verbs, which affects final -ai
-- and -ent:
--    self:check_pron("aiment", "ɛm", nil, "v")
--
-- It is also possible to combine some or all of respelling and pos, e.g.
--    self:check_pron("dort-il", "dɔʁ.t‿il", "dort‿il", "v")
function tests:test_pron()
	local examples = {
		-- A:
		{ "patte", "pat" },
		{ "arable", "a.ʁabl" },
		{ "sa", "sa" },
		{ "base", "baz,bɑz", "bâse" },
		-- À:
		{ "là", "la" },
		{ "déjà", "de.ʒa" },
		-- Â:
		{ "château", "ʃa.to,ʃɑ.to" },
		{ "pâte", "pat,pɑt" },
		-- Æ:
		{ "hæmorrhagie", "e.mɔ.ʁa.ʒi" },
		{ "æstimer", "ɛs.ti.me" },
		{ "quæstion", "kɛs.tjɔ̃" },
		-- AI:
		{ "vrai", "vʁɛ" },
		{ "faite", "fɛt" },
		{ "baisser", "bɛ.se,be.se" },
		{ "aiguille", "ɛ.ɡij,e.ɡij" },
		{ "faisons", "fə.zɔ̃", "fesons" },
		{ "parlerai", "paʁ.lə.ʁe", nil, "v" }, 
		{ "chaîne", "ʃɛn" },
		{ "baie", "bɛ" },
		{ "monnaie", "mɔ.nɛ" },
		{ "paieriez", "pɛ.ʁje" },
		-- AOU:
		{ "aoûtien", "a.u.sjɛ̃" },
		{ "août", "ut", "oute" },
		-- AU:
		{ "haut", "o" },
		{ "augure", "o.ɡyʁ" },
		{ "autre", "otʁ" },
		{ "restaurant", "ʁɛs.tɔ.ʁɑ̃" },
		{ "restaurer", "ʁɛs.tɔ.ʁe" },
		{ "dinosaure", "di.no.zɔʁ" },
		-- AY:
		{ "ayons", "ɛ.jɔ̃,e.jɔ̃" },
		{ "Gamay", "ɡa.mɛ" },
		{ "mayonnaise", "ma.jɔ.nɛz", "maillonnaise" },
		{ "papaye", "pa.paj", "papaille" },
		{ "ayoye", "a.jɔj", "ailloille" },
		{ "abbaye", "a.bɛ.i,a.be.i", "abbèi" },
		-- B:
		{ "plomb", "plɔ̃" },
		{ "obstacle", "ɔp.stakl" },
		{ "toubibs", "tu.bib" },
		-- C:
		{ "blanc", "blɑ̃" },
		{ "caoutchouc", "ka.ut.ʃu", "caoutchou" },
		{ "accueil", "a.kœj" },
		{ "cercueil", "sɛʁ.kœj" },
		{ "tabac", "ta.ba", "taba" },
		{ "estomac", "ɛs.tɔ.ma", "estoma" },
		{ "porc", "pɔʁ", "por" },
		{ "chaos", "ka.o", "caos" },
		{ "chlore", "klɔʁ", "clore" },
		{ "varech", "va.ʁɛk", "varec" },
		{ "almanach", "al.ma.na", "almana" },
		{ "yacht", "jɔt", "yote" },
		{ "accès", "ak.sɛ" },
		{ "accord", "a.kɔʁ" },
		{ "direct", "di.ʁɛkt" },
		{ "correct", "kɔ.ʁɛkt" },
		{ "instinct", "ɛ̃s.tɛ̃" },
		{ "succinct", "syk.sɛ̃" },
		{ "respect", "ʁɛs.pɛ", "respè" },
		{ "suspect", "sys.pɛ", "suspè" },
		{ "donc", "dɔ̃k", "donque" },
		{ "parc", "paʁk" },
		{ "sec", "sɛk" },
		{ "c'était", "s‿e.tɛ" },
		-- Ç:
		{ "ça", "sa" },
		{ "commençons", "kɔ.mɑ̃.sɔ̃" },
		{ "hameçon", "am.sɔ̃" },
		-- CH:
		{ "blanche", "blɑ̃ʃ" },
		{ "chaos", "ka.o", "caos" },
		{ "chlore", "klɔʁ", "clore" },
		{ "varech", "va.ʁɛk", "varec" },
		{ "almanach", "al.ma.na", "almana" },
		{ "schnaps", "ʃnaps", "schnapse" },
		{ "esche", "ɛʃ" },
		-- D:
		{ "vend", "vɑ̃" },
		{ "donnée", "dɔ.ne" },
		{ "addition", "a.di.sjɔ̃" },
		{ "pied", "pje" },
		-- E:
		{ "emmène", "ɑ̃.mɛn" },
		{ "emmener", "ɑ̃m.ne" },
		{ "emmental", "e.mɑ̃.tal", "émmental" },
		{ "effacer", "e.fa.se" },
		{ "emmuseler", "ɑ̃.myz.le" },
		{ "ennuyer", "ɑ̃.nɥi.je" },
		{ "parle", "paʁl" },
		{ "table", "tabl" },
		{ "table rouge", "ta.blə ʁuʒ" },
		{ "table de", "ta.blə də" },
		{ "loup de mer", "lu d(ə) mɛʁ", "loup de merre" },
		{ "mettre de côté", "mɛ.tʁə d(ə) ko.te" },
		{ "sucre en poudre", "sykʁ ɑ̃ pudʁ" },
		{ "femme", "fam", "famme" },
		{ "permet", "pɛʁ.mɛ" },
		{ "prudemment", "pʁy.da.mɑ̃" },
		{ "venir", "və.niʁ" },
		{ "devenir", "də.v(ə).niʁ" },
		{ "parlerons", "paʁ.lə.ʁɔ̃" },
		{ "racheter", "ʁaʃ.te" },
		{ "rachetons", "ʁaʃ.tɔ̃" },
		{ "repeser", "ʁə.pə.ze", "repĕser" },
		{ "que", "kə" },
		{ "je", "ʒə" },
		{ "henné", "e.ne" },
		{ "ses", "se" },
		{ "tes", "te" },
		{ "les", "le" },
		{ "es", "ɛ" },
		{ "blesserons", "blɛ.sʁɔ̃" },
		{ "blesse", "blɛs" },
		{ "céderons", "sɛ.dʁɔ̃", "cèderons" },
		{ "soierie", "swa.ʁi" },
		{ "dépecez", "de.p(ə).se", "dép(ə)cez" },
		{ "clamecez", "klam.se" },
		{ "ressortir", "ʁə.sɔʁ.tiʁ" },
		{ "essayer", "ɛ.sɛ.je", "èssayer" },
		{ "essayer", "e.se.je", "ésséyer" },
		{ "mettez", "mɛ.te" },
		{ "mettrez", "mɛ.tʁe" },
		{ "décevoir", "de.sə.vwaʁ" },
		{ "vancouverois", "vɑ̃.ku.və.ʁwa" },
		{ "ressemeler", "ʁə.sə.m(ə).le" },
		{ "ressemelle", "ʁə.s(ə).mɛl" },
		{ "ressemelez", "ʁə.sə.m(ə).le" },
		{ "vous ressemelez", "vu ʁ(ə).sə.m(ə).le" },
		{ "je regarde", "ʒə ʁ(ə).ɡaʁd" },
		{ "genièvre", "ʒə.njɛvʁ" },
		{ "dessous", "də.su", "dəssous" }, -- should work with the correct schwa
		{ "dessous", "də.su", "dǝssous" }, -- and with the wrong one
		{ "vis-à-vis de", "vi.z‿a.vi də", "vis‿à-vis de" },
		{ "de part et d'autre de", "də paʁ e d‿o.tʁə də" }, --et should be /e/
		{ "au-dehors", "o.də.ɔʁ" }, -- schwa is required not optional
		{ "troisièmement", "tʁwa.zjɛm.mɑ̃", "troisièmėment" },
		{ "vingt-et-un", "vɛ̃.t‿e.œ̃", "vingt‿et-un" }, --et should be /e/ in liaison too
		{ "déchirerez", "de.ʃi.ʁə.ʁe" },
		{ "saladerie", "sa.la.dʁi" },
		{ "palefroi", "pal.fʁwa", "pale-froi" },
		{ "vilebrequin", "vil.bʁə.kɛ̃" },
		{ "lèchefrite", "lɛʃ.fʁit", "lèche-frite" },
		-- É: 
		{ "gémit", "ʒe.mi" },
		{ "bénédiction", "be.ne.dik.sjɔ̃" },
		{ "agréerons", "a.ɡʁe.ʁɔ̃" },
		{ "agréerions", "a.ɡʁe.ʁjɔ̃" },
		{ "agréons", "a.ɡʁe.ɔ̃" },
		{ "agréions", "a.ɡʁej.jɔ̃" },
		{ "agréé", "a.ɡʁe.e" },
		-- È:
		{ "rachète", "ʁa.ʃɛt" },
		{ "dépèce", "de.pɛs" },
		{ "très", "tʁɛ" },
		-- Ê:
		{ "dépêcher", "de.pɛ.ʃe" },
		-- EAU:
		{ "beaux", "bo" },
		-- EI:
		{ "seine", "sɛn" },
		{ "neige", "nɛʒ" },
		{ "reître", "ʁɛtʁ" },
		-- EU:
		{ "jeune", "ʒœn" },
		{ "jeûne", "ʒøn" },
		{ "neutre", "nøtʁ" },
		{ "feutre", "føtʁ" },
		{ "chanteuse", "ʃɑ̃.tøz" },
		{ "heureux", "œ.ʁø" },
		{ "peu", "pø" },
		{ "eu", "y", "u" },
		{ "eusse", "ys", "usse" },
		{ "eûmes", "ym", "ûmes" },
		{ "bleuet", "blø.ɛ", "bleûet" },
		{ "bleuetière", "blø.ɛ.tjɛʁ", "bleûètière" },
		{ "maïeutique", "ma.jø.tik", "maïeûtique" },
		{ "euphémisme", "ø.fe.mism" },
		-- F:
		{ "bœuf", "bœf" },
		{ "bœufs", "bø", "bœux" },
		{ "cerf", "sɛʁ", "cerre" },
		{ "clef", "kle", "clé" },
		{ "nerf", "nɛʁ", "nerre" },
		{ "neuf", "nœf" },
		{ "œuf", "œf" },
		{ "œufs", "ø", "œux" },
		{ "souffrir", "su.fʁiʁ" },
		-- G:
		{ "gens", "ʒɑ̃" },
		{ "ange", "ɑ̃ʒ" },
		{ "mangeait", "mɑ̃.ʒɛ" },
		{ "mangeons", "mɑ̃.ʒɔ̃" },
		{ "bourgeois", "buʁ.ʒwa" },
		{ "contingemment", "kɔ̃.tɛ̃.ʒa.mɑ̃" },
		{ "geai", "ʒɛ" },
		{ "rougeai", "ʁu.ʒe", nil, "v" },
		{ "joug", "ʒu" },
		{ "zigzag", "ziɡ.zaɡ", "zigzague" },
		{ "suggérer", "syɡ.ʒe.ʁe" },
		{ "longtemps", "lɔ̃.tɑ̃" },
		{ "vingt", "vɛ̃" },
		{ "geignais", "ʒɛ.ɲɛ" },
		{ "voyageur", "vwa.ja.ʒœʁ" },
		{ "management", "ma.nadʒ.mɛnt", "manadjme_nte" },
		{ "management", "ma.na(d)ʒ.mɑ̃", "mana(d)jment" },
		{ "syndrome d'Asperger", "sɛ̃.dʁɔm d‿as.pɛʁ.ʒəʁ", "syndrome d'Aspergĕr" },
		-- GN:
		{ "montagne", "mɔ̃.taɲ" },
		{ "agneau", "a.ɲo" },
		{ "gnou", "ɡnu", "g_nou" },
		{ "baignoire", "bɛ.ɲwaʁ" },
		{ "éteigniez", "e.tɛ.ɲje" },
		{ "gnon", "ɲɔ̃" },
		{ "gnose", "ɡnoz", "g_nose" },
		{ "gnouf", "ɲuf" },
		{ "gnangnan", "ɲɑ̃.ɲɑ̃" },
		{ "gnôle", "ɲol" },
		{ "bagne", "baɲ" },
		{ "cognitif", "kɔɡ.ni.tif", "cog_nitif" },
		{ "vigneron", "vi.ɲə.ʁɔ̃" },
		{ "agnelet", "a.ɲə.lɛ" },
		-- GU:
		{ "augure", "o.ɡyʁ" },
		{ "aigue", "ɛɡ" },
		{ "aigu", "ɛ.ɡy" },
		{ "aiguë", "ɛ.ɡy" },
		{ "blaguons", "bla.ɡɔ̃" },
		{ "guide", "ɡid" },
		{ "vaguant", "va.ɡɑ̃" },
		{ "orgueil", "ɔʁ.ɡœj" },
		-- H:
		{ "habite", "a.bit" },
		{ "houe", "u" },
		{ "hache", "aʃ" },
		{ "ahurir", "a.y.ʁiʁ" },
		{ "envahir", "ɑ̃.va.iʁ" },
		{ "nihilisme", "ni.i.lism" },
		{ "jihad", "dʒi.ad", "djihade" },
		{ "souhaite", "swɛt" },
		{ "anhédonie", "a.ne.dɔ.ni" },
		{ "enhucher", "ɑ̃.y.ʃe" },
		{ "enherber", "ɑ̃.nɛʁ.be", "ennerber" },
		-- I:
		{ "importante", "ɛ̃.pɔʁ.tɑ̃t" },
		{ "bruis", "bʁɥi" },
		{ "brui", "bʁɥi" },
		{ "ion", "jɔ̃" },
		{ "triage", "tʁi.jaʒ" },
		{ "trierons", "tʁi.ʁɔ̃" },
		{ "étudierons", "e.ty.di.ʁɔ̃" },
		{ "étudierions", "e.ty.di.ʁjɔ̃" },
		{ "étudions", "e.ty.djɔ̃" },
		{ "étudiions", "e.ty.di.jɔ̃" },
		{ "abstiennent", "ap.stjɛn", nil, "v" },
		-- Î:
		{ "gîte", "ʒit" },
		{ "huîtres", "ɥitʁ" },
		-- Ï:
		{ "naïf", "na.if" },
		{ "*]", "a.iʁ", "haïr" },
		{ "maïs", "ma.is", "maïsse" },
		{ "aïe", "aj", "aille" },
		{ "ïambe", "jɑ̃b" },
		{ "aïeul", "a.jœl" },
		{ "païen", "pa.jɛ̃" },
		{ "amuïr", "a.my.iʁ", "amu_ir" },
		{ "ouï", "wi" },
		{ "ouïe", "wi" },
		{ "ouïr", "wiʁ" },
		{ "ouïrais", "wi.ʁɛ" },
		{ "coït", "kɔ.it", "coïte" },
		{ "astéroïde", "as.te.ʁɔ.id" },
		{ "ambiguïser", "ɑ̃.bi.ɡɥi.ze" },
		-- IEN, ÉEN, YEN:
		{ "orienteur", "ɔ.ʁjɑ̃.tœʁ" },
		{ "science", "sjɑ̃s" },
		{ "rien", "ʁjɛ̃" },
		{ "vient", "vjɛ̃", "vien", "v" },
		{ "viendra", "vjɛ̃.dʁa", "viaindra" },
		{ "inconvénient", "ɛ̃.kɔ̃.ve.njɑ̃" },
		{ "européen", "ø.ʁɔ.pe.ɛ̃" }, 
		{ "réengager", "ʁe.ɑ̃.ɡa.ʒe" },
		{ "doyen", "dwa.jɛ̃" },
		{ "bientôt", "bjɛ̃.to" },
		{ "biennal", "bjɛ.nal" },
		-- J:
		-- K:
		{ "kilogramme", "ki.lɔ.ɡʁam" },
		{ "bifteck", "bif.tɛk" },
		-- L:
		{ "batailler", "ba.ta.je" },
		{ "feuille", "fœj" },
		{ "feuilleter", "fœj.te" },
		{ "feuillette", "fœ.jɛt" },
		{ "feuilletons", "fœj.tɔ̃" },
		{ "réveiller", "ʁe.vɛ.je" },
		{ "cueillir", "kœ.jiʁ" },
		{ "dringueille", "dʁɛ̃.ɡɛl", "dringuelle" },
		{ "fils", "fis", "fisse" },
		{ "fils", "fis", "fiç" },
		{ "fille", "fij" },
		{ "fil", "fil" },
		{ "ville", "vil", "vile" },
		{ "mille", "mil", "mile" },
		{ "village", "vi.laʒ", "vilage" },
		{ "aulx", "o", "au" },
		{ "fusil", "fy.zi", "fusi" },
		{ "outil", "u.ti", "outi" },
		{ "cul", "ky", "cu" },
		{ "saoul", "su", "sou" },
		{ "soleil", "sɔ.lɛj" },
		{ "ail", "aj" },
		{ "poil", "pwal" },
		{ "travaille", "tʁa.vaj" },
		{ "vieille", "vjɛj" },
		{ "juillet", "ʒɥi.jɛ" },
		{ "aiguille", "ɛ.ɡɥij", "aiguïlle" },
		{ "illuminer", "i.ly.mi.ne" },
		-- M:
		{ "faim", "fɛ̃" },
		{ "pomme", "pɔm" },
		{ "somnolence", "sɔm.nɔ.lɑ̃s" },
		{ "automne", "o.tɔn", "autonne" },
		{ "condamner", "kɔ̃.da.ne", "condanner" },
		{ "boum", "bum" },
		{ "parfum", "paʁ.fœ̃", "parfun" },
		{ "maximum", "mak.si.mɔm" },
		{ "album", "al.bɔm" },
		{ "ombre", "ɔ̃bʁ" },
		{ "totem", "tɔ.tɛm" },
		{ "sympa", "sɛ̃.pa" },
		{ "symphonie", "sɛ̃.fɔ.ni" },
		{ "gymnase", "ʒim.naz" },
		{ "hymne", "imn" },
		{ "Reims", "ʁɛ̃" },
		{ "comment", "kɔ.mɑ̃" },
		{ "ams tram gram", "ams tʁam ɡʁam", "amse tram gram" },
		{ "ashram", "aʃ.ʁam" },
		{ "dam", "dɑ̃", "dan" },
		{ "denim", "də.nim" },
		{ "pronom", "pʁɔ.nɔ̃" },
		{ "noms", "nɔ̃" },
		{ "circumlunaire", "siʁ.kɔm.ly.nɛʁ" },
		-- N:
		{ "une", "yn" },
		{ "distance", "dis.tɑ̃s" },
		{ "atteine", "a.tɛn" },
		{ "attein", "a.tɛ̃" },
		{ "attei", "a.tɛ" },
		{ "surmène", "syʁ.mɛn" },
		{ "surmeni", "syʁ.mə.ni" },
		{ "joindre", "ʒwɛ̃dʁ" },
		{ "saint", "sɛ̃" },
		{ "examen", "ɛɡ.za.mɛ̃", "examin" },
		{ "ben", "bɛ̃", "bin" },
		{ "à jeun", "a ʒœ̃" },
		{ "juin", "ʒɥɛ̃" },
		{ "parlent", "paʁl", nil, "v" },
		{ "finissaient", "fi.ni.sɛ", nil, "v" },
		{ "servent", "sɛʁv", nil, "v" },
		{ "sent", "sɑ̃", nil, "v" },
		{ "canyon", "ka.ɲɔn", "cagnonne" },
		{ "monsieur", "mə.sjø", "mecieu" },
		{ "brun", "bʁœ̃" },
		{ "syndrome", "sɛ̃.dʁom", "syndrôme" },
		{ "tînmes", "tɛ̃m" },
		{ "tînrent", "tɛ̃ʁ", nil, "v" },
		{ "annexe", "a.nɛks" },
		{ "Bouroundi", "bu.ʁun.di" },
		{ "Cameroun", "kam.ʁun" },
		{ "sprinter", "spʁin.te", "spri_nter" },
		{ "chinois", "ʃi.nwa" },
		-- NG:
		{ "long", "lɔ̃" },
		{ "sang", "sɑ̃" },
		{ "poing", "pwɛ̃" },
		{ "poings", "pwɛ̃" },
		{ "shampooing", "ʃɑ̃.pwɛ̃", "shampoing" },
		{ "parking", "paʁ.kiŋ" },
		{ "camping", "kɑ̃.piŋ" },
		{ "shopping", "ʃɔ.piŋ" },
		{ "shoppings", "ʃɔ.piŋ" },
		{ "chewing-gum", "ʃwiŋ.ɡɔm", "chwing-gomme" },
		-- O:
		{ "modeler", "mɔ.dle" },
		{ "euro", "ø.ʁo" },
		{ "chose", "ʃoz" },
		{ "sosie", "sɔ.zi", "sŏsie" },
		-- Ô:
		{ "cône", "kon" },
		-- Œ:
		{ "œil", "œj" },
		{ "œillade", "œ.jad" },
		{ "œillet", "œ.jɛ" },
		{ "œsophage", "e.zɔ.faʒ" },
		{ "cœlacanthe", "se.la.kɑ̃t" },
		{ "fœtus", "fe.tys", "fœtusse" },
		{ "œstrogène", "ɛs.tʁɔ.ʒɛn" },
		-- ŒU:
		{ "nœud", "nø" },
		{ "vœu", "vø" },
		{ "sœur", "sœʁ" },
		{ "cœur", "kœʁ" },
		{ "œuf", "œf" },
		-- OE:
		{ "coefficient", "kɔ.e.fi.sjɑ̃", "coéfficiant" },
		{ "moelle", "mwal" },
		{ "moellon", "mwa.lɔ̃" },
		{ "poêle", "pwal" },
		{ "Noël", "nɔ.ɛl" },
		{ "canoë", "ka.nɔ.e", "canoé" },
		{ "foëne", "fwɛn", "fouène" },
		-- OI:
		{ "avoir", "a.vwaʁ" },
		{ "noix", "nwa" },
		{ "foie", "fwa" },
		{ "oignon", "ɔ.ɲɔ̃", "ognon" },
		{ "iroquoien", "i.ʁɔ.kwa.jɛ̃" },
		{ "trois", "tʁwa" }, -- not /tʁua/
		{ "aboierez", "a.bwa.ʁe" },
		{ "aboient", "a.bwa", nil, "v" },
		{ "bouilloire", "buj.waʁ" },
		-- OU:
		{ "ouvrir", "u.vʁiʁ" },
		{ "sous", "su" },
		{ "ouest", "wɛst" },
		{ "couiner", "kwi.ne" },
		{ "cacahouète", "ka.ka.wɛt" },
		{ "roue", "ʁu" },
		{ "goût", "ɡu" },
		{ "brouillard", "bʁu.jaʁ" },
		{ "flouons", "flu.ɔ̃" },
		{ "jouons", "ʒwɔ̃" },
		{ "jouerons", "ʒu.ʁɔ̃" },
		-- OY:
		{ "envoyer", "ɑ̃.vwa.je" },
		{ "moyen", "mwa.jɛ̃" },
		{ "royaume", "ʁwa.jom" },
		{ "goyave", "ɡɔ.jav", "goillave" },
		-- P:
		{ "pas", "pa,pɑ" },
		{ "coup", "ku" },
		{ "trop", "tʁo" },
		{ "cap", "kap", "cape" },
		{ "cep", "sɛp", "ceppe" },
		{ "concept", "kɔ̃.sɛpt", "concepte" },
		{ "sept", "sɛt", "sette" },
		{ "baptême", "ba.tɛm", "batême" },
		{ "prompt", "pʁɔ̃", "pront" },
		{ "temps", "tɑ̃" },
		{ "interromps", "ɛ̃.tɛ.ʁɔ̃,ɛ̃.te.ʁɔ̃" },
		{ "compter", "kɔ̃.te" },
		{ "promptitude", "pʁɔ̃p.ti.tyd" },
		{ "schtroumpf", "ʃtʁumf", "schtroumf" },
		{ "corps", "kɔʁ" },
		-- PH:
		{ "phrase", "fʁaz,fʁɑz", "phrâse" },
		{ "graphe", "ɡʁaf" },
		-- Q:
		{ "cinq", "sɛ̃k", "cinque" },
		{ "coq", "kɔk" },
		-- QU:
		{ "quand", "kɑ̃" },
		{ "équipe", "e.kip" },
		{ "équilatéral", "e.kɥi.la.te.ʁal", "écuilatéral" },
		{ "aquarium", "a.kwa.ʁjɔm", "acouarium" },
		{ "loquace", "lɔ.kwas", "locouace" },
		{ "quatuor", "kwa.tɥɔʁ", "couatuor" },
		{ "piqûre", "pi.kyʁ" },
		{ "qu'on", "k‿ɔ̃" },
		-- R:
		{ "châtre", "ʃatʁ,ʃɑtʁ" },
		{ "messieurs", "me.sjø", "méssieu" },
		{ "barre", "baʁ" },
		{ "goûter", "ɡu.te" },
		{ "hiver", "i.vɛʁ", "hiverre" },
		{ "hier", "jɛʁ", "hierre" },
		{ "super", "sy.pɛʁ", "superre" },
		{ "éther", "e.tɛʁ", "éterre" },
		{ "chemin de fer", "ʃə.mɛ̃ d(ə) fɛʁ" },
		{ "vers", "vɛʁ" },
		{ "finir", "fi.niʁ" },
		{ "part", "paʁ" },
		{ "sert", "sɛʁ" },
		{ "ressert", "ʁə.sɛʁ" },
		-- S:
		{ "asien", "a.zjɛ̃" },
		{ "assez", "a.se" },
		{ "anse", "ɑ̃s" },
		{ "penser", "pɑ̃.se" },
		{ "transat", "tʁɑ̃.za" },
		{ "transiter", "tʁɑ̃.zi.te" },
		{ "science", "sjɑ̃s", "sciance" },
		{ "gasoil", "ɡa.zwal" },
		-- SH:
		{ "déshabiller", "de.za.bi.je" },
		{ "photoshoper", "fɔ.tɔ.ʃɔ.pe" },
		{ "shawarma", "ʃa.waʁ.ma" },
		{ "Washington", "wa.ʃiŋ.tɔn", "Washing_tonne" },
		-- T:
		{ "tôt", "to" },
		{ "yaourt", "ja.uʁt", "yaourte" },
		{ "zut", "zyt", "zute" },
		{ "brut", "bʁyt", "brute" },
		{ "thème", "tɛm" },
		{ "aneth", "a.nɛt", "anette" },
		{ "asthme", "asm", "asme" },
		{ "bizuth", "bi.zy", "bizut" },
		{ "nation", "na.sjɔ̃" },
		{ "initiation", "i.ni.sja.sjɔ̃", "iniciation" },
		{ "Croatie", "kʁo.a.si", "Crôacie" },
		{ "haïtien", "a.i.sjɛ̃" },
		{ "bastion", "bas.tjɔ̃" },
		{ "gestionnaire", "ʒɛs.tjɔ.nɛʁ" },
		{ "tiens", "tjɛ̃" },
		{ "aquae-sextien", "a.ke.sɛk.stjɛ̃", "aqué-sextien" },
		{ "portions", "pɔʁ.sjɔ̃" },
		{ "portions", "pɔʁ.tjɔ̃", nil, "v" },
		{ "conditionner", "kɔ̃.di.sjɔ.ne", nil, "v" },
		{ "partial", "paʁ.sjal" },
		{ "exponentiel", "ɛk.spɔ.nɑ̃.sjɛl" },
		{ "ouest pour", "wɛst puʁ" },
		{ "est", "ɛ" },
		{ "c'est", "s‿ɛ" },
		-- U:
		{ "juge", "ʒyʒ" },
		{ "huit", "ɥit", "huite" },
		{ "tuer", "tɥe" },
		{ "tofu", "tɔ.fu", "tofou" },
		{ "actuel", "ak.tɥɛl" },
		{ "rue", "ʁy" },
		{ "bruit", "bʁɥi" },
		{ "truelle", "tʁy.ɛl" },
		{ "influir", "ɛ̃.flɥiʁ" },
		{ "engluant", "ɑ̃.ɡly.ɑ̃" },
		{ "continuions", "kɔ̃.ti.ny.jɔ̃" },
		{ "ennuyons", "ɑ̃.nɥi.jɔ̃" },
		{ "ennuierez", "ɑ̃.nɥi.ʁe" },
		-- Û:
		{ "sûr", "syʁ" },
		{ "flûte", "flyt" },
		-- V:
		{ "vague", "vaɡ" },
		{ "grave", "ɡʁav" },
		-- W:
		{ "kiwi", "ki.wi" },
		{ "week-end", "wi.kɛnd", "wik-e_nde" },
		{ "whisky", "wis.ki", "wiski" },
		{ "wagon", "va.ɡɔ̃", "vagon" },
		{ "clown", "klun", "cloune" },
		{ "cow-boy", "ko.bɔj", "cau-boille" },
		{ "wallon", "wa.lɔ̃" },
		{ "show", "ʃo", "chau" },
		-- X:
		{ "xylophone", "ɡzi.lɔ.fɔn" },
		{ "expansion", "ɛk.spɑ̃.sjɔ̃" },
		{ "exigence", "ɛɡ.zi.ʒɑ̃s" },
		{ "peloton d'exécution", "pə.lɔ.tɔ̃ d‿ɛɡ.ze.ky.sjɔ̃" },
		{ "coexister", "kɔ.ɛɡ.zis.te" },
		{ "inexorable", "i.nɛɡ.zɔ.ʁabl" },
		{ "hexane", "ɛɡ.zan" },
		{ "lexical", "lɛk.si.kal" },
		{ "soixante", "swa.sɑ̃t", "soissante" },
		{ "deuxième", "dø.zjɛm", "deusième" },
		{ "galaxie", "ɡa.lak.si" },
		{ "paix", "pɛ" },
		{ "deux", "dø" },
		{ "animaux", "a.ni.mo" },
		{ "genoux", "ʒə.nu" },
		{ "sexe", "sɛks" },
		{ "index", "ɛ̃.dɛks" },
		{ "pharynx", "fa.ʁɛ̃ks" },
		{ "six", "sis", "sisse" },
		{ "dix", "dis", "disse" },
		{ "coccyx", "kɔk.sis", "coccysse" },
		{ "exciter", "ɛk.si.te" },
		-- Y:
		{ "payer", "pe.je", "péiller" },
		{ "yeux", "jø" },
		{ "paye", "pɛj" },
		{ "paie", "pɛ" },
		{ "payions", "pɛj.jɔ̃" },
		{ "ennuie", "ɑ̃.nɥi" },
		{ "ennuye", "ɑ̃.nɥij" },
		{ "hyène", "jɛn" },
		{ "cyclone", "si.klon", "cyclône" },
		{ "style", "stil" },
		{ "boycotter", "bɔj.kɔ.te", "boillcotter" },
		{ "dryade", "dʁi.jad" },
		{ "rhabdomyome", "ʁab.dɔ.mjɔm" },
		-- Z:
		{ "zain", "zɛ̃" },
		{ "gazette", "ɡa.zɛt" },
		{ "chez", "ʃe" },
		{ "nez", "ne" },
		{ "gaz", "ɡaz,ɡɑz", "gâze" },
		-- Hyphenation: (see also cases above and below)
		{ "arc-en-ciel", "aʁ.kɑ̃.sjɛl" },
		{ "ci-dessus", "si.d(ə).sy", "ci-dəssus" },
		{ "quatre-vingt-un", "ka.tʁə.vɛ̃.œ̃" },
		{ "puis-je", "pɥi.ʒə" },
		{ "quelle heure est-il", "kɛ.lœ.ʁɛ.t‿il", "quelle-heure-est‿il" },
		{ "parles-tu", "paʁ.l(ə).ty" },
		{ "montres-tu", "mɔ̃.tʁə.ty" },
		{ "croyez-le ou non", "kʁwa.je.lə u nɔ̃" },
		{ "contre-attaquer", "kɔ̃.tʁa.ta.ke" },
		{ "ouest-quart-sud-ouest", "wɛst.kaʁ.sy.dwɛst", "ouest-quart-sude-ouest" },
		-- Comma:
		{ "bras dessus, bras dessous", "bʁa d(ə).sy | bʁa d(ə).su,bʁɑ d(ə).sy | bʁɑ d(ə).su", "bras dəssus, bras dəssous" },
		{
			"au royaume des aveugles, les borgnes sont rois",
			"o ʁwa.jom de.z‿a.vœɡl | le bɔʁ.ɲ(ə) sɔ̃ ʁwa",
			"au royaume des‿aveugles, les borgnes sont rois"
		},
		-- Liaison:
		{ "grand arbre", "ɡʁɑ̃.t‿aʁbʁ", "grand‿arbre" },
		{ "pied-à-terre", "pje.t‿a.tɛʁ", "pied‿à-terre" },
		{ "quelle heure est-il", "kɛ.l‿œ.ʁ‿ɛ.t‿il", "quelle‿heure‿est‿il" },
		{ "neuf ans", "nœ.v‿ɑ̃", "neuf‿ans" },
		{ "long article", "lɔ̃.ɡ‿aʁ.tikl", "long‿article" },
		{ "gentil enfant", "ʒɑ̃.ti.j‿ɑ̃.fɑ̃", "genti‿enfant" },
		{ "s'en aller", "s‿ɑ̃.n‿a.le", "s'en‿aller" },
		{ "certain ami", "sɛʁ.tɛ.n‿a.mi", "certain‿ami" },
		{ "bon ami", "bɔ.n‿a.mi", "bon‿ami" },
		{ "mon ami", "mɔ̃.n‿a.mi", "mon‿ami" },
		{ "un ami", "œ̃.n‿a.mi", "un‿ami" },
		{ "qu'on apprend", "k‿ɔ̃.n‿a.pʁɑ̃", "qu'on‿apprend" },
		{ "l'on apprend", "l‿ɔ̃.n‿a.pʁɑ̃", "l'on‿apprend" },
		{ "trop élevé", "tʁo.p‿ɛl.ve", "trop‿èlevé" },
		{ "beaucoup appris", "bo.ku.p‿a.pʁi", "beaucoup‿appris" },
		{ "premier étage", "pʁə.mjɛ.ʁ‿e.taʒ", "premier‿étage" },
		{ "premiers étages", "pʁə.mje.z‿e.taʒ", "premiers‿étages" },
		{ "les enfants", "le.z‿ɑ̃.fɑ̃", "les‿enfants" },
		{ "vous avez", "vu.z‿a.ve", "vous‿avez" },
		{ "de plus en plus", "də ply.z‿ɑ̃ ply", "de plus‿en plus" },
		{ "de temps en temps", "də tɑ̃.z‿ɑ̃ tɑ̃", "de temps‿en temps" },
		{ "peut-être", "pø.t‿ɛtʁ", "peut‿être" },
		{ "dort-il", "dɔʁ.t‿il", "dort‿il", "v" },
		{ "parlent-ils", "paʁ.l(ə).t‿il", "parlent‿ils", "v" },
		{ "jouent-ils", "ʒu.t‿il", "jouent‿ils", "v" },
		{ "tout homme", "tu.t‿ɔm", "tout‿homme" },
		{ "faux amis", "fo.z‿a.mi", "faux‿amis" },
		{ "y a-t-il", "i.j‿a‿.t‿il", "y‿a‿t‿il" },
		{ "il n'y a", "il n‿j‿a", "il n'y‿a" },
		{ "venez ici", "və.ne.z‿i.si", "venez‿ici" },
		{ "des yeux", "de.z‿jø", "des‿yeux" },
	}
	
	tests:iterate(examples, "check_pron")
end

return tests