Module:ba-Cyrl-Arab-translit/testcases

---

This module testcase page lacks a documentation subpage. Please create it.

Useful links: root page • root page’s subpages • links • transclusions • tested module • sandbox

-- Unit tests for [[Module:ba-Cyrl-Arab-translit-Cyrl-Arab-translit]]. Refresh page to run tests.
local tests = require('Module:UnitTests')
local m_translit = require('Module:ba-Cyrl-Arab-translit')

local full_link = require('Module:links').full_link
local tagged = require('Module:script utilities').tag_text
local kk = require('Module:languages').getByCode('ba')

local rlm = require("Module:string/char")(0x200F) -- right-to-left mark

local function link(word)
	return full_link{ term = word, lang = ba, tr = "-" }
end

local function nolink(word)
	return tagged(word, ba)
end

local options = {show_difference = true }

--TO DO
function tests:do_test_translit(cyrl, arab)
	self:equals(link(cyrl), link(m_translit.tr(cyrl, 'ba', 'Cyrl')), link(arab))
end

function tests:do_test_nolink(cyrl, arab)
	self:equals(nolink(cyrl), nolink(m_translit.tr(cyrl, 'ba', 'Cyrl')), nolink(arab))
end

function tests:test_translit_kk_cyrl_arab()
	local nolink = {
		{ "Барлыҡ кешеләр ирекле, дәрәжәләре һәм хоҡуҡтары тигеҙ булып тыуалар. Улар аҡыл һәм выждан эйәһе һәм бер-береһенә ҡарата ҡәрҙәшлек рухында хәрәкәт итергә тейештәр."
			, "بارلىُق کىُشىُلەر ئیرەكلە دەرەجەلەرىُ ھەم حوقۇقتارىُ تیگەذ ࢭبولىُپ تىُوالار. ئولار ئاقىُل ھەم ۋىُجدان ئىُیەھىُ ھەم بىُر-بىُرىُھ‎ىُنە قاراتا توعانلىُك روحىُندا حەرەكەت ییتىُرگە تىُیىُشتەر."
		},
	}
	local examples = {
		{ "кешеләр", "ادامدار" },
		{ "-са", "ـسا" }, --should this use kashida or a normal dash
		{ "-сә", "ـسە"},
		{ "Башкортостан", "باشقۇرتۇستان" },
		{ "Өфө", "ئۇفۇ" },
		{ "ҡалаһы", "قالاھىُ" },
		{ "башҡортса", "باشقۇرتسا" },
		{ "Әрмәндәр", "ئەرمەندەر" },
		{ "Рәсәй", "رەسەی" },
		{ "Истанбул", "ئیستانبول" },
		{ "Төркиә", "تۇركیە" },
		{ "киҫелеш", "كیثىُلىُش" },
		{ "бөртөклө", "بۇرتۇكلۇ"},

	}
	self:iterate(nolink, "do_test_nolink")
	self:iterate(examples, "do_test_translit")
end

return tests