{"ScriptPreparationCode":"NNN = 100\r\n\r\nfunction v0 () {\r\n function voidf(k) { return k(undefined); };\r\n\r\nfunction pk(x, y) {\r\n console.log(\u0022pk\u0022, x, y);\r\n return voidf;\r\n}\r\n\r\nfunction trampoline(thunk) {\r\n // console.log(\u0027trampoline start\u0027, thunk)\r\n while (thunk \u0026\u0026 typeof thunk === \u0022function\u0022) {\r\n // console.log(\u0027boing\u0027);\r\n thunk = thunk();\r\n }\r\n return thunk\r\n}\r\n\r\nfunction add(a, b) {\r\n return a \u002B b;\r\n}\r\n\r\nfunction times(a, b) {\r\n return a * b;\r\n}\r\n\r\nlet program =\r\n(function( kxx ) { return (function( ) { return (function( k ) { return k ( (function( kk, factorial_0 ) { return (function( ) { return (function( kxx ) { return (function( ) { return (function( k ) { return k ( (function( kk, t_3 ) { return (function( ) { return (function( kxx ) { return (function( ) { return factorial_0 ( (function( v ) { return (function( ) { return (function( k ) { return k ( NNN ) ;}) ( (function( v0 ) { return (function( ) { return (function( k ) { return k ( 1 ) ;}) ( (function( v1 ) { return (function( ) { return v ( kxx, (function( kv ) { return kv ( v0 ) ;}), (function( kv ) { return kv ( v1 ) ;}) ) ;}) ;}) ) ;}) ;}) ) ;}) ;}) ) ;}) ;}) ( kk ) ;}) ;}) ) ;}) ( (function( v ) { return (function( ) { return (function( k ) { return (function( ) { factorial_0 = (function( k ) { return k ( (function( kk, n_1, total_2 ) { return (function( ) { return (function( k ) { return (function( kpr ) { return (function( ) { return n_1 ( (function( v0 ) { return (function( ) { return (function( k ) { return k ( 0 ) ;}) ( (function( v1 ) { return kpr ( v0 === v1 ) ;}) ) ;}) ;}) ) ;}) ;}) ( (function( kif ) { return /* if */ kif ? (function( ) { return total_2 ( k ) ;}) : (function( ) { return (function( kxx ) { return (function( ) { return factorial_0 ( (function( v ) { return (function( ) { return (function( kpr ) { return (function( ) { return n_1 ( (function( v0 ) { return (function( ) { return (function( k ) { return k ( -1 ) ;}) ( (function( v1 ) { return kpr ( add ( v0, v1 ) ) ;}) ) ;}) ;}) ) ;}) ;}) ( (function( v0 ) { return (function( ) { return (function( kpr ) { return (function( ) { return n_1 ( (function( v0 ) { return (function( ) { return total_2 ( (function( v1 ) { return kpr ( times ( v0, v1 ) ) ;}) ) ;}) ;}) ) ;}) ;}) ( (function( v1 ) { return (function( ) { return v ( kxx, (function( kv ) { return kv ( v0 ) ;}), (function( kv ) { return kv ( v1 ) ;}) ) ;}) ;}) ) ;}) ;}) ) ;}) ;}) ) ;}) ;}) ( k ) ;}) ;}) ) ;}) ( kk ) ;}) ;}) ) ;}); return k ( voidf ) ;}) ;}) ( (function( v0 ) { return (function( ) { return v ( kxx, (function( kv ) { return kv ( v0 ) ;}) ) ;}) ;}) ) ;}) ;}) ) ;}) ;}) ( kk ) ;}) ;}) ) ;}) ( (function( v ) { return (function( ) { return voidf ( (function( v0 ) { return (function( ) { return v ( kxx, (function( kv ) { return kv ( v0 ) ;}) ) ;}) ;}) ) ;}) ;}) ) ;}) ;})\r\n;\r\n\r\nfunction output(x) {\r\n pk(\u0027output\u0027, x);\r\n return function() {};\r\n}\r\n\r\n\r\ntrampoline(function() {return program (output);}); \r\n}\r\n\r\nfunction v1strict() {\r\n\u0022use strict\u0022;\r\n\r\nfunction voidf(k) { return k(undefined); };\r\n\r\nfunction pk() {\r\n console.log.apply(console, arguments);\r\n}\r\n\r\nfunction trampoline(thunk) {\r\n // console.log(\u0027trampoline start\u0027, thunk)\r\n while (thunk \u0026\u0026 typeof thunk === \u0022function\u0022) {\r\n // console.log(\u0027boing\u0027);\r\n thunk = thunk();\r\n }\r\n return thunk\r\n}\r\n\r\nfunction prepend(v, a) {\r\n // a.slice().unshift(0); // avoid mutation with copy\r\n a.unshift(v);\r\n return a;\r\n}\r\n\r\nfunction apply(func, args) {\r\n return func.apply(this, args);\r\n}\r\n\r\nfunction add(a, b) {\r\n return a \u002B b;\r\n}\r\n\r\nfunction times(a, b) {\r\n return a * b;\r\n}\r\n\r\nlet program =\r\n(function( k ) { return (function( k ) { return k ( (function( k, fact_0 ) { return (function( k ) { return (function( k ) { return k ( (function( k, t_3 ) { return (function( k ) { return fact_0 ( (function( v ) { return (function( k ) { return k ( NNN ) ;}) ( (function( v0 ) { return (function( k ) { return k ( 1 ) ;}) ( (function( v1 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}), (function( kv ) { return kv ( v1 ) ;}) ) ;}) ;}) ) ;}) ) ;}) ) ;}) ( k ) ;}) ) ;}) ( (function( v ) { return (function( k ) { return (function( ) { fact_0 = (function( k ) { return k ( (function( k, n_1, total_2 ) { return (function( k ) { return (function( k ) { return n_1 ( (function( v0 ) { return (function( k ) { return k ( 0 ) ;}) ( (function( v1 ) { return k ( v0 === v1 ) ;}) ) ;}) ) ;}) ( (function( kif ) { return /* if */ kif ? (function( ) { return total_2 ( k ) ;}) : (function( ) { return (function( k ) { return fact_0 ( (function( v ) { return (function( k ) { return n_1 ( (function( v0 ) { return (function( k ) { return k ( -1 ) ;}) ( (function( v1 ) { return k ( add ( v0, v1 ) ) ;}) ) ;}) ) ;}) ( (function( v0 ) { return (function( k ) { return total_2 ( (function( v0 ) { return n_1 ( (function( v1 ) { return k ( times ( v0, v1 ) ) ;}) ) ;}) ) ;}) ( (function( v1 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}), (function( kv ) { return kv ( v1 ) ;}) ) ;}) ;}) ) ;}) ) ;}) ) ;}) ( k ) ;}) ;}) ) ;}) ( k ) ;}) ) ;}); return k ( voidf ) ;}) ;}) ( (function( v0 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}) ) ;}) ;}) ) ;}) ) ;}) ( k ) ;}) ) ;}) ( (function( v ) { return voidf ( (function( v0 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}) ) ;}) ;}) ) ;}) ) ;})\r\n;\r\n\r\nfunction output(x) {\r\n pk(\u0027output\u0027, x);\r\n return function() {};\r\n}\r\n\r\n\r\ntrampoline(function() {return program (output);}); \r\n}\r\n\r\nfunction v1() {\r\n function voidf(k) { return k(undefined); };\r\n\r\nfunction pk() {\r\n console.log.apply(console, arguments);\r\n}\r\n\r\nfunction trampoline(thunk) {\r\n // console.log(\u0027trampoline start\u0027, thunk)\r\n while (thunk \u0026\u0026 typeof thunk === \u0022function\u0022) {\r\n // console.log(\u0027boing\u0027);\r\n thunk = thunk();\r\n }\r\n return thunk\r\n}\r\n\r\nfunction prepend(v, a) {\r\n // a.slice().unshift(0); // avoid mutation with copy\r\n a.unshift(v);\r\n return a;\r\n}\r\n\r\nfunction apply(func, args) {\r\n return func.apply(this, args);\r\n}\r\n\r\nfunction add(a, b) {\r\n return a \u002B b;\r\n}\r\n\r\nfunction times(a, b) {\r\n return a * b;\r\n}\r\n\r\nlet program =\r\n(function( k ) { return (function( k ) { return k ( (function( k, fact_0 ) { return (function( k ) { return (function( k ) { return k ( (function( k, t_3 ) { return (function( k ) { return fact_0 ( (function( v ) { return (function( k ) { return k ( NNN ) ;}) ( (function( v0 ) { return (function( k ) { return k ( 1 ) ;}) ( (function( v1 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}), (function( kv ) { return kv ( v1 ) ;}) ) ;}) ;}) ) ;}) ) ;}) ) ;}) ( k ) ;}) ) ;}) ( (function( v ) { return (function( k ) { return (function( ) { fact_0 = (function( k ) { return k ( (function( k, n_1, total_2 ) { return (function( k ) { return (function( k ) { return n_1 ( (function( v0 ) { return (function( k ) { return k ( 0 ) ;}) ( (function( v1 ) { return k ( v0 === v1 ) ;}) ) ;}) ) ;}) ( (function( kif ) { return /* if */ kif ? (function( ) { return total_2 ( k ) ;}) : (function( ) { return (function( k ) { return fact_0 ( (function( v ) { return (function( k ) { return n_1 ( (function( v0 ) { return (function( k ) { return k ( -1 ) ;}) ( (function( v1 ) { return k ( add ( v0, v1 ) ) ;}) ) ;}) ) ;}) ( (function( v0 ) { return (function( k ) { return total_2 ( (function( v0 ) { return n_1 ( (function( v1 ) { return k ( times ( v0, v1 ) ) ;}) ) ;}) ) ;}) ( (function( v1 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}), (function( kv ) { return kv ( v1 ) ;}) ) ;}) ;}) ) ;}) ) ;}) ) ;}) ( k ) ;}) ;}) ) ;}) ( k ) ;}) ) ;}); return k ( voidf ) ;}) ;}) ( (function( v0 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}) ) ;}) ;}) ) ;}) ) ;}) ( k ) ;}) ) ;}) ( (function( v ) { return voidf ( (function( v0 ) { return (function( ) { return v ( k, (function( kv ) { return kv ( v0 ) ;}) ) ;}) ;}) ) ;}) ) ;})\r\n;\r\n\r\nfunction output(x) {\r\n pk(\u0027output\u0027, x);\r\n return function() {};\r\n}\r\n\r\n\r\ntrampoline(function() {return program (output);}); \r\n}\r\n\r\nfunction vanilla() {\r\n function factorial (n) {\r\n \treturn n === 0 ? 1 : n * factorial(n -1); \r\n }\r\n \r\n console.log(factorial(NNN));\r\n}\r\n\r\nfunction tailcall() {\r\n function factorial (n, total) {\r\n \treturn n === 0 ? total : factorial(n - 1, total * n); \r\n }\r\n \r\n console.log(factorial(NNN, 1))\r\n}\r\n\r\nfunction iterative() {\r\nfunction sFact(num)\r\n{\r\n var rval=1;\r\n for (var i = 2; i \u003C= num; i\u002B\u002B)\r\n rval = rval * i;\r\n return rval;\r\n}\r\n console.log(sFact(NNN)); \r\n}\r\n\r\nfunction gambit() {\r\n // File generated by Gambit v4.9.3\r\n// Link info: (409003 (js ()) \u0022app_\u0022 ((\u0022lib\u0022) (\u0022app\u0022)) (string glo-println pair ffi nargs wrong_nargs r2 r1 pollcount poll r0 r3 stack sp make_interned_symbol peps glo module_register modlinkinfo module_registry_init) (for-each lib js-alert patch! current-milliseconds app app# append println) (for-each lib# js-alert patch! current-milliseconds ##vm-main-module-ref app# append ##program-descr println) (for-each js-alert patch! current-milliseconds app# append println) #f)\r\n\r\nvar g_glo = {};\r\n\r\nfunction g_host_function2scm(obj) {\r\n function g_h2s_procedure() {\r\n return g_scm2host_call(obj);\r\n }\r\n\r\n return g_h2s_procedure;\r\n}\r\n\r\nfunction G_ModLinkInfo(name,index) {\r\n this.name = name;\r\n this.index = index;\r\n}\r\n\r\nvar g_module_count = 0;\r\n\r\nvar g_module_map = {};\r\n\r\nvar g_module_table = null;\r\n\r\nvar g_nargs = 0;\r\n\r\nvar g_peps = {};\r\n\r\nvar g_pollcount = 100;\r\n\r\nfunction g_println(s) {\r\n if (Object.prototype.hasOwnProperty.call(function () {return this;}(),\u0022console\u0022)) {\r\n console.log(s);\r\n } else {\r\n print(s);\r\n }\r\n}\r\n\r\nfunction G_ScmObj() {\r\n}\r\n\r\nvar g_stack = [];\r\n\r\nfunction g_str2codes(strng) {\r\n\r\n var codes = [];\r\n for (var i=0; i \u003C strng.length; i\u002B\u002B) {\r\n codes.push(strng.charCodeAt(i));\r\n }\r\n return codes;\r\n}\r\n\r\nfunction g_str_hash(strng) {\r\n var h = 18652613;\r\n var i = 0;\r\n var leng = strng.length;\r\n while (i \u003C leng) {\r\n h = ((h ^ strng.charCodeAt(i)) * 16777619) \u0026 536870911;\r\n \u002B\u002Bi;\r\n }\r\n return h;\r\n}\r\n\r\nvar g_symbol_table = {};\r\n\r\nfunction G_Eof() {\r\n}\r\n\r\nfunction G_F32Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_F64Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_Flonum(val) {\r\n this.val = val;\r\n}\r\n\r\nG_Flonum.prototype.toString = function () {\r\n return this.val.toString();\r\n};\r\n\r\nfunction G_Jumpable() {\r\n}\r\n\r\nG_Jumpable.prototype.jump = function () {};\r\n\r\nfunction g_module_registry_init(link_info) {\r\n var n = link_info.length;\r\n var i = 0;\r\n g_module_table = new Array(n);\r\n while (i \u003C n) {\r\n var info = link_info[i];\r\n g_module_map[info.name] = info;\r\n g_module_table[i] = null;\r\n \u002B\u002Bi;\r\n }\r\n}\r\n\r\nfunction G_Pair(car,cdr) {\r\n this.car = car;\r\n this.cdr = cdr;\r\n}\r\n\r\nvar g_r0 = void 0;\r\n\r\nvar g_r1 = void 0;\r\n\r\nvar g_r2 = void 0;\r\n\r\nvar g_r3 = void 0;\r\n\r\nfunction G_S16Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_S32Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_S8Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction g_scm_procedure2host(obj) {\r\n function scm_procedure() {\r\n var args = Array.prototype.slice.call(arguments);\r\n return g_host2scm_call(obj,args);\r\n }\r\n return scm_procedure;\r\n}\r\n\r\nvar g_sp = -1;\r\n\r\nfunction G_ScmString(codes) {\r\n this.codes = codes;\r\n}\r\n\r\nG_ScmString.prototype.toString = function () {\r\n var limit = 32768;\r\n if (this.codes.length \u003C limit) {\r\n return String.fromCharCode.apply(null,this.codes);\r\n } else {\r\n var chunks = [];\r\n var i = 0;\r\n while (i \u003C this.codes.length) {\r\n chunks.push(String.fromCharCode.apply(null,this.codes.slice(i,i \u002B limit)));\r\n i \u002B= limit;\r\n }\r\n return chunks.join(\u0022\u0022);\r\n }\r\n};\r\n\r\nfunction G_Structure(slots) {\r\n this.slots = slots;\r\n if (slots[0] === null) {\r\n this.slots[0] = this;\r\n }\r\n}\r\n\r\nfunction G_Symbol(name,hash,interned) {\r\n this.name = name;\r\n this.hash = hash;\r\n this.interned = interned;\r\n}\r\n\r\nG_Symbol.prototype.toString = function () {\r\n return this.name;\r\n};\r\n\r\nfunction G_U16Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_U32Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_U8Vector(elems) {\r\n this.elems = elems;\r\n}\r\n\r\nfunction G_ControlPoint(id,parent) {\r\n this.id = id;\r\n this.parent = parent;\r\n}\r\n\r\nG_ControlPoint.prototype = Object.create(G_Jumpable.prototype);\r\n\r\nvar g_eof_obj = new G_Eof();\r\n\r\nfunction g_host2scm(obj) {\r\n if (obj === void 0) {\r\n return void 0;\r\n }\r\n if (obj === null) {\r\n return null;\r\n }\r\n if (typeof obj === \u0022boolean\u0022) {\r\n return obj;\r\n }\r\n if (typeof obj === \u0022number\u0022) {\r\n if ((obj | 0) === obj \u0026\u0026 obj \u003E= -536870912 \u0026\u0026 obj \u003C= 536870911) {\r\n return obj;\r\n } else {\r\n return new G_Flonum(obj);\r\n }\r\n }\r\n if (typeof obj === \u0022function\u0022) {\r\n return g_host_function2scm(obj);\r\n }\r\n if (typeof obj === \u0022string\u0022) {\r\n return new G_ScmString(g_str2codes(obj));\r\n }\r\n if (typeof obj === \u0022object\u0022) {\r\n if (obj instanceof Array) {\r\n return obj.map( g_host2scm );\r\n }\r\n if (obj instanceof Uint8Array) {\r\n return new G_U8Vector(obj);\r\n }\r\n if (obj instanceof Uint16Array) {\r\n return new G_U16Vector(obj);\r\n }\r\n if (obj instanceof Uint32Array) {\r\n return new G_U32Vector(obj);\r\n }\r\n if (obj instanceof Int8Array) {\r\n return new G_S8Vector(obj);\r\n }\r\n if (obj instanceof Int16Array) {\r\n return new G_S16Vector(obj);\r\n }\r\n if (obj instanceof Int32Array) {\r\n return new G_S32Vector(obj);\r\n }\r\n if (obj instanceof Float32Array) {\r\n return new G_F32Vector(obj);\r\n }\r\n if (obj instanceof Float64Array) {\r\n return new G_F64Vector(obj);\r\n }\r\n var alist = null;\r\n for (var key in obj) {\r\n alist = new G_Pair(new G_Pair(g_host2scm(key),g_host2scm(obj[key])),alist);\r\n }\r\n return alist;\r\n }\r\n throw \u0022host2scm error\u0022;\r\n}\r\n\r\nfunction g_make_interned_symbol(name) {\r\n var obj = Object.prototype.hasOwnProperty.call(g_symbol_table,name) ? g_symbol_table[name] : null;\r\n if (obj === null) {\r\n obj = new G_Symbol(name,g_str_hash(name),false);\r\n obj.interned = true;\r\n g_symbol_table[name] = obj;\r\n }\r\n return obj;\r\n}\r\n\r\nfunction g_scm2host(obj) {\r\n if (obj === void 0) {\r\n return obj;\r\n }\r\n if (obj === null) {\r\n return obj;\r\n }\r\n if (typeof obj === \u0022boolean\u0022) {\r\n return obj;\r\n }\r\n if (typeof obj === \u0022number\u0022) {\r\n return obj;\r\n }\r\n if (obj instanceof G_Flonum) {\r\n return obj.val;\r\n }\r\n if (obj instanceof G_ScmString) {\r\n return obj.toString();\r\n }\r\n if (obj instanceof Array) {\r\n return obj.map( g_scm2host );\r\n }\r\n if (obj instanceof G_U8Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_U16Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_U32Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_S8Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_S16Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_S32Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_F32Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_F64Vector) {\r\n return obj.elems;\r\n }\r\n if (obj instanceof G_Pair) {\r\n var jsobj = {};\r\n var i = 0;\r\n while (obj instanceof G_Pair) {\r\n var elem = obj.car;\r\n if (elem instanceof G_Pair) {\r\n jsobj[g_scm2host(elem.car)] = g_scm2host(elem.cdr);\r\n } else {\r\n jsobj[i] = g_scm2host(elem);\r\n }\r\n \u002B\u002Bi;\r\n obj = obj.cdr;\r\n }\r\n return jsobj;\r\n }\r\n if (obj instanceof G_Structure) {\r\n throw \u0022scm2host error (cannot convert Structure)\u0022;\r\n }\r\n if (typeof obj === \u0022function\u0022) {\r\n return g_scm_procedure2host(obj);\r\n }\r\n throw \u0022scm2host error\u0022;\r\n}\r\n\r\nfunction g_trampoline(pc) {\r\n while (pc !== null) {\r\n pc = pc();\r\n }\r\n}\r\n\r\nfunction g_underflow() {\r\n var nextf = g_stack[0];\r\n if (nextf === void 0) {\r\n return null;\r\n }\r\n var frame = nextf;\r\n var ra = frame[0];\r\n var fs = ra.fs;\r\n var link = ra.link;\r\n g_stack = frame.slice(0,fs \u002B 1);\r\n g_sp = fs;\r\n g_stack[0] = frame[link];\r\n g_stack[link] = g_underflow;\r\n return ra;\r\n}\r\n\r\ng_underflow.id = 0;\r\ng_underflow.parent = null;\r\ng_underflow.fs = 0;\r\ng_underflow.link = 0;\r\n\r\nfunction G_EntryPoint(id,parent,nfree) {\r\n this.id = id;\r\n this.parent = parent;\r\n this.nfree = nfree;\r\n}\r\n\r\nG_EntryPoint.prototype = Object.create(G_ControlPoint.prototype);\r\n\r\nfunction g_module_register(module_descr) {\r\n var temp = module_descr[0];\r\n var name = temp[temp.length - 1].name;\r\n var info = Object.prototype.hasOwnProperty.call(g_module_map,name) ? g_module_map[name] : null;\r\n if (info === null) {\r\n g_sp = -1;\r\n g_stack[\u002B\u002Bg_sp] = void 0;\r\n g_r0 = g_underflow;\r\n g_nargs = 0;\r\n g_trampoline(module_descr[4]);\r\n } else {\r\n var index = info.index;\r\n var old = g_module_table[index];\r\n g_module_table[index] = module_descr;\r\n if (old === null) {\r\n \u002B\u002Bg_module_count;\r\n if (g_module_count === g_module_table.length) {\r\n g_glo[\u0022##program-descr\u0022] = [g_module_table,null,false];\r\n temp = g_module_table[g_module_table.length - 1][0];\r\n g_glo[\u0022##vm-main-module-ref\u0022] = temp[temp.length - 1];\r\n g_sp = -1;\r\n g_stack[\u002B\u002Bg_sp] = void 0;\r\n g_r0 = g_underflow;\r\n g_nargs = 0;\r\n g_trampoline(g_module_table[0][4]);\r\n }\r\n }\r\n }\r\n}\r\n\r\nfunction g_poll(dest) {\r\n g_pollcount = 100;\r\n g_stack.length = g_sp \u002B 1;\r\n return dest;\r\n}\r\n\r\nfunction G_ReturnPoint(id,parent,fs,link) {\r\n this.id = id;\r\n this.parent = parent;\r\n this.fs = fs;\r\n this.link = link;\r\n}\r\n\r\nG_ReturnPoint.prototype = Object.create(G_ControlPoint.prototype);\r\n\r\nfunction g_scm_call(proc,args) {\r\n g_sp = -1;\r\n g_stack[\u002B\u002Bg_sp] = void 0;\r\n g_nargs = args.length;\r\n i = 0;\r\n while (i \u003C g_nargs) {\r\n g_stack[\u002B\u002Bg_sp] = args[i];\r\n \u002B\u002Bi;\r\n }\r\n if (g_nargs \u003E 0) {\r\n if (g_nargs \u003E 1) {\r\n if (g_nargs \u003E 2) {\r\n g_r3 = g_stack[g_sp];\r\n --g_sp;\r\n }\r\n g_r2 = g_stack[g_sp];\r\n --g_sp;\r\n }\r\n g_r1 = g_stack[g_sp];\r\n --g_sp;\r\n }\r\n g_r0 = g_underflow;\r\n g_trampoline(proc);\r\n return g_r1;\r\n}\r\n\r\nfunction g_tostr(obj) {\r\n if (obj === false) {\r\n return \u0022#f\u0022;\r\n } else {\r\n if (obj === true) {\r\n return \u0022#t\u0022;\r\n } else {\r\n if (obj === null) {\r\n return \u0022\u0022;\r\n } else {\r\n if (obj === void 0) {\r\n return \u0022#!void\u0022;\r\n } else {\r\n if (obj === g_eof_obj) {\r\n return \u0022#!eof\u0022;\r\n } else {\r\n if (obj instanceof G_Pair) {\r\n return g_tostr(obj.car) \u002B g_tostr(obj.cdr);\r\n } else {\r\n return obj.toString();\r\n }\r\n }\r\n }\r\n }\r\n }\r\n }\r\n}\r\n\r\nfunction g_bb1_println() {\r\n g_println(g_tostr(g_r1));\r\n g_r1 = void 0;\r\n return g_r0;\r\n}\r\n\r\ng_bb1_println.id = 0;\r\ng_bb1_println.parent = null;\r\ng_bb1_println.nfree = -1;\r\n\r\ng_glo[\u0022println\u0022] = g_bb1_println;\r\n\r\nfunction g_heapify_cont(ra) {\r\n if (g_sp \u003E 0) {\r\n var fs = ra.fs;\r\n var link = ra.link;\r\n var base = g_sp - fs;\r\n var chain;\r\n if (base \u003E 0) {\r\n chain = g_stack.slice(base,base \u002B fs \u002B 1);\r\n chain[0] = ra;\r\n g_sp = base;\r\n var prev_frame = chain;\r\n var prev_link = link;\r\n ra = prev_frame[prev_link];\r\n fs = ra.fs;\r\n link = ra.link;\r\n base = g_sp - fs;\r\n while (base \u003E 0) {\r\n var frame = g_stack.slice(base,base \u002B fs \u002B 1);\r\n frame[0] = ra;\r\n g_sp = base;\r\n prev_frame[prev_link] = frame;\r\n prev_frame = frame;\r\n prev_link = link;\r\n ra = prev_frame[prev_link];\r\n fs = ra.fs;\r\n link = ra.link;\r\n base = g_sp - fs;\r\n }\r\n g_stack[link] = g_stack[0];\r\n g_stack[0] = ra;\r\n prev_frame[prev_link] = (g_stack.length = fs \u002B 1 , g_stack);\r\n } else {\r\n g_stack[link] = g_stack[0];\r\n g_stack[0] = ra;\r\n chain = (g_stack.length = fs \u002B 1 , g_stack);\r\n }\r\n g_stack = [chain];\r\n g_sp = 0;\r\n }\r\n return g_underflow;\r\n}\r\n\r\nfunction g_host2scm_call(proc,args) {\r\n return g_scm2host(g_scm_call(proc,args.map( g_host2scm )));\r\n}\r\n\r\nfunction g_prepend_arg1(arg1) {\r\n var i = 0;\r\n if (g_nargs \u003E 0) {\r\n g_stack[\u002B\u002Bg_sp] = g_r1;\r\n if (g_nargs \u003E 1) {\r\n g_stack[\u002B\u002Bg_sp] = g_r2;\r\n if (g_nargs \u003E 2) {\r\n g_stack[\u002B\u002Bg_sp] = g_r3;\r\n }\r\n }\r\n }\r\n g_stack[\u002B\u002Bg_sp] = null;\r\n while (i \u003C g_nargs) {\r\n g_stack[g_sp - i] = g_stack[g_sp - (i \u002B 1)];\r\n \u002B\u002Bi;\r\n }\r\n g_stack[g_sp - i] = arg1;\r\n \u002B\u002Bg_nargs;\r\n if (g_nargs \u003E 0) {\r\n if (g_nargs \u003E 1) {\r\n if (g_nargs \u003E 2) {\r\n g_r3 = g_stack[g_sp];\r\n --g_sp;\r\n }\r\n g_r2 = g_stack[g_sp];\r\n --g_sp;\r\n }\r\n g_r1 = g_stack[g_sp];\r\n --g_sp;\r\n }\r\n}\r\n\r\nfunction g_scm2host_call(fn) {\r\n if (g_nargs \u003E 0) {\r\n g_stack[\u002B\u002Bg_sp] = g_r1;\r\n if (g_nargs \u003E 1) {\r\n g_stack[\u002B\u002Bg_sp] = g_r2;\r\n if (g_nargs \u003E 2) {\r\n g_stack[\u002B\u002Bg_sp] = g_r3;\r\n }\r\n }\r\n }\r\n var args = g_stack.slice(g_sp \u002B 1 - g_nargs,g_sp \u002B 1 - g_nargs \u002B g_nargs);\r\n g_sp \u002B= - g_nargs;\r\n var ra = g_heapify_cont(g_r0);\r\n var frame = g_stack[0];\r\n var tmp = args.map( g_scm2host );\r\n tmp = fn.apply( null, tmp );\r\n g_r1 = g_host2scm(tmp);\r\n g_sp = -1;\r\n g_stack[\u002B\u002Bg_sp] = frame;\r\n return ra;\r\n}\r\n\r\nfunction g_wrong_nargs(proc) {\r\n g_prepend_arg1(proc);\r\n return g_peps[\u0022##raise-wrong-number-of-arguments-exception-nary\u0022];\r\n}\r\n\r\ng_module_registry_init([new G_ModLinkInfo(\u0022lib\u0022,0),new G_ModLinkInfo(\u0022app\u0022,1)]);\r\n\r\n// File generated by Gambit v4.9.3\r\n// Link info: (409003 (js ()) \u0022lib\u0022 ((\u0022lib\u0022)) (module_register make_interned_symbol ffi peps pair r2 glo-println glo poll pollcount string r1 r0 sp stack wrong_nargs nargs) (println append js-alert patch! for-each app# current-milliseconds) (println append js-alert patch! for-each lib# current-milliseconds) (println append js-alert patch! for-each current-milliseconds) #f)\r\n\r\nvar g_cst0_G_lib = new G_ScmString([62,62,62,32,108,105,98,46,115,99,109]);\r\n\r\nfunction g_bb1_lib_23_() { // entry-point\r\n if (g_nargs !== 0) {\r\n return g_wrong_nargs(g_bb1_lib_23_);\r\n }\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_r1 = g_cst0_G_lib;\r\n \u002B\u002Bg_sp;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb2_lib_23_);\r\n } else {\r\n g_r0 = g_bb3_lib_23_;\r\n g_nargs = 1;\r\n return g_glo[\u0022println\u0022]();\r\n }\r\n}\r\n\r\ng_bb1_lib_23_.id = 0;\r\ng_bb1_lib_23_.parent = g_bb1_lib_23_;\r\ng_bb1_lib_23_.nfree = -1;\r\ng_bb1_lib_23_._name = g_make_interned_symbol(\u0022lib#\u0022);\r\ng_bb1_lib_23_.ctrlpts = null;\r\ng_bb1_lib_23_.info = false;\r\n\r\nfunction g_bb2_lib_23_() {\r\n g_r0 = g_bb3_lib_23_;\r\n g_nargs = 1;\r\n return g_glo[\u0022println\u0022]();\r\n}\r\n\r\ng_bb2_lib_23_.id = 1;\r\ng_bb2_lib_23_.parent = g_bb1_lib_23_;\r\n\r\nfunction g_bb3_lib_23_() { // return-point\r\n g_glo[\u0022for-each\u0022] = g_bb1_for_2d_each;\r\n g_glo[\u0022append\u0022] = g_bb1_append;\r\n g_glo[\u0022current-milliseconds\u0022] = g_bb1_current_2d_milliseconds;\r\n g_glo[\u0022js-alert\u0022] = g_bb1_js_2d_alert;\r\n g_glo[\u0022patch!\u0022] = g_bb1_patch_21_;\r\n g_r0 = g_stack[g_sp];\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb4_lib_23_);\r\n } else {\r\n g_nargs = 0;\r\n --g_sp;\r\n return g_glo[\u0022app#\u0022]();\r\n }\r\n}\r\n\r\ng_bb3_lib_23_.id = 2;\r\ng_bb3_lib_23_.parent = g_bb1_lib_23_;\r\ng_bb3_lib_23_.fs = 1;\r\ng_bb3_lib_23_.link = 1;\r\n\r\nfunction g_bb4_lib_23_() {\r\n g_nargs = 0;\r\n --g_sp;\r\n return g_glo[\u0022app#\u0022]();\r\n}\r\n\r\ng_bb4_lib_23_.id = 3;\r\ng_bb4_lib_23_.parent = g_bb1_lib_23_;\r\n\r\n\r\ng_bb1_lib_23_.ctrlpts = [g_bb1_lib_23_,g_bb2_lib_23_,g_bb3_lib_23_,g_bb4_lib_23_];\r\n\r\n\r\ng_peps[\u0022lib#\u0022] = g_bb1_lib_23_;\r\ng_glo[\u0022lib#\u0022] = g_bb1_lib_23_;\r\n\r\nfunction g_bb1_for_2d_each() { // entry-point\r\n if (g_nargs !== 2) {\r\n return g_wrong_nargs(g_bb1_for_2d_each);\r\n }\r\n if (g_r2 instanceof G_Pair) {\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_stack[g_sp\u002B2] = g_r1;\r\n g_stack[g_sp\u002B3] = g_r2;\r\n g_r1 = g_r2.car;\r\n g_sp \u002B= 3;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb3_for_2d_each);\r\n } else {\r\n g_r0 = g_bb4_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n }\r\n } else {\r\n return g_bb12_for_2d_each();\r\n }\r\n}\r\n\r\ng_bb1_for_2d_each.id = 0;\r\ng_bb1_for_2d_each.parent = g_bb1_for_2d_each;\r\ng_bb1_for_2d_each.nfree = -1;\r\ng_bb1_for_2d_each._name = g_make_interned_symbol(\u0022for-each\u0022);\r\ng_bb1_for_2d_each.ctrlpts = null;\r\ng_bb1_for_2d_each.info = false;\r\n\r\nfunction g_bb2_for_2d_each() {\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_stack[g_sp\u002B2] = g_r1;\r\n g_stack[g_sp\u002B3] = g_r2;\r\n g_r1 = g_r2.car;\r\n g_sp \u002B= 3;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb3_for_2d_each);\r\n } else {\r\n g_r0 = g_bb4_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n }\r\n}\r\n\r\ng_bb2_for_2d_each.id = 1;\r\ng_bb2_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb3_for_2d_each() {\r\n g_r0 = g_bb4_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n}\r\n\r\ng_bb3_for_2d_each.id = 2;\r\ng_bb3_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb4_for_2d_each() { // return-point\r\n g_r1 = g_stack[g_sp].cdr;\r\n g_r2 = g_r1;\r\n g_r1 = g_stack[g_sp-1];\r\n g_r0 = g_stack[g_sp-2];\r\n g_sp -= 3;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb6_for_2d_each);\r\n } else {\r\n if (g_r2 instanceof G_Pair) {\r\n return g_bb7_for_2d_each();\r\n } else {\r\n return g_bb12_for_2d_each();\r\n }\r\n }\r\n}\r\n\r\ng_bb4_for_2d_each.id = 3;\r\ng_bb4_for_2d_each.parent = g_bb1_for_2d_each;\r\ng_bb4_for_2d_each.fs = 3;\r\ng_bb4_for_2d_each.link = 1;\r\n\r\nfunction g_bb12_for_2d_each() {\r\n g_r1 = void 0;\r\n return g_r0;\r\n}\r\n\r\ng_bb12_for_2d_each.id = 4;\r\ng_bb12_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb6_for_2d_each() {\r\n if (g_r2 instanceof G_Pair) {\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_stack[g_sp\u002B2] = g_r1;\r\n g_stack[g_sp\u002B3] = g_r2;\r\n g_r1 = g_r2.car;\r\n g_sp \u002B= 3;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb8_for_2d_each);\r\n } else {\r\n g_r0 = g_bb9_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n }\r\n } else {\r\n return g_bb12_for_2d_each();\r\n }\r\n}\r\n\r\ng_bb6_for_2d_each.id = 5;\r\ng_bb6_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb7_for_2d_each() {\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_stack[g_sp\u002B2] = g_r1;\r\n g_stack[g_sp\u002B3] = g_r2;\r\n g_r1 = g_r2.car;\r\n g_sp \u002B= 3;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb8_for_2d_each);\r\n } else {\r\n g_r0 = g_bb9_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n }\r\n}\r\n\r\ng_bb7_for_2d_each.id = 6;\r\ng_bb7_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb8_for_2d_each() {\r\n g_r0 = g_bb9_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n}\r\n\r\ng_bb8_for_2d_each.id = 7;\r\ng_bb8_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb9_for_2d_each() { // return-point\r\n g_r1 = g_stack[g_sp].cdr;\r\n if (g_r1 instanceof G_Pair) {\r\n g_stack[g_sp] = g_r1;\r\n g_r1 = g_r1.car;\r\n g_r0 = g_bb5_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n } else {\r\n g_r1 = void 0;\r\n g_sp -= 3;\r\n return g_stack[g_sp\u002B1]();\r\n }\r\n}\r\n\r\ng_bb9_for_2d_each.id = 8;\r\ng_bb9_for_2d_each.parent = g_bb1_for_2d_each;\r\ng_bb9_for_2d_each.fs = 3;\r\ng_bb9_for_2d_each.link = 1;\r\n\r\nfunction g_bb10_for_2d_each() {\r\n g_stack[g_sp] = g_r1;\r\n g_r1 = g_r1.car;\r\n g_r0 = g_bb5_for_2d_each;\r\n g_nargs = 1;\r\n return g_stack[g_sp-1]();\r\n}\r\n\r\ng_bb10_for_2d_each.id = 9;\r\ng_bb10_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\nfunction g_bb5_for_2d_each() { // return-point\r\n g_r2 = g_stack[g_sp].cdr;\r\n g_r1 = g_stack[g_sp-1];\r\n g_r0 = g_stack[g_sp-2];\r\n g_sp -= 3;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb6_for_2d_each);\r\n } else {\r\n if (g_r2 instanceof G_Pair) {\r\n return g_bb7_for_2d_each();\r\n } else {\r\n return g_bb12_for_2d_each();\r\n }\r\n }\r\n}\r\n\r\ng_bb5_for_2d_each.id = 10;\r\ng_bb5_for_2d_each.parent = g_bb1_for_2d_each;\r\ng_bb5_for_2d_each.fs = 3;\r\ng_bb5_for_2d_each.link = 1;\r\n\r\nfunction g_bb11_for_2d_each() {\r\n g_r1 = void 0;\r\n g_sp -= 3;\r\n return g_stack[g_sp\u002B1]();\r\n}\r\n\r\ng_bb11_for_2d_each.id = 11;\r\ng_bb11_for_2d_each.parent = g_bb1_for_2d_each;\r\n\r\n\r\ng_bb1_for_2d_each.ctrlpts = [g_bb1_for_2d_each,g_bb2_for_2d_each,g_bb3_for_2d_each,g_bb4_for_2d_each,g_bb12_for_2d_each,g_bb6_for_2d_each,g_bb7_for_2d_each,g_bb8_for_2d_each,g_bb9_for_2d_each,g_bb10_for_2d_each,g_bb5_for_2d_each,g_bb11_for_2d_each];\r\n\r\n\r\ng_peps[\u0022for-each\u0022] = g_bb1_for_2d_each;\r\n\r\nfunction g_bb1_append() { // entry-point\r\n if (g_nargs !== 2) {\r\n return g_wrong_nargs(g_bb1_append);\r\n }\r\n if (g_r1 instanceof G_Pair) {\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_stack[g_sp\u002B2] = g_r1;\r\n g_r1 = g_r1.cdr;\r\n g_r0 = g_bb3_append;\r\n g_nargs = 2;\r\n g_sp \u002B= 2;\r\n return g_peps[\u0022append\u0022]();\r\n } else {\r\n g_r1 = g_r2;\r\n return g_r0;\r\n }\r\n}\r\n\r\ng_bb1_append.id = 0;\r\ng_bb1_append.parent = g_bb1_append;\r\ng_bb1_append.nfree = -1;\r\ng_bb1_append._name = g_make_interned_symbol(\u0022append\u0022);\r\ng_bb1_append.ctrlpts = null;\r\ng_bb1_append.info = false;\r\n\r\nfunction g_bb2_append() {\r\n g_stack[g_sp\u002B1] = g_r0;\r\n g_stack[g_sp\u002B2] = g_r1;\r\n g_r1 = g_r1.cdr;\r\n g_r0 = g_bb3_append;\r\n g_nargs = 2;\r\n g_sp \u002B= 2;\r\n return g_peps[\u0022append\u0022]();\r\n}\r\n\r\ng_bb2_append.id = 1;\r\ng_bb2_append.parent = g_bb1_append;\r\n\r\nfunction g_bb3_append() { // return-point\r\n g_r2 = g_stack[g_sp].car;\r\n g_r1 = new G_Pair(g_r2,g_r1);\r\n g_sp -= 2;\r\n return g_stack[g_sp\u002B1]();\r\n}\r\n\r\ng_bb3_append.id = 2;\r\ng_bb3_append.parent = g_bb1_append;\r\ng_bb3_append.fs = 2;\r\ng_bb3_append.link = 1;\r\n\r\nfunction g_bb4_append() {\r\n g_r1 = g_r2;\r\n return g_r0;\r\n}\r\n\r\ng_bb4_append.id = 3;\r\ng_bb4_append.parent = g_bb1_append;\r\n\r\n\r\ng_bb1_append.ctrlpts = [g_bb1_append,g_bb2_append,g_bb3_append,g_bb4_append];\r\n\r\n\r\ng_peps[\u0022append\u0022] = g_bb1_append;\r\n\r\nfunction g_bb1_current_2d_milliseconds() { // entry-point\r\n if (g_nargs !== 0) {\r\n return g_wrong_nargs(g_bb1_current_2d_milliseconds);\r\n }\r\n g_r1 = Date.now();\r\n return g_r0;\r\n}\r\n\r\ng_bb1_current_2d_milliseconds.id = 0;\r\ng_bb1_current_2d_milliseconds.parent = g_bb1_current_2d_milliseconds;\r\ng_bb1_current_2d_milliseconds.nfree = -1;\r\ng_bb1_current_2d_milliseconds._name = g_make_interned_symbol(\u0022current-milliseconds\u0022);\r\ng_bb1_current_2d_milliseconds.ctrlpts = null;\r\ng_bb1_current_2d_milliseconds.info = false;\r\n\r\n\r\ng_bb1_current_2d_milliseconds.ctrlpts = [g_bb1_current_2d_milliseconds];\r\n\r\n\r\ng_peps[\u0022current-milliseconds\u0022] = g_bb1_current_2d_milliseconds;\r\n\r\nfunction g_bb1_js_2d_alert() { // entry-point\r\n if (g_nargs !== 1) {\r\n return g_wrong_nargs(g_bb1_js_2d_alert);\r\n }\r\n alert(g_scm2host(g_r1));g_r1 = void 0;\r\n return g_r0;\r\n}\r\n\r\ng_bb1_js_2d_alert.id = 0;\r\ng_bb1_js_2d_alert.parent = g_bb1_js_2d_alert;\r\ng_bb1_js_2d_alert.nfree = -1;\r\ng_bb1_js_2d_alert._name = g_make_interned_symbol(\u0022js-alert\u0022);\r\ng_bb1_js_2d_alert.ctrlpts = null;\r\ng_bb1_js_2d_alert.info = false;\r\n\r\n\r\ng_bb1_js_2d_alert.ctrlpts = [g_bb1_js_2d_alert];\r\n\r\n\r\ng_peps[\u0022js-alert\u0022] = g_bb1_js_2d_alert;\r\n\r\nfunction g_bb1_patch_21_() { // entry-point\r\n if (g_nargs !== 1) {\r\n return g_wrong_nargs(g_bb1_patch_21_);\r\n }\r\n patch(g_scm2host(g_r1));g_r1 = void 0;\r\n return g_r0;\r\n}\r\n\r\ng_bb1_patch_21_.id = 0;\r\ng_bb1_patch_21_.parent = g_bb1_patch_21_;\r\ng_bb1_patch_21_.nfree = -1;\r\ng_bb1_patch_21_._name = g_make_interned_symbol(\u0022patch!\u0022);\r\ng_bb1_patch_21_.ctrlpts = null;\r\ng_bb1_patch_21_.info = false;\r\n\r\n\r\ng_bb1_patch_21_.ctrlpts = [g_bb1_patch_21_];\r\n\r\n\r\ng_peps[\u0022patch!\u0022] = g_bb1_patch_21_;\r\n\r\ng_module_register([[g_make_interned_symbol(\u0022lib\u0022)],[],null,1,g_bb1_lib_23_,false]);\r\n\r\n// File generated by Gambit v4.9.3\r\n// Link info: (409003 (js ()) \u0022app\u0022 ((\u0022app\u0022)) (module_register glo peps make_interned_symbol sp stack r3 r0 poll pollcount r1 r2 wrong_nargs nargs) () (app#) () #f)\r\n\r\nfunction g_bb1_app_23_() { // entry-point\r\n if (g_nargs !== 0) {\r\n return g_wrong_nargs(g_bb1_app_23_);\r\n }\r\n g_r2 = 1;\r\n g_r1 = 13371;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb5_app_23_);\r\n } else {\r\n if (g_r1 === 0) {\r\n return g_bb6_app_23_();\r\n } else {\r\n return g_bb2_app_23_();\r\n }\r\n }\r\n}\r\n\r\ng_bb1_app_23_.id = 0;\r\ng_bb1_app_23_.parent = g_bb1_app_23_;\r\ng_bb1_app_23_.nfree = -1;\r\ng_bb1_app_23_._name = g_make_interned_symbol(\u0022app#\u0022);\r\ng_bb1_app_23_.ctrlpts = null;\r\ng_bb1_app_23_.info = false;\r\n\r\nfunction g_bb5_app_23_() {\r\n if (g_r1 === 0) {\r\n g_r1 = g_r2;\r\n return g_r0;\r\n } else {\r\n g_r3 = g_r1 \u002B -1;\r\n g_r1 = g_r1 * g_r2;\r\n if (g_r3 === 0) {\r\n return g_r0;\r\n } else {\r\n g_r2 = g_r3 \u002B -1;\r\n g_r1 = g_r3 * g_r1;\r\n if (g_r2 === 0) {\r\n return g_r0;\r\n } else {\r\n g_r1 = g_r2 * g_r1;\r\n g_stack[g_sp\u002B1] = g_r2;\r\n g_r2 = g_r1;\r\n g_r1 = g_stack[g_sp\u002B1] \u002B -1;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb5_app_23_);\r\n } else {\r\n if (g_r1 === 0) {\r\n return g_bb6_app_23_();\r\n } else {\r\n return g_bb2_app_23_();\r\n }\r\n }\r\n }\r\n }\r\n }\r\n}\r\n\r\ng_bb5_app_23_.id = 1;\r\ng_bb5_app_23_.parent = g_bb1_app_23_;\r\n\r\nfunction g_bb6_app_23_() {\r\n g_r1 = g_r2;\r\n return g_r0;\r\n}\r\n\r\ng_bb6_app_23_.id = 2;\r\ng_bb6_app_23_.parent = g_bb1_app_23_;\r\n\r\nfunction g_bb2_app_23_() {\r\n g_r3 = g_r1 \u002B -1;\r\n g_r1 = g_r1 * g_r2;\r\n if (g_r3 === 0) {\r\n return g_r0;\r\n } else {\r\n g_r2 = g_r3 \u002B -1;\r\n g_r1 = g_r3 * g_r1;\r\n if (g_r2 === 0) {\r\n return g_r0;\r\n } else {\r\n g_r1 = g_r2 * g_r1;\r\n g_stack[g_sp\u002B1] = g_r2;\r\n g_r2 = g_r1;\r\n g_r1 = g_stack[g_sp\u002B1] \u002B -1;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb5_app_23_);\r\n } else {\r\n if (g_r1 === 0) {\r\n return g_bb6_app_23_();\r\n } else {\r\n return g_bb2_app_23_();\r\n }\r\n }\r\n }\r\n }\r\n}\r\n\r\ng_bb2_app_23_.id = 3;\r\ng_bb2_app_23_.parent = g_bb1_app_23_;\r\n\r\nfunction g_bb7_app_23_() {\r\n return g_r0;\r\n}\r\n\r\ng_bb7_app_23_.id = 4;\r\ng_bb7_app_23_.parent = g_bb1_app_23_;\r\n\r\nfunction g_bb3_app_23_() {\r\n g_r2 = g_r3 \u002B -1;\r\n g_r1 = g_r3 * g_r1;\r\n if (g_r2 === 0) {\r\n return g_r0;\r\n } else {\r\n g_r1 = g_r2 * g_r1;\r\n g_stack[g_sp\u002B1] = g_r2;\r\n g_r2 = g_r1;\r\n g_r1 = g_stack[g_sp\u002B1] \u002B -1;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb5_app_23_);\r\n } else {\r\n if (g_r1 === 0) {\r\n return g_bb6_app_23_();\r\n } else {\r\n return g_bb2_app_23_();\r\n }\r\n }\r\n }\r\n}\r\n\r\ng_bb3_app_23_.id = 5;\r\ng_bb3_app_23_.parent = g_bb1_app_23_;\r\n\r\nfunction g_bb4_app_23_() {\r\n g_r1 = g_r2 * g_r1;\r\n g_stack[g_sp\u002B1] = g_r2;\r\n g_r2 = g_r1;\r\n g_r1 = g_stack[g_sp\u002B1] \u002B -1;\r\n if (--g_pollcount === 0) {\r\n return g_poll(g_bb5_app_23_);\r\n } else {\r\n if (g_r1 === 0) {\r\n return g_bb6_app_23_();\r\n } else {\r\n return g_bb2_app_23_();\r\n }\r\n }\r\n}\r\n\r\ng_bb4_app_23_.id = 6;\r\ng_bb4_app_23_.parent = g_bb1_app_23_;\r\n\r\n\r\ng_bb1_app_23_.ctrlpts = [g_bb1_app_23_,g_bb5_app_23_,g_bb6_app_23_,g_bb2_app_23_,g_bb7_app_23_,g_bb3_app_23_,g_bb4_app_23_];\r\n\r\n\r\ng_peps[\u0022app#\u0022] = g_bb1_app_23_;\r\ng_glo[\u0022app#\u0022] = g_bb1_app_23_;\r\n\r\ng_module_register([[g_make_interned_symbol(\u0022app\u0022)],[],null,1,g_bb1_app_23_,false]);\r\n\r\n \r\n}\r\n\r\n","TestCases":[{"Name":"v0","Code":"v0()","IsDeferred":false},{"Name":"v1 use strict","Code":"v1strict()","IsDeferred":false},{"Name":"v1","Code":"v1()","IsDeferred":false},{"Name":"tailcall","Code":"tailcall()","IsDeferred":false},{"Name":"vanilla","Code":"vanilla()","IsDeferred":false},{"Name":"iterative","Code":"iterative()","IsDeferred":false},{"Name":"gambit","Code":"gambit()","IsDeferred":false}]}