tests/check-translit.cmd

   1 /*
   2  * check-translit
   3  *
   4  *      Simple check of transliteration facilities.
   5  *      Usage: check-translit SRCDIR FILE FROMCODE TOCODE
   6  */
   7
   8 IF RxFuncQuery('SysLoadFuncs') THEN DO
   9    CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  10    CALL SysLoadFuncs
  11 END
  12
  13 '@echo off'
  14
  15 PARSE ARG srcdir file fromcode tocode
  16
  17 '..\src\iconv --binary -f 'fromcode' -t 'tocode'//TRANSLIT < 'srcdir'\'file'.'fromcode' > tmp'
  18 'cmp 'srcdir'\'file'.'tocode' tmp'
  19 'rm -f tmp'
  20 EXIT