4 * Simple check of transliteration facilities.
5 * Usage: check-translit SRCDIR FILE FROMCODE TOCODE
8 IF RxFuncQuery('SysLoadFuncs') THEN DO
9 CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
15 PARSE ARG srcdir file fromcode tocode
17 '..\src\iconv --binary -f 'fromcode' -t 'tocode'//TRANSLIT < 'srcdir'\'file'.'fromcode' > tmp'
18 'cmp 'srcdir'\'file'.'tocode' tmp'