1/* 2 * check-stateful 3 * 4 * Simple check of a stateful encoding. 5 * Usage: check-stateful SRCDIR CHARSET 6 */ 7 8IF RxFuncQuery('SysLoadFuncs') THEN DO 9 CALL RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs' 10 CALL SysLoadFuncs 11END 12 13'@echo off' 14 15PARSE ARG srcdir charset 16 17'..\src\iconv -f 'charset' -t UTF-8 < 'srcdir'\'charset'-snippet > tmp-snippet' 18'cmp 'srcdir'\'charset'-snippet.UTF-8 tmp-snippet' 19'..\src\iconv -f UTF-8 -t 'charset' < 'srcdir'\'charset'-snippet.UTF-8 > tmp-snippet' 20'cmp 'srcdir'\'charset'-snippet tmp-snippet' 21'rm -f tmp-snippet' 22 23EXIT 24