user@aspire-4738ZG MSYS ~
$ perl mwc32.demo.pl
37210802882775378555
user@aspire-4738ZG MSYS ~
$ cat mwc32.*pl
require'./mwc32.pl';print r();print r();
$s=1;sub r{$s=(1791398085*$s+1929682203)%4294967296}

;; Got answer:
;; ->>HEADER<<- opcode: QUERY, status: NOERROR, id: 18570
;; flags: qr rd ra; QUERY: 1, ANSWER: 1, AUTHORITY: 0, ADDITIONAL: 0

;; QUESTION SECTION:
;tio.run.                       IN      A

;; ANSWER SECTION:
tio.run.                1799    IN      A       192.241.130.16

;; Query time: 296 msec
;; SERVER: 192.168.1.1#53(192.168.1.1)
;; WHEN: Sun Dec 18 11:16:31 2016
;; MSG SIZE  rcvd: 41

cheddar> Rational::1
Runtime Error: Cannot cast to given target `Rational`

/* The following string is used to convert printable */
/* characters between ASCII and the native charset:  */

static const char print_ascii[] =
  "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n"
  "\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n"
  " !\"#$%&'()*+,-./"

    [
        0, 0, 0, 0, 0, // 5
        0, 0, 0, 0, 0, // 10
        0,             // 11
        language.length >>> 0
    ], language, [
        0, 0, 0, 0, 0, // 5
        0, 0, 0,       // 8
        code.length >>> 0
    ], code, [
        0, 0, 0, 0, 0, // 5
        0, 0,
        input.length >>> 0
    ], input, [
        0, 0, 0, 0     // 4
    ]

function generateByteArray(obj) {
    function toBytes(string) {
        var chars = string || "";
        var res = [];
        for (var i = 0; i < chars.length; i++) {
            res.push( chars.charCodeAt(i) );
        }
        return res;
    }

    var language = toBytes(
        IdFromName(TIO.Language)
    );
    var code = toBytes(unescape(encodeURIComponent(obj.code)));
    var input = toBytes(unescape(encodeURIComponent(obj.input)));

    var array = [].concat([
        0, 0, 0, 0, 0, // 5

cheddar test.cheddar
￿￿￿[[1, 2, 3, 2, 1, 1], [0, 1]]