Modul:ar-translit/testcases

This is the unit-testing module for Module:ar-translit.

(frissítés)

test_translit_arabic:

	Szöveg	Várt	Tényleges	Első eltérés
	اَلْعَرَبِيَّة‏‎	al-ʿarabiyya	al-ʕarabiyya	4
	اَلْعَرَبِيَّة.‎	al-ʿarabiyya.	al-ʕarabiyya.	4
	لِلْكِتَاب‎	lilkitāb	lilkitāb
	لِلتَّأْكِيد‎	(nil)	lilttaʔkīd	N/A
	لِلَّبَنِ‎	lillabani	lillabani
	لِللَّبَنِ‎	(nil)	lilllabani	N/A
	شْنِيتْزَل‎	šnītzal	šnītzal
	عُظْمَى‎	ʿuẓmā	ʕuẓmā	1
	إِحْدَى‎	ʾiḥdā	ʔiḥdā	1
	بِٱلتَّأْكِيد‎	bi-t-taʾkīd	bi-t-taʔkīd	8
	بِالتَّأْكِيد‎	bi-t-taʾkīd	bi-t-taʔkīd	8
	بِالتَأْكِيد‎	bi-t-taʾkīd	bi-t-taʔkīd	8
	بِالكِتَاب‎	bi-l-kitāb	bi-l-kitāb
	بِالْكِتَاب‎	bi-l-kitāb	bi-l-kitāb
	اَللُّغَةُ ٱلْعَرَبِيَّةُ‎	al-luḡatu l-ʿarabiyyatu	al-luḡatu l-ʕarabiyyatu	13
	اَللُّغَةُ الْعَرَبِيَّةُ‎	al-luḡatu l-ʿarabiyyatu	al-luḡatu l-ʕarabiyyatu	13
	نَسُوا‎	nasū	nasū
	رَمَوْا‎	ramaw	ramaw
	عَصًا‎	ʿaṣan	ʕaṣan	1
	هُدًى‎	hudan	hudan
	عَصاً‎	ʿaṣan	ʕaṣan	1
	هُذىً‎	huḏan	huḏan
	كاتِب‎	kātib	kātib
	كُتّاب‎	kuttāb	kuttāb
	إلاه‎	ʾilāh	ʔilāh	1
	كاتب‎	(nil)	kātb	N/A
	رَبّ‎	rabb	rabb
	نَوَاةٌ‎	nawātun	nawātun
	اَلشَّدَّة‎	aš-šadda	aš-šadda
	شَدَّة الشَكْل‎	šadda(t) aš-šakl	šadda(t) aš-šakl
	مُعَادَاة‎	muʿādāh	muʕādāh	3
	مِرْآة‎	mirʾāh	mirʔāh	4
	صلاح‎	(nil)	ṣlāḥ	N/A
	اِيبَ‎	ība	ība
	دِيُون‎	diyūn	diyūn
	دُوِين‎	duwīn	duwīn
	الَّذِي‎	allaḏī	allaḏī
	رَأَيْتُ ابْنَهُ‎	raʾaytu bnahu	raʔaytu ābnahu	3
	رَأَيْتُ ٱبْنَهُ‎	raʾaytu bnahu	raʔaytu bnahu	3
	ڪُفُوًا‎	kufuwan	kufuwan
	أَحَدٌ ٱللّٰهُ ٱلصَّمَدُ‎	ʾaḥaduni llāhu ṣ-ṣamadu	ʔaḥadun llāhu ṣ-ṣamadu	1

---

-- Unit tests for [[Module:ar-translit]]. Refresh page to run tests.
local tests = require('Module:UnitTests')
local ar_translit = require('Module:ar-translit')

local full_link = require('Module:links').full_link
local ar = require('Module:languages').getByCode('ar')

local rlm = mw.ustring.char(0x200F) -- right-to-left mark

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

--TO DO
function tests:do_test_translit(arab, roman)
	self:equals(link(arab), ar_translit.tr(arab, 'ar', 'Arab'), roman)
end

function tests:test_translit_arabic()
	local examples = {
		{ "اَلْعَرَبِيَّة" .. rlm, "al-ʿarabiyya" }, -- right-to-left mark is removed
		{ "اَلْعَرَبِيَّة.", "al-ʿarabiyya." },
		{ 'لِلْكِتَاب', 'lilkitāb' }, -- ideally 'li-l-kitāb'
		{ 'لِلتَّأْكِيد', nil }, -- ideally 'li-t-taʾḵīd'
		{ 'لِلَّبَنِ', 'lillabani' }, -- ideally 'li-l-labani'; correct spelling
		{ 'لِللَّبَنِ', nil }, -- ideally 'li-l-labani; spelling sometimes used
		{ 'شْنِيتْزَل', "šnītzal" },
		{ 'عُظْمَى', "ʿuẓmā" },
		{ 'إِحْدَى', "ʾiḥdā" },
		-- cases with bi- prefix plus definite article
		{ 'بِٱلتَّأْكِيد', "bi-t-taʾkīd" },
		{ 'بِالتَّأْكِيد', "bi-t-taʾkīd" },
		{ 'بِالتَأْكِيد', "bi-t-taʾkīd" },
		{ 'بِالكِتَاب', "bi-l-kitāb" },
		{ 'بِالْكِتَاب', "bi-l-kitāb" },
		-- check handling of ʾiʿrāb, hamzatu l-waṣl w/al-, al- w/sun and moon letters
		{ 'اَللُّغَةُ ٱلْعَرَبِيَّةُ', "al-luḡatu l-ʿarabiyyatu" },
		-- check elision of al- after a vowel
		{ 'اَللُّغَةُ الْعَرَبِيَّةُ', "al-luḡatu l-ʿarabiyyatu" },
	
		-- check two kinds of otiose alif in 3rd-masc-plural endings	
		{ 'نَسُوا', "nasū" },
		{ 'رَمَوْا', "ramaw" },
		-- check otiose alif and alif maqṣūra after fatḥatan
		{ 'عَصًا', "ʿaṣan" },
		{ 'هُدًى', "hudan" },
		-- same where fatḥatan wrongly placed over alif or alif maqṣūra
		{ 'عَصاً', "ʿaṣan" },
		{ 'هُذىً', "huḏan" },
		-- infer fatḥa on alif between consonants
		{ 'كاتِب', "kātib" },
		-- infer fatḥa on alif between consonants when first is marked with shadda
		{ 'كُتّاب', "kuttāb" },
		-- infer kasra after hamza-under-alif
		{ 'إلاه', "ʾilāh" },
		-- missing diacritic on t
		{ 'كاتب', nil },
		-- final shadda on unvocalized consonant
		{ 'رَبّ', "rabb" },
		-- tā' marbūṭa preceded by alif; don't infer fatḥa
		{ 'نَوَاةٌ', "nawātun" },
		-- alif-lam w/unvocalized lam + shadda over sun letter; final tāʾ marbūṭa
		{ 'اَلشَّدَّة', "aš-šadda" },
		-- medial tāʾ marbūṭa
		{ 'شَدَّة الشَكْل', "šadda(t) aš-šakl" },
		-- alif + tāʾ marbūṭa --> āh
		{ 'مُعَادَاة', "muʿādāh" },
		-- alif madda + tāʾ marbūṭa --> āh
		{ 'مِرْآة', "mirʾāh" },
	    -- test of h for the constant
		{ 'صلاح', nil },
		-- initial unhamzated alif + ī
		{ 'اِيبَ', "ība" },
		-- iyū sequence
		{ 'دِيُون', "diyūn" },
		-- uwī sequence
		{ 'دُوِين', "duwīn" },
		-- allaḏī, with al + shadda
		{ 'الَّذِي', "allaḏī" },
		-- alif al-wasl
		{ 'رَأَيْتُ ابْنَهُ', "raʾaytu bnahu" },
		{ 'رَأَيْتُ ٱبْنَهُ', "raʾaytu bnahu" },
		-- "swash kaf"
		{ 'ڪُفُوًا', "kufuwan" },
		{ 'أَحَدٌ ٱللّٰهُ ٱلصَّمَدُ', "ʾaḥaduni llāhu ṣ-ṣamadu" },
	}
	
	self:iterate(examples, "do_test_translit")
end
 
return tests