Module:lemme/testcases

Tous les tests ont réussi (rafraichir)

testIsLemmaFr :

	Texte	Attendu	Obtenu
	maison (fr-nom-noflex-noloc)	true	true
	maisons (fr-nom-flex-noloc)	false	false
	parce que (fr-nom-noflex-loc)	false	false
	Paul (fr-prénom-noflex-noloc)	false	false
	Paris (fr-nom-pr-noflex-noloc)	false	false
	Dupont (fr-nom-fam-noflex-noloc)	false	false

testIsLemmaOther :

	Texte	Attendu	Obtenu
	house (en-nom-noflex-noloc)	true	true
	houses (en-nom-flex-noloc)	false	false
	domus (la-nom-noflex-noloc)	true	true
	domum (la-nom-flex-noloc)	false	false

---

local m_tests = require("Module:UnitTests")
local m_lemme = require("Module:lemme")

function m_tests:checkIsLemma(mot, lang, type, flexion, loc, attendu)
  local text = mw.ustring.format(
      "%s (%s-%s-%s-%s)",
      mot,
      lang,
      type,
      flexion and "flex" or "noflex",
      loc and "loc" or "noloc"
  )
  self:equals(text, m_lemme.isLemma(lang, type, flexion, loc), attendu)
end

function m_tests:testIsLemmaFr()
  self:checkIsLemma("maison", "fr", "nom", false, false, true)
  self:checkIsLemma("maisons", "fr", "nom", true, false, false)
  self:checkIsLemma("parce que", "fr", "nom", false, true, false)
  self:checkIsLemma("Paul", "fr", "prénom", false, false, false)
  self:checkIsLemma("Paris", "fr", "nom-pr", false, false, false)
  self:checkIsLemma("Dupont", "fr", "nom-fam", false, false, false)
end

function m_tests:testIsLemmaOther()
  self:checkIsLemma("house", "en", "nom", false, false, true)
  self:checkIsLemma("houses", "en", "nom", true, false, false)
  self:checkIsLemma("domus", "la", "nom", false, false, true)
  self:checkIsLemma("domum", "la", "nom", true, false, false)
end

return m_tests