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