Module:th-translit/testcases

-- Unit tests for Module:th-translit. Refresh page to run tests. local tests = require('Module:UnitTests') local th_translit = require('Module:th-pron')

function tests:do_test_translit(thai, roman, xlit) self:equals(' ' .. mw.ustring.gsub(mw.ustring.gsub(thai, "ฺ", ""), "%-", "") .. ' ', th_translit.translit(thai, 'th', 'Thai', 'paiboon', 'translit-module'), roman) end

function tests:test_translit_thai self:do_test_translit('เฮิ็้ย', 'hə́i') self:do_test_translit('เฉิ็ย', 'chə̌i') self:do_test_translit('เงิ็น', 'ngən') self:do_test_translit('เกดส', 'gèets') --เกตส์ (Gates) self:do_test_translit('มันส', 'mans') --มันส์ self:do_test_translit('ไอ๊ส', 'áis') --ไอซ์ (ice) self:do_test_translit('เซ็กส', 'séks') --เซ็กส์ (sex) self:do_test_translit('เอ็๊กส', 'éks') --เอกซ์ & เอ็กซ์ & เอ๊กซ์ (ex) self:do_test_translit('เฮ้าส', 'háos') --เฮาส์ & เฮ้าส์ (house) self:do_test_translit('เม้าส', 'máos') --เมาส์ & เม้าส์ (mouse) self:do_test_translit('ทฺรำ-เป็ด', 'tram-bpèt') --ทรัมเป็ต self:do_test_translit('ห็อย', 'hɔ̌i') self:do_test_translit('หฺม็อย', 'mɔ̌i') self:do_test_translit('หฺมั่น-โถว', 'màn-tǒow') self:do_test_translit('เด๊ด-สะ-มอ-เร่', 'déet-sà-mɔɔ-rêe') self:do_test_translit('เห', 'hěe') self:do_test_translit('แคฺล', 'klɛɛ') self:do_test_translit('แคล', 'kɛɛl') self:do_test_translit('เพฺล', 'plee') self:do_test_translit('เพล', 'peel') self:do_test_translit('เปฺล', 'bplee') self:do_test_translit('เปล', 'bpeel') self:do_test_translit('เบล', 'beel') self:do_test_translit('เซล', 'seel') self:do_test_translit('โพล', 'pool') self:do_test_translit('รา-ชา-ทิ-ราด', 'raa-chaa-tí-râat') self:do_test_translit('ขฺวน-ขฺวาย', 'kwǒn-kwǎai') --ขวนขวาย Only the word ขวน read as kwǒn instead of kǔuan. self:do_test_translit('ข่วน', 'kùuan') self:do_test_translit('หอน', 'hɔ̌ɔn') self:do_test_translit('โหน', 'hǒon') -- ห้อยโหน homograph issue self:do_test_translit('สะ-โหฺน', 'sà-nǒo') -- โสน homograph issue self:do_test_translit('แหน', 'hɛ̌ɛn') -- หวงแหน homograph issue self:do_test_translit('แหฺน', 'nɛ̌ɛ') -- จอกแหน homograph issue self:do_test_translit('แถ็ว', 'tɛ̌o') -- แถว self:do_test_translit('ซวง', 'suuang') self:do_test_translit('น้ำ', 'nám') self:do_test_translit('หฺมาย', 'mǎai') self:do_test_translit('แห็่ง', 'hɛ̀ng') self:do_test_translit('หน', 'hǒn') self:do_test_translit('เหด-สุด-วิ-ไส', 'hèet-sùt-wí-sǎi') self:do_test_translit('ไหฺย่', 'yài') self:do_test_translit('หก', 'hòk') self:do_test_translit('หอย', 'hɔ̌ɔi') self:do_test_translit('กับ', 'gàp') self:do_test_translit('ธรรม', 'tam') self:do_test_translit('ปฺระ-ชา', 'bprà-chaa') self:do_test_translit('นะ-คอน', 'ná-kɔɔn') self:do_test_translit('บาด', 'bàat') self:do_test_translit('บ้า', 'bâa') self:do_test_translit('แข็ง', 'kɛ̌ng') self:do_test_translit('แกะ', 'gɛ̀') self:do_test_translit('แดง', 'dɛɛng') self:do_test_translit('แปฺล', 'bplɛɛ') self:do_test_translit('ผฺล็อง', 'plɔ̌ng') self:do_test_translit('เกาะ', 'gɔ̀') self:do_test_translit('นอน', 'nɔɔn') self:do_test_translit('พ่อ', 'pɔ̂ɔ') self:do_test_translit('เห็ด', 'hèt') self:do_test_translit('เล็่น', 'lên') self:do_test_translit('เตะ', 'dtè') self:do_test_translit('เพฺลง', 'pleeng') self:do_test_translit('เท-วี', 'tee-wii') self:do_test_translit('เยอะ', 'yə́') self:do_test_translit('เดิน', 'dəən') self:do_test_translit('เผฺลอ', 'plə̌ə') self:do_test_translit('ตก', 'dtòk') self:do_test_translit('โต๊ะ', 'dtó') self:do_test_translit('โชค', 'chôok') self:do_test_translit('โม-โห', 'moo-hǒo') self:do_test_translit('คิด', 'kít') self:do_test_translit('มิ-ถุน', 'mí-tǔn') self:do_test_translit('หิ-มะ', 'hì-má') self:do_test_translit('อีก', 'ìik') self:do_test_translit('จี้', 'jîi') self:do_test_translit('ลึก', 'lʉ́k') self:do_test_translit('รึ', 'rʉ́') self:do_test_translit('กฺลืน', 'glʉʉn') self:do_test_translit('ชื่อ', 'chʉ̂ʉ') self:do_test_translit('คุก', 'kúk') self:do_test_translit('จุ-ฬา', 'jù-laa') self:do_test_translit('ลูก', 'lûuk') self:do_test_translit('ปู', 'bpuu') self:do_test_translit('เดี๊ยะ', 'día') self:do_test_translit('เปาะ-เปี๊ยะ', 'bpɔ̀-bpía') self:do_test_translit('ปอ-เปี๊ยะ', 'bpɔɔ-bpía') self:do_test_translit('เปฺรี๊ยะ', 'bpría') self:do_test_translit('เตียง', 'dtiiang') self:do_test_translit('เมีย', 'miia') self:do_test_translit('เอือะ', 'ʉ̀a') self:do_test_translit('เรื่อง', 'rʉ̂ʉang') self:do_test_translit('เรือ', 'rʉʉa') self:do_test_translit('ผฺลัวะ', 'plùa') self:do_test_translit('นวด', 'nûuat') self:do_test_translit('ตัว', 'dtuua') self:do_test_translit('ไม่', 'mâi') self:do_test_translit('ใส่', 'sài') self:do_test_translit('วัย', 'wai') self:do_test_translit('ไทย', 'tai') self:do_test_translit('ไม้', 'mái') self:do_test_translit('หาย', 'hǎai') self:do_test_translit('ผฺล็อย', 'plɔ̌i') self:do_test_translit('ซอย', 'sɔɔi') self:do_test_translit('เลย', 'ləəi') self:do_test_translit('โดย', 'dooi') self:do_test_translit('ทุย', 'tui') self:do_test_translit('เหฺนื่อย', 'nʉ̀ai') self:do_test_translit('สวย', 'sǔai') self:do_test_translit('เรา', 'rao') self:do_test_translit('ขาว', 'kǎao') self:do_test_translit('แมว', 'mɛɛo') self:do_test_translit('เกอว', 'gəəo') self:do_test_translit('เร็ว', 'reo') self:do_test_translit('เอว', 'eeo') self:do_test_translit('หิว', 'hǐu') self:do_test_translit('เขียว', 'kǐao') self:do_test_translit('ทำ', 'tam') end return tests