+++ /dev/null
-/*
- * check-translit
- *
- * Simple check of transliteration facilities.
- * Usage: check-translit SRCDIR FILE FROMCODE TOCODE
- */
-
-IF RxFuncQuery('SysLoadFuncs') THEN DO
- CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
- CALL SysLoadFuncs
-END
-
-'@echo off'
-
-PARSE ARG srcdir file fromcode tocode
-
-'..\src\iconv --binary -f 'fromcode' -t 'tocode'//TRANSLIT < 'srcdir'\'file'.'fromcode' > tmp'
-'cmp 'srcdir'\'file'.'tocode' tmp'
-'rm -f tmp'
-EXIT