Module:User:iwsfutcmd/gez-verbal/testcases

All tests passed. (refresh)

TextExpectedActual
test_conj:
Passedቅትል, stem=Ga, form=pf, person=3msቀተለቀተለ
Passedንግር, stem=Ga, form=pf, person=1sነገርኩነገርኩ
Passedግብር, stem=Gb, form=pf, person=3fpገብራገብራ
Passedንግር, stem=Ga, form=impf, person=2fpትነግራትነግራ
Passedነገረ, stem=Ga, form=juss, person=1pንንግርንንግር
Passedገበረ, stem=Gb, form=juss, person=3mpይግበሩይግበሩ
Passedነገረ, stem=Ga, form=imp, person=2mpንግሩንግሩ
Passedግብር, stem=Gb, form=imp, person=2fsግበሪግበሪ
Passedወደቀ, stem=Ga, form=pf, person=1sወደቁወደቁ
Passedከደነ, stem=Ga, form=pf, person=1pከደነከደነ
Passedኀደገ, stem=Ga, form=pf, person=1sኀደጉኀደጉ
Passedነበበ, stem=Ga, form=pf, person=3msነበበነበበ

local tests = require('Module:UnitTests')
local gez_ver = require('Module:User:iwsfutcmd/gez-verbal')

function tests:check_conj(root, stem, form, person, expected)
    self:equals(root .. ", stem=" .. stem .. ", form=" .. form .. ", person=" .. person,
        gez_ver.conj(root, stem, form, person), expected)
end

function tests:test_conj()
    local examples = {{"ቅትል", "Ga", "pf", "3ms", "ቀተለ"}, {"ንግር", "Ga", "pf", "1s", "ነገርኩ"},
                      {"ግብር", "Gb", "pf", "3fp", "ገብራ"}, {"ንግር", "Ga", "impf", "2fp", "ትነግራ"},
                      {"ነገረ", "Ga", "juss", "1p", "ንንግር"},
                      {"ገበረ", "Gb", "juss", "3mp", "ይግበሩ"},
                      {"ነገረ", "Ga", "imp", "2mp", "ንግሩ"}, {"ግብር", "Gb", "imp", "2fs", "ግበሪ"},
                      {"ወደቀ", "Ga", "pf", "1s", "ወደቁ"}, {"ከደነ", "Ga", "pf", "1p", "ከደነ"},
                      {"ኀደገ", "Ga", "pf", "1s", "ኀደጉ"}, {"ነበበ", "Ga", "pf", "3ms", "ነበበ"}}
    self:iterate(examples, "check_conj")
end

return tests