Moduuli:fi-nom/testit

Moduulin fi-nom/testit käyttöohje

✓ Kaikki testit läpäisty.

	Testi	Odotettu	Tulos
✓	test Kaikki kuvaus-parametrit tulostuu
✓	test Kaikki taivutusmuodot tulostuu
✓	test Komitatiivin linkitys
✓	test Monikon piilotus
✓	test Tarkenneparametri otsikkoon
✓	test Yksikön piilotus

Hiekkalaatikko

✓ Kaikki testit läpäisty.

	Testi	Odotettu	Tulos
✓	test Kaikki kuvaus-parametrit tulostuu
✓	test Kaikki taivutusmuodot tulostuu
✓	test Komitatiivin linkitys
✓	test Monikon piilotus
✓	test Tarkenneparametri otsikkoon
✓	test Yksikön piilotus

---

-- Yksikkötestit [[Module:fi-nom]]-moduulille.

local ScribuntoUnit = require('Module:ScribuntoUnit')
local suite = ScribuntoUnit:new()

local libName = 'fi-nom'


-- Helper to run all tests using sandbox version of the library from the debug console. To run against main lib, use  =p.run()
function suite.runSandbox()
    local frame = mw.getCurrentFrame():newChild{title='testit', args={module=libName .. '/hiekkalaatikko', displayMode='log'}}
    return suite.run(frame)
end

-- Allow test runner to use the sandbox and the primary versions of the library with the same testcases
function suite:module()
    return require('Module:' .. (self.frame and self.frame.args.module or libName))
end


------------------
--    Testit    --
------------------

suite["test Kaikki taivutusmuodot tulostuu"] = function(self)
    local m = self:module()

    local tulos = m.Taivutustaulukko(mw.getCurrentFrame():newChild{ title = "fi-nom", 
            args = {
                ["yks"] = "",
                ["mon"] = "",
                ["vokaalisointu"] = "ä",

                ["y-nom"] = "testi",
                ["y-gen"] = "testin",
                ["y-part"] = "testiä",
                ["y-iness"] = "testissä",
                ["y-elat"] = "testistä",
                ["y-ill"] = "testiin",
                ["y-adess"] = "testillä",
                ["y-abl"] = "testiltä",
                ["y-all"] = "testille",
                ["y-ess"] = "testinä",
                ["y-tr"] = "tekstiksi",
                ["y-abess"] = "testittä",

                ["mon-nom"] = "testit",
                ["mon-gen"] = "testien",
                ["mon-part"] = "testejä",
                ["mon-iness"] = "testeissä",
                ["mon-elat"] = "testeistä",
                ["mon-ill"] = "testeihin",
                ["mon-adess"] = "testeillä",
                ["mon-abl"] = "teisteiltä",
                ["mon-all"] = "testeille",
                ["mon-ess"] = "testeinä",
                ["mon-tr"] = "testeiksi",
                ["mon-abess"] = "testeittä",

                ["mon-ins"] = "testein",
                ["mon-kom"] = "testeine-"
            }
    })
    
    self:assertTrue(tulos:find('[[nominatiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testi#Suomi|testi]]', 1, true))
    self:assertTrue(tulos:find('[[testit#Suomi|testit]]', 1, true))
    self:assertTrue(tulos:find('[[genetiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testin#Suomi|testin]]', 1, true))
    self:assertTrue(tulos:find('[[testien#Suomi|testien]]', 1, true))
    self:assertTrue(tulos:find('[[partitiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testiä#Suomi|testiä]]', 1, true))
    self:assertTrue(tulos:find('[[testejä#Suomi|testejä]]', 1, true))
    self:assertTrue(tulos:find('[[akkusatiivi]]', 1, true))
    --self:assertTrue(tulos:find('testi; testin', 1, true))
    --self:assertTrue(tulos:find('testit', 1, true))
    self:assertTrue(tulos:find('[[inessiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testissä#Suomi|testissä]]', 1, true))
    self:assertTrue(tulos:find('[[testeissä#Suomi|testeissä]]', 1, true))
    self:assertTrue(tulos:find('[[elatiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testistä#Suomi|testistä]]', 1, true))
    self:assertTrue(tulos:find('[[testeistä#Suomi|testeistä]]', 1, true))
    self:assertTrue(tulos:find('[[illatiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testiin#Suomi|testiin]]', 1, true))
    self:assertTrue(tulos:find('[[testeihin#Suomi|testeihin]]', 1, true))
    self:assertTrue(tulos:find('[[adessiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testillä#Suomi|testillä]]', 1, true))
    self:assertTrue(tulos:find('[[testeillä#Suomi|testeillä]]', 1, true))
    self:assertTrue(tulos:find('[[ablatiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testiltä#Suomi|testiltä]]', 1, true))
    self:assertTrue(tulos:find('[[teisteiltä#Suomi|teisteiltä]]', 1, true))
    self:assertTrue(tulos:find('[[allatiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testille#Suomi|testille]]', 1, true))
    self:assertTrue(tulos:find('[[testeille#Suomi|testeille]]', 1, true))
    self:assertTrue(tulos:find('[[essiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testinä#Suomi|testinä]]', 1, true))
    self:assertTrue(tulos:find('[[testeinä#Suomi|testeinä]]', 1, true))
    self:assertTrue(tulos:find('[[translatiivi]]', 1, true))
    self:assertTrue(tulos:find('[[tekstiksi#Suomi|tekstiksi]]', 1, true))
    self:assertTrue(tulos:find('[[testeiksi#Suomi|testeiksi]]', 1, true))
    self:assertTrue(tulos:find('[[abessiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testittä#Suomi|testittä]]', 1, true))
    self:assertTrue(tulos:find('[[testeittä#Suomi|testeittä]]', 1, true))
    self:assertTrue(tulos:find('[[instruktiivi]]', 1, true))
    self:assertTrue(tulos:find('[[testein#Suomi|testein]]', 1, true))
    self:assertTrue(tulos:find('[[komitatiivi]]', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-kom"', 1, true))
    self:assertTrue(tulos:find('[[testeineen#Suomi|testeine-]]', 1, true))
end

suite["test Kaikki kuvaus-parametrit tulostuu"] = function(self)
    local m = self:module()


    local tulos = m.Taivutustaulukko(mw.getCurrentFrame():newChild{ title = "fi-nom", 
            args = {
                ["yks"] = "",
                ["mon"] = "",
                ["vokaalisointu"] = "ä",

                ["y-nom"] = "testi",
                ["y-gen"] = "testin",
                ["y-part"] = "testiä",
                ["y-iness"] = "testissä",
                ["y-elat"] = "testistä",
                ["y-ill"] = "testiin",
                ["y-adess"] = "testillä",
                ["y-abl"] = "testiltä",
                ["y-all"] = "testille",
                ["y-ess"] = "testinä",
                ["y-tr"] = "tekstiksi",
                ["y-abess"] = "testittä",

                ["mon-nom"] = "testit",
                ["mon-gen"] = "testien",
                ["mon-part"] = "testejä",
                ["mon-iness"] = "testeissä",
                ["mon-elat"] = "testeistä",
                ["mon-ill"] = "testeihin",
                ["mon-adess"] = "testeillä",
                ["mon-abl"] = "teisteiltä",
                ["mon-all"] = "testeille",
                ["mon-ess"] = "testeinä",
                ["mon-tr"] = "testeiksi",
                ["mon-abess"] = "testeittä",

                ["mon-ins"] = "testein",
                ["mon-kom"] = "testeine-"
            }
    })
    

    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-nom"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-nom+mon-akk"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-gen+y-akk"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-gen"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-part"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-part"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-iness"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-iness"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-elat"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-elat"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-ill"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-ill"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-adess"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-adess"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-abl"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-abl"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-all"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-all"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-ess"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-ess"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-tr"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-tr"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/y-abess"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-abess"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-ins"', 1, true))
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-kom"', 1, true))

end


suite["test Yksikön piilotus"] = function(self)
    local m = self:module()


    local tulos = m.Taivutustaulukko(mw.getCurrentFrame():newChild{ title = "fi-nom", 
            args = {
                ["yks"] = "-",
                ["mon"] = "",

                ["y-nom"] = "testi",
                ["y-gen"] = "testin",

                ["mon-nom"] = "testit",
                ["mon-gen"] = "testien",
                
                ["mon-ins"] = "testein",
                ["mon-kom"] = "testeine-"
            }
    })
    
    self:assertFalse(tulos:find('[[testin#Suomi|testin]]', 1, true))
    self:assertTrue(tulos:find('[[testien#Suomi|testien]]', 1, true))
    self:assertTrue(tulos:find('[[testein#Suomi|testein]]', 1, true))
    
end

suite["test Monikon piilotus"] = function(self)
    local m = self:module()


    local tulos = m.Taivutustaulukko(mw.getCurrentFrame():newChild{ title = "fi-nom", 
            args = {
                ["yks"] = "",
                ["mon"] = "-",

                ["y-nom"] = "testi",
                ["y-gen"] = "testin",

                ["mon-nom"] = "testit",
                ["mon-gen"] = "testien",
                
                ["mon-ins"] = "testein"
            }
    })
    
    self:assertFalse(tulos:find('[[testien#Suomi|testien]]', 1, true))
    self:assertTrue(tulos:find('[[testin#Suomi|testin]]', 1, true))
    self:assertFalse(tulos:find('[[testein#Suomi|testein]]', 1, true))
    
end

suite["test Komitatiivin linkitys"] = function(self)
    local m = self:module()


    local tulos = m.Taivutustaulukko(mw.getCurrentFrame():newChild{ title = "fi-nom", 
            args = {
                ["mon-kom"] = "testeine-"
            }
    })
    
    self:assertTrue(tulos:find('data-kuvaus="tm/*/s/mon-kom"', 1, true))
    self:assertTrue(tulos:find('[[testeineen#Suomi|testeine-]]', 1, true))
    
end

suite["test Tarkenneparametri otsikkoon"] = function(self)
    local m = self:module()


    local tulos = m.Taivutustaulukko(mw.getCurrentFrame():newChild{ title = "fi-nom", 
            args = {
                ["tarkenne"] = "35454544-DJFDKJFDKJF"
            }
    })
    
    self:assertTrue(tulos:find('Taivutus (35454544-DJFDKJFDKJF)', 1, true))
    
end

return suite