+})();
+var l165 = {name: "SET-BINDING-DECLARATIONS"};
+(function(){
+ (l165).function = (function(v369){
+ ((v369)["fname"] = "SET-BINDING-DECLARATIONS");
+ return v369;
+ })((function (v367,v368){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(){
+ var x = l36.function(v367);
+ if (typeof x != 'object')
+ throw 'The value ' + x + ' is not a type object.';
+ return (x.car = v368);
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 145)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l165;
+})();
+var l166 = {name: "PUSH-BINDING-DECLARATION"};
+(function(){
+ (l166).function = (function(v372){
+ ((v372)["fname"] = "PUSH-BINDING-DECLARATION");
+ return v372;
+ })((function (v370,v371){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l165.function(v371, ({car: v370, cdr: l163.function(v371)}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 146)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l166;
+})();
+var l167 = {name: "MAKE-LEXENV"};
+(function(){
+ (l167).function = (function(v373){
+ ((v373)["fname"] = "MAKE-LEXENV");
+ return v373;
+ })((function (){
+ if (arguments.length > 0) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l42.function(l3.value, l3.value, l3.value, l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 147)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l167;
+})();
+var l168 = {name: "COPY-LEXENV"};
+(function(){
+ (l168).function = (function(v375){
+ ((v375)["fname"] = "COPY-LEXENV");
+ return v375;
+ })((function (v374){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l71.function(v374);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 148)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l168;
+})();
+var l169 = {name: "PUSH-TO-LEXENV"};
+var l170 = {name: "BLOCK"};
+var l171 = {name: "GOTAG"};
+(function(){
+ (l169).function = (function(v380){
+ ((v380)["fname"] = "PUSH-TO-LEXENV");
+ return v380;
+ })((function (v376,v377,v378){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v379){
+ return (l25.function(v379, l99) !== l3.value ? (function(){
+ return (function(){
+ var x = v377;
+ if (typeof x != 'object')
+ throw 'The value ' + x + ' is not a type object.';
+ return (x.car = ({car: v376, cdr: (function(){
+ var tmp = v377;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()}));
+ })();
+ })() : (l25.function(v379, l98) !== l3.value ? (function(){
+ return (function(){
+ var x = (function(){
+ var tmp = v377;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })();
+ if (typeof x != 'object')
+ throw 'The value ' + x + ' is not a type object.';
+ return (x.car = ({car: v376, cdr: l32.function(v377)}));
+ })();
+ })() : (l25.function(v379, l170) !== l3.value ? (function(){
+ return (function(){
+ var x = l34.function(v377);
+ if (typeof x != 'object')
+ throw 'The value ' + x + ' is not a type object.';
+ return (x.car = ({car: v376, cdr: l35.function(v377)}));
+ })();
+ })() : (l25.function(v379, l171) !== l3.value ? (function(){
+ return (function(){
+ var x = l36.function(v377);
+ if (typeof x != 'object')
+ throw 'The value ' + x + ' is not a type object.';
+ return (x.car = ({car: v376, cdr: l37.function(v377)}));
+ })();
+ })() : (function(){
+ return (function(){
+ throw "ECASE expression failed.";
+ })();
+ })()))));
+ })(v378);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 149)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l169;
+})();
+var l172 = {name: "EXTEND-LEXENV"};
+(function(){
+ (l172).function = (function(v387){
+ ((v387)["fname"] = "EXTEND-LEXENV");
+ return v387;
+ })((function (v381,v382,v383){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v384){
+ return (function(){
+ try {
+ return (function(){
+ return (function(v385,v386){
+ (function(){
+ while(v385 !== l3.value){
+ (v386 = (function(){
+ var tmp = v385;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ l169.function(v386, v384, v383);
+ return l3.value;
+ })();
+ (v385 = (function(){
+ var tmp = v385;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return v384;
+ })(l64.function(v381),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 151)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ })(l168.function(v382));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 150)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l172;
+})();
+var l173 = {name: "LOOKUP-IN-LEXENV"};
+(function(){
+ (l173).function = (function(v392){
+ ((v392)["fname"] = "LOOKUP-IN-LEXENV");
+ return v392;
+ })((function (v388,v389,v390){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l91.function(v388, (function(v391){
+ return (l25.function(v391, l99) !== l3.value ? (function(){
+ return l38.function(v389);
+ })() : (l25.function(v391, l98) !== l3.value ? (function(){
+ return l39.function(v389);
+ })() : (l25.function(v391, l170) !== l3.value ? (function(){
+ return l40.function(v389);
+ })() : (l25.function(v391, l171) !== l3.value ? (function(){
+ return l41.function(v389);
+ })() : (function(){
+ return (function(){
+ throw "ECASE expression failed.";
+ })();
+ })()))));
+ })(v390));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 152)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l173;
+})();
+var l174 = {name: "*ENVIRONMENT*"};
+(function(){
+ (((l174.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l174).value = l167.function());
+ })());
+ return l174;
+})();
+var l175 = {name: "*VARIABLE-COUNTER*"};
+(function(){
+ (((l175.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l175).value = 0);
+ })());
+ return l175;
+})();
+var l176 = {name: "GVARNAME"};
+(function(){
+ (l176).function = (function(v394){
+ ((v394)["fname"] = "GVARNAME");
+ return v394;
+ })((function (v393){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("v", l16.function(((l175).value = (function(){
+ var x1 = (function(){
+ var symbol = l175;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })();
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })())));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 153)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l176;
+})();
+var l177 = {name: "TRANSLATE-VARIABLE"};
+(function(){
+ (l177).function = (function(v396){
+ ((v396)["fname"] = "TRANSLATE-VARIABLE");
+ return v396;
+ })((function (v395){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l162.function(l173.function(v395, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l99));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 154)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l177;
+})();
+var l178 = {name: "EXTEND-LOCAL-ENV"};
+var l179 = {name: "LEXICAL-VARIABLE"};
+(function(){
+ (l178).function = (function(v402){
+ ((v402)["fname"] = "EXTEND-LOCAL-ENV");
+ return v402;
+ })((function (v397){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v398){
+ return (function(){
+ try {
+ return (function(){
+ return (function(v399,v400){
+ (function(){
+ while(v399 !== l3.value){
+ (v400 = (function(){
+ var tmp = v399;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (function(v401){
+ return l169.function(v401, v398, l99);
+ })(l159.function(v400, l179, l176.function(v400)));
+ return l3.value;
+ })();
+ (v399 = (function(){
+ var tmp = v399;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return v398;
+ })(v397,l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 156)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ })(l168.function((function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 155)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l178;
+})();
+var l180 = {name: "*TOPLEVEL-COMPILATIONS*"};
+(function(){
+ (((l180.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l180).value = l3.value);
+ })());
+ return l180;
+})();
+var l181 = {name: "TOPLEVEL-COMPILATION"};
+(function(){
+ (l181).function = (function(v404){
+ ((v404)["fname"] = "TOPLEVEL-COMPILATION");
+ return v404;
+ })((function (v403){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return ((l180).value = ({car: v403, cdr: (function(){
+ var symbol = l180;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 157)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l181;
+})();
+var l182 = {name: "NULL-OR-EMPTY-P"};
+(function(){
+ (l182).function = (function(v406){
+ ((v406)["fname"] = "NULL-OR-EMPTY-P");
+ return v406;
+ })((function (v405){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l23.function(l67.function(v405));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 158)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l182;
+})();
+var l183 = {name: "GET-TOPLEVEL-COMPILATIONS"};
+(function(){
+ (l183).function = (function(v407){
+ ((v407)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
+ return v407;
+ })((function (){
+ if (arguments.length > 0) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l64.function(l84.function((function(){
+ var symbol = l182;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), (function(){
+ var symbol = l180;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 159)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l183;
+})();
+var l184 = {name: "%COMPILE-DEFMACRO"};
+var l185 = {name: "MACRO"};
+(function(){
+ (l184).function = (function(v410){
+ ((v410)["fname"] = "%COMPILE-DEFMACRO");
+ return v410;
+ })((function (v408,v409){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ l181.function((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l153), l42.function(v408))));
+ return l169.function(l159.function(v408, l185, v409), (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l98);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 160)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l184;
+})();
+var l186 = {name: "GLOBAL-BINDING"};
+(function(){
+ (l186).function = (function(v416){
+ ((v416)["fname"] = "GLOBAL-BINDING");
+ return v416;
+ })((function (v411,v412,v413){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v414){
+ return (v414 !== l3.value ? v414 : (function(v415){
+ l169.function(v415, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), v413);
+ return v415;
+ })(l159.function(v411, v412, l3.value)));
+ })(l173.function(v411, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), v413));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 161)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l186;
+})();
+var l187 = {name: "CLAIMP"};
+(function(){
+ (l187).function = (function(v421){
+ ((v421)["fname"] = "CLAIMP");
+ return v421;
+ })((function (v417,v418,v419){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v420){
+ return (v420 !== l3.value ? l82.function(v419, l163.function(v420)) : l3.value);
+ })(l173.function(v417, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), v418));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 162)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l187;
+})();
+var l188 = {name: "!PROCLAIM"};
+var l189 = {name: "SPECIAL"};
+var l190 = {name: "NOTINLINE"};
+var l191 = {name: "CONSTANT"};
+var l192 = {name: "NON-OVERRIDABLE"};
+(function(){
+ (l188).function = (function(v436){
+ ((v436)["fname"] = "!PROCLAIM");
+ return v436;
+ })((function (v422){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v423){
+ return (l25.function(v423, l189) !== l3.value ? (function(){
+ return (function(){
+ try {
+ return (function(){
+ return (function(v424,v425){
+ (function(){
+ while(v424 !== l3.value){
+ (v425 = (function(){
+ var tmp = v424;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (function(v426){
+ return l166.function(l189, v426);
+ })(l186.function(v425, l99, l99));
+ return l3.value;
+ })();
+ (v424 = (function(){
+ var tmp = v424;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return l3.value;
+ })((function(){
+ var tmp = v422;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 164)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ })() : (l25.function(v423, l190) !== l3.value ? (function(){
+ return (function(){
+ try {
+ return (function(){
+ return (function(v427,v428){
+ (function(){
+ while(v427 !== l3.value){
+ (v428 = (function(){
+ var tmp = v427;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (function(v429){
+ return l166.function(l190, v429);
+ })(l186.function(v428, l98, l98));
+ return l3.value;
+ })();
+ (v427 = (function(){
+ var tmp = v427;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return l3.value;
+ })((function(){
+ var tmp = v422;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 165)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ })() : (l25.function(v423, l191) !== l3.value ? (function(){
+ return (function(){
+ try {
+ return (function(){
+ return (function(v430,v431){
+ (function(){
+ while(v430 !== l3.value){
+ (v431 = (function(){
+ var tmp = v430;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (function(v432){
+ return l166.function(l191, v432);
+ })(l186.function(v431, l99, l99));
+ return l3.value;
+ })();
+ (v430 = (function(){
+ var tmp = v430;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return l3.value;
+ })((function(){
+ var tmp = v422;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 166)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ })() : (l25.function(v423, l192) !== l3.value ? (function(){
+ return (function(){
+ try {
+ return (function(){
+ return (function(v433,v434){
+ (function(){
+ while(v433 !== l3.value){
+ (v434 = (function(){
+ var tmp = v433;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (function(v435){
+ return l166.function(l192, v435);
+ })(l186.function(v434, l98, l98));
+ return l3.value;
+ })();
+ (v433 = (function(){
+ var tmp = v433;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return l3.value;
+ })((function(){
+ var tmp = v422;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 167)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ })() : l3.value))));
+ })((function(){
+ var tmp = v422;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 163)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l188;
+})();
+var l193 = {name: "PROCLAIM"};
+(l193).function = (function(){
+ var symbol = l188;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+})();
+var l194 = {name: "*COMPILATIONS*"};
+(function(){
+ (((l194.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l194).value = l3.value);
+ })());
+ return l194;
+})();
+var l195 = {name: "DEFINE-COMPILATION"};
+l195;
+var l196 = {name: "IF"};
+((l194).value = ({car: l42.function(l196, (function (v437,v438,v439){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v437), " !== ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), " ? ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v438), " : ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v439), ")");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 168)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l197 = {name: "*LAMBDA-LIST-KEYWORDS*"};
+var l198 = {name: "&OPTIONAL"};
+var l199 = {name: "&REST"};
+var l200 = {car: l198, cdr: {car: l199, cdr: l3}};
+(function(){
+ (((l197.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l197).value = l200);
+ })());
+ return l197;
+})();
+var l201 = {name: "LIST-UNTIL-KEYWORD"};
+(function(){
+ (l201).function = (function(v442){
+ ((v442)["fname"] = "LIST-UNTIL-KEYWORD");
+ return v442;
+ })((function (v440){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return ((function(v441){
+ return (v441 !== l3.value ? v441 : l82.function((function(){
+ var tmp = v440;
+ return tmp === l3.value? l3.value: tmp.car;
+ })(), (function(){
+ var symbol = l197;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()));
+ })(l11.function(v440)) !== l3.value ? l3.value : ({car: (function(){
+ var tmp = v440;
+ return tmp === l3.value? l3.value: tmp.car;
+ })(), cdr: l201.function((function(){
+ var tmp = v440;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })())}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 169)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l201;
+})();
+var l202 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
+(function(){
+ (l202).function = (function(v444){
+ ((v444)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
+ return v444;
+ })((function (v443){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l201.function(v443);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 170)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l202;
+})();
+var l203 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
+(function(){
+ (l203).function = (function(v446){
+ ((v446)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
+ return v446;
+ })((function (v445){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l69.function((function(){
+ var symbol = l56;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), l201.function((function(){
+ var tmp = l82.function(l198, v445);
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 171)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l203;
+})();
+var l204 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
+(function(){
+ (l204).function = (function(v448){
+ ((v448)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
+ return v448;
+ })((function (v447){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l69.function((function(){
+ var symbol = l29;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), l203.function(v447));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 172)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l204;
+})();
+var l205 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
+(function(){
+ (l205).function = (function(v451){
+ ((v451)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
+ return v451;
+ })((function (v449){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v450){
+ ((function(){
+ var tmp = v450;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })() !== l3.value ? (function(){
+ return (function(){
+ throw "Bad lambda-list";
+ })();
+ })() : l3.value);
+ return (function(){
+ var tmp = v450;
+ return tmp === l3.value? l3.value: tmp.car;
+ })();
+ })(l201.function((function(){
+ var tmp = l82.function(l199, v449);
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 173)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l205;
+})();
+var l206 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
+(function(){
+ (l206).function = (function(v454){
+ ((v454)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
+ return v454;
+ })((function (v453){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v452= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v452 = {car: arguments[i], cdr:
+ v452};
+ return (function(){
+ try {
+ return (function(){
+ return (v453 !== l3.value ? l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var func = ", l126.function(v452), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "func.docstring = '", v453, "';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return func;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()") : l126.function(v452));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 174)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l206;
+})();
+var l207 = {name: "LAMBDA"};
+var l208 = {name: "LS-COMPILE-BLOCK"};
+((l194).value = ({car: l42.function(l207, (function (v456){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v455= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v455 = {car: arguments[i], cdr:
+ v455};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v457,v458,v459,v460){
+ ((((typeof((function(){
+ var tmp = v455;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()) == "string")?l4.value: l3.value) !== l3.value ? l26.function(l11.function((function(){
+ var tmp = v455;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })())) : l3.value) !== l3.value ? (function(){
+ (v460 = (function(){
+ var tmp = v455;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ return (v455 = (function(){
+ var tmp = v455;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ })() : l3.value);
+ return (function(v461,v462,v463){
+ try {
+ var tmp;
+ tmp = l174.value;
+ l174.value = v463;
+ v463 = tmp;
+ return l206.function(v460, "(function (", l126.function(l69.function((function(){
+ var symbol = l177;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), l62.function(v457, v458)), ","), "){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function((v457 !== l3.value ? l124.function("if (arguments.length < ", l16.function(v461), ") throw 'too few arguments';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()) : ""), (l26.function(v459) !== l3.value ? l124.function("if (arguments.length > ", l16.function((function(){
+ var x1 = v461;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = v462;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })()), ") throw 'too many arguments';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()) : ""), (v458 !== l3.value ? l124.function("switch(arguments.length){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), (function(v464,v465,v466){
+ return (function(){
+ (function(){
+ try {
+ return (function(){
+ return (function(){
+ while((function(){
+ var x1 = v466;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = v462;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return (x1<x2?l4.value: l3.value);
+ })() !== l3.value){
+ (function(v467){
+ (v465 = ({car: l124.function("case ", l16.function((function(){
+ var x1 = v466;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = v461;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })()), ":", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l177.function((function(){
+ var tmp = v467;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()), "=", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l32.function(v467)), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), cdr: v465}));
+ return (v466 = (function(){
+ var x1 = v466;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })());
+ })(l79.function(v466, v464));
+ }return l3.value;
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 176)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ (v465 = ({car: l124.function("default: break;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), cdr: v465}));
+ return l126.function(l64.function(v465));
+ })();
+ })(l203.function(v456),l3.value,0), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()) : ""), (v459 !== l3.value ? (function(v468){
+ return l124.function("var ", v468, "= ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "for (var i = arguments.length-1; i>=", l16.function((function(){
+ var x1 = v461;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = v462;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })()), "; i--)", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(v468, " = ", "{car: arguments[i], cdr: "), v468, "};", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })(l177.function(v459)) : ""), (function(){
+ var symbol = l208;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v455, l4.value)), (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "})");
+ }
+ finally {
+ l174.value = v463;
+ }
+ })(l67.function(v457),l67.function(v458),l178.function(l62.function(l56.function(v459), v457, v458)));
+ })(l202.function(v456),l204.function(v456),l205.function(v456),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 175)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l209 = {name: "SETQ-PAIR"};
+var l210 = {name: "SET"};
+(function(){
+ (l209).function = (function(v472){
+ ((v472)["fname"] = "SETQ-PAIR");
+ return v472;
+ })((function (v469,v470){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v471){
+ return (((l161.function(v471) === l179)?l4.value: l3.value) !== l3.value ? l124.function(l162.function(v471), " = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v470)) : (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l210), l42.function(l62.function(l42.function(l153), l42.function(v469))), l42.function(v470))));
+ })(l173.function(v469, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l99));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 177)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l209;
+})();
+var l211 = {name: "SETQ"};
+((l194).value = ({car: l42.function(l211, (function (){
+ var v473= l3.value;
+ for (var i = arguments.length-1; i>=0; i--)
+ v473 = {car: arguments[i], cdr:
+ v473};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v474){
+ (function(){
+ try {
+ return (function(){
+ return (function(){
+ while(l4.value !== l3.value){
+ (l11.function(v473) !== l3.value ? (function(){
+ return (function(){
+ throw ({type: 'block', id: 179, value: l3.value, message: 'Return from unknown block NIL.'})
+ })();
+ })() : (l11.function((function(){
+ var tmp = v473;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })()) !== l3.value ? (function(){
+ return (function(){
+ throw "Odd paris in SETQ";
+ })();
+ })() : (function(){
+ (v474 = l124.function(v474, (function(){
+ return l124.function(l209.function((function(){
+ var tmp = v473;
+ return tmp === l3.value? l3.value: tmp.car;
+ })(), l32.function(v473)), (l11.function(l34.function(v473)) !== l3.value ? "" : ", "));
+ })()));
+ return (v473 = l34.function(v473));
+ })()));
+ }return l3.value;
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 179)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ return l124.function("(", v474, ")");
+ })("");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 178)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l212 = {name: "JS-VREF"};
+((l194).value = ({car: l42.function(l212, (function (v475){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return v475;
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 180)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l213 = {name: "JS-VSET"};
+((l194).value = ({car: l42.function(l213, (function (v476,v477){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(", v476, " = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v477), ")");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 181)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+(function(){
+ (l136).function = (function(v484){
+ ((v484)["fname"] = "ESCAPE-STRING");
+ return v484;
+ })((function (v478){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v479,v480,v481){
+ (function(){
+ try {
+ return (function(){
+ return (function(){
+ while((function(){
+ var x1 = v480;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = v481;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return (x1<x2?l4.value: l3.value);
+ })() !== l3.value){
+ (function(v482){
+ ((function(v483){
+ return (v483 !== l3.value ? v483 : l74.function(v482, 92));
+ })(l74.function(v482, 34)) !== l3.value ? (function(){
+ return (v479 = l124.function(v479, "\\"));
+ })() : l3.value);
+ (l74.function(v482, 10) !== l3.value ? (function(){
+ (v479 = l124.function(v479, "\\"));
+ return (v482 = 110);
+ })() : l3.value);
+ return (v479 = l124.function(v479, l92.function(v482)));
+ })((function(){
+ var string = v478;
+ var index = v480;
+ if (typeof string != 'string')
+ throw 'The value ' + string + ' is not a type string.';
+ if (typeof index != 'number')
+ throw 'The value ' + index + ' is not a type number.';
+ return string.charCodeAt(index);
+ })());
+ (v480 = (function(){
+ var x1 = v480;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })());
+ }return l3.value;
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 183)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ return v479;
+ })("",0,l67.function(v478));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 182)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l136;
+})();
+var l214 = {name: "*LITERAL-SYMBOLS*"};
+(function(){
+ (((l214.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l214).value = l3.value);
+ })());
+ return l214;
+})();
+var l215 = {name: "*LITERAL-COUNTER*"};
+(function(){
+ (((l215.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l215).value = 0);
+ })());
+ return l215;
+})();
+var l216 = {name: "GENLIT"};
+(function(){
+ (l216).function = (function(v485){
+ ((v485)["fname"] = "GENLIT");
+ return v485;
+ })((function (){
+ if (arguments.length > 0) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("l", l16.function(((l215).value = (function(){
+ var x1 = (function(){
+ var symbol = l215;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })();
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })())));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 184)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l216;
+})();
+var l217 = {name: "LITERAL"};
+(function(){
+ (l217).function = (function(v496){
+ ((v496)["fname"] = "LITERAL");
+ return v496;
+ })((function (v486,v487){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ switch(arguments.length){
+ case 1:
+ v487=l3.value;
+ default: break;
+ }
+ return (function(){
+ try {
+ return (function(){
+ return (l75.function(v486) !== l3.value ? (function(){
+ return l16.function(v486);
+ })() : (((typeof(v486) == "string")?l4.value: l3.value) !== l3.value ? (function(){
+ return l124.function("\"", l136.function(v486), "\"");
+ })() : (((function(){
+ var tmp = v486;
+ return (typeof tmp == 'object' && 'name' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? (function(){
+ return (function(v488){
+ return (v488 !== l3.value ? v488 : (function(v489,v490){
+ ((l214).value = ({car: ({car: v486, cdr: v489}), cdr: (function(){
+ var symbol = l214;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+ l181.function(l124.function("var ", v489, " = ", v490));
+ return v489;
+ })(l216.function(),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l120), l42.function((v486).name), l42.function(l106.function(l114.function(v486)))))));
+ })((function(){
+ var tmp = l91.function(v486, (function(){
+ var symbol = l214;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ })() : (((function(){
+ var tmp = v486;
+ return (typeof tmp == 'object' && 'car' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? (function(){
+ return (function(v491){
+ return (v487 !== l3.value ? v491 : (function(v492){
+ l181.function(l124.function("var ", v492, " = ", v491));
+ return v492;
+ })(l216.function()));
+ })(l124.function("{car: ", l217.function((function(){
+ var tmp = v486;
+ return tmp === l3.value? l3.value: tmp.car;
+ })(), l4.value), ", ", "cdr: ", l217.function((function(){
+ var tmp = v486;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), l4.value), "}"));
+ })() : (((function(){
+ var x = v486;
+ return typeof x === 'object' && 'length' in x;
+ })()?l4.value: l3.value) !== l3.value ? (function(){
+ return (function(v493){
+ return (function(v494){
+ return (v487 !== l3.value ? v494 : (function(v495){
+ l181.function(l124.function("var ", v495, " = ", v494));
+ return v495;
+ })(l216.function()));
+ })(l124.function("[", l126.function(l69.function((function(){
+ var symbol = l217;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v493), ", "), "]"));
+ })(l129.function(v486));
+ })() : l3.value)))));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 185)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l217;
+})();
+((l194).value = ({car: l42.function(l153, (function (v497){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l217.function(v497);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 186)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l218 = {name: "%WHILE"};
+((l194).value = ({car: l42.function(l218, (function (v499){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v498= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v498 = {car: arguments[i], cdr:
+ v498};
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("while(", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v499), " !== ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), "){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function((function(){
+ var symbol = l208;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v498)), "}", "return ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 187)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l219 = {name: "SYMBOL-FUNCTION"};
+((l194).value = ({car: l42.function(l98, (function (v500){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return ((l57.function(v500) !== l3.value ? (((function(){
+ var tmp = v500;
+ return tmp === l3.value? l3.value: tmp.car;
+ })() === l207)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
+ return (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v500);
+ })() : (((function(){
+ var tmp = v500;
+ return (typeof tmp == 'object' && 'name' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? (function(){
+ return (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l219), l42.function(l62.function(l42.function(l153), l42.function(v500)))));
+ })() : l3.value));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 188)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l220 = {name: "EVAL-WHEN-COMPILE"};
+var l221 = {name: "EVAL"};
+var l222 = {name: "PROGN"};
+((l194).value = ({car: l42.function(l220, (function (){
+ var v501= l3.value;
+ for (var i = arguments.length-1; i>=0; i--)
+ v501 = {car: arguments[i], cdr:
+ v501};
+ return (function(){
+ try {
+ return (function(){
+ (function(){
+ var symbol = l221;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(({car: l222, cdr: v501}));
+ return l3.value;
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 189)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l223 = {name: "DEFINE-TRANSFORMATION"};
+l223;
+((l194).value = ({car: l42.function(l222, (function (){
+ var v502= l3.value;
+ for (var i = arguments.length-1; i>=0; i--)
+ v502 = {car: arguments[i], cdr:
+ v502};
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function((function(){
+ var symbol = l208;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v502, l4.value)), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 190)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l224 = {name: "SPECIAL-VARIABLE-P"};
+(function(){
+ (l224).function = (function(v504){
+ ((v504)["fname"] = "SPECIAL-VARIABLE-P");
+ return v504;
+ })((function (v503){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l187.function(v503, l99, l189);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 191)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l224;
+})();
+var l225 = {name: "LET-BINDING-WRAPPER"};
+(function(){
+ (l225).function = (function(v511){
+ ((v511)["fname"] = "LET-BINDING-WRAPPER");
+ return v511;
+ })((function (v505,v506){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ (l11.function(v505) !== l3.value ? (function(){
+ return (function(){
+ throw ({type: 'block', id: 192, value: v506, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
+ })();
+ })() : l3.value);
+ return l124.function("try {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tmp;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l128.function((function (v507){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(v508){
+ return l124.function("tmp = ", v508, ".value;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), v508, ".value = ", (function(){
+ var tmp = v507;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), (function(){
+ var tmp = v507;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), " = tmp;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l153), l42.function((function(){
+ var tmp = v507;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()))));
+
+ }), v505), v506, (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "finally {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l128.function((function (v509){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(v510){
+ return l124.function(v510, ".value", " = ", (function(){
+ var tmp = v509;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l153), l42.function((function(){
+ var tmp = v509;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()))));
+
+ }), v505)), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 192)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l225;
+})();
+var l226 = {name: "LET"};
+var l227 = {name: "DYNAMIC-BINDINGS"};
+((l194).value = ({car: l42.function(l226, (function (v513){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v512= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v512 = {car: arguments[i], cdr:
+ v512};
+ return (function(){
+ try {
+ return (function(){
+ return (function(){
+ try {
+ var v521 = l174.value;
+ var v514 = l69.function((function(){
+ var symbol = l56;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v513);
+ var v515 = l69.function((function(){
+ var symbol = l38;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v514);
+ var v516 = l69.function((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), l69.function((function(){
+ var symbol = l39;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v514));
+ ((l174).value = l178.function(l84.function((function(){
+ var symbol = l224;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v515)));
+ var v517 = l3.value;
+ return l124.function("(function(", l126.function(l69.function((function (v518){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (l224.function(v518) !== l3.value ? (function(v519){
+ ((l227).value = ({car: ({car: v518, cdr: v519}), cdr: v517}));
+ return v519;
+ })(l176.function(v518)) : l177.function(v518));
+
+ }), v515), ","), "){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), (function(v520){
+ return l131.function(l225.function(v517, v520));
+ })((function(){
+ var symbol = l208;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v512, l4.value)), "})(", l126.function(v516, ","), ")");
+ }
+ finally {
+ l174.value = v521;
+ }
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 193)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l228 = {name: "LET*-INITIALIZE-VALUE"};
+(function(){
+ (l228).function = (function(v528){
+ ((v528)["fname"] = "LET*-INITIALIZE-VALUE");
+ return v528;
+ })((function (v522){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v523,v524){
+ return (l224.function(v523) !== l3.value ? l124.function((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l211), l42.function(v523), l42.function(v524))), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()) : (function(){
+ var v525 = l176.function(v523);
+ var v526 = l159.function(v523, l99, v525);
+ return (function(v527){
+ l169.function(v526, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l99);
+ return v527;
+ })(l124.function("var ", v525, " = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v524), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()));
+ })());
+ })(l38.function(v522),l39.function(v522));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 194)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l228;
+})();
+var l229 = {name: "LET*-BINDING-WRAPPER"};
+(function(){
+ (l229).function = (function(v537){
+ ((v537)["fname"] = "LET*-BINDING-WRAPPER");
+ return v537;
+ })((function (v529,v530){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ (l11.function(v529) !== l3.value ? (function(){
+ return (function(){
+ throw ({type: 'block', id: 195, value: v530, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
+ })();
+ })() : l3.value);
+ return (function(v532){
+ return l124.function("try {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l128.function((function (v533){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(v534){
+ return l124.function("var ", (function(){
+ var tmp = v533;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), " = ", v534, ".value;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l153), l42.function((function(){
+ var tmp = v533;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()))));
+
+ }), v532), v530), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "finally {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l128.function((function (v535){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(v536){
+ return l124.function(v536, ".value", " = ", (function(){
+ var tmp = v535;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l153), l42.function((function(){
+ var tmp = v535;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()))));
+
+ }), v532)), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })(l69.function((function (v531){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return ({car: v531, cdr: l176.function(v531)});
+
+ }), l85.function((function(){
+ var symbol = l224;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v529)));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 195)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l229;
+})();
+var l230 = {name: "LET*"};
+((l194).value = ({car: l42.function(l230, (function (v539){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v538= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v538 = {car: arguments[i], cdr:
+ v538};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v540,v541){
+ try {
+ var tmp;
+ tmp = l174.value;
+ l174.value = v541;
+ v541 = tmp;
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function((function(v542,v543){
+ return l229.function(v542, v543);
+ })(l85.function((function(){
+ var symbol = l224;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), l69.function((function(){
+ var symbol = l38;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v540)),l124.function(l128.function((function(){
+ var symbol = l228;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v540), (function(){
+ var symbol = l208;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v538, l4.value)))), "})()");
+ }
+ finally {
+ l174.value = v541;
+ }
+ })(l69.function((function(){
+ var symbol = l56;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v539),l168.function((function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 196)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l231 = {name: "*BLOCK-COUNTER*"};
+(function(){
+ (((l231.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l231).value = 0);
+ })());
+ return l231;
+})();
+((l194).value = ({car: l42.function(l170, (function (v545){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v544= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v544 = {car: arguments[i], cdr:
+ v544};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v546){
+ return (function(v547){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("try {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), (function(v548){
+ try {
+ var tmp;
+ tmp = l174.value;
+ l174.value = v548;
+ v548 = tmp;
+ return l131.function("return ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l222), v544)), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ }
+ finally {
+ l174.value = v548;
+ }
+ })(l172.function(l42.function(v547), (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l170)), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "catch (cf){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " if (cf.type == 'block' && cf.id == ", v546, ")", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " return cf.value;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " else", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " throw cf;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })(l159.function(v545, l170, v546));
+ })(l16.function(((l231).value = (function(){
+ var x1 = (function(){
+ var symbol = l231;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })();
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })())));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 197)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l232 = {name: "RETURN-FROM"};
+((l194).value = ({car: l42.function(l232, (function (v549,v550){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ switch(arguments.length){
+ case 1:
+ v550=l3.value;
+ default: break;
+ }
+ return (function(){
+ try {
+ return (function(){
+ return (function(v551){
+ return (v551 !== l3.value ? l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw ({", "type: 'block', ", "id: ", l162.function(v551), ", ", "value: ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v550), ", ", "message: 'Return from unknown block ", (v549).name, ".'", "})"), "})()") : (function(){
+ throw l124.function("Unknown block `", (v549).name, "'.");
+ })());
+ })(l173.function(v549, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l170));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 198)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l233 = {name: "CATCH"};
+((l194).value = ({car: l42.function(l233, (function (v553){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v552= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v552 = {car: arguments[i], cdr:
+ v552};
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var id = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v553), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "try {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("return ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l222), v552)), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "catch (cf){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " if (cf.type == 'catch' && cf.id == id)", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " return cf.value;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " else", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " throw cf;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 199)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l234 = {name: "THROW"};
+((l194).value = ({car: l42.function(l234, (function (v554,v555){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw ({", "type: 'catch', ", "id: ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v554), ", ", "value: ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v555), ", ", "message: 'Throw uncatched.'", "})"), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 200)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l235 = {name: "*TAGBODY-COUNTER*"};
+(function(){
+ (((l235.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l235).value = 0);
+ })());
+ return l235;
+})();
+var l236 = {name: "*GO-TAG-COUNTER*"};
+(function(){
+ (((l236.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l236).value = 0);
+ })());
+ return l236;
+})();
+var l237 = {name: "GO-TAG-P"};
+(function(){
+ (l237).function = (function(v558){
+ ((v558)["fname"] = "GO-TAG-P");
+ return v558;
+ })((function (v556){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v557){
+ return (v557 !== l3.value ? v557 : ((function(){
+ var tmp = v556;
+ return (typeof tmp == 'object' && 'name' in tmp);
+ })()?l4.value: l3.value));
+ })(l75.function(v556));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 201)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l237;
+})();
+var l238 = {name: "DECLARE-TAGBODY-TAGS"};
+(function(){
+ (l238).function = (function(v564){
+ ((v564)["fname"] = "DECLARE-TAGBODY-TAGS");
+ return v564;
+ })((function (v559,v560){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v563){
+ return l172.function(v563, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l171);
+ })(l69.function((function (v561){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(v562){
+ return l159.function(v561, l171, l42.function(v559, v562));
+ })(l16.function(((l236).value = (function(){
+ var x1 = (function(){
+ var symbol = l236;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })();
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })())));
+
+ }), l85.function((function(){
+ var symbol = l237;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v560)));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 202)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l238;
+})();
+var l239 = {name: "TAGBODY"};
+((l194).value = ({car: l42.function(l239, (function (){
+ var v565= l3.value;
+ for (var i = arguments.length-1; i>=0; i--)
+ v565 = {car: arguments[i], cdr:
+ v565};
+ return (function(){
+ try {
+ return (function(){
+ (l89.function((function(){
+ var symbol = l237;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v565) !== l3.value ? l3.value : (function(){
+ return (function(){
+ throw ({type: 'block', id: 203, value: (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l62.function(l42.function(l222), v565, l42.function(l3))), message: 'Return from unknown block TAGBODY.'})
+ })();
+ })());
+ (l237.function((function(){
+ var tmp = v565;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()) !== l3.value ? l3.value : (function(){
+ return (v565 = ({car: l15.function("START"), cdr: v565}));
+ })());
+ return (function(v566){
+ return (function(v568,v567){
+ try {
+ var tmp;
+ tmp = l174.value;
+ l174.value = v568;
+ v568 = tmp;
+ (function(v569){
+ return (v567 = l39.function(l162.function(v569)));
+ })(l173.function(l38.function(v565), (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l171));
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tagbody_", v566, " = ", v567, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "tbloop:", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "while (true) {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("try {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function((function(v570){
+ return l124.function("switch(tagbody_", v566, "){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "case ", v567, ":", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), (function(){
+ try {
+ return (function(){
+ return (function(v571,v572){
+ (function(){
+ while(v571 !== l3.value){
+ (v572 = (function(){
+ var tmp = v571;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (v570 = l124.function(v570, (function(){
+ return (l26.function(l237.function(v572)) !== l3.value ? l131.function((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v572), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()) : (function(v573){
+ return l124.function("case ", l39.function(l162.function(v573)), ":", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })(l173.function(v572, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l171)));
+ })()));
+ return l3.value;
+ })();
+ (v571 = (function(){
+ var tmp = v571;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return v570;
+ })((function(){
+ var tmp = v565;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(),l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 204)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })(), "default:", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " break tbloop;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })("")), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "catch (jump) {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " if (jump.type == 'tagbody' && jump.id == ", v566, ")", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " tagbody_", v566, " = jump.label;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " else", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " throw(jump);", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ }
+ finally {
+ l174.value = v568;
+ }
+ })(l238.function(v566, v565),l3.value);
+ })(l16.function((function(){
+ var symbol = l235;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 203)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l240 = {name: "GO"};
+((l194).value = ({car: l42.function(l240, (function (v574){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v575,v576){
+ return (v575 !== l3.value ? l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw ({", "type: 'tagbody', ", "id: ", l38.function(l162.function(v575)), ", ", "label: ", l39.function(l162.function(v575)), ", ", "message: 'Attempt to GO to non-existing tag ", v576, "'", "})", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()") : (function(){
+ throw l124.function("Unknown tag `", v576, "'.");
+ })());
+ })(l173.function(v574, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l171),(((function(){
+ var tmp = v574;
+ return (typeof tmp == 'object' && 'name' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? (function(){
+ return (v574).name;
+ })() : (l75.function(v574) !== l3.value ? (function(){
+ return l16.function(v574);
+ })() : l3.value)));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 205)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l241 = {name: "UNWIND-PROTECT"};
+((l194).value = ({car: l42.function(l241, (function (v578){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v577= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v577 = {car: arguments[i], cdr:
+ v577};
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var ret = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "try {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("ret = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v578), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "} finally {", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function((function(){
+ var symbol = l208;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v577)), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return ret;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 206)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l242 = {name: "BACKQUOTE-EXPAND-1"};
+(function(){
+ (l242).function = (function(v581){
+ ((v581)["fname"] = "BACKQUOTE-EXPAND-1");
+ return v581;
+ })((function (v579){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (((function(){
+ var tmp = v579;
+ return (typeof tmp == 'object' && 'name' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? (function(){
+ return l42.function(l153, v579);
+ })() : (l43.function(v579) !== l3.value ? (function(){
+ return v579;
+ })() : ((((function(){
+ var tmp = v579;
+ return tmp === l3.value? l3.value: tmp.car;
+ })() === l156)?l4.value: l3.value) !== l3.value ? (function(){
+ return (function(){
+ var tmp = v579;
+ return tmp === l3.value? l3.value: tmp.car;
+ })();
+ })() : ((((function(){
+ var tmp = v579;
+ return tmp === l3.value? l3.value: tmp.car;
+ })() === l154)?l4.value: l3.value) !== l3.value ? (function(){
+ return l242.function(l242.function(l32.function(v579)));
+ })() : (function(){
+ return ({car: l62, cdr: l69.function((function (v580){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return ((l57.function(v580) !== l3.value ? (((function(){
+ var tmp = v580;
+ return tmp === l3.value? l3.value: tmp.car;
+ })() === l156)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
+ return l42.function(l42, l32.function(v580));
+ })() : ((l57.function(v580) !== l3.value ? (((function(){
+ var tmp = v580;
+ return tmp === l3.value? l3.value: tmp.car;
+ })() === l155)?l4.value: l3.value) : l3.value) !== l3.value ? (function(){
+ return l32.function(v580);
+ })() : (function(){
+ return l42.function(l42, l242.function(v580));
+ })()));
+
+ }), v579)});
+ })()))));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 207)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l242;
+})();
+var l243 = {name: "BACKQUOTE-EXPAND"};
+(function(){
+ (l243).function = (function(v583){
+ ((v583)["fname"] = "BACKQUOTE-EXPAND");
+ return v583;
+ })((function (v582){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return ((l57.function(v582) !== l3.value ? (((function(){
+ var tmp = v582;
+ return tmp === l3.value? l3.value: tmp.car;
+ })() === l154)?l4.value: l3.value) : l3.value) !== l3.value ? l242.function(l32.function(v582)) : v582);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 208)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l243;
+})();
+l154;
+((l194).value = ({car: l42.function(l154, (function (v584){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l242.function(v584));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 209)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l194;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l244 = {name: "*BUILTINS*"};
+(function(){
+ (((l244.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return ((l244).value = l3.value);
+ })());
+ return l244;
+})();
+var l245 = {name: "DEFINE-RAW-BUILTIN"};
+l245;
+var l246 = {name: "DEFINE-BUILTIN"};
+l246;
+var l247 = {name: "TYPE-CHECK"};
+l247;
+var l248 = {name: "VARIABLE-ARITY-CALL"};
+(function(){
+ (l248).function = (function(v593){
+ ((v593)["fname"] = "VARIABLE-ARITY-CALL");
+ return v593;
+ })((function (v585,v586){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ (((function(){
+ var tmp = v585;
+ return (typeof tmp == 'object' && 'car' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
+ return (function(){
+ throw "ARGS must be a non-empty list";
+ })();
+ })());
+ return (function(v587,v588,v589){
+ (function(){
+ try {
+ return (function(){
+ return (function(v590,v591){
+ (function(){
+ while(v590 !== l3.value){
+ (v591 = (function(){
+ var tmp = v590;
+ return tmp === l3.value? l3.value: tmp.car;
+ })());
+ (function(){
+ (function(v592){
+ (v588 = ({car: v592, cdr: v588}));
+ return (v589 = l124.function(v589, (function(){
+ return l124.function("var ", v592, " = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v591), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "if (typeof ", v592, " !== 'number') throw 'Not a number!';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+ })()));
+ })(l124.function("x", l16.function((v587 = (function(){
+ var x1 = v587;
+ if (typeof x1 !== 'number') throw 'Not a number!';
+ var x2 = 1;
+ if (typeof x2 !== 'number') throw 'Not a number!';
+ return x1+x2;
+ })()))));
+ return l3.value;
+ })();
+ (v590 = (function(){
+ var tmp = v590;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })());
+ }return l3.value;
+ })();
+ return l3.value;
+ })(v585,l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 211)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(v589, (v586)(l64.function(v588))), "})()");
+ })(0,l3,"");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 210)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l248;
+})();
+var l249 = {name: "VARIABLE-ARITY"};
+l249;
+var l250 = {name: "NUM-OP-NUM"};
+(function(){
+ (l250).function = (function(v597){
+ ((v597)["fname"] = "NUM-OP-NUM");
+ return v597;
+ })((function (v594,v595,v596){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v594, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("var ", "y", " = ", v596, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "number", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("if (typeof ", "y", " != '", "number", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return l124.function("x", v595, "y");
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 212)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l250;
+})();
+((l244).value = ({car: l42.function(l59, (function (){
+ var v598= l3.value;
+ for (var i = arguments.length-1; i>=0; i--)
+ v598 = {car: arguments[i], cdr:
+ v598};
+ return (function(){
+ try {
+ return (function(){
+ return (l11.function(v598) !== l3.value ? "0" : l248.function(v598, (function (v599){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l126.function(v599, "+"), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ })));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 213)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+((l244).value = ({car: l42.function(l60, (function (v601){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v600= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v600 = {car: arguments[i], cdr:
+ v600};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v602){
+ return l248.function(v602, (function (v603){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", (l11.function(v600) !== l3.value ? l124.function("-", (function(){
+ var tmp = v603;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()) : l126.function(v603, "-")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v601, cdr: v600}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 214)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+((l244).value = ({car: l42.function(l19, (function (){
+ var v604= l3.value;
+ for (var i = arguments.length-1; i>=0; i--)
+ v604 = {car: arguments[i], cdr:
+ v604};
+ return (function(){
+ try {
+ return (function(){
+ return (l11.function(v604) !== l3.value ? "1" : l248.function(v604, (function (v605){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l126.function(v605, "*"), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ })));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 215)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+((l244).value = ({car: l42.function(l20, (function (v607){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v606= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v606 = {car: arguments[i], cdr:
+ v606};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v608){
+ return l248.function(v608, (function (v609){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", (l11.function(v606) !== l3.value ? l124.function("1 /", (function(){
+ var tmp = v609;
+ return tmp === l3.value? l3.value: tmp.car;
+ })()) : l126.function(v609, "/")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v607, cdr: v606}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 216)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l251 = {name: "MOD"};
+(function(){
+ return ((l244).value = ({car: l42.function(l251, (function (v610,v611){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v612,v613){
+ return l250.function(v612, "%", v613);
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v610),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v611));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 217)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l252 = {name: "COMPARISON-CONJUNTION"};
+(function(){
+ (l252).function = (function(v616){
+ ((v616)["fname"] = "COMPARISON-CONJUNTION");
+ return v616;
+ })((function (v614,v615){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (l11.function((function(){
+ var tmp = v614;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })()) !== l3.value ? (function(){
+ return "true";
+ })() : (l11.function(l34.function(v614)) !== l3.value ? (function(){
+ return l124.function((function(){
+ var tmp = v614;
+ return tmp === l3.value? l3.value: tmp.car;
+ })(), v615, l32.function(v614));
+ })() : (function(){
+ return l124.function((function(){
+ var tmp = v614;
+ return tmp === l3.value? l3.value: tmp.car;
+ })(), v615, l32.function(v614), " && ", l252.function((function(){
+ var tmp = v614;
+ return tmp === l3.value? l3.value: tmp.cdr;
+ })(), v615));
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 218)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l252;
+})();
+var l253 = {name: "DEFINE-BUILTIN-COMPARISON"};
+l253;
+var l254 = {name: ">"};
+((l244).value = ({car: l42.function(l254, (function (v618){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v617= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v617 = {car: arguments[i], cdr:
+ v617};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v619){
+ return l248.function(v619, (function (v620){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l132.function(l252.function(v620, ">")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v618, cdr: v617}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 219)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l255 = {name: "<"};
+((l244).value = ({car: l42.function(l255, (function (v622){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v621= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v621 = {car: arguments[i], cdr:
+ v621};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v623){
+ return l248.function(v623, (function (v624){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l132.function(l252.function(v624, "<")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v622, cdr: v621}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 220)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l256 = {name: ">="};
+((l244).value = ({car: l42.function(l256, (function (v626){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v625= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v625 = {car: arguments[i], cdr:
+ v625};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v627){
+ return l248.function(v627, (function (v628){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l132.function(l252.function(v628, ">=")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v626, cdr: v625}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 221)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l257 = {name: "<="};
+((l244).value = ({car: l42.function(l257, (function (v630){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v629= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v629 = {car: arguments[i], cdr:
+ v629};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v631){
+ return l248.function(v631, (function (v632){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l132.function(l252.function(v632, "<=")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v630, cdr: v629}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 222)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+((l244).value = ({car: l42.function(l18, (function (v634){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v633= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v633 = {car: arguments[i], cdr:
+ v633};
+ return (function(){
+ try {
+ return (function(){
+ return (function(v635){
+ return l248.function(v635, (function (v636){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return l124.function("return ", l132.function(l252.function(v636, "==")), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })());
+
+ }));
+ })(({car: v634, cdr: v633}));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 223)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l258 = {name: "NUMBERP"};
+(function(){
+ return ((l244).value = ({car: l42.function(l258, (function (v637){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v638){
+ return l132.function(l124.function("(typeof (", v638, ") == \"number\")"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v637));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 224)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l259 = {name: "FLOOR"};
+(function(){
+ return ((l244).value = ({car: l42.function(l259, (function (v639){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v640){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v640, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "number", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "Math.floor(x)";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v639));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 225)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l27, (function (v641,v642){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v643,v644){
+ return l124.function("({car: ", v643, ", cdr: ", v644, "})");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v641),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v642));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 226)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l28, (function (v645){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v646){
+ return l132.function(l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tmp = ", v646, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v645));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 227)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l29, (function (v647){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v648){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tmp = ", v648, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return tmp === ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), "? ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ": tmp.car;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v647));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 228)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l30, (function (v649){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v650){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tmp = ", v650, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return tmp === ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), "? ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ": tmp.cdr;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v649));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 229)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l260 = {name: "SETCAR"};
+(function(){
+ return ((l244).value = ({car: l42.function(l260, (function (v651,v652){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v653,v654){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v653, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "object", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return l124.function("(x.car = ", v654, ")");
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v651),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v652));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 230)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l261 = {name: "SETCDR"};
+(function(){
+ return ((l244).value = ({car: l42.function(l261, (function (v655,v656){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v657,v658){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v657, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "object", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return l124.function("(x.cdr = ", v658, ")");
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v655),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v656));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 231)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l262 = {name: "SYMBOLP"};
+(function(){
+ return ((l244).value = ({car: l42.function(l262, (function (v659){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v660){
+ return l132.function(l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tmp = ", v660, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v659));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 232)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l263 = {name: "MAKE-SYMBOL"};
+(function(){
+ return ((l244).value = ({car: l42.function(l263, (function (v661){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v662){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "name", " = ", v662, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "name", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "({name: name})";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v661));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 233)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l264 = {name: "SYMBOL-NAME"};
+(function(){
+ return ((l244).value = ({car: l42.function(l264, (function (v663){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v664){
+ return l124.function("(", v664, ").name");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v663));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 234)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l210, (function (v665,v666){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v667,v668){
+ return l124.function("(", v667, ").value = ", v668);
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v665),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v666));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 235)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l265 = {name: "FSET"};
+(function(){
+ return ((l244).value = ({car: l42.function(l265, (function (v669,v670){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v671,v672){
+ return l124.function("(", v671, ").function = ", v672);
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v669),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v670));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 236)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l17, (function (v673){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v674){
+ return l132.function(l124.function("(", v674, ".value !== undefined)"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v673));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 237)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l266 = {name: "SYMBOL-VALUE"};
+(function(){
+ return ((l244).value = ({car: l42.function(l266, (function (v675){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v676){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var symbol = ", v676, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var value = symbol.value;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return value;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v675));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 238)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l219, (function (v677){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v678){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var symbol = ", v678, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var func = symbol.function;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return func;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v677));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 239)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l267 = {name: "SYMBOL-PLIST"};
+(function(){
+ return ((l244).value = ({car: l42.function(l267, (function (v679){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v680){
+ return l124.function("((", v680, ").plist || ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ")");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v679));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 240)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l268 = {name: "LAMBDA-CODE"};
+(function(){
+ return ((l244).value = ({car: l42.function(l268, (function (v681){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v682){
+ return l124.function("(", v682, ").toString()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v681));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 241)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l269 = {name: "EQ"};
+(function(){
+ return ((l244).value = ({car: l42.function(l269, (function (v683,v684){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v685,v686){
+ return l132.function(l124.function("(", v685, " === ", v686, ")"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v683),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v684));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 242)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l270 = {name: "EQUAL"};
+(function(){
+ return ((l244).value = ({car: l42.function(l270, (function (v687,v688){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v689,v690){
+ return l132.function(l124.function("(", v689, " == ", v690, ")"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v687),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v688));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 243)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l271 = {name: "CHAR-TO-STRING"};
+(function(){
+ return ((l244).value = ({car: l42.function(l271, (function (v691){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v692){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v692, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "number", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "String.fromCharCode(x)";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v691));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 244)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l272 = {name: "STRINGP"};
+(function(){
+ return ((l244).value = ({car: l42.function(l272, (function (v693){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v694){
+ return l132.function(l124.function("(typeof(", v694, ") == \"string\")"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v693));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 245)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l273 = {name: "STRING-UPCASE"};
+(function(){
+ return ((l244).value = ({car: l42.function(l273, (function (v695){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v696){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v696, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "x.toUpperCase()";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v695));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 246)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l274 = {name: "STRING-LENGTH"};
+(function(){
+ return ((l244).value = ({car: l42.function(l274, (function (v697){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v698){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v698, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "x.length";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v697));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 247)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l275 = {name: "SLICE"};
+((l244).value = ({car: l42.function(l275, (function (v699,v700,v701){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ switch(arguments.length){
+ case 2:
+ v701=l3.value;
+ default: break;
+ }
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var str = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v699), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var a = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v700), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var b;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), (v701 !== l3.value ? l124.function("b = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v701), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()) : ""), "return str.slice(a,b);", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 248)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l276 = {name: "CHAR"};
+(function(){
+ return ((l244).value = ({car: l42.function(l276, (function (v702,v703){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v704,v705){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "string", " = ", v704, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("var ", "index", " = ", v705, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "string", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("if (typeof ", "index", " != '", "number", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "string.charCodeAt(index)";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v702),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v703));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 249)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ return ((l244).value = ({car: l42.function(l68, (function (v706,v707){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v708,v709){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "string1", " = ", v708, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("var ", "string2", " = ", v709, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "string1", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("if (typeof ", "string2", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "string1.concat(string2)";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v706),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v707));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 250)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l277 = {name: "FUNCALL"};
+((l244).value = ({car: l42.function(l277, (function (v711){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v710= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v710 = {car: arguments[i], cdr:
+ v710};
+ return (function(){
+ try {
+ return (function(){
+ return l124.function("(", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v711), ")(", l126.function(l69.function((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v710), ", "), ")");
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 251)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l278 = {name: "APPLY"};
+((l244).value = ({car: l42.function(l278, (function (v713){
+ if (arguments.length < 1) throw 'too few arguments';
+ var v712= l3.value;
+ for (var i = arguments.length-1; i>=1; i--)
+ v712 = {car: arguments[i], cdr:
+ v712};
+ return (function(){
+ try {
+ return (function(){
+ return (l11.function(v712) !== l3.value ? l124.function("(", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v713), ")()") : (function(v714,v715){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var f = ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v713), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var args = [", l126.function(l69.function((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })(), v714), ", "), "];", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var tail = (", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v715), ");", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "while (tail != ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), "){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " args.push(tail.car);", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), " tail = tail.cdr;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "}", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return f.apply(this, args);", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })(l81.function(v712),(function(){
+ var tmp = l80.function(v712);
+ return tmp === l3.value? l3.value: tmp.car;
+ })()));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 252)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+})), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+})()}));
+var l279 = {name: "JS-EVAL"};
+(function(){
+ return ((l244).value = ({car: l42.function(l279, (function (v716){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v717){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "string", " = ", v717, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "string", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "eval.apply(window, [string])";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v716));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 253)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l280 = {name: "ERROR"};
+(function(){
+ return ((l244).value = ({car: l42.function(l280, (function (v718){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v719){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw ", v719, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v718));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 254)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l281 = {name: "NEW"};
+(function(){
+ return ((l244).value = ({car: l42.function(l281, (function (){
+ if (arguments.length > 0) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(){
+ return "{}";
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 255)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l282 = {name: "OBJECTP"};
+(function(){
+ return ((l244).value = ({car: l42.function(l282, (function (v720){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v721){
+ return l132.function(l124.function("(typeof (", v721, ") === 'object')"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v720));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 256)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l283 = {name: "OGET"};
+(function(){
+ return ((l244).value = ({car: l42.function(l283, (function (v722,v723){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v724,v725){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var tmp = ", "(", v724, ")[", v725, "];", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return tmp == undefined? ", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ": tmp ;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v722),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v723));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 257)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l284 = {name: "OSET"};
+(function(){
+ return ((l244).value = ({car: l42.function(l284, (function (v726,v727,v728){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v729,v730,v731){
+ return l124.function("((", v729, ")[", v730, "] = ", v731, ")");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v726),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v727),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v728));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 258)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l285 = {name: "IN"};
+(function(){
+ return ((l244).value = ({car: l42.function(l285, (function (v732,v733){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v734,v735){
+ return l132.function(l124.function("((", v734, ") in (", v735, "))"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v732),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v733));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 259)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l286 = {name: "FUNCTIONP"};
+(function(){
+ return ((l244).value = ({car: l42.function(l286, (function (v736){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v737){
+ return l132.function(l124.function("(typeof ", v737, " == 'function')"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v736));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 260)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l287 = {name: "WRITE-STRING"};
+(function(){
+ return ((l244).value = ({car: l42.function(l287, (function (v738){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v739){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function(l124.function("var ", "x", " = ", v739, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), l124.function("if (typeof ", "x", " != '", "string", "')", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), l124.function("return ", (function(){
+ return "lisp.write(x)";
+ })(), ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })())), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v738));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 261)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l288 = {name: "MAKE-ARRAY"};
+(function(){
+ return ((l244).value = ({car: l42.function(l288, (function (v740){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v741){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var r = [];", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "for (var i = 0; i < ", v741, "; i++)", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("r.push(", (function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(l3.value), ");", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "return r;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v740));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 262)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l289 = {name: "ARRAYP"};
+(function(){
+ return ((l244).value = ({car: l42.function(l289, (function (v742){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v743){
+ return l132.function(l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var x = ", v743, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v742));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 263)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l290 = {name: "AREF"};
+(function(){
+ return ((l244).value = ({car: l42.function(l290, (function (v744,v745){
+ if (arguments.length < 2) throw 'too few arguments';
+ if (arguments.length > 2) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v746,v747){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var x = ", "(", v746, ")[", v747, "];", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "if (x === undefined) throw 'Out of range';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return x;", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v744),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v745));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 264)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l291 = {name: "ASET"};
+(function(){
+ return ((l244).value = ({car: l42.function(l291, (function (v748,v749,v750){
+ if (arguments.length < 3) throw 'too few arguments';
+ if (arguments.length > 3) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(v751,v752,v753){
+ return l124.function("(function(){", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l131.function("var x = ", v751, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "var i = ", v752, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), "return x[i] = ", v753, ";", (function(){
+ var symbol = l123;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()), "})()");
+ })((function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v748),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v749),(function(){
+ var symbol = l133;
+ var func = symbol.function;
+ if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
+ return func;
+ })()(v750));
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 265)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+var l292 = {name: "GET-UNIX-TIME"};
+(function(){
+ return ((l244).value = ({car: l42.function(l292, (function (){
+ if (arguments.length > 0) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (function(){
+ return l124.function("(Math.round(new Date() / 1000))");
+ })();
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 266)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ })), cdr: (function(){
+ var symbol = l244;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })()}));
+})();
+(function(){
+ (l185).function = (function(v756){
+ ((v756)["fname"] = "MACRO");
+ return v756;
+ })((function (v754){
+ if (arguments.length < 1) throw 'too few arguments';
+ if (arguments.length > 1) throw 'too many arguments';
+ return (function(){
+ try {
+ return (function(){
+ return (((function(){
+ var tmp = v754;
+ return (typeof tmp == 'object' && 'name' in tmp);
+ })()?l4.value: l3.value) !== l3.value ? (function(v755){
+ return (((l161.function(v755) === l185)?l4.value: l3.value) !== l3.value ? v755 : l3.value);
+ })(l173.function(v754, (function(){
+ var symbol = l174;
+ var value = symbol.value;
+ if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
+ return value;
+ })(), l98)) : l3.value);
+ })();
+ }
+ catch (cf){
+ if (cf.type == 'block' && cf.id == 267)
+ return cf.value;
+ else
+ throw cf;
+ }
+ })();
+
+ }));
+ return l185;
+})();
+var l293 = {name: "LS-MACROEXPAND-1"};
+(function(){
+ (l293).function = (function(v761){
+ ((v761)["fname"] = "LS-MACROEXPAND-1");
+ return v761;
+ })((function (v757){