From: David Vázquez Date: Sun, 21 Apr 2013 11:50:17 +0000 (+0100) Subject: Print empty vector as #() X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=c9e8ef61e01075a7db5de4f8f493161be8799940;p=jscl.git Print empty vector as #() --- diff --git a/ecmalisp.js b/ecmalisp.js index 994bdae..296e945 100644 --- a/ecmalisp.js +++ b/ecmalisp.js @@ -882,19 +882,23 @@ var l68 = {name: "APPEND"}; })(); var l69 = {name: "REVAPPEND"}; (function(){ - (l69).fvalue = (function(v95){ - ((v95)["fname"] = "REVAPPEND"); - return v95; + (l69).fvalue = (function(v97){ + ((v97)["fname"] = "REVAPPEND"); + return v97; })((function (values,v93,v94){ checkArgs(arguments, 3); return (function(){ (function(){ return (function(){ while(v93 !== l5.value){ - (v94 = ({car: (function(){ - var tmp = v93; - return tmp === l5.value? l5.value: tmp.car; - })(), cdr: v94})); + (function(){ + var v95 = (function(){ + var tmp = v93; + return tmp === l5.value? l5.value: tmp.car; + })(); + var v96 = ({car: v95, cdr: v94}); + return (v94 = v96); + })(); (v93 = (function(){ var tmp = v93; return tmp === l5.value? l5.value: tmp.cdr; @@ -909,13 +913,13 @@ var l69 = {name: "REVAPPEND"}; })(); var l70 = {name: "REVERSE"}; (function(){ - (l70).fvalue = (function(v97){ - ((v97)["fname"] = "REVERSE"); - return v97; - })((function (values,v96){ + (l70).fvalue = (function(v99){ + ((v99)["fname"] = "REVERSE"); + return v99; + })((function (values,v98){ checkArgs(arguments, 2); return (function(){ - return l69.fvalue(values, v96, l5); + return l69.fvalue(values, v98, l5); })(); })); return l70; @@ -928,29 +932,29 @@ var l73 = {name: "DO*"}; l73; var l74 = {name: "LIST-LENGTH"}; (function(){ - (l74).fvalue = (function(v100){ - ((v100)["fname"] = "LIST-LENGTH"); - return v100; - })((function (values,v98){ + (l74).fvalue = (function(v102){ + ((v102)["fname"] = "LIST-LENGTH"); + return v102; + })((function (values,v100){ checkArgs(arguments, 2); return (function(){ - return (function(v99){ + return (function(v101){ (function(){ return (function(){ - while(l29.fvalue(pv, l13.fvalue(pv, v98)) !== l5.value){ - (v99 = (function(){ - var x1 = v99; + while(l29.fvalue(pv, l13.fvalue(pv, v100)) !== l5.value){ + (v101 = (function(){ + var x1 = v101; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })()); - (v98 = (function(){ - var tmp = v98; + (v100 = (function(){ + var tmp = v100; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; })(); })(); - return v99; + return v101; })(0); })(); })); @@ -958,39 +962,39 @@ var l74 = {name: "LIST-LENGTH"}; })(); var l75 = {name: "LENGTH"}; (function(){ - (l75).fvalue = (function(v102){ - ((v102)["fname"] = "LENGTH"); - return v102; - })((function (values,v101){ + (l75).fvalue = (function(v104){ + ((v104)["fname"] = "LENGTH"); + return v104; + })((function (values,v103){ checkArgs(arguments, 2); return (function(){ - return (((typeof(v101) == "string")?l4.value: l5.value) !== l5.value ? (function(){ - var x = v101; + return (((typeof(v103) == "string")?l4.value: l5.value) !== l5.value ? (function(){ + var x = v103; if (typeof x != 'string') throw 'The value ' + x + ' is not a type string.'; return x.length; })() : (((function(){ - var x = v101; + var x = v103; return typeof x === 'object' && 'length' in x; })()?l4.value: l5.value) !== l5.value ? (function(){ - var tmp = (v101)["length"]; + var tmp = (v103)["length"]; return tmp == undefined? l5.value: tmp ; - })() : (l62.fvalue(pv, v101) !== l5.value ? l74.fvalue(values, v101) : l5.value))); + })() : (l62.fvalue(pv, v103) !== l5.value ? l74.fvalue(values, v103) : l5.value))); })(); })); return l75; })(); var l76 = {name: "CONCAT-TWO"}; (function(){ - (l76).fvalue = (function(v105){ - ((v105)["fname"] = "CONCAT-TWO"); - return v105; - })((function (values,v103,v104){ + (l76).fvalue = (function(v107){ + ((v107)["fname"] = "CONCAT-TWO"); + return v107; + })((function (values,v105,v106){ checkArgs(arguments, 3); return (function(){ return (function(){ - var string1 = v103; - var string2 = v104; + var string1 = v105; + var string2 = v106; if (typeof string1 != 'string') throw 'The value ' + string1 + ' is not a type string.'; if (typeof string2 != 'string') @@ -1006,49 +1010,49 @@ l77; var l78 = {name: "MAP1"}; var l79 = {name: "SENTINEL"}; (function(){ - (l78).fvalue = (function(v112){ - ((v112)["fname"] = "MAP1"); - return v112; - })((function (values,v106,v107){ + (l78).fvalue = (function(v114){ + ((v114)["fname"] = "MAP1"); + return v114; + })((function (values,v108,v109){ checkArgs(arguments, 3); return (function(){ return (function(){ - var v108 = ({car: l79, cdr: l5.value}); - var v109 = v108; - (function(v111){ + var v110 = ({car: l79, cdr: l5.value}); + var v111 = v110; + (function(v113){ return (function(){ return (function(){ - while(v107 !== l5.value){ - v111(pv, (function(){ - var f = v106; + while(v109 !== l5.value){ + v113(pv, (function(){ + var f = v108; return (typeof f === 'function'? f: f.fvalue)(pv, (function(){ - var tmp = v107; + var tmp = v109; return tmp === l5.value? l5.value: tmp.car; })()) })()); - (v107 = (function(){ - var tmp = v107; + (v109 = (function(){ + var tmp = v109; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; })(); })(); - })((function (values,v110){ + })((function (values,v112){ checkArgs(arguments, 2); (function(){ - var x = v109; + var x = v111; if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.cdr = ({car: v110, cdr: l5.value}), x); + return (x.cdr = ({car: v112, cdr: l5.value}), x); })(); - (v109 = (function(){ - var tmp = v109; + (v111 = (function(){ + var tmp = v111; return tmp === l5.value? l5.value: tmp.cdr; })()); - return v110; + return v112; })); return (function(){ - var tmp = v108; + var tmp = v110; return tmp === l5.value? l5.value: tmp.cdr; })(); })(); @@ -1060,55 +1064,55 @@ var l80 = {name: "LOOP"}; l80; var l81 = {name: "MAPCAR"}; (function(){ - (l81).fvalue = (function(v124){ - ((v124)["fname"] = "MAPCAR"); - return v124; - })((function (values,v114,v115){ + (l81).fvalue = (function(v126){ + ((v126)["fname"] = "MAPCAR"); + return v126; + })((function (values,v116,v117){ checkArgsAtLeast(arguments, 3); - var v113= l5.value; + var v115= l5.value; for (var i = arguments.length-1; i>=3; i--) - v113 = {car: arguments[i], cdr: - v113}; + v115 = {car: arguments[i], cdr: + v115}; return (function(){ - return (function(v116){ + return (function(v118){ return (function(){ - var v117 = ({car: l79, cdr: l5.value}); - var v118 = v117; - (function(v120){ + var v119 = ({car: l79, cdr: l5.value}); + var v120 = v119; + (function(v122){ return (function(){ try { return (function(){ return (function(){ while(l4.value !== l5.value){ - (function(v121){ + (function(v123){ (function(){ - return (function(v122){ + return (function(v124){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l13.fvalue(pv, v122) !== l5.value ? (function(){ + (l13.fvalue(pv, v124) !== l5.value ? (function(){ throw ({type: 'block', id: 54, values: l5.value, message: 'Return from unknown block NIL.'}) })() : l5.value); (function(){ (l13.fvalue(pv, (function(){ - var tmp = v122; + var tmp = v124; return tmp === l5.value? l5.value: tmp.car; })()) !== l5.value ? (function(){ throw ({type: 'block', id: 51, values: l5.value, message: 'Return from unknown block LOOP.'}) })() : l5.value); (function(){ - var x = v122; + var x = v124; if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.car = l36.fvalue(pv, v122), x); + return (x.car = l36.fvalue(pv, v124), x); })(); return l5.value; })(); - (function(v123){ - return (v122 = v123); + (function(v125){ + return (v124 = v125); })((function(){ - var tmp = v122; + var tmp = v124; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; @@ -1121,12 +1125,12 @@ var l81 = {name: "MAPCAR"}; throw cf; } })(); - })(v116); + })(v118); })(); - return v120(pv, (function(){ - var f = v114; + return v122(pv, (function(){ + var f = v116; var args = [pv]; - var tail = (v121); + var tail = (v123); while (tail != l5.value){ args.push(tail.car); tail = tail.cdr; @@ -1138,7 +1142,7 @@ var l81 = {name: "MAPCAR"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v116)); + })(), v118)); }return l5.value; })(); })(); @@ -1150,57 +1154,57 @@ var l81 = {name: "MAPCAR"}; throw cf; } })(); - })((function (values,v119){ + })((function (values,v121){ checkArgs(arguments, 2); (function(){ - var x = v118; + var x = v120; if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.cdr = ({car: v119, cdr: l5.value}), x); + return (x.cdr = ({car: v121, cdr: l5.value}), x); })(); - (v118 = (function(){ - var tmp = v118; + (v120 = (function(){ + var tmp = v120; return tmp === l5.value? l5.value: tmp.cdr; })()); - return v119; + return v121; })); return (function(){ - var tmp = v117; + var tmp = v119; return tmp === l5.value? l5.value: tmp.cdr; })(); })(); - })(({car: v115, cdr: v113})); + })(({car: v117, cdr: v115})); })(); })); return l81; })(); var l82 = {name: "IDENTITY"}; (function(){ - (l82).fvalue = (function(v126){ - ((v126)["fname"] = "IDENTITY"); - return v126; - })((function (values,v125){ + (l82).fvalue = (function(v128){ + ((v128)["fname"] = "IDENTITY"); + return v128; + })((function (values,v127){ checkArgs(arguments, 2); return (function(){ - return v125; + return v127; })(); })); return l82; })(); var l83 = {name: "CONSTANTLY"}; (function(){ - (l83).fvalue = (function(v129){ - ((v129)["fname"] = "CONSTANTLY"); - return v129; - })((function (values,v127){ + (l83).fvalue = (function(v131){ + ((v131)["fname"] = "CONSTANTLY"); + return v131; + })((function (values,v129){ checkArgs(arguments, 2); return (function(){ return (function (values){ - var v128= l5.value; + var v130= l5.value; for (var i = arguments.length-1; i>=1; i--) - v128 = {car: arguments[i], cdr: - v128}; - return v127; + v130 = {car: arguments[i], cdr: + v130}; + return v129; }); })(); })); @@ -1208,10 +1212,10 @@ var l83 = {name: "CONSTANTLY"}; })(); var l84 = {name: "COPY-LIST"}; (function(){ - (l84).fvalue = (function(v131){ - ((v131)["fname"] = "COPY-LIST"); - return v131; - })((function (values,v130){ + (l84).fvalue = (function(v133){ + ((v133)["fname"] = "COPY-LIST"); + return v133; + })((function (values,v132){ checkArgs(arguments, 2); return (function(){ return l81.fvalue(values, (function(){ @@ -1219,49 +1223,49 @@ var l84 = {name: "COPY-LIST"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v130); + })(), v132); })(); })); return l84; })(); var l85 = {name: "LIST*"}; (function(){ - (l85).fvalue = (function(v136){ - ((v136)["fname"] = "LIST*"); - return v136; - })((function (values,v133){ + (l85).fvalue = (function(v138){ + ((v138)["fname"] = "LIST*"); + return v138; + })((function (values,v135){ checkArgsAtLeast(arguments, 2); - var v132= l5.value; + var v134= l5.value; for (var i = arguments.length-1; i>=2; i--) - v132 = {car: arguments[i], cdr: - v132}; + v134 = {car: arguments[i], cdr: + v134}; return (function(){ - return (l13.fvalue(pv, v132) !== l5.value ? v133 : (l13.fvalue(pv, (function(){ - var tmp = v132; + return (l13.fvalue(pv, v134) !== l5.value ? v135 : (l13.fvalue(pv, (function(){ + var tmp = v134; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? ({car: v133, cdr: (function(){ - var tmp = v132; + })()) !== l5.value ? ({car: v135, cdr: (function(){ + var tmp = v134; return tmp === l5.value? l5.value: tmp.car; })()}) : (function(){ (function(){ - return (function(v134){ + return (function(v136){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l13.fvalue(pv, l37.fvalue(pv, v134)) !== l5.value ? (function(){ + (l13.fvalue(pv, l37.fvalue(pv, v136)) !== l5.value ? (function(){ throw ({type: 'block', id: 60, values: (function(){ - var x = v134; + var x = v136; if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.cdr = l35.fvalue(pv, v134), x); + return (x.cdr = l35.fvalue(pv, v136), x); })(), message: 'Return from unknown block NIL.'}) })() : l5.value); l5.value; - (function(v135){ - return (v134 = v135); + (function(v137){ + return (v136 = v137); })((function(){ - var tmp = v134; + var tmp = v136; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; @@ -1274,9 +1278,9 @@ var l85 = {name: "LIST*"}; throw cf; } })(); - })(v132); + })(v134); })(); - return ({car: v133, cdr: v132}); + return ({car: v135, cdr: v134}); })())); })(); })); @@ -1284,42 +1288,42 @@ var l85 = {name: "LIST*"}; })(); var l86 = {name: "CODE-CHAR"}; (function(){ - (l86).fvalue = (function(v138){ - ((v138)["fname"] = "CODE-CHAR"); - return v138; - })((function (values,v137){ + (l86).fvalue = (function(v140){ + ((v140)["fname"] = "CODE-CHAR"); + return v140; + })((function (values,v139){ checkArgs(arguments, 2); return (function(){ - return v137; + return v139; })(); })); return l86; })(); var l87 = {name: "CHAR-CODE"}; (function(){ - (l87).fvalue = (function(v140){ - ((v140)["fname"] = "CHAR-CODE"); - return v140; - })((function (values,v139){ + (l87).fvalue = (function(v142){ + ((v142)["fname"] = "CHAR-CODE"); + return v142; + })((function (values,v141){ checkArgs(arguments, 2); return (function(){ - return v139; + return v141; })(); })); return l87; })(); var l88 = {name: "CHAR="}; (function(){ - (l88).fvalue = (function(v143){ - ((v143)["fname"] = "CHAR="); - return v143; - })((function (values,v141,v142){ + (l88).fvalue = (function(v145){ + ((v145)["fname"] = "CHAR="); + return v145; + })((function (values,v143,v144){ checkArgs(arguments, 3); return (function(){ return (function(){ - var x1 = v141; + var x1 = v143; if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v142; + var x2 = v144; if (typeof x2 !== 'number') throw 'Not a number!'; return (x1==x2?l4.value: l5.value); })(); @@ -1329,21 +1333,21 @@ var l88 = {name: "CHAR="}; })(); var l89 = {name: "INTEGERP"}; (function(){ - (l89).fvalue = (function(v145){ - ((v145)["fname"] = "INTEGERP"); - return v145; - })((function (values,v144){ + (l89).fvalue = (function(v147){ + ((v147)["fname"] = "INTEGERP"); + return v147; + })((function (values,v146){ checkArgs(arguments, 2); return (function(){ - return (((typeof (v144) == "number")?l4.value: l5.value) !== l5.value ? (function(){ + return (((typeof (v146) == "number")?l4.value: l5.value) !== l5.value ? (function(){ var x1 = (function(){ - var x = v144; + var x = v146; if (typeof x != 'number') throw 'The value ' + x + ' is not a type number.'; return Math.floor(x); })(); if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v144; + var x2 = v146; if (typeof x2 !== 'number') throw 'Not a number!'; return (x1==x2?l4.value: l5.value); })() : l5.value); @@ -1353,14 +1357,14 @@ var l89 = {name: "INTEGERP"}; })(); var l90 = {name: "PLUSP"}; (function(){ - (l90).fvalue = (function(v147){ - ((v147)["fname"] = "PLUSP"); - return v147; - })((function (values,v146){ + (l90).fvalue = (function(v149){ + ((v149)["fname"] = "PLUSP"); + return v149; + })((function (values,v148){ checkArgs(arguments, 2); return (function(){ return (function(){ - var x1 = v146; + var x1 = v148; if (typeof x1 !== 'number') throw 'Not a number!'; return (0=1; i--) - v232 = {car: arguments[i], cdr: - v232}; + v238 = {car: arguments[i], cdr: + v238}; return (function(){ - return (function(v234){ + return (function(v240){ return (function(){ - return (function(v235){ + return (function(v241){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l13.fvalue(pv, v235) !== l5.value ? (function(){ + (l13.fvalue(pv, v241) !== l5.value ? (function(){ var values = mv; throw ({type: 'block', id: 98, values: l5.value, message: 'Return from unknown block NIL.'}) })() : l5.value); (function(){ - (function(v236){ - return (function(v237){ + (function(v242){ + return (function(v243){ return (((function(){ - var tmp = v237; + var tmp = v243; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(){ - var v238 = v236; - var v239 = v238; + var v244 = v242; + var v245 = v244; (function(){ - return (function(v240){ + return (function(v246){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l14.fvalue(pv, v240) !== l5.value ? (function(){ + (l14.fvalue(pv, v246) !== l5.value ? (function(){ throw ({type: 'block', id: 100, values: l5.value, message: 'Return from unknown block NIL.'}) })() : l5.value); (function(){ - (function(v241){ - return (function(v242){ + (function(v247){ + return (function(v248){ return (((function(){ - var tmp = v242; + var tmp = v248; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(){ (function(){ - var x = l94.fvalue(pv, v239); + var x = l94.fvalue(pv, v245); if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.cdr = v241, x); + return (x.cdr = v247, x); })(); return (function(){ return (function(){ - var func = (function (values,v244){ - var v244; + var func = (function (values,v250){ + var v250; switch(arguments.length-1){ case 0: - v244=l5.value; + v250=l5.value; default: break; } - var v243= l5.value; + var v249= l5.value; for (var i = arguments.length-1; i>=2; i--) - v243 = {car: arguments[i], cdr: - v243}; - return (v239 = v244); + v249 = {car: arguments[i], cdr: + v249}; + return (v245 = v250); }); var args = [pv]; return (function(){ var values = mv; var vs; - vs = v241; + vs = v247; if (typeof vs === 'object' && 'multiple-value' in vs) args = args.concat(vs); else @@ -2211,31 +2222,31 @@ var l127 = {name: "NCONC"}; })(); })(); })(); - })() : (l13.fvalue(pv, v242) !== l5.value ? (function(){ - var x = l94.fvalue(pv, v239); + })() : (l13.fvalue(pv, v248) !== l5.value ? (function(){ + var x = l94.fvalue(pv, v245); if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; return (x.cdr = l5.value, x); - })() : (l48.fvalue(pv, v242) !== l5.value ? ((function(){ - var tmp = v240; + })() : (l48.fvalue(pv, v248) !== l5.value ? ((function(){ + var tmp = v246; return tmp === l5.value? l5.value: tmp.cdr; - })() !== l5.value ? v234(pv, v241) : (function(){ - var x = l94.fvalue(pv, v239); + })() !== l5.value ? v240(pv, v247) : (function(){ + var x = l94.fvalue(pv, v245); if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.cdr = v241, x); + return (x.cdr = v247, x); })()) : l5.value))); - })(v241); + })(v247); })((function(){ - var tmp = v240; + var tmp = v246; return tmp === l5.value? l5.value: tmp.car; })()); return l5.value; })(); - (function(v245){ - return (v240 = v245); + (function(v251){ + return (v246 = v251); })((function(){ - var tmp = v240; + var tmp = v246; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; @@ -2249,32 +2260,32 @@ var l127 = {name: "NCONC"}; } })(); })((function(){ - var tmp = v235; + var tmp = v241; return tmp === l5.value? l5.value: tmp.cdr; })()); })(); return (function(){ var values = mv; - throw ({type: 'block', id: 98, values: v238, message: 'Return from unknown block NIL.'}) + throw ({type: 'block', id: 98, values: v244, message: 'Return from unknown block NIL.'}) })(); - })() : (l13.fvalue(pv, v237) !== l5.value ? l5.value : (l48.fvalue(pv, v237) !== l5.value ? ((function(){ - var tmp = v235; + })() : (l13.fvalue(pv, v243) !== l5.value ? l5.value : (l48.fvalue(pv, v243) !== l5.value ? ((function(){ + var tmp = v241; return tmp === l5.value? l5.value: tmp.cdr; - })() !== l5.value ? v234(pv, v236) : (function(){ + })() !== l5.value ? v240(pv, v242) : (function(){ var values = mv; - throw ({type: 'block', id: 98, values: v236, message: 'Return from unknown block NIL.'}) + throw ({type: 'block', id: 98, values: v242, message: 'Return from unknown block NIL.'}) })()) : l5.value))); - })(v236); + })(v242); })((function(){ - var tmp = v235; + var tmp = v241; return tmp === l5.value? l5.value: tmp.car; })()); return l5.value; })(); - (function(v246){ - return (v235 = v246); + (function(v252){ + return (v241 = v252); })((function(){ - var tmp = v235; + var tmp = v241; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; @@ -2287,9 +2298,9 @@ var l127 = {name: "NCONC"}; throw cf; } })(); - })(v232); + })(v238); })(); - })((function (values,v233){ + })((function (values,v239){ checkArgs(arguments, 2); return (function(){ throw "type-error in nconc"; @@ -2301,37 +2312,37 @@ var l127 = {name: "NCONC"}; })(); var l128 = {name: "NRECONC"}; (function(){ - (l128).fvalue = (function(v256){ - ((v256)["fname"] = "NRECONC"); - return v256; - })((function (values,v248,v249){ + (l128).fvalue = (function(v262){ + ((v262)["fname"] = "NRECONC"); + return v262; + })((function (values,v254,v255){ checkArgs(arguments, 3); return (function(){ return (function(){ - return (function(v250,v251,v252){ + return (function(v256,v257,v258){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l48.fvalue(pv, v251) !== l5.value ? (function(){ + (l48.fvalue(pv, v257) !== l5.value ? (function(){ var values = mv; - throw ({type: 'block', id: 103, values: v252, message: 'Return from unknown block NIL.'}) + throw ({type: 'block', id: 103, values: v258, message: 'Return from unknown block NIL.'}) })() : l5.value); (function(){ (function(){ - var x = v251; + var x = v257; if (typeof x != 'object') throw 'The value ' + x + ' is not a type object.'; - return (x.cdr = v252, x); + return (x.cdr = v258, x); })(); return l5.value; })(); - (function(v253,v254,v255){ - return (v250 = v253, v251 = v254, v252 = v255); - })((l14.fvalue(pv, v250) !== l5.value ? v250 : (function(){ - var tmp = v250; + (function(v259,v260,v261){ + return (v256 = v259, v257 = v260, v258 = v261); + })((l14.fvalue(pv, v256) !== l5.value ? v256 : (function(){ + var tmp = v256; return tmp === l5.value? l5.value: tmp.cdr; - })()),v250,v251); + })()),v256,v257); }return l5.value; })(); } @@ -2343,9 +2354,9 @@ var l128 = {name: "NRECONC"}; } })(); })((function(){ - var tmp = v248; + var tmp = v254; return tmp === l5.value? l5.value: tmp.cdr; - })(),v248,v249); + })(),v254,v255); })(); })(); })); @@ -2353,13 +2364,13 @@ var l128 = {name: "NRECONC"}; })(); var l129 = {name: "NOTANY"}; (function(){ - (l129).fvalue = (function(v259){ - ((v259)["fname"] = "NOTANY"); - return v259; - })((function (values,v257,v258){ + (l129).fvalue = (function(v265){ + ((v265)["fname"] = "NOTANY"); + return v265; + })((function (values,v263,v264){ checkArgs(arguments, 3); return (function(){ - return l29.fvalue(values, l104.fvalue(pv, v257, v258)); + return l29.fvalue(values, l104.fvalue(pv, v263, v264)); })(); })); return l129; @@ -2371,9 +2382,9 @@ var l130 = {name: "*PACKAGE-LIST*"}; })(); var l131 = {name: "LIST-ALL-PACKAGES"}; (function(){ - (l131).fvalue = (function(v260){ - ((v260)["fname"] = "LIST-ALL-PACKAGES"); - return v260; + (l131).fvalue = (function(v266){ + ((v266)["fname"] = "LIST-ALL-PACKAGES"); + return v266; })((function (values){ checkArgsAtMost(arguments, 1); return (function(){ @@ -2391,62 +2402,62 @@ var l132 = {name: "MAKE-PACKAGE"}; var l133 = {name: "USE", 'package': 'KEYWORD'}; var l134 = {name: "FIND-PACKAGE-OR-FAIL"}; (function(){ - (l132).fvalue = (function(v267){ - ((v267)["fname"] = "MAKE-PACKAGE"); - return v267; - })((function (values,v261){ + (l132).fvalue = (function(v273){ + ((v273)["fname"] = "MAKE-PACKAGE"); + return v273; + })((function (values,v267){ checkArgsAtLeast(arguments, 2); - var v262; + var v268; var i; for (i=2; i=3; i--) - v308 = {car: arguments[i], cdr: - v308}; - return (v310 !== l5.value ? values(v309, v310) : (function(v311){ + v314 = {car: arguments[i], cdr: + v314}; + return (v316 !== l5.value ? values(v315, v316) : (function(v317){ (function(){ - var tmp = (v311)[v305]; + var tmp = (v317)[v311]; return tmp == undefined? l5.value: tmp ; })(); - return (function(v312){ - ((v312)["package"] = v307); - (((v307 === (function(){ + return (function(v318){ + ((v318)["package"] = v313); + (((v313 === (function(){ var symbol = l143; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value) !== l5.value ? (function(){ - ((v312)["value"] = v312); - return l154.fvalue(pv, l47.fvalue(pv, v312), v307); + ((v318)["value"] = v318); + return l154.fvalue(pv, l47.fvalue(pv, v318), v313); })() : l5.value); - ((v311)[v305] = v312); - return values(v312, l5.value); + ((v317)[v311] = v318); + return values(v318, l5.value); })((function(){ - var name = v305; + var name = v311; if (typeof name != 'string') throw 'The value ' + name + ' is not a type string.'; return ({name: name}); })()); - })(l138.fvalue(pv, v307))); + })(l138.fvalue(pv, v313))); }); var args = [values]; return (function(){ var values = mv; var vs; - vs = l149.fvalue(values, v305, v307); + vs = l149.fvalue(values, v311, v313); if (typeof vs === 'object' && 'multiple-value' in vs) args = args.concat(vs); else @@ -2838,26 +2849,26 @@ var l154 = {name: "EXPORT"}; return func.apply(window, args); })(); })(); - })(l134.fvalue(pv, v306)); + })(l134.fvalue(pv, v312)); })(); })); return l153; })(); (function(){ - (l145).fvalue = (function(v315){ - ((v315)["fname"] = "SYMBOL-PACKAGE"); - return v315; - })((function (values,v314){ + (l145).fvalue = (function(v321){ + ((v321)["fname"] = "SYMBOL-PACKAGE"); + return v321; + })((function (values,v320){ checkArgs(arguments, 2); return (function(){ (((function(){ - var tmp = v314; + var tmp = v320; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){ throw "it is not a symbol"; })()); return (function(){ - var tmp = (v314)["package"]; + var tmp = (v320)["package"]; return tmp == undefined? l5.value: tmp ; })(); })(); @@ -2865,16 +2876,16 @@ var l154 = {name: "EXPORT"}; return l145; })(); (function(){ - (l154).fvalue = (function(v321){ - ((v321)["fname"] = "EXPORT"); - return v321; - })((function (values,v316,v317){ + (l154).fvalue = (function(v327){ + ((v327)["fname"] = "EXPORT"); + return v327; + })((function (values,v322,v323){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v317; + var v323; switch(arguments.length-1){ case 1: - v317=(function(){ + v323=(function(){ var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -2883,38 +2894,38 @@ var l154 = {name: "EXPORT"}; default: break; } return (function(){ - return (function(v318){ + return (function(v324){ return (function(){ - return (function(v319,v320){ + return (function(v325,v326){ (function(){ - while(v319 !== l5.value){ - (v320 = (function(){ - var tmp = v319; + while(v325 !== l5.value){ + (v326 = (function(){ + var tmp = v325; return tmp === l5.value? l5.value: tmp.car; })()); (function(){ - ((v318)[(v320).name] = v320); + ((v324)[(v326).name] = v326); return l5.value; })(); - (v319 = (function(){ - var tmp = v319; + (v325 = (function(){ + var tmp = v325; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; })(); return l4.value; - })(v316,l5.value); + })(v322,l5.value); })(); - })(l140.fvalue(pv, v317)); + })(l140.fvalue(pv, v323)); })(); })); return l154; })(); var l155 = {name: "GET-UNIVERSAL-TIME"}; (function(){ - (l155).fvalue = (function(v322){ - ((v322)["fname"] = "GET-UNIVERSAL-TIME"); - return v322; + (l155).fvalue = (function(v328){ + ((v328)["fname"] = "GET-UNIVERSAL-TIME"); + return v328; })((function (values){ checkArgsAtMost(arguments, 1); return (function(){ @@ -2934,21 +2945,21 @@ var l156 = {name: "*NEWLINE*"}; })(); var l157 = {name: "CONCAT"}; (function(){ - (l157).fvalue = (function(v324){ - ((v324)["fname"] = "CONCAT"); - return v324; + (l157).fvalue = (function(v330){ + ((v330)["fname"] = "CONCAT"); + return v330; })((function (values){ - var v323= l5.value; + var v329= l5.value; for (var i = arguments.length-1; i>=1; i--) - v323 = {car: arguments[i], cdr: - v323}; + v329 = {car: arguments[i], cdr: + v329}; return (function(){ return l63.fvalue(values, (function(){ var symbol = l76; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v323, l64.value, ""); + })(), v329, l64.value, ""); })(); })); return l157; @@ -2957,164 +2968,164 @@ var l158 = {name: "CONCATF"}; l158; var l159 = {name: "JOIN"}; (function(){ - (l159).fvalue = (function(v327){ - ((v327)["fname"] = "JOIN"); - return v327; - })((function (values,v325,v326){ + (l159).fvalue = (function(v333){ + ((v333)["fname"] = "JOIN"); + return v333; + })((function (values,v331,v332){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v326; + var v332; switch(arguments.length-1){ case 1: - v326=""; + v332=""; default: break; } return (function(){ - return (l13.fvalue(pv, v325) !== l5.value ? "" : (l13.fvalue(pv, (function(){ - var tmp = v325; + return (l13.fvalue(pv, v331) !== l5.value ? "" : (l13.fvalue(pv, (function(){ + var tmp = v331; return tmp === l5.value? l5.value: tmp.cdr; })()) !== l5.value ? (function(){ - var tmp = v325; + var tmp = v331; return tmp === l5.value? l5.value: tmp.car; })() : l157.fvalue(values, (function(){ - var tmp = v325; + var tmp = v331; return tmp === l5.value? l5.value: tmp.car; - })(), v326, l159.fvalue(pv, (function(){ - var tmp = v325; + })(), v332, l159.fvalue(pv, (function(){ + var tmp = v331; return tmp === l5.value? l5.value: tmp.cdr; - })(), v326)))); + })(), v332)))); })(); })); return l159; })(); var l160 = {name: "JOIN-TRAILING"}; (function(){ - (l160).fvalue = (function(v330){ - ((v330)["fname"] = "JOIN-TRAILING"); - return v330; - })((function (values,v328,v329){ + (l160).fvalue = (function(v336){ + ((v336)["fname"] = "JOIN-TRAILING"); + return v336; + })((function (values,v334,v335){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v329; + var v335; switch(arguments.length-1){ case 1: - v329=""; + v335=""; default: break; } return (function(){ - return (l13.fvalue(pv, v328) !== l5.value ? "" : l157.fvalue(values, (function(){ - var tmp = v328; + return (l13.fvalue(pv, v334) !== l5.value ? "" : l157.fvalue(values, (function(){ + var tmp = v334; return tmp === l5.value? l5.value: tmp.car; - })(), v329, l160.fvalue(pv, (function(){ - var tmp = v328; + })(), v335, l160.fvalue(pv, (function(){ + var tmp = v334; return tmp === l5.value? l5.value: tmp.cdr; - })(), v329))); + })(), v335))); })(); })); return l160; })(); var l161 = {name: "MAPCONCAT"}; (function(){ - (l161).fvalue = (function(v333){ - ((v333)["fname"] = "MAPCONCAT"); - return v333; - })((function (values,v331,v332){ + (l161).fvalue = (function(v339){ + ((v339)["fname"] = "MAPCONCAT"); + return v339; + })((function (values,v337,v338){ checkArgs(arguments, 3); return (function(){ - return l159.fvalue(values, l81.fvalue(pv, v331, v332)); + return l159.fvalue(values, l81.fvalue(pv, v337, v338)); })(); })); return l161; })(); var l162 = {name: "VECTOR-TO-LIST"}; (function(){ - (l162).fvalue = (function(v341){ - ((v341)["fname"] = "VECTOR-TO-LIST"); - return v341; - })((function (values,v334){ + (l162).fvalue = (function(v347){ + ((v347)["fname"] = "VECTOR-TO-LIST"); + return v347; + })((function (values,v340){ checkArgs(arguments, 2); return (function(){ - return (function(v335,v336){ + return (function(v341,v342){ return (function(){ - return (function(v337,v338){ + return (function(v343,v344){ (function(){ while((function(){ - var x1 = v337; + var x1 = v343; if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v338; + var x2 = v344; if (typeof x2 !== 'number') throw 'Not a number!'; return (x1= x.length) throw 'Out of range'; - return x[i] = v346; + return x[i] = v352; })(); - (v344 = (function(){ - var x1 = v344; + (v350 = (function(){ + var x1 = v350; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })()); return l5.value; })(); - (v345 = (function(){ - var tmp = v345; + (v351 = (function(){ + var tmp = v351; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; })(); - return v343; - })(v342,l5.value); + return v349; + })(v348,l5.value); })(); })((function(){ var r = []; - for (var i = 0; i < l75.fvalue(pv, v342); i++) + for (var i = 0; i < l75.fvalue(pv, v348); i++) r.push(l5.value); return r; })(),0); @@ -3124,51 +3135,51 @@ var l163 = {name: "LIST-TO-VECTOR"}; })(); var l164 = {name: "VALUES-LIST"}; (function(){ - (l164).fvalue = (function(v349){ - ((v349)["fname"] = "VALUES-LIST"); - return v349; - })((function (values,v348){ + (l164).fvalue = (function(v355){ + ((v355)["fname"] = "VALUES-LIST"); + return v355; + })((function (values,v354){ checkArgs(arguments, 2); return (function(){ - return values.apply(this, l163.fvalue(pv, v348)); + return values.apply(this, l163.fvalue(pv, v354)); })(); })); return l164; })(); var l165 = {name: "VALUES"}; (function(){ - (l165).fvalue = (function(v351){ - ((v351)["fname"] = "VALUES"); - return v351; + (l165).fvalue = (function(v357){ + ((v357)["fname"] = "VALUES"); + return v357; })((function (values){ - var v350= l5.value; + var v356= l5.value; for (var i = arguments.length-1; i>=1; i--) - v350 = {car: arguments[i], cdr: - v350}; + v356 = {car: arguments[i], cdr: + v356}; return (function(){ - return l164.fvalue(values, v350); + return l164.fvalue(values, v356); })(); })); return l165; })(); (function(){ - (l19).fvalue = (function(v357){ - ((v357)["fname"] = "INTEGER-TO-STRING"); - return v357; - })((function (values,v352){ + (l19).fvalue = (function(v363){ + ((v363)["fname"] = "INTEGER-TO-STRING"); + return v363; + })((function (values,v358){ checkArgs(arguments, 2); return (function(){ - return (l26.fvalue(pv, v352) !== l5.value ? "0" : (l91.fvalue(pv, v352) !== l5.value ? l157.fvalue(values, "-", l19.fvalue(pv, (function(){ - var x1 = v352; + return (l26.fvalue(pv, v358) !== l5.value ? "0" : (l91.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "-", l19.fvalue(pv, (function(){ + var x1 = v358; if (typeof x1 !== 'number') throw 'Not a number!'; return 0-x1; - })())) : (function(v353){ + })())) : (function(v359){ (function(){ return (function(){ - while(l29.fvalue(pv, l26.fvalue(pv, v352)) !== l5.value){ + while(l29.fvalue(pv, l26.fvalue(pv, v358)) !== l5.value){ (function(){ - var v354 = (function(){ - var x = v352; + var v360 = (function(){ + var x = v358; var y = 10; if (typeof x != 'number') throw 'The value ' + x + ' is not a type number.'; @@ -3176,17 +3187,17 @@ var l165 = {name: "VALUES"}; throw 'The value ' + y + ' is not a type number.'; return x%y; })(); - var v355 = ({car: v354, cdr: v353}); - return (v353 = v355); + var v361 = ({car: v360, cdr: v359}); + return (v359 = v361); })(); - (v352 = l27.fvalue(pv, v352, 10)); + (v358 = l27.fvalue(pv, v358, 10)); }return l5.value; })(); })(); - return l161.fvalue(values, (function (values,v356){ + return l161.fvalue(values, (function (values,v362){ checkArgs(arguments, 2); - return l107.fvalue(values, l101.fvalue(pv, v356)); - }), v353); + return l107.fvalue(values, l101.fvalue(pv, v362)); + }), v359); })(l5.value))); })(); })); @@ -3195,39 +3206,39 @@ var l165 = {name: "VALUES"}; var l166 = {name: "PRIN1-TO-STRING"}; var l167 = {name: "ESCAPE-STRING"}; (function(){ - (l166).fvalue = (function(v366){ - ((v366)["fname"] = "PRIN1-TO-STRING"); - return v366; - })((function (values,v358){ + (l166).fvalue = (function(v372){ + ((v372)["fname"] = "PRIN1-TO-STRING"); + return v372; + })((function (values,v364){ checkArgs(arguments, 2); return (function(){ return (((function(){ - var tmp = v358; + var tmp = v364; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(){ - var func = (function (values,v360,v361){ - var v360; - var v361; + var func = (function (values,v366,v367){ + var v366; + var v367; switch(arguments.length-1){ case 0: - v360=l5.value; + v366=l5.value; case 1: - v361=l5.value; + v367=l5.value; default: break; } - var v359= l5.value; + var v365= l5.value; for (var i = arguments.length-1; i>=3; i--) - v359 = {car: arguments[i], cdr: - v359}; - return ((v361 !== l5.value ? ((v360 === v358)?l4.value: l5.value) : l5.value) !== l5.value ? (v358).name : (function(v362,v363){ - return l157.fvalue(values, (l13.fvalue(pv, v362) !== l5.value ? "#" : (((v362 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l137.fvalue(pv, v362))), ":", v363); - })(l145.fvalue(pv, v358),(v358).name)); + v365 = {car: arguments[i], cdr: + v365}; + return ((v367 !== l5.value ? ((v366 === v364)?l4.value: l5.value) : l5.value) !== l5.value ? (v364).name : (function(v368,v369){ + return l157.fvalue(values, (l13.fvalue(pv, v368) !== l5.value ? "#" : (((v368 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l137.fvalue(pv, v368))), ":", v369); + })(l145.fvalue(pv, v364),(v364).name)); }); var args = [values]; return (function(){ var values = mv; var vs; - vs = l149.fvalue(values, (v358).name, (function(){ + vs = l149.fvalue(values, (v364).name, (function(){ var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -3239,47 +3250,47 @@ var l167 = {name: "ESCAPE-STRING"}; args.push(vs); return func.apply(window, args); })(); - })() : (l89.fvalue(pv, v358) !== l5.value ? l19.fvalue(values, v358) : (((typeof(v358) == "string")?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "\"", l167.fvalue(pv, v358), "\"") : (((typeof v358 == 'function')?l4.value: l5.value) !== l5.value ? (function(v364){ - return (v364 !== l5.value ? l157.fvalue(values, "#") : l157.fvalue(values, "#")); + })() : (l89.fvalue(pv, v364) !== l5.value ? l19.fvalue(values, v364) : (((typeof(v364) == "string")?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "\"", l167.fvalue(pv, v364), "\"") : (((typeof v364 == 'function')?l4.value: l5.value) !== l5.value ? (function(v370){ + return (v370 !== l5.value ? l157.fvalue(values, "#") : l157.fvalue(values, "#")); })((function(){ - var tmp = (v358)["fname"]; + var tmp = (v364)["fname"]; return tmp == undefined? l5.value: tmp ; - })()) : (l62.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "(", l160.fvalue(pv, l81.fvalue(pv, (function(){ + })()) : (l62.fvalue(pv, v364) !== l5.value ? l157.fvalue(values, "(", l160.fvalue(pv, l81.fvalue(pv, (function(){ var symbol = l166; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l95.fvalue(pv, v358)), " "), (function(v365){ + })(), l95.fvalue(pv, v364)), " "), (function(v371){ return (l13.fvalue(pv, (function(){ - var tmp = v365; + var tmp = v371; return tmp === l5.value? l5.value: tmp.cdr; })()) !== l5.value ? l166.fvalue(pv, (function(){ - var tmp = v365; + var tmp = v371; return tmp === l5.value? l5.value: tmp.car; })()) : l157.fvalue(pv, l166.fvalue(pv, (function(){ - var tmp = v365; + var tmp = v371; return tmp === l5.value? l5.value: tmp.car; })()), " . ", l166.fvalue(pv, (function(){ - var tmp = v365; + var tmp = v371; return tmp === l5.value? l5.value: tmp.cdr; })()))); - })(l94.fvalue(pv, v358)), ")") : (((function(){ - var x = v358; + })(l94.fvalue(pv, v364)), ")") : (((function(){ + var x = v364; return typeof x === 'object' && 'length' in x; - })()?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "#", l166.fvalue(pv, l162.fvalue(pv, v358))) : (l135.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "#") : l5.value))))))); + })()?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "#", (l26.fvalue(pv, l75.fvalue(pv, v364)) !== l5.value ? "()" : l166.fvalue(pv, l162.fvalue(pv, v364)))) : (l135.fvalue(pv, v364) !== l5.value ? l157.fvalue(values, "#") : l5.value))))))); })(); })); return l166; })(); (function(){ - (l111).fvalue = (function(v368){ - ((v368)["fname"] = "WRITE-LINE"); - return v368; - })((function (values,v367){ + (l111).fvalue = (function(v374){ + ((v374)["fname"] = "WRITE-LINE"); + return v374; + })((function (values,v373){ checkArgs(arguments, 2); return (function(){ (function(){ - var x = v367; + var x = v373; if (typeof x != 'string') throw 'The value ' + x + ' is not a type string.'; return lisp.write(x); @@ -3295,17 +3306,17 @@ var l167 = {name: "ESCAPE-STRING"}; throw 'The value ' + x + ' is not a type string.'; return lisp.write(x); })(); - return v367; + return v373; })(); })); return l111; })(); var l168 = {name: "WARN"}; (function(){ - (l168).fvalue = (function(v370){ - ((v370)["fname"] = "WARN"); - return v370; - })((function (values,v369){ + (l168).fvalue = (function(v376){ + ((v376)["fname"] = "WARN"); + return v376; + })((function (values,v375){ checkArgs(arguments, 2); return (function(){ (function(){ @@ -3314,65 +3325,65 @@ var l168 = {name: "WARN"}; throw 'The value ' + x + ' is not a type string.'; return lisp.write(x); })(); - return l111.fvalue(values, v369); + return l111.fvalue(values, v375); })(); })); return l168; })(); var l169 = {name: "PRINT"}; (function(){ - (l169).fvalue = (function(v372){ - ((v372)["fname"] = "PRINT"); - return v372; - })((function (values,v371){ + (l169).fvalue = (function(v378){ + ((v378)["fname"] = "PRINT"); + return v378; + })((function (values,v377){ checkArgs(arguments, 2); return (function(){ - l111.fvalue(pv, l166.fvalue(pv, v371)); - return v371; + l111.fvalue(pv, l166.fvalue(pv, v377)); + return v377; })(); })); return l169; })(); var l170 = {name: "MAKE-STRING-STREAM"}; (function(){ - (l170).fvalue = (function(v374){ - ((v374)["fname"] = "MAKE-STRING-STREAM"); - return v374; - })((function (values,v373){ + (l170).fvalue = (function(v380){ + ((v380)["fname"] = "MAKE-STRING-STREAM"); + return v380; + })((function (values,v379){ checkArgs(arguments, 2); return (function(){ - return ({car: v373, cdr: 0}); + return ({car: v379, cdr: 0}); })(); })); return l170; })(); var l171 = {name: "%PEEK-CHAR"}; (function(){ - (l171).fvalue = (function(v376){ - ((v376)["fname"] = "%PEEK-CHAR"); - return v376; - })((function (values,v375){ + (l171).fvalue = (function(v382){ + ((v382)["fname"] = "%PEEK-CHAR"); + return v382; + })((function (values,v381){ checkArgs(arguments, 2); return (function(){ return ((function(){ var x1 = (function(){ - var tmp = v375; + var tmp = v381; return tmp === l5.value? l5.value: tmp.cdr; })(); if (typeof x1 !== 'number') throw 'Not a number!'; var x2 = l75.fvalue(pv, (function(){ - var tmp = v375; + var tmp = v381; return tmp === l5.value? l5.value: tmp.car; })()); if (typeof x2 !== 'number') throw 'Not a number!'; return (x1=1; i--) - v443 = {car: arguments[i], cdr: - v443}; + v449 = {car: arguments[i], cdr: + v449}; return (function(){ - return l161.fvalue(values, (function (values,v444){ + return l161.fvalue(values, (function (values,v450){ checkArgs(arguments, 2); - return (l13.fvalue(pv, v444) !== l5.value ? "" : (l89.fvalue(pv, v444) !== l5.value ? l19.fvalue(values, v444) : (((typeof(v444) == "string")?l4.value: l5.value) !== l5.value ? v444 : (function(){ + return (l13.fvalue(pv, v450) !== l5.value ? "" : (l89.fvalue(pv, v450) !== l5.value ? l19.fvalue(values, v450) : (((typeof(v450) == "string")?l4.value: l5.value) !== l5.value ? v450 : (function(){ throw "Unknown argument."; })()))); - }), v443); + }), v449); })(); })); return l191; @@ -4019,13 +4030,13 @@ var l191 = {name: "CODE"}; var l192 = {name: "JS!BOOL"}; var l193 = {name: "LS-COMPILE"}; (function(){ - (l192).fvalue = (function(v447){ - ((v447)["fname"] = "JS!BOOL"); - return v447; - })((function (values,v446){ + (l192).fvalue = (function(v453){ + ((v453)["fname"] = "JS!BOOL"); + return v453; + })((function (values,v452){ checkArgs(arguments, 2); return (function(){ - return l191.fvalue(values, "(", v446, "?", l193.fvalue(pv, l4.value), ": ", l193.fvalue(pv, l5.value), ")"); + return l191.fvalue(values, "(", v452, "?", l193.fvalue(pv, l4.value), ": ", l193.fvalue(pv, l5.value), ")"); })(); })); return l192; @@ -4034,70 +4045,70 @@ var l194 = {name: "JS!SELFCALL"}; l194; var l195 = {name: "INDENT"}; (function(){ - (l195).fvalue = (function(v454){ - ((v454)["fname"] = "INDENT"); - return v454; + (l195).fvalue = (function(v460){ + ((v460)["fname"] = "INDENT"); + return v460; })((function (values){ - var v448= l5.value; + var v454= l5.value; for (var i = arguments.length-1; i>=1; i--) - v448 = {car: arguments[i], cdr: - v448}; + v454 = {car: arguments[i], cdr: + v454}; return (function(){ - return (function(v449){ - return (function(v450,v451,v452){ - (l90.fvalue(pv, l75.fvalue(pv, v449)) !== l5.value ? (v450 = l157.fvalue(pv, v450, " ")) : l5.value); + return (function(v455){ + return (function(v456,v457,v458){ + (l90.fvalue(pv, l75.fvalue(pv, v455)) !== l5.value ? (v456 = l157.fvalue(pv, v456, " ")) : l5.value); (function(){ return (function(){ while((function(){ - var x1 = v451; + var x1 = v457; if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v452; + var x2 = v458; if (typeof x2 !== 'number') throw 'Not a number!'; return (x1=2; i--) - v571 = {car: arguments[i], cdr: - v571}; + v577 = {car: arguments[i], cdr: + v577}; return (function(){ - return (v572 !== l5.value ? l191.fvalue(values, "(function(){", (function(){ + return (v578 !== l5.value ? l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var func = ", l159.fvalue(pv, v571), ";", (function(){ + })(), l195.fvalue(pv, "var func = ", l159.fvalue(pv, v577), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "func.docstring = '", v572, "';", (function(){ + })(), "func.docstring = '", v578, "';", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -4964,7 +4975,7 @@ var l247 = {name: "LAMBDA-DOCSTRING-WRAPPER"}; return func; })(); var args = [values]; - var tail = (v571); + var tail = (v577); while (tail != l5.value){ args.push(tail.car); tail = tail.cdr; @@ -4978,22 +4989,22 @@ var l247 = {name: "LAMBDA-DOCSTRING-WRAPPER"}; var l248 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"}; var l249 = {name: "N/A"}; (function(){ - (l248).fvalue = (function(v579){ - ((v579)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT"); - return v579; - })((function (values,v574,v575,v576){ + (l248).fvalue = (function(v585){ + ((v585)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT"); + return v585; + })((function (values,v580,v581,v582){ checkArgs(arguments, 4); return (function(){ - return (function(v577,v578){ + return (function(v583,v584){ return (function(){ try { (((function(){ - var x1 = v577; + var x1 = v583; if (typeof x1 !== 'number') throw 'Not a number!'; return (1=", (function(){ - var x1 = v594; + var x1 = v600; if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v595; + var x2 = v601; if (typeof x2 !== 'number') throw 'Not a number!'; return 1+x1+x2; })(), "; i--)", (function(){ @@ -5163,58 +5174,58 @@ var l251 = {name: "COMPILE-LAMBDA-REST"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, v597, " = {car: arguments[i], cdr: "), v597, "};", (function(){ + })(), l195.fvalue(pv, v603, " = {car: arguments[i], cdr: "), v603, "};", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l215.fvalue(pv, v596)) : l5.value); - })(l75.fvalue(pv, l240.fvalue(pv, v593)),l75.fvalue(pv, l242.fvalue(pv, v593)),l243.fvalue(pv, v593)); + })(l215.fvalue(pv, v602)) : l5.value); + })(l75.fvalue(pv, l240.fvalue(pv, v599)),l75.fvalue(pv, l242.fvalue(pv, v599)),l243.fvalue(pv, v599)); })(); })); return l251; })(); var l252 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"}; (function(){ - (l252).fvalue = (function(v609){ - ((v609)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS"); - return v609; - })((function (values,v599){ + (l252).fvalue = (function(v615){ + ((v615)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS"); + return v615; + })((function (values,v605){ checkArgs(arguments, 2); return (function(){ - return (function(v600,v601,v602){ - return l191.fvalue(values, l161.fvalue(pv, (function (values,v603){ + return (function(v606,v607,v608){ + return l191.fvalue(values, l161.fvalue(pv, (function (values,v609){ checkArgs(arguments, 2); - return (function(v604){ - return l191.fvalue(values, "var ", l215.fvalue(pv, v604), "; ", (function(){ + return (function(v610){ + return l191.fvalue(values, "var ", l215.fvalue(pv, v610), "; ", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), (l44.fvalue(pv, v603) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v603)), " = ", l193.fvalue(pv, l5.value), ";", (function(){ + })(), (l44.fvalue(pv, v609) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v609)), " = ", l193.fvalue(pv, l5.value), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : l5.value)); })(l43.fvalue(pv, (function(){ - var tmp = v603; + var tmp = v609; return tmp === l5.value? l5.value: tmp.car; })())); - }), v602), (function(v607){ - return (v602 !== l5.value ? l191.fvalue(pv, "var i;", (function(){ + }), v608), (function(v613){ + return (v608 !== l5.value ? l191.fvalue(pv, "var i;", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l161.fvalue(pv, v607, v602)) : l5.value); - })((function (values,v605){ + })(), l161.fvalue(pv, v613, v608)) : l5.value); + })((function (values,v611){ checkArgs(arguments, 2); return l191.fvalue(values, "for (i=", (function(){ - var x1 = v600; + var x1 = v606; if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v601; + var x2 = v607; if (typeof x2 !== 'number') throw 'Not a number!'; return 1+x1+x2; })(), "; i=1; i--) - v628 = {car: arguments[i], cdr: - v628}; + v634 = {car: arguments[i], cdr: + v634}; return (function(){ - return (function(v629){ + return (function(v635){ (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l13.fvalue(pv, v628) !== l5.value ? (function(){ + (l13.fvalue(pv, v634) !== l5.value ? (function(){ throw ({type: 'block', id: 215, values: l5.value, message: 'Return from unknown block NIL.'}) })() : (l13.fvalue(pv, (function(){ - var tmp = v628; + var tmp = v634; return tmp === l5.value? l5.value: tmp.cdr; })()) !== l5.value ? (function(){ throw "Odd paris in SETQ"; })() : (function(){ - (v629 = l157.fvalue(pv, v629, l157.fvalue(pv, l255.fvalue(pv, (function(){ - var tmp = v628; + (v635 = l157.fvalue(pv, v635, l157.fvalue(pv, l255.fvalue(pv, (function(){ + var tmp = v634; return tmp === l5.value? l5.value: tmp.car; - })(), l35.fvalue(pv, v628)), (l13.fvalue(pv, l37.fvalue(pv, v628)) !== l5.value ? "" : ", ")))); - return (v628 = l37.fvalue(pv, v628)); + })(), l35.fvalue(pv, v634)), (l13.fvalue(pv, l37.fvalue(pv, v634)) !== l5.value ? "" : ", ")))); + return (v634 = l37.fvalue(pv, v634)); })())); }return l5.value; })(); @@ -5434,95 +5445,95 @@ var l256 = {name: "SET"}; throw cf; } })(); - return l191.fvalue(values, "(", v629, ")"); + return l191.fvalue(values, "(", v635, ")"); })(""); })(); })); - var v630 = ({car: v627, cdr: (function(){ + var v636 = ({car: v633, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v630); + return ((l230).value = v636); })(); var l257 = {name: "JS-VREF"}; (function(){ - var v631 = l47.fvalue(pv, l257, (function (values,v632){ + var v637 = l47.fvalue(pv, l257, (function (values,v638){ checkArgs(arguments, 2); return (function(){ - return v632; + return v638; })(); })); - var v633 = ({car: v631, cdr: (function(){ + var v639 = ({car: v637, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v633); + return ((l230).value = v639); })(); var l258 = {name: "JS-VSET"}; (function(){ - var v634 = l47.fvalue(pv, l258, (function (values,v635,v636){ + var v640 = l47.fvalue(pv, l258, (function (values,v641,v642){ checkArgs(arguments, 3); return (function(){ - return l191.fvalue(values, "(", v635, " = ", l193.fvalue(pv, v636), ")"); + return l191.fvalue(values, "(", v641, " = ", l193.fvalue(pv, v642), ")"); })(); })); - var v637 = ({car: v634, cdr: (function(){ + var v643 = ({car: v640, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v637); + return ((l230).value = v643); })(); (function(){ - (l167).fvalue = (function(v644){ - ((v644)["fname"] = "ESCAPE-STRING"); - return v644; - })((function (values,v638){ + (l167).fvalue = (function(v650){ + ((v650)["fname"] = "ESCAPE-STRING"); + return v650; + })((function (values,v644){ checkArgs(arguments, 2); return (function(){ - return (function(v639,v640,v641){ + return (function(v645,v646,v647){ (function(){ return (function(){ while((function(){ - var x1 = v640; + var x1 = v646; if (typeof x1 !== 'number') throw 'Not a number!'; - var x2 = v641; + var x2 = v647; if (typeof x2 !== 'number') throw 'Not a number!'; return (x1=2; i--) - v667 = {car: arguments[i], cdr: - v667}; + v673 = {car: arguments[i], cdr: + v673}; return (function(){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "while(", l193.fvalue(pv, v668), " !== ", l193.fvalue(pv, l5.value), "){", (function(){ + })(), l195.fvalue(pv, "while(", l193.fvalue(pv, v674), " !== ", l193.fvalue(pv, l5.value), "){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l254.fvalue(pv, v667)), "}", "return ", l193.fvalue(pv, l5.value), ";", (function(){ + })(), l195.fvalue(pv, l254.fvalue(pv, v673)), "}", "return ", l193.fvalue(pv, l5.value), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -5684,28 +5695,28 @@ var l263 = {name: "%WHILE"}; })()), "})()"); })(); })); - var v669 = ({car: v666, cdr: (function(){ + var v675 = ({car: v672, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v669); + return ((l230).value = v675); })(); var l264 = {name: "SYMBOL-FUNCTION"}; (function(){ - var v670 = l47.fvalue(pv, l113, (function (values,v671){ + var v676 = l47.fvalue(pv, l113, (function (values,v677){ checkArgs(arguments, 2); return (function(){ - return ((l62.fvalue(pv, v671) !== l5.value ? (((function(){ - var tmp = v671; + return ((l62.fvalue(pv, v677) !== l5.value ? (((function(){ + var tmp = v677; return tmp === l5.value? l5.value: tmp.car; - })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l253.fvalue(values, l35.fvalue(pv, v671), l37.fvalue(pv, v671)) : (((function(){ - var tmp = v671; + })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l253.fvalue(values, l35.fvalue(pv, v677), l37.fvalue(pv, v677)) : (((function(){ + var tmp = v677; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (function(v672){ - return (v672 !== l5.value ? l200.fvalue(values, v672) : l193.fvalue(values, l47.fvalue(pv, l264, l47.fvalue(pv, l186, v671)))); - })(l211.fvalue(pv, v671, (function(){ + })()?l4.value: l5.value) !== l5.value ? (function(v678){ + return (v678 !== l5.value ? l200.fvalue(values, v678) : l193.fvalue(values, l47.fvalue(pv, l264, l47.fvalue(pv, l186, v677)))); + })(l211.fvalue(pv, v677, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -5713,40 +5724,40 @@ var l264 = {name: "SYMBOL-FUNCTION"}; })(), l113)) : l5.value)); })(); })); - var v673 = ({car: v670, cdr: (function(){ + var v679 = ({car: v676, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v673); + return ((l230).value = v679); })(); var l265 = {name: "MAKE-FUNCTION-BINDING"}; (function(){ - (l265).fvalue = (function(v675){ - ((v675)["fname"] = "MAKE-FUNCTION-BINDING"); - return v675; - })((function (values,v674){ + (l265).fvalue = (function(v681){ + ((v681)["fname"] = "MAKE-FUNCTION-BINDING"); + return v681; + })((function (values,v680){ checkArgs(arguments, 2); return (function(){ - return l197.fvalue(values, v674, l113, l214.fvalue(pv, v674)); + return l197.fvalue(values, v680, l113, l214.fvalue(pv, v680)); })(); })); return l265; })(); var l266 = {name: "COMPILE-FUNCTION-DEFINITION"}; (function(){ - (l266).fvalue = (function(v677){ - ((v677)["fname"] = "COMPILE-FUNCTION-DEFINITION"); - return v677; - })((function (values,v676){ + (l266).fvalue = (function(v683){ + ((v683)["fname"] = "COMPILE-FUNCTION-DEFINITION"); + return v683; + })((function (values,v682){ checkArgs(arguments, 2); return (function(){ return l253.fvalue(values, (function(){ - var tmp = v676; + var tmp = v682; return tmp === l5.value? l5.value: tmp.car; })(), (function(){ - var tmp = v676; + var tmp = v682; return tmp === l5.value? l5.value: tmp.cdr; })()); })(); @@ -5755,15 +5766,15 @@ var l266 = {name: "COMPILE-FUNCTION-DEFINITION"}; })(); var l267 = {name: "TRANSLATE-FUNCTION"}; (function(){ - (l267).fvalue = (function(v680){ - ((v680)["fname"] = "TRANSLATE-FUNCTION"); - return v680; - })((function (values,v678){ + (l267).fvalue = (function(v686){ + ((v686)["fname"] = "TRANSLATE-FUNCTION"); + return v686; + })((function (values,v684){ checkArgs(arguments, 2); return (function(){ - return (function(v679){ - return l200.fvalue(values, v679); - })(l211.fvalue(pv, v678, (function(){ + return (function(v685){ + return l200.fvalue(values, v685); + })(l211.fvalue(pv, v684, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -5775,40 +5786,40 @@ var l267 = {name: "TRANSLATE-FUNCTION"}; })(); var l268 = {name: "FLET"}; (function(){ - var v681 = l47.fvalue(pv, l268, (function (values,v683){ + var v687 = l47.fvalue(pv, l268, (function (values,v689){ checkArgsAtLeast(arguments, 2); - var v682= l5.value; + var v688= l5.value; for (var i = arguments.length-1; i>=2; i--) - v682 = {car: arguments[i], cdr: - v682}; + v688 = {car: arguments[i], cdr: + v688}; return (function(){ return (function(){ try { - var v688 = l212.value; - var v684 = l81.fvalue(pv, (function(){ + var v694 = l212.value; + var v690 = l81.fvalue(pv, (function(){ var symbol = l32; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v683); - var v685 = l81.fvalue(pv, (function(){ + })(), v689); + var v691 = l81.fvalue(pv, (function(){ var symbol = l33; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v683); - var v686 = l81.fvalue(pv, (function(){ + })(), v689); + var v692 = l81.fvalue(pv, (function(){ var symbol = l266; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v685); + })(), v691); ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){ var symbol = l265; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v684), (function(){ + })(), v690), (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -5819,53 +5830,53 @@ var l268 = {name: "FLET"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v684), ","), "){", (function(){ + })(), v690), ","), "){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), (function(v687){ - return l195.fvalue(pv, v687); - })(l254.fvalue(pv, v682, l4.value)), "})(", l159.fvalue(pv, v686, ","), ")"); + })(), (function(v693){ + return l195.fvalue(pv, v693); + })(l254.fvalue(pv, v688, l4.value)), "})(", l159.fvalue(pv, v692, ","), ")"); } finally { - l212.value = v688; + l212.value = v694; } })(); })(); })); - var v689 = ({car: v681, cdr: (function(){ + var v695 = ({car: v687, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v689); + return ((l230).value = v695); })(); var l269 = {name: "LABELS"}; (function(){ - var v690 = l47.fvalue(pv, l269, (function (values,v692){ + var v696 = l47.fvalue(pv, l269, (function (values,v698){ checkArgsAtLeast(arguments, 2); - var v691= l5.value; + var v697= l5.value; for (var i = arguments.length-1; i>=2; i--) - v691 = {car: arguments[i], cdr: - v691}; + v697 = {car: arguments[i], cdr: + v697}; return (function(){ return (function(){ try { - var v695 = l212.value; - var v693 = l81.fvalue(pv, (function(){ + var v701 = l212.value; + var v699 = l81.fvalue(pv, (function(){ var symbol = l32; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v692); + })(), v698); ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){ var symbol = l265; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v693), (function(){ + })(), v699), (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -5876,32 +5887,32 @@ var l269 = {name: "LABELS"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v694){ + })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v700){ checkArgs(arguments, 2); return l191.fvalue(values, "var ", l267.fvalue(pv, (function(){ - var tmp = v694; + var tmp = v700; return tmp === l5.value? l5.value: tmp.car; - })()), " = ", l253.fvalue(pv, l35.fvalue(pv, v694), l37.fvalue(pv, v694)), ";", (function(){ + })()), " = ", l253.fvalue(pv, l35.fvalue(pv, v700), l37.fvalue(pv, v700)), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - }), v692), l254.fvalue(pv, v691, l4.value)), "})()"); + }), v698), l254.fvalue(pv, v697, l4.value)), "})()"); } finally { - l212.value = v695; + l212.value = v701; } })(); })(); })); - var v696 = ({car: v690, cdr: (function(){ + var v702 = ({car: v696, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v696); + return ((l230).value = v702); })(); var l270 = {name: "*COMPILING-FILE*"}; (function(){ @@ -5911,11 +5922,11 @@ var l270 = {name: "*COMPILING-FILE*"}; var l271 = {name: "EVAL-WHEN-COMPILE"}; var l272 = {name: "EVAL"}; (function(){ - var v697 = l47.fvalue(pv, l271, (function (values){ - var v698= l5.value; + var v703 = l47.fvalue(pv, l271, (function (values){ + var v704= l5.value; for (var i = arguments.length-1; i>=1; i--) - v698 = {car: arguments[i], cdr: - v698}; + v704 = {car: arguments[i], cdr: + v704}; return (function(){ return ((function(){ var symbol = l270; @@ -5923,33 +5934,33 @@ var l272 = {name: "EVAL"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? (function(){ - l272.fvalue(pv, ({car: l123, cdr: v698})); + l272.fvalue(pv, ({car: l123, cdr: v704})); return l5.value; - })() : l193.fvalue(values, ({car: l123, cdr: v698}))); + })() : l193.fvalue(values, ({car: l123, cdr: v704}))); })(); })); - var v699 = ({car: v697, cdr: (function(){ + var v705 = ({car: v703, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v699); + return ((l230).value = v705); })(); var l273 = {name: "DEFINE-TRANSFORMATION"}; l273; (function(){ - var v700 = l47.fvalue(pv, l123, (function (values){ - var v701= l5.value; + var v706 = l47.fvalue(pv, l123, (function (values){ + var v707= l5.value; for (var i = arguments.length-1; i>=1; i--) - v701 = {car: arguments[i], cdr: - v701}; + v707 = {car: arguments[i], cdr: + v707}; return (function(){ return (l13.fvalue(pv, (function(){ - var tmp = v701; + var tmp = v707; return tmp === l5.value? l5.value: tmp.cdr; })()) !== l5.value ? l193.fvalue(values, (function(){ - var tmp = v701; + var tmp = v707; return tmp === l5.value? l5.value: tmp.car; })(), (function(){ var symbol = l196; @@ -5961,42 +5972,42 @@ l273; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l254.fvalue(pv, v701, l4.value)), "})()")); + })(), l195.fvalue(pv, l254.fvalue(pv, v707, l4.value)), "})()")); })(); })); - var v702 = ({car: v700, cdr: (function(){ + var v708 = ({car: v706, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v702); + return ((l230).value = v708); })(); var l274 = {name: "SPECIAL-VARIABLE-P"}; (function(){ - (l274).fvalue = (function(v704){ - ((v704)["fname"] = "SPECIAL-VARIABLE-P"); - return v704; - })((function (values,v703){ + (l274).fvalue = (function(v710){ + ((v710)["fname"] = "SPECIAL-VARIABLE-P"); + return v710; + })((function (values,v709){ checkArgs(arguments, 2); return (function(){ - return (l224.fvalue(pv, v703, l114, l226) !== l5.value ? l4.value : l5.value); + return (l224.fvalue(pv, v709, l114, l226) !== l5.value ? l4.value : l5.value); })(); })); return l274; })(); var l275 = {name: "LET-BINDING-WRAPPER"}; (function(){ - (l275).fvalue = (function(v711){ - ((v711)["fname"] = "LET-BINDING-WRAPPER"); - return v711; - })((function (values,v705,v706){ + (l275).fvalue = (function(v717){ + ((v717)["fname"] = "LET-BINDING-WRAPPER"); + return v717; + })((function (values,v711,v712){ checkArgs(arguments, 3); return (function(){ try { - (l13.fvalue(pv, v705) !== l5.value ? (function(){ + (l13.fvalue(pv, v711) !== l5.value ? (function(){ var values = mv; - throw ({type: 'block', id: 233, values: v706, message: 'Return from unknown block LET-BINDING-WRAPPER.'}) + throw ({type: 'block', id: 233, values: v712, message: 'Return from unknown block LET-BINDING-WRAPPER.'}) })() : l5.value); return l191.fvalue(values, "try {", (function(){ var symbol = l156; @@ -6008,16 +6019,16 @@ var l275 = {name: "LET-BINDING-WRAPPER"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l161.fvalue(pv, (function (values,v707){ + })(), l161.fvalue(pv, (function (values,v713){ checkArgs(arguments, 2); - return (function(v708){ - return l191.fvalue(values, "tmp = ", v708, ".value;", (function(){ + return (function(v714){ + return l191.fvalue(values, "tmp = ", v714, ".value;", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), v708, ".value = ", (function(){ - var tmp = v707; + })(), v714, ".value = ", (function(){ + var tmp = v713; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ var symbol = l156; @@ -6025,7 +6036,7 @@ var l275 = {name: "LET-BINDING-WRAPPER"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(){ - var tmp = v707; + var tmp = v713; return tmp === l5.value? l5.value: tmp.cdr; })(), " = tmp;", (function(){ var symbol = l156; @@ -6034,10 +6045,10 @@ var l275 = {name: "LET-BINDING-WRAPPER"}; return value; })()); })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){ - var tmp = v707; + var tmp = v713; return tmp === l5.value? l5.value: tmp.car; })()))); - }), v705), v706, (function(){ + }), v711), v712, (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6052,11 +6063,11 @@ var l275 = {name: "LET-BINDING-WRAPPER"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v709){ + })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v715){ checkArgs(arguments, 2); - return (function(v710){ - return l191.fvalue(values, v710, ".value", " = ", (function(){ - var tmp = v709; + return (function(v716){ + return l191.fvalue(values, v716, ".value", " = ", (function(){ + var tmp = v715; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ var symbol = l156; @@ -6065,10 +6076,10 @@ var l275 = {name: "LET-BINDING-WRAPPER"}; return value; })()); })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){ - var tmp = v709; + var tmp = v715; return tmp === l5.value? l5.value: tmp.car; })()))); - }), v705)), "}", (function(){ + }), v711)), "}", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6087,29 +6098,29 @@ var l275 = {name: "LET-BINDING-WRAPPER"}; })(); var l276 = {name: "LET"}; (function(){ - var v712 = l47.fvalue(pv, l276, (function (values,v714){ + var v718 = l47.fvalue(pv, l276, (function (values,v720){ checkArgsAtLeast(arguments, 2); - var v713= l5.value; + var v719= l5.value; for (var i = arguments.length-1; i>=2; i--) - v713 = {car: arguments[i], cdr: - v713}; + v719 = {car: arguments[i], cdr: + v719}; return (function(){ return (function(){ try { - var v724 = l212.value; - var v715 = l81.fvalue(pv, (function(){ + var v730 = l212.value; + var v721 = l81.fvalue(pv, (function(){ var symbol = l61; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v714); - var v716 = l81.fvalue(pv, (function(){ + })(), v720); + var v722 = l81.fvalue(pv, (function(){ var symbol = l42; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v715); - var v717 = l81.fvalue(pv, (function(){ + })(), v721); + var v723 = l81.fvalue(pv, (function(){ var symbol = l193; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; @@ -6119,120 +6130,120 @@ var l276 = {name: "LET"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v715)); + })(), v721)); ((l212).value = l216.fvalue(pv, l98.fvalue(pv, (function(){ var symbol = l274; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v716))); - var v718 = l5.value; - return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v719){ + })(), v722))); + var v724 = l5.value; + return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v725){ checkArgs(arguments, 2); - return (l274.fvalue(pv, v719) !== l5.value ? (function(v720){ + return (l274.fvalue(pv, v725) !== l5.value ? (function(v726){ (function(){ - var v721 = ({car: v719, cdr: v720}); - var v722 = ({car: v721, cdr: v718}); - return (v718 = v722); + var v727 = ({car: v725, cdr: v726}); + var v728 = ({car: v727, cdr: v724}); + return (v724 = v728); })(); - return v720; - })(l214.fvalue(pv, v719)) : l215.fvalue(values, v719)); - }), v716), ","), "){", (function(){ + return v726; + })(l214.fvalue(pv, v725)) : l215.fvalue(values, v725)); + }), v722), ","), "){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), (function(v723){ - return l195.fvalue(pv, l275.fvalue(pv, v718, v723)); - })(l254.fvalue(pv, v713, l4.value)), "})(", l159.fvalue(pv, v717, ","), ")"); + })(), (function(v729){ + return l195.fvalue(pv, l275.fvalue(pv, v724, v729)); + })(l254.fvalue(pv, v719, l4.value)), "})(", l159.fvalue(pv, v723, ","), ")"); } finally { - l212.value = v724; + l212.value = v730; } })(); })(); })); - var v725 = ({car: v712, cdr: (function(){ + var v731 = ({car: v718, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v725); + return ((l230).value = v731); })(); var l277 = {name: "LET*-INITIALIZE-VALUE"}; (function(){ - (l277).fvalue = (function(v732){ - ((v732)["fname"] = "LET*-INITIALIZE-VALUE"); - return v732; - })((function (values,v726){ + (l277).fvalue = (function(v738){ + ((v738)["fname"] = "LET*-INITIALIZE-VALUE"); + return v738; + })((function (values,v732){ checkArgs(arguments, 2); return (function(){ - return (function(v727,v728){ - return (l274.fvalue(pv, v727) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l119, v727, v728)), ";", (function(){ + return (function(v733,v734){ + return (l274.fvalue(pv, v733) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l119, v733, v734)), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : (function(){ - var v729 = l214.fvalue(pv, v727); - var v730 = l197.fvalue(pv, v727, l114, v729); - return (function(v731){ - l207.fvalue(pv, v730, (function(){ + var v735 = l214.fvalue(pv, v733); + var v736 = l197.fvalue(pv, v733, l114, v735); + return (function(v737){ + l207.fvalue(pv, v736, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l114); - return v731; - })(l191.fvalue(pv, "var ", v729, " = ", l193.fvalue(pv, v728), ";", (function(){ + return v737; + })(l191.fvalue(pv, "var ", v735, " = ", l193.fvalue(pv, v734), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())); })()); - })(l42.fvalue(pv, v726),l43.fvalue(pv, v726)); + })(l42.fvalue(pv, v732),l43.fvalue(pv, v732)); })(); })); return l277; })(); var l278 = {name: "LET*-BINDING-WRAPPER"}; (function(){ - (l278).fvalue = (function(v741){ - ((v741)["fname"] = "LET*-BINDING-WRAPPER"); - return v741; - })((function (values,v733,v734){ + (l278).fvalue = (function(v747){ + ((v747)["fname"] = "LET*-BINDING-WRAPPER"); + return v747; + })((function (values,v739,v740){ checkArgs(arguments, 3); return (function(){ try { - (l13.fvalue(pv, v733) !== l5.value ? (function(){ + (l13.fvalue(pv, v739) !== l5.value ? (function(){ var values = mv; - throw ({type: 'block', id: 236, values: v734, message: 'Return from unknown block LET*-BINDING-WRAPPER.'}) + throw ({type: 'block', id: 236, values: v740, message: 'Return from unknown block LET*-BINDING-WRAPPER.'}) })() : l5.value); - return (function(v736){ + return (function(v742){ return l191.fvalue(values, "try {", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v737){ + })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v743){ checkArgs(arguments, 2); - return (function(v738){ + return (function(v744){ return l191.fvalue(values, "var ", (function(){ - var tmp = v737; + var tmp = v743; return tmp === l5.value? l5.value: tmp.cdr; - })(), " = ", v738, ".value;", (function(){ + })(), " = ", v744, ".value;", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){ - var tmp = v737; + var tmp = v743; return tmp === l5.value? l5.value: tmp.car; })()))); - }), v736), v734), "}", (function(){ + }), v742), v740), "}", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6242,11 +6253,11 @@ var l278 = {name: "LET*-BINDING-WRAPPER"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v739){ + })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v745){ checkArgs(arguments, 2); - return (function(v740){ - return l191.fvalue(values, v740, ".value", " = ", (function(){ - var tmp = v739; + return (function(v746){ + return l191.fvalue(values, v746, ".value", " = ", (function(){ + var tmp = v745; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ var symbol = l156; @@ -6255,24 +6266,24 @@ var l278 = {name: "LET*-BINDING-WRAPPER"}; return value; })()); })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){ - var tmp = v739; + var tmp = v745; return tmp === l5.value? l5.value: tmp.car; })()))); - }), v736)), "}", (function(){ + }), v742)), "}", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l81.fvalue(pv, (function (values,v735){ + })(l81.fvalue(pv, (function (values,v741){ checkArgs(arguments, 2); - return ({car: v735, cdr: l214.fvalue(pv, v735)}); + return ({car: v741, cdr: l214.fvalue(pv, v741)}); }), l99.fvalue(pv, (function(){ var symbol = l274; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v733))); + })(), v739))); } catch (cf){ if (cf.type == 'block' && cf.id == 236) @@ -6286,26 +6297,26 @@ var l278 = {name: "LET*-BINDING-WRAPPER"}; })(); var l279 = {name: "LET*"}; (function(){ - var v742 = l47.fvalue(pv, l279, (function (values,v744){ + var v748 = l47.fvalue(pv, l279, (function (values,v750){ checkArgsAtLeast(arguments, 2); - var v743= l5.value; + var v749= l5.value; for (var i = arguments.length-1; i>=2; i--) - v743 = {car: arguments[i], cdr: - v743}; + v749 = {car: arguments[i], cdr: + v749}; return (function(){ - return (function(v745,v746){ + return (function(v751,v752){ try { var tmp; tmp = l212.value; - l212.value = v746; - v746 = tmp; + l212.value = v752; + v752 = tmp; return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, (function(v747,v748){ - return l278.fvalue(pv, v747, v748); + })(), l195.fvalue(pv, (function(v753,v754){ + return l278.fvalue(pv, v753, v754); })(l99.fvalue(pv, (function(){ var symbol = l274; var func = symbol.fvalue; @@ -6316,22 +6327,22 @@ var l279 = {name: "LET*"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v745)),l157.fvalue(pv, l161.fvalue(pv, (function(){ + })(), v751)),l157.fvalue(pv, l161.fvalue(pv, (function(){ var symbol = l277; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v745), l254.fvalue(pv, v743, l4.value)))), "})()"); + })(), v751), l254.fvalue(pv, v749, l4.value)))), "})()"); } finally { - l212.value = v746; + l212.value = v752; } })(l81.fvalue(pv, (function(){ var symbol = l61; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v744),l206.fvalue(pv, (function(){ + })(), v750),l206.fvalue(pv, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6339,13 +6350,13 @@ var l279 = {name: "LET*"}; })())); })(); })); - var v749 = ({car: v742, cdr: (function(){ + var v755 = ({car: v748, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v749); + return ((l230).value = v755); })(); var l280 = {name: "*BLOCK-COUNTER*"}; (function(){ @@ -6355,15 +6366,15 @@ var l280 = {name: "*BLOCK-COUNTER*"}; var l281 = {name: "MULTIPLE-VALUE"}; var l282 = {name: "USED"}; (function(){ - var v750 = l47.fvalue(pv, l208, (function (values,v752){ + var v756 = l47.fvalue(pv, l208, (function (values,v758){ checkArgsAtLeast(arguments, 2); - var v751= l5.value; + var v757= l5.value; for (var i = arguments.length-1; i>=2; i--) - v751 = {car: arguments[i], cdr: - v751}; + v757 = {car: arguments[i], cdr: + v757}; return (function(){ return (function(){ - var v753 = ((l280).value = (function(){ + var v759 = ((l280).value = (function(){ var x1 = (function(){ var symbol = l280; var value = symbol.value; @@ -6373,24 +6384,24 @@ var l282 = {name: "USED"}; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })()); - var v754 = l197.fvalue(pv, v752, l208, v753); + var v760 = l197.fvalue(pv, v758, l208, v759); ((function(){ var symbol = l196; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l204.fvalue(pv, l281, v754) : l5.value); + })() !== l5.value ? l204.fvalue(pv, l281, v760) : l5.value); return (function(){ try { - var v756 = l212.value; - ((l212).value = l210.fvalue(pv, l47.fvalue(pv, v754), (function(){ + var v762 = l212.value; + ((l212).value = l210.fvalue(pv, l47.fvalue(pv, v760), (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l208)); - var v755 = l254.fvalue(pv, v751, l4.value); - return (l96.fvalue(pv, l282, l201.fvalue(pv, v754)) !== l5.value ? l191.fvalue(values, "(function(){", (function(){ + var v761 = l254.fvalue(pv, v757, l4.value); + return (l96.fvalue(pv, l282, l201.fvalue(pv, v760)) !== l5.value ? l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6400,7 +6411,7 @@ var l282 = {name: "USED"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, v755), "}", (function(){ + })(), l195.fvalue(pv, v761), "}", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6410,7 +6421,7 @@ var l282 = {name: "USED"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), " if (cf.type == 'block' && cf.id == ", v753, ")", (function(){ + })(), " if (cf.type == 'block' && cf.id == ", v759, ")", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6445,84 +6456,84 @@ var l282 = {name: "USED"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, v755), "})()")); + })(), l195.fvalue(pv, v761), "})()")); } finally { - l212.value = v756; + l212.value = v762; } })(); })(); })(); })); - var v757 = ({car: v750, cdr: (function(){ + var v763 = ({car: v756, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v757); + return ((l230).value = v763); })(); var l283 = {name: "RETURN-FROM"}; (function(){ - var v758 = l47.fvalue(pv, l283, (function (values,v759,v760){ + var v764 = l47.fvalue(pv, l283, (function (values,v765,v766){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v760; + var v766; switch(arguments.length-1){ case 1: - v760=l5.value; + v766=l5.value; default: break; } return (function(){ return (function(){ - var v761 = l211.fvalue(pv, v759, (function(){ + var v767 = l211.fvalue(pv, v765, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l208); - var v762 = l96.fvalue(pv, l281, l201.fvalue(pv, v761)); - (l13.fvalue(pv, v761) !== l5.value ? (function(){ - throw l157.fvalue(pv, "Unknown block `", (v759).name, "'."); + var v768 = l96.fvalue(pv, l281, l201.fvalue(pv, v767)); + (l13.fvalue(pv, v767) !== l5.value ? (function(){ + throw l157.fvalue(pv, "Unknown block `", (v765).name, "'."); })() : l5.value); - l204.fvalue(pv, l282, v761); + l204.fvalue(pv, l282, v767); return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, (v762 !== l5.value ? l191.fvalue(pv, "var values = mv;", (function(){ + })(), l195.fvalue(pv, (v768 !== l5.value ? l191.fvalue(pv, "var values = mv;", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l200.fvalue(pv, v761), ", ", "values: ", l193.fvalue(pv, v760, v762), ", ", "message: 'Return from unknown block ", (v759).name, ".'", "})"), "})()"); + })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l200.fvalue(pv, v767), ", ", "values: ", l193.fvalue(pv, v766, v768), ", ", "message: 'Return from unknown block ", (v765).name, ".'", "})"), "})()"); })(); })(); })); - var v763 = ({car: v758, cdr: (function(){ + var v769 = ({car: v764, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v763); + return ((l230).value = v769); })(); var l284 = {name: "CATCH"}; (function(){ - var v764 = l47.fvalue(pv, l284, (function (values,v766){ + var v770 = l47.fvalue(pv, l284, (function (values,v772){ checkArgsAtLeast(arguments, 2); - var v765= l5.value; + var v771= l5.value; for (var i = arguments.length-1; i>=2; i--) - v765 = {car: arguments[i], cdr: - v765}; + v771 = {car: arguments[i], cdr: + v771}; return (function(){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var id = ", l193.fvalue(pv, v766), ";", (function(){ + })(), l195.fvalue(pv, "var id = ", l193.fvalue(pv, v772), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6532,7 +6543,7 @@ var l284 = {name: "CATCH"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l254.fvalue(pv, v765, l4.value)), (function(){ + })(), l195.fvalue(pv, l254.fvalue(pv, v771, l4.value)), (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6580,17 +6591,17 @@ var l284 = {name: "CATCH"}; })()), "})()"); })(); })); - var v767 = ({car: v764, cdr: (function(){ + var v773 = ({car: v770, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v767); + return ((l230).value = v773); })(); var l285 = {name: "THROW"}; (function(){ - var v768 = l47.fvalue(pv, l285, (function (values,v769,v770){ + var v774 = l47.fvalue(pv, l285, (function (values,v775,v776){ checkArgs(arguments, 3); return (function(){ return l191.fvalue(values, "(function(){", (function(){ @@ -6603,16 +6614,16 @@ var l285 = {name: "THROW"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "throw ({", "type: 'catch', ", "id: ", l193.fvalue(pv, v769), ", ", "values: ", l193.fvalue(pv, v770, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()"); + })(), "throw ({", "type: 'catch', ", "id: ", l193.fvalue(pv, v775), ", ", "values: ", l193.fvalue(pv, v776, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()"); })(); })); - var v771 = ({car: v768, cdr: (function(){ + var v777 = ({car: v774, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v771); + return ((l230).value = v777); })(); var l286 = {name: "*TAGBODY-COUNTER*"}; (function(){ @@ -6626,41 +6637,41 @@ var l287 = {name: "*GO-TAG-COUNTER*"}; })(); var l288 = {name: "GO-TAG-P"}; (function(){ - (l288).fvalue = (function(v774){ - ((v774)["fname"] = "GO-TAG-P"); - return v774; - })((function (values,v772){ + (l288).fvalue = (function(v780){ + ((v780)["fname"] = "GO-TAG-P"); + return v780; + })((function (values,v778){ checkArgs(arguments, 2); return (function(){ - return (function(v773){ - return (v773 !== l5.value ? v773 : ((function(){ - var tmp = v772; + return (function(v779){ + return (v779 !== l5.value ? v779 : ((function(){ + var tmp = v778; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value)); - })(l89.fvalue(pv, v772)); + })(l89.fvalue(pv, v778)); })(); })); return l288; })(); var l289 = {name: "DECLARE-TAGBODY-TAGS"}; (function(){ - (l289).fvalue = (function(v780){ - ((v780)["fname"] = "DECLARE-TAGBODY-TAGS"); - return v780; - })((function (values,v775,v776){ + (l289).fvalue = (function(v786){ + ((v786)["fname"] = "DECLARE-TAGBODY-TAGS"); + return v786; + })((function (values,v781,v782){ checkArgs(arguments, 3); return (function(){ - return (function(v779){ - return l210.fvalue(values, v779, (function(){ + return (function(v785){ + return l210.fvalue(values, v785, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l209); - })(l81.fvalue(pv, (function (values,v777){ + })(l81.fvalue(pv, (function (values,v783){ checkArgs(arguments, 2); - return (function(v778){ - return l197.fvalue(values, v777, l209, l47.fvalue(pv, v775, v778)); + return (function(v784){ + return l197.fvalue(values, v783, l209, l47.fvalue(pv, v781, v784)); })(l19.fvalue(pv, ((l287).value = (function(){ var x1 = (function(){ var symbol = l287; @@ -6676,7 +6687,7 @@ var l289 = {name: "DECLARE-TAGBODY-TAGS"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v776))); + })(), v782))); })(); })); return l289; @@ -6684,11 +6695,11 @@ var l289 = {name: "DECLARE-TAGBODY-TAGS"}; var l290 = {name: "TAGBODY"}; var l291 = QIList(l5,l5); (function(){ - var v781 = l47.fvalue(pv, l290, (function (values){ - var v782= l5.value; + var v787 = l47.fvalue(pv, l290, (function (values){ + var v788= l5.value; for (var i = arguments.length-1; i>=1; i--) - v782 = {car: arguments[i], cdr: - v782}; + v788 = {car: arguments[i], cdr: + v788}; return (function(){ try { (l104.fvalue(pv, (function(){ @@ -6696,28 +6707,28 @@ var l291 = QIList(l5,l5); var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v782) !== l5.value ? l5.value : (function(){ + })(), v788) !== l5.value ? l5.value : (function(){ var values = mv; - throw ({type: 'block', id: 244, values: l193.fvalue(values, ({car: l123, cdr: l68.fvalue(pv, v782, l291)})), message: 'Return from unknown block TAGBODY.'}) + throw ({type: 'block', id: 244, values: l193.fvalue(values, ({car: l123, cdr: l68.fvalue(pv, v788, l291)})), message: 'Return from unknown block TAGBODY.'}) })()); (l288.fvalue(pv, (function(){ - var tmp = v782; + var tmp = v788; return tmp === l5.value? l5.value: tmp.car; })()) !== l5.value ? l5.value : (function(){ - var v783 = l18.fvalue(pv, "START"); - var v784 = ({car: v783, cdr: v782}); - return (v782 = v784); + var v789 = l18.fvalue(pv, "START"); + var v790 = ({car: v789, cdr: v788}); + return (v788 = v790); })()); - return (function(v785){ - return (function(v787,v786){ + return (function(v791){ + return (function(v793,v792){ try { var tmp; tmp = l212.value; - l212.value = v787; - v787 = tmp; - (function(v788){ - return (v786 = l43.fvalue(pv, l200.fvalue(pv, v788))); - })(l211.fvalue(pv, l42.fvalue(pv, v782), (function(){ + l212.value = v793; + v793 = tmp; + (function(v794){ + return (v792 = l43.fvalue(pv, l200.fvalue(pv, v794))); + })(l211.fvalue(pv, l42.fvalue(pv, v788), (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6728,7 +6739,7 @@ var l291 = QIList(l5,l5); var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var tagbody_", v785, " = ", v786, ";", (function(){ + })(), l195.fvalue(pv, "var tagbody_", v791, " = ", v792, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6748,39 +6759,39 @@ var l291 = QIList(l5,l5); var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, (function(v789){ - return l191.fvalue(pv, "switch(tagbody_", v785, "){", (function(){ + })(), l195.fvalue(pv, (function(v795){ + return l191.fvalue(pv, "switch(tagbody_", v791, "){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "case ", v786, ":", (function(){ + })(), "case ", v792, ":", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(){ - return (function(v790,v791){ + return (function(v796,v797){ (function(){ - while(v790 !== l5.value){ - (v791 = (function(){ - var tmp = v790; + while(v796 !== l5.value){ + (v797 = (function(){ + var tmp = v796; return tmp === l5.value? l5.value: tmp.car; })()); (function(){ - (v789 = l157.fvalue(pv, v789, (l29.fvalue(pv, l288.fvalue(pv, v791)) !== l5.value ? l195.fvalue(pv, l193.fvalue(pv, v791), ";", (function(){ + (v795 = l157.fvalue(pv, v795, (l29.fvalue(pv, l288.fvalue(pv, v797)) !== l5.value ? l195.fvalue(pv, l193.fvalue(pv, v797), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) : (function(v792){ - return l191.fvalue(pv, "case ", l43.fvalue(pv, l200.fvalue(pv, v792)), ":", (function(){ + })()) : (function(v798){ + return l191.fvalue(pv, "case ", l43.fvalue(pv, l200.fvalue(pv, v798)), ":", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l211.fvalue(pv, v791, (function(){ + })(l211.fvalue(pv, v797, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6788,15 +6799,15 @@ var l291 = QIList(l5,l5); })(), l209))))); return l5.value; })(); - (v790 = (function(){ - var tmp = v790; + (v796 = (function(){ + var tmp = v796; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; })(); - return v789; + return v795; })((function(){ - var tmp = v782; + var tmp = v788; return tmp === l5.value? l5.value: tmp.cdr; })(),l5.value); })(), "default:", (function(){ @@ -6825,12 +6836,12 @@ var l291 = QIList(l5,l5); var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), " if (jump.type == 'tagbody' && jump.id == ", v785, ")", (function(){ + })(), " if (jump.type == 'tagbody' && jump.id == ", v791, ")", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), " tagbody_", v785, " = jump.label;", (function(){ + })(), " tagbody_", v791, " = jump.label;", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6863,9 +6874,9 @@ var l291 = QIList(l5,l5); })()), "})()"); } finally { - l212.value = v787; + l212.value = v793; } - })(l289.fvalue(pv, v785, v782),l5.value); + })(l289.fvalue(pv, v791, v788),l5.value); })((function(){ var symbol = l286; var value = symbol.value; @@ -6881,61 +6892,61 @@ var l291 = QIList(l5,l5); } })(); })); - var v793 = ({car: v781, cdr: (function(){ + var v799 = ({car: v787, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v793); + return ((l230).value = v799); })(); var l292 = {name: "GO"}; (function(){ - var v794 = l47.fvalue(pv, l292, (function (values,v795){ + var v800 = l47.fvalue(pv, l292, (function (values,v801){ checkArgs(arguments, 2); return (function(){ - return (function(v796,v797){ - (l13.fvalue(pv, v796) !== l5.value ? (function(){ - throw l157.fvalue(pv, "Unknown tag `", v797, "'."); + return (function(v802,v803){ + (l13.fvalue(pv, v802) !== l5.value ? (function(){ + throw l157.fvalue(pv, "Unknown tag `", v803, "'."); })() : l5.value); return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l200.fvalue(pv, v796)), ", ", "label: ", l43.fvalue(pv, l200.fvalue(pv, v796)), ", ", "message: 'Attempt to GO to non-existing tag ", v797, "'", "})", (function(){ + })(), l195.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l200.fvalue(pv, v802)), ", ", "label: ", l43.fvalue(pv, l200.fvalue(pv, v802)), ", ", "message: 'Attempt to GO to non-existing tag ", v803, "'", "})", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l211.fvalue(pv, v795, (function(){ + })(l211.fvalue(pv, v801, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l209),(((function(){ - var tmp = v795; + var tmp = v801; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (v795).name : (l89.fvalue(pv, v795) !== l5.value ? l19.fvalue(pv, v795) : l5.value))); + })()?l4.value: l5.value) !== l5.value ? (v801).name : (l89.fvalue(pv, v801) !== l5.value ? l19.fvalue(pv, v801) : l5.value))); })(); })); - var v798 = ({car: v794, cdr: (function(){ + var v804 = ({car: v800, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v798); + return ((l230).value = v804); })(); var l293 = {name: "UNWIND-PROTECT"}; (function(){ - var v799 = l47.fvalue(pv, l293, (function (values,v801){ + var v805 = l47.fvalue(pv, l293, (function (values,v807){ checkArgsAtLeast(arguments, 2); - var v800= l5.value; + var v806= l5.value; for (var i = arguments.length-1; i>=2; i--) - v800 = {car: arguments[i], cdr: - v800}; + v806 = {car: arguments[i], cdr: + v806}; return (function(){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; @@ -6952,7 +6963,7 @@ var l293 = {name: "UNWIND-PROTECT"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "ret = ", l193.fvalue(pv, v801), ";", (function(){ + })(), l195.fvalue(pv, "ret = ", l193.fvalue(pv, v807), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6962,7 +6973,7 @@ var l293 = {name: "UNWIND-PROTECT"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l254.fvalue(pv, v800)), "}", (function(){ + })(), l195.fvalue(pv, l254.fvalue(pv, v806)), "}", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -6975,29 +6986,29 @@ var l293 = {name: "UNWIND-PROTECT"}; })()), "})()"); })(); })); - var v802 = ({car: v799, cdr: (function(){ + var v808 = ({car: v805, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v802); + return ((l230).value = v808); })(); var l294 = {name: "MULTIPLE-VALUE-CALL"}; (function(){ - var v803 = l47.fvalue(pv, l294, (function (values,v805){ + var v809 = l47.fvalue(pv, l294, (function (values,v811){ checkArgsAtLeast(arguments, 2); - var v804= l5.value; + var v810= l5.value; for (var i = arguments.length-1; i>=2; i--) - v804 = {car: arguments[i], cdr: - v804}; + v810 = {car: arguments[i], cdr: + v810}; return (function(){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var func = ", l193.fvalue(pv, v805), ";", (function(){ + })(), l195.fvalue(pv, "var func = ", l193.fvalue(pv, v811), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7027,9 +7038,9 @@ var l294 = {name: "MULTIPLE-VALUE-CALL"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l161.fvalue(pv, (function (values,v806){ + })(), l161.fvalue(pv, (function (values,v812){ checkArgs(arguments, 2); - return l191.fvalue(values, "vs = ", l193.fvalue(pv, v806, l4.value), ";", (function(){ + return l191.fvalue(values, "vs = ", l193.fvalue(pv, v812, l4.value), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7055,7 +7066,7 @@ var l294 = {name: "MULTIPLE-VALUE-CALL"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())); - }), v804), "return func.apply(window, args);", (function(){ + }), v810), "return func.apply(window, args);", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7068,29 +7079,29 @@ var l294 = {name: "MULTIPLE-VALUE-CALL"}; })()), "})()"); })(); })); - var v807 = ({car: v803, cdr: (function(){ + var v813 = ({car: v809, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v807); + return ((l230).value = v813); })(); var l295 = {name: "MULTIPLE-VALUE-PROG1"}; (function(){ - var v808 = l47.fvalue(pv, l295, (function (values,v810){ + var v814 = l47.fvalue(pv, l295, (function (values,v816){ checkArgsAtLeast(arguments, 2); - var v809= l5.value; + var v815= l5.value; for (var i = arguments.length-1; i>=2; i--) - v809 = {car: arguments[i], cdr: - v809}; + v815 = {car: arguments[i], cdr: + v815}; return (function(){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var args = ", l193.fvalue(pv, v810, (function(){ + })(), l195.fvalue(pv, "var args = ", l193.fvalue(pv, v816, (function(){ var symbol = l196; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7100,7 +7111,7 @@ var l295 = {name: "MULTIPLE-VALUE-PROG1"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l254.fvalue(pv, v809), "return args;", (function(){ + })(), l254.fvalue(pv, v815), "return args;", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7108,13 +7119,13 @@ var l295 = {name: "MULTIPLE-VALUE-PROG1"}; })()), "})()"); })(); })); - var v811 = ({car: v808, cdr: (function(){ + var v817 = ({car: v814, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v811); + return ((l230).value = v817); })(); var l296 = {name: "*COMMA*"}; (function(){ @@ -7207,50 +7218,50 @@ var l307 = {name: "BQ-PROCESS"}; var l308 = {name: "BQ-SIMPLIFY"}; var l309 = {name: "BQ-REMOVE-TOKENS"}; (function(){ - (l306).fvalue = (function(v814){ - ((v814)["fname"] = "BQ-COMPLETELY-PROCESS"); - return v814; - })((function (values,v812){ + (l306).fvalue = (function(v820){ + ((v820)["fname"] = "BQ-COMPLETELY-PROCESS"); + return v820; + })((function (values,v818){ checkArgs(arguments, 2); return (function(){ - return (function(v813){ + return (function(v819){ return l309.fvalue(values, ((function(){ var symbol = l305; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l308.fvalue(pv, v813) : v813)); - })(l307.fvalue(pv, v812)); + })() !== l5.value ? l308.fvalue(pv, v819) : v819)); + })(l307.fvalue(pv, v818)); })(); })); return l306; })(); var l310 = {name: "BRACKET"}; (function(){ - (l307).fvalue = (function(v820){ - ((v820)["fname"] = "BQ-PROCESS"); - return v820; - })((function (values,v815){ + (l307).fvalue = (function(v826){ + ((v826)["fname"] = "BQ-PROCESS"); + return v826; + })((function (values,v821){ checkArgs(arguments, 2); return (function(){ - return (l48.fvalue(pv, v815) !== l5.value ? l47.fvalue(values, (function(){ + return (l48.fvalue(pv, v821) !== l5.value ? l47.fvalue(values, (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), v815) : ((((function(){ - var tmp = v815; + })(), v821) : ((((function(){ + var tmp = v821; return tmp === l5.value? l5.value: tmp.car; - })() === l187)?l4.value: l5.value) !== l5.value ? l307.fvalue(values, l306.fvalue(pv, l35.fvalue(pv, v815))) : ((((function(){ - var tmp = v815; + })() === l187)?l4.value: l5.value) !== l5.value ? l307.fvalue(values, l306.fvalue(pv, l35.fvalue(pv, v821))) : ((((function(){ + var tmp = v821; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l296; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v815) : ((((function(){ - var tmp = v815; + })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v821) : ((((function(){ + var tmp = v821; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l297; @@ -7260,28 +7271,28 @@ var l310 = {name: "BRACKET"}; })())?l4.value: l5.value) !== l5.value ? (function(){ throw "ill-formed"; })() : (function(){ - return (function(v816,v817){ + return (function(v822,v823){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l48.fvalue(pv, v816) !== l5.value ? (function(){ + (l48.fvalue(pv, v822) !== l5.value ? (function(){ var values = mv; throw ({type: 'block', id: 253, values: ({car: (function(){ var symbol = l299; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), cdr: l128.fvalue(pv, v817, l47.fvalue(pv, l47.fvalue(pv, (function(){ + })(), cdr: l128.fvalue(pv, v823, l47.fvalue(pv, l47.fvalue(pv, (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), v816)))}), message: 'Return from unknown block NIL.'}) + })(), v822)))}), message: 'Return from unknown block NIL.'}) })() : l5.value); (function(){ ((((function(){ - var tmp = v816; + var tmp = v822; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l296; @@ -7289,7 +7300,7 @@ var l310 = {name: "BRACKET"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value) !== l5.value ? (function(){ - (l13.fvalue(pv, l37.fvalue(pv, v816)) !== l5.value ? l5.value : (function(){ + (l13.fvalue(pv, l37.fvalue(pv, v822)) !== l5.value ? l5.value : (function(){ throw "Malformed"; })()); return (function(){ @@ -7299,11 +7310,11 @@ var l310 = {name: "BRACKET"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), cdr: l128.fvalue(pv, v817, l47.fvalue(pv, l35.fvalue(pv, v816)))}), message: 'Return from unknown block NIL.'}) + })(), cdr: l128.fvalue(pv, v823, l47.fvalue(pv, l35.fvalue(pv, v822)))}), message: 'Return from unknown block NIL.'}) })(); })() : l5.value); ((((function(){ - var tmp = v816; + var tmp = v822; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l297; @@ -7315,15 +7326,15 @@ var l310 = {name: "BRACKET"}; })() : l5.value); return l5.value; })(); - (function(v818,v819){ - return (v816 = v818, v817 = v819); + (function(v824,v825){ + return (v822 = v824, v823 = v825); })((function(){ - var tmp = v816; + var tmp = v822; return tmp === l5.value? l5.value: tmp.cdr; })(),({car: l310.fvalue(pv, (function(){ - var tmp = v816; + var tmp = v822; return tmp === l5.value? l5.value: tmp.car; - })()), cdr: v817})); + })()), cdr: v823})); }return l5.value; })(); } @@ -7334,26 +7345,26 @@ var l310 = {name: "BRACKET"}; throw cf; } })(); - })(v815,l5); + })(v821,l5); })())))); })(); })); return l307; })(); (function(){ - (l310).fvalue = (function(v822){ - ((v822)["fname"] = "BRACKET"); - return v822; - })((function (values,v821){ + (l310).fvalue = (function(v828){ + ((v828)["fname"] = "BRACKET"); + return v828; + })((function (values,v827){ checkArgs(arguments, 2); return (function(){ - return (l48.fvalue(pv, v821) !== l5.value ? l47.fvalue(values, (function(){ + return (l48.fvalue(pv, v827) !== l5.value ? l47.fvalue(values, (function(){ var symbol = l298; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l307.fvalue(pv, v821)) : ((((function(){ - var tmp = v821; + })(), l307.fvalue(pv, v827)) : ((((function(){ + var tmp = v827; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l296; @@ -7365,51 +7376,51 @@ var l310 = {name: "BRACKET"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l35.fvalue(pv, v821)) : ((((function(){ - var tmp = v821; + })(), l35.fvalue(pv, v827)) : ((((function(){ + var tmp = v827; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l297; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v821) : l47.fvalue(values, (function(){ + })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v827) : l47.fvalue(values, (function(){ var symbol = l298; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l307.fvalue(pv, v821))))); + })(), l307.fvalue(pv, v827))))); })(); })); return l310; })(); var l311 = {name: "MAPTREE"}; (function(){ - (l311).fvalue = (function(v827){ - ((v827)["fname"] = "MAPTREE"); - return v827; - })((function (values,v823,v824){ + (l311).fvalue = (function(v833){ + ((v833)["fname"] = "MAPTREE"); + return v833; + })((function (values,v829,v830){ checkArgs(arguments, 3); return (function(){ - return (l48.fvalue(pv, v824) !== l5.value ? (function(){ - var f = v823; - return (typeof f === 'function'? f: f.fvalue)(values, v824) - })() : (function(v825,v826){ - return ((l28.fvalue(pv, v825, (function(){ - var tmp = v824; + return (l48.fvalue(pv, v830) !== l5.value ? (function(){ + var f = v829; + return (typeof f === 'function'? f: f.fvalue)(values, v830) + })() : (function(v831,v832){ + return ((l28.fvalue(pv, v831, (function(){ + var tmp = v830; return tmp === l5.value? l5.value: tmp.car; - })()) !== l5.value ? l28.fvalue(pv, v826, (function(){ - var tmp = v824; + })()) !== l5.value ? l28.fvalue(pv, v832, (function(){ + var tmp = v830; return tmp === l5.value? l5.value: tmp.cdr; - })()) : l5.value) !== l5.value ? v824 : ({car: v825, cdr: v826})); + })()) : l5.value) !== l5.value ? v830 : ({car: v831, cdr: v832})); })((function(){ - var f = v823; + var f = v829; return (typeof f === 'function'? f: f.fvalue)(pv, (function(){ - var tmp = v824; + var tmp = v830; return tmp === l5.value? l5.value: tmp.car; })()) - })(),l311.fvalue(pv, v823, (function(){ - var tmp = v824; + })(),l311.fvalue(pv, v829, (function(){ + var tmp = v830; return tmp === l5.value? l5.value: tmp.cdr; })()))); })(); @@ -7418,17 +7429,17 @@ var l311 = {name: "MAPTREE"}; })(); var l312 = {name: "BQ-SPLICING-FROB"}; (function(){ - (l312).fvalue = (function(v829){ - ((v829)["fname"] = "BQ-SPLICING-FROB"); - return v829; - })((function (values,v828){ + (l312).fvalue = (function(v835){ + ((v835)["fname"] = "BQ-SPLICING-FROB"); + return v835; + })((function (values,v834){ checkArgs(arguments, 2); return (function(){ return (((function(){ - var tmp = v828; + var tmp = v834; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (((function(){ - var tmp = v828; + var tmp = v834; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l297; @@ -7442,18 +7453,18 @@ var l312 = {name: "BQ-SPLICING-FROB"}; })(); var l313 = {name: "BQ-FROB"}; (function(){ - (l313).fvalue = (function(v832){ - ((v832)["fname"] = "BQ-FROB"); - return v832; - })((function (values,v830){ + (l313).fvalue = (function(v838){ + ((v838)["fname"] = "BQ-FROB"); + return v838; + })((function (values,v836){ checkArgs(arguments, 2); return (function(){ return (((function(){ - var tmp = v830; + var tmp = v836; return (typeof tmp == 'object' && 'car' in tmp); - })()?l4.value: l5.value) !== l5.value ? (function(v831){ - return (v831 !== l5.value ? v831 : (((function(){ - var tmp = v830; + })()?l4.value: l5.value) !== l5.value ? (function(v837){ + return (v837 !== l5.value ? v837 : (((function(){ + var tmp = v836; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l297; @@ -7462,7 +7473,7 @@ var l313 = {name: "BQ-FROB"}; return value; })())?l4.value: l5.value)); })((((function(){ - var tmp = v830; + var tmp = v836; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l296; @@ -7476,36 +7487,36 @@ var l313 = {name: "BQ-FROB"}; })(); var l314 = {name: "BQ-SIMPLIFY-ARGS"}; (function(){ - (l308).fvalue = (function(v835){ - ((v835)["fname"] = "BQ-SIMPLIFY"); - return v835; - })((function (values,v833){ + (l308).fvalue = (function(v841){ + ((v841)["fname"] = "BQ-SIMPLIFY"); + return v841; + })((function (values,v839){ checkArgs(arguments, 2); return (function(){ - return (l48.fvalue(pv, v833) !== l5.value ? v833 : (function(v834){ + return (l48.fvalue(pv, v839) !== l5.value ? v839 : (function(v840){ return (l29.fvalue(pv, (((function(){ - var tmp = v834; + var tmp = v840; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l299; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value)) !== l5.value ? v834 : l314.fvalue(values, v834)); + })())?l4.value: l5.value)) !== l5.value ? v840 : l314.fvalue(values, v840)); })(((((function(){ - var tmp = v833; + var tmp = v839; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? v833 : l311.fvalue(pv, (function(){ + })())?l4.value: l5.value) !== l5.value ? v839 : l311.fvalue(pv, (function(){ var symbol = l308; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v833)))); + })(), v839)))); })(); })); return l308; @@ -7515,30 +7526,30 @@ var l316 = {name: "BQ-ATTACH-CONSES"}; var l317 = {name: "CDDAR"}; var l318 = {name: "CAADAR"}; (function(){ - (l314).fvalue = (function(v841){ - ((v841)["fname"] = "BQ-SIMPLIFY-ARGS"); - return v841; - })((function (values,v836){ + (l314).fvalue = (function(v847){ + ((v847)["fname"] = "BQ-SIMPLIFY-ARGS"); + return v847; + })((function (values,v842){ checkArgs(arguments, 2); return (function(){ return (function(){ - return (function(v837,v838){ + return (function(v843,v844){ return (function(){ try { return (function(){ while(l4.value !== l5.value){ - (l13.fvalue(pv, v837) !== l5.value ? (function(){ + (l13.fvalue(pv, v843) !== l5.value ? (function(){ var values = mv; - throw ({type: 'block', id: 261, values: v838, message: 'Return from unknown block NIL.'}) + throw ({type: 'block', id: 261, values: v844, message: 'Return from unknown block NIL.'}) })() : l5.value); l5.value; - (function(v839,v840){ - return (v837 = v839, v838 = v840); + (function(v845,v846){ + return (v843 = v845, v844 = v846); })((function(){ - var tmp = v837; + var tmp = v843; return tmp === l5.value? l5.value: tmp.cdr; })(),(l48.fvalue(pv, (function(){ - var tmp = v837; + var tmp = v843; return tmp === l5.value? l5.value: tmp.car; })()) !== l5.value ? l315.fvalue(pv, (function(){ var symbol = l299; @@ -7546,9 +7557,9 @@ var l318 = {name: "CAADAR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(){ - var tmp = v837; + var tmp = v843; return tmp === l5.value? l5.value: tmp.car; - })(), v838) : ((((l34.fvalue(pv, v837) === (function(){ + })(), v844) : ((((l34.fvalue(pv, v843) === (function(){ var symbol = l298; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7558,7 +7569,7 @@ var l318 = {name: "CAADAR"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l36.fvalue(pv, v837)) : l5.value) !== l5.value ? l316.fvalue(pv, l36.fvalue(pv, v837), v838) : ((((l34.fvalue(pv, v837) === (function(){ + })(), l36.fvalue(pv, v843)) : l5.value) !== l5.value ? l316.fvalue(pv, l36.fvalue(pv, v843), v844) : ((((l34.fvalue(pv, v843) === (function(){ var symbol = l300; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7568,8 +7579,8 @@ var l318 = {name: "CAADAR"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), l36.fvalue(pv, v837)) : l5.value) !== l5.value ? l316.fvalue(pv, l70.fvalue(pv, (function(){ - var tmp = l70.fvalue(pv, l36.fvalue(pv, v837)); + })(), l36.fvalue(pv, v843)) : l5.value) !== l5.value ? l316.fvalue(pv, l70.fvalue(pv, (function(){ + var tmp = l70.fvalue(pv, l36.fvalue(pv, v843)); return tmp === l5.value? l5.value: tmp.cdr; })()), l315.fvalue(pv, (function(){ var symbol = l299; @@ -7578,24 +7589,24 @@ var l318 = {name: "CAADAR"}; return value; })(), (function(){ var tmp = l94.fvalue(pv, (function(){ - var tmp = v837; + var tmp = v843; return tmp === l5.value? l5.value: tmp.car; })()); return tmp === l5.value? l5.value: tmp.car; - })(), v838)) : ((((l34.fvalue(pv, v837) === (function(){ + })(), v844)) : ((((l34.fvalue(pv, v843) === (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value) !== l5.value ? (((function(){ - var tmp = l38.fvalue(pv, v837); + var tmp = l38.fvalue(pv, v843); return (typeof tmp == 'object' && 'car' in tmp); - })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l313.fvalue(pv, l38.fvalue(pv, v837))) !== l5.value ? l13.fvalue(pv, l317.fvalue(pv, v837)) : l5.value) : l5.value) : l5.value) !== l5.value ? l316.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){ + })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l313.fvalue(pv, l38.fvalue(pv, v843))) !== l5.value ? l13.fvalue(pv, l317.fvalue(pv, v843)) : l5.value) : l5.value) : l5.value) !== l5.value ? l316.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l318.fvalue(pv, v837))), v838) : (((l34.fvalue(pv, v837) === (function(){ + })(), l318.fvalue(pv, v843))), v844) : (((l34.fvalue(pv, v843) === (function(){ var symbol = l302; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7605,15 +7616,15 @@ var l318 = {name: "CAADAR"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l38.fvalue(pv, v837), v838) : l315.fvalue(pv, (function(){ + })(), l38.fvalue(pv, v843), v844) : l315.fvalue(pv, (function(){ var symbol = l299; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(){ - var tmp = v837; + var tmp = v843; return tmp === l5.value? l5.value: tmp.car; - })(), v838))))))); + })(), v844))))))); }return l5.value; })(); } @@ -7625,7 +7636,7 @@ var l318 = {name: "CAADAR"}; } })(); })(l70.fvalue(pv, (function(){ - var tmp = v836; + var tmp = v842; return tmp === l5.value? l5.value: tmp.cdr; })()),l5.value); })(); @@ -7635,18 +7646,18 @@ var l318 = {name: "CAADAR"}; })(); var l319 = {name: "NULL-OR-QUOTED"}; (function(){ - (l319).fvalue = (function(v844){ - ((v844)["fname"] = "NULL-OR-QUOTED"); - return v844; - })((function (values,v842){ + (l319).fvalue = (function(v850){ + ((v850)["fname"] = "NULL-OR-QUOTED"); + return v850; + })((function (values,v848){ checkArgs(arguments, 2); return (function(){ - return (function(v843){ - return (v843 !== l5.value ? v843 : (((function(){ - var tmp = v842; + return (function(v849){ + return (v849 !== l5.value ? v849 : (((function(){ + var tmp = v848; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (((function(){ - var tmp = v842; + var tmp = v848; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l303; @@ -7654,52 +7665,52 @@ var l319 = {name: "NULL-OR-QUOTED"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value) : l5.value)); - })(l13.fvalue(pv, v842)); + })(l13.fvalue(pv, v848)); })(); })); return l319; })(); (function(){ - (l315).fvalue = (function(v849){ - ((v849)["fname"] = "BQ-ATTACH-APPEND"); - return v849; - })((function (values,v845,v846,v847){ + (l315).fvalue = (function(v855){ + ((v855)["fname"] = "BQ-ATTACH-APPEND"); + return v855; + })((function (values,v851,v852,v853){ checkArgs(arguments, 4); return (function(){ - return ((l319.fvalue(pv, v846) !== l5.value ? l319.fvalue(pv, v847) : l5.value) !== l5.value ? l47.fvalue(values, (function(){ + return ((l319.fvalue(pv, v852) !== l5.value ? l319.fvalue(pv, v853) : l5.value) !== l5.value ? l47.fvalue(values, (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l68.fvalue(pv, l35.fvalue(pv, v846), l35.fvalue(pv, v847))) : ((function(v848){ - return (v848 !== l5.value ? v848 : ((v847 == (function(){ + })(), l68.fvalue(pv, l35.fvalue(pv, v852), l35.fvalue(pv, v853))) : ((function(v854){ + return (v854 !== l5.value ? v854 : ((v853 == (function(){ var symbol = l304; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value)); - })(l13.fvalue(pv, v847)) !== l5.value ? (l312.fvalue(pv, v846) !== l5.value ? l47.fvalue(values, v845, v846) : v846) : ((((function(){ - var tmp = v847; + })(l13.fvalue(pv, v853)) !== l5.value ? (l312.fvalue(pv, v852) !== l5.value ? l47.fvalue(values, v851, v852) : v852) : ((((function(){ + var tmp = v853; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (((function(){ - var tmp = v847; + var tmp = v853; return tmp === l5.value? l5.value: tmp.car; - })() === v845)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){ - var tmp = v847; + })() === v851)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){ + var tmp = v853; return tmp === l5.value? l5.value: tmp.car; - })(), v846, (function(){ - var tmp = v847; + })(), v852, (function(){ + var tmp = v853; return tmp === l5.value? l5.value: tmp.cdr; - })()) : l47.fvalue(values, v845, v846, v847)))); + })()) : l47.fvalue(values, v851, v852, v853)))); })(); })); return l315; })(); (function(){ - (l316).fvalue = (function(v854){ - ((v854)["fname"] = "BQ-ATTACH-CONSES"); - return v854; - })((function (values,v850,v851){ + (l316).fvalue = (function(v860){ + ((v860)["fname"] = "BQ-ATTACH-CONSES"); + return v860; + })((function (values,v856,v857){ checkArgs(arguments, 3); return (function(){ return ((l105.fvalue(pv, (function(){ @@ -7707,7 +7718,7 @@ var l319 = {name: "NULL-OR-QUOTED"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v850) !== l5.value ? l319.fvalue(pv, v851) : l5.value) !== l5.value ? l47.fvalue(values, (function(){ + })(), v856) !== l5.value ? l319.fvalue(pv, v857) : l5.value) !== l5.value ? l47.fvalue(values, (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7717,24 +7728,24 @@ var l319 = {name: "NULL-OR-QUOTED"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v850), l35.fvalue(pv, v851))) : ((function(v852){ - return (v852 !== l5.value ? v852 : ((v851 == (function(){ + })(), v856), l35.fvalue(pv, v857))) : ((function(v858){ + return (v858 !== l5.value ? v858 : ((v857 == (function(){ var symbol = l304; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value)); - })(l13.fvalue(pv, v851)) !== l5.value ? ({car: (function(){ + })(l13.fvalue(pv, v857)) !== l5.value ? ({car: (function(){ var symbol = l298; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), cdr: v850}) : ((((function(){ - var tmp = v851; + })(), cdr: v856}) : ((((function(){ + var tmp = v857; return (typeof tmp == 'object' && 'car' in tmp); - })()?l4.value: l5.value) !== l5.value ? (function(v853){ - return (v853 !== l5.value ? v853 : (((function(){ - var tmp = v851; + })()?l4.value: l5.value) !== l5.value ? (function(v859){ + return (v859 !== l5.value ? v859 : (((function(){ + var tmp = v857; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l300; @@ -7743,7 +7754,7 @@ var l319 = {name: "NULL-OR-QUOTED"}; return value; })())?l4.value: l5.value)); })((((function(){ - var tmp = v851; + var tmp = v857; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l298; @@ -7751,63 +7762,63 @@ var l319 = {name: "NULL-OR-QUOTED"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value)) : l5.value) !== l5.value ? ({car: (function(){ - var tmp = v851; + var tmp = v857; return tmp === l5.value? l5.value: tmp.car; - })(), cdr: l68.fvalue(pv, v850, (function(){ - var tmp = v851; + })(), cdr: l68.fvalue(pv, v856, (function(){ + var tmp = v857; return tmp === l5.value? l5.value: tmp.cdr; })())}) : ({car: (function(){ var symbol = l300; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), cdr: l68.fvalue(pv, v850, l47.fvalue(pv, v851))})))); + })(), cdr: l68.fvalue(pv, v856, l47.fvalue(pv, v857))})))); })(); })); return l316; })(); (function(){ - (l309).fvalue = (function(v856){ - ((v856)["fname"] = "BQ-REMOVE-TOKENS"); - return v856; - })((function (values,v855){ + (l309).fvalue = (function(v862){ + ((v862)["fname"] = "BQ-REMOVE-TOKENS"); + return v862; + })((function (values,v861){ checkArgs(arguments, 2); return (function(){ - return (((v855 === (function(){ + return (((v861 === (function(){ var symbol = l298; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l47 : (((v855 === (function(){ + })())?l4.value: l5.value) !== l5.value ? l47 : (((v861 === (function(){ var symbol = l299; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l68 : (((v855 === (function(){ + })())?l4.value: l5.value) !== l5.value ? l68 : (((v861 === (function(){ var symbol = l301; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l127 : (((v855 === (function(){ + })())?l4.value: l5.value) !== l5.value ? l127 : (((v861 === (function(){ var symbol = l300; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l85 : (((v855 === (function(){ + })())?l4.value: l5.value) !== l5.value ? l85 : (((v861 === (function(){ var symbol = l303; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l186 : (l48.fvalue(pv, v855) !== l5.value ? v855 : ((((function(){ - var tmp = v855; + })())?l4.value: l5.value) !== l5.value ? l186 : (l48.fvalue(pv, v861) !== l5.value ? v861 : ((((function(){ + var tmp = v861; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l302; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())?l4.value: l5.value) !== l5.value ? l309.fvalue(values, l35.fvalue(pv, v855)) : (((((function(){ - var tmp = v855; + })())?l4.value: l5.value) !== l5.value ? l309.fvalue(values, l35.fvalue(pv, v861)) : (((((function(){ + var tmp = v861; return tmp === l5.value? l5.value: tmp.car; })() === (function(){ var symbol = l300; @@ -7815,40 +7826,40 @@ var l319 = {name: "NULL-OR-QUOTED"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value) !== l5.value ? (((function(){ - var tmp = l37.fvalue(pv, v855); + var tmp = l37.fvalue(pv, v861); return (typeof tmp == 'object' && 'car' in tmp); - })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v855)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l311.fvalue(pv, (function(){ + })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v861)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l311.fvalue(pv, (function(){ var symbol = l309; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), (function(){ - var tmp = v855; + var tmp = v861; return tmp === l5.value? l5.value: tmp.cdr; })())}) : l311.fvalue(values, (function(){ var symbol = l309; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v855))))))))); + })(), v861))))))))); })(); })); return l309; })(); (function(){ - var v857 = l47.fvalue(pv, l187, (function (values,v858){ + var v863 = l47.fvalue(pv, l187, (function (values,v864){ checkArgs(arguments, 2); return (function(){ - return l193.fvalue(values, l306.fvalue(pv, v858)); + return l193.fvalue(values, l306.fvalue(pv, v864)); })(); })); - var v859 = ({car: v857, cdr: (function(){ + var v865 = ({car: v863, cdr: (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l230).value = v859); + return ((l230).value = v865); })(); var l320 = {name: "*BUILTINS*"}; (function(){ @@ -7863,73 +7874,73 @@ var l323 = {name: "TYPE-CHECK"}; l323; var l324 = {name: "VARIABLE-ARITY-CALL"}; (function(){ - (l324).fvalue = (function(v872){ - ((v872)["fname"] = "VARIABLE-ARITY-CALL"); - return v872; - })((function (values,v860,v861){ + (l324).fvalue = (function(v878){ + ((v878)["fname"] = "VARIABLE-ARITY-CALL"); + return v878; + })((function (values,v866,v867){ checkArgs(arguments, 3); return (function(){ (((function(){ - var tmp = v860; + var tmp = v866; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){ throw "ARGS must be a non-empty list"; })()); - return (function(v862,v863,v864){ + return (function(v868,v869,v870){ (function(){ - return (function(v865,v866){ + return (function(v871,v872){ (function(){ - while(v865 !== l5.value){ - (v866 = (function(){ - var tmp = v865; + while(v871 !== l5.value){ + (v872 = (function(){ + var tmp = v871; return tmp === l5.value? l5.value: tmp.car; })()); (function(){ - (((typeof (v866) == "number")?l4.value: l5.value) !== l5.value ? (function(){ - var v867 = l19.fvalue(pv, v866); - var v868 = ({car: v867, cdr: v863}); - return (v863 = v868); - })() : (function(v869){ + (((typeof (v872) == "number")?l4.value: l5.value) !== l5.value ? (function(){ + var v873 = l19.fvalue(pv, v872); + var v874 = ({car: v873, cdr: v869}); + return (v869 = v874); + })() : (function(v875){ (function(){ - var v870 = v869; - var v871 = ({car: v870, cdr: v863}); - return (v863 = v871); + var v876 = v875; + var v877 = ({car: v876, cdr: v869}); + return (v869 = v877); })(); - return (v864 = l157.fvalue(pv, v864, l191.fvalue(pv, "var ", v869, " = ", l193.fvalue(pv, v866), ";", (function(){ + return (v870 = l157.fvalue(pv, v870, l191.fvalue(pv, "var ", v875, " = ", l193.fvalue(pv, v872), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "if (typeof ", v869, " !== 'number') throw 'Not a number!';", (function(){ + })(), "if (typeof ", v875, " !== 'number') throw 'Not a number!';", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()))); - })(l191.fvalue(pv, "x", (v862 = (function(){ - var x1 = v862; + })(l191.fvalue(pv, "x", (v868 = (function(){ + var x1 = v868; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })())))); return l5.value; })(); - (v865 = (function(){ - var tmp = v865; + (v871 = (function(){ + var tmp = v871; return tmp === l5.value? l5.value: tmp.cdr; })()); }return l5.value; })(); return l5.value; - })(v860,l5.value); + })(v866,l5.value); })(); return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, v864, (function(){ - var f = v861; - return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v863)) + })(), l195.fvalue(pv, v870, (function(){ + var f = v867; + return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v869)) })()), "})()"); })(0,l5,""); })(); @@ -7940,10 +7951,10 @@ var l325 = {name: "VARIABLE-ARITY"}; l325; var l326 = {name: "NUM-OP-NUM"}; (function(){ - (l326).fvalue = (function(v876){ - ((v876)["fname"] = "NUM-OP-NUM"); - return v876; - })((function (values,v873,v874,v875){ + (l326).fvalue = (function(v882){ + ((v882)["fname"] = "NUM-OP-NUM"); + return v882; + })((function (values,v879,v880,v881){ checkArgs(arguments, 4); return (function(){ return l191.fvalue(values, "(function(){", (function(){ @@ -7951,12 +7962,12 @@ var l326 = {name: "NUM-OP-NUM"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v873, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v879, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l191.fvalue(pv, "var ", "y", " = ", v875, ";", (function(){ + })()), l191.fvalue(pv, "var ", "y", " = ", v881, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7981,7 +7992,7 @@ var l326 = {name: "NUM-OP-NUM"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "x", v874, "y"), ";", (function(){ + })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "x", v880, "y"), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -7992,15 +8003,15 @@ var l326 = {name: "NUM-OP-NUM"}; return l326; })(); (function(){ - var v877 = l47.fvalue(pv, l65, (function (values){ - var v878= l5.value; + var v883 = l47.fvalue(pv, l65, (function (values){ + var v884= l5.value; for (var i = arguments.length-1; i>=1; i--) - v878 = {car: arguments[i], cdr: - v878}; + v884 = {car: arguments[i], cdr: + v884}; return (function(){ - return (l13.fvalue(pv, v878) !== l5.value ? "0" : l324.fvalue(values, v878, (function (values,v879){ + return (l13.fvalue(pv, v884) !== l5.value ? "0" : l324.fvalue(values, v884, (function (values,v885){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l159.fvalue(pv, v879, "+"), ";", (function(){ + return l191.fvalue(values, "return ", l159.fvalue(pv, v885, "+"), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8009,56 +8020,56 @@ var l326 = {name: "NUM-OP-NUM"}; }))); })(); })); - var v880 = ({car: v877, cdr: (function(){ + var v886 = ({car: v883, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v880); + return ((l320).value = v886); })(); (function(){ - var v881 = l47.fvalue(pv, l66, (function (values,v883){ + var v887 = l47.fvalue(pv, l66, (function (values,v889){ checkArgsAtLeast(arguments, 2); - var v882= l5.value; + var v888= l5.value; for (var i = arguments.length-1; i>=2; i--) - v882 = {car: arguments[i], cdr: - v882}; + v888 = {car: arguments[i], cdr: + v888}; return (function(){ - return (function(v884){ - return l324.fvalue(values, v884, (function (values,v885){ + return (function(v890){ + return l324.fvalue(values, v890, (function (values,v891){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", (l13.fvalue(pv, v882) !== l5.value ? l157.fvalue(pv, "-", (function(){ - var tmp = v885; + return l191.fvalue(values, "return ", (l13.fvalue(pv, v888) !== l5.value ? l157.fvalue(pv, "-", (function(){ + var tmp = v891; return tmp === l5.value? l5.value: tmp.car; - })()) : l159.fvalue(pv, v885, "-")), ";", (function(){ + })()) : l159.fvalue(pv, v891, "-")), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); })); - })(({car: v883, cdr: v882})); + })(({car: v889, cdr: v888})); })(); })); - var v886 = ({car: v881, cdr: (function(){ + var v892 = ({car: v887, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v886); + return ((l320).value = v892); })(); (function(){ - var v887 = l47.fvalue(pv, l22, (function (values){ - var v888= l5.value; + var v893 = l47.fvalue(pv, l22, (function (values){ + var v894= l5.value; for (var i = arguments.length-1; i>=1; i--) - v888 = {car: arguments[i], cdr: - v888}; + v894 = {car: arguments[i], cdr: + v894}; return (function(){ - return (l13.fvalue(pv, v888) !== l5.value ? "1" : l324.fvalue(values, v888, (function (values,v889){ + return (l13.fvalue(pv, v894) !== l5.value ? "1" : l324.fvalue(values, v894, (function (values,v895){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l159.fvalue(pv, v889, "*"), ";", (function(){ + return l191.fvalue(values, "return ", l159.fvalue(pv, v895, "*"), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8067,85 +8078,85 @@ var l326 = {name: "NUM-OP-NUM"}; }))); })(); })); - var v890 = ({car: v887, cdr: (function(){ + var v896 = ({car: v893, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v890); + return ((l320).value = v896); })(); (function(){ - var v891 = l47.fvalue(pv, l23, (function (values,v893){ + var v897 = l47.fvalue(pv, l23, (function (values,v899){ checkArgsAtLeast(arguments, 2); - var v892= l5.value; + var v898= l5.value; for (var i = arguments.length-1; i>=2; i--) - v892 = {car: arguments[i], cdr: - v892}; + v898 = {car: arguments[i], cdr: + v898}; return (function(){ - return (function(v894){ - return l324.fvalue(values, v894, (function (values,v895){ + return (function(v900){ + return l324.fvalue(values, v900, (function (values,v901){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", (l13.fvalue(pv, v892) !== l5.value ? l157.fvalue(pv, "1 /", (function(){ - var tmp = v895; + return l191.fvalue(values, "return ", (l13.fvalue(pv, v898) !== l5.value ? l157.fvalue(pv, "1 /", (function(){ + var tmp = v901; return tmp === l5.value? l5.value: tmp.car; - })()) : l159.fvalue(pv, v895, "/")), ";", (function(){ + })()) : l159.fvalue(pv, v901, "/")), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); })); - })(({car: v893, cdr: v892})); + })(({car: v899, cdr: v898})); })(); })); - var v896 = ({car: v891, cdr: (function(){ + var v902 = ({car: v897, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v896); + return ((l320).value = v902); })(); var l327 = {name: "MOD"}; (function(){ - var v897 = l47.fvalue(pv, l327, (function (values,v898,v899){ + var v903 = l47.fvalue(pv, l327, (function (values,v904,v905){ checkArgs(arguments, 3); return (function(){ - return (function(v900,v901){ - return l326.fvalue(values, v900, "%", v901); - })(l193.fvalue(pv, v898),l193.fvalue(pv, v899)); + return (function(v906,v907){ + return l326.fvalue(values, v906, "%", v907); + })(l193.fvalue(pv, v904),l193.fvalue(pv, v905)); })(); })); - var v902 = ({car: v897, cdr: (function(){ + var v908 = ({car: v903, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v902); + return ((l320).value = v908); })(); var l328 = {name: "COMPARISON-CONJUNTION"}; (function(){ - (l328).fvalue = (function(v905){ - ((v905)["fname"] = "COMPARISON-CONJUNTION"); - return v905; - })((function (values,v903,v904){ + (l328).fvalue = (function(v911){ + ((v911)["fname"] = "COMPARISON-CONJUNTION"); + return v911; + })((function (values,v909,v910){ checkArgs(arguments, 3); return (function(){ return (l13.fvalue(pv, (function(){ - var tmp = v903; + var tmp = v909; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v903)) !== l5.value ? l157.fvalue(values, (function(){ - var tmp = v903; + })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v909)) !== l5.value ? l157.fvalue(values, (function(){ + var tmp = v909; return tmp === l5.value? l5.value: tmp.car; - })(), v904, l35.fvalue(pv, v903)) : l157.fvalue(values, (function(){ - var tmp = v903; + })(), v910, l35.fvalue(pv, v909)) : l157.fvalue(values, (function(){ + var tmp = v909; return tmp === l5.value? l5.value: tmp.car; - })(), v904, l35.fvalue(pv, v903), " && ", l328.fvalue(pv, (function(){ - var tmp = v903; + })(), v910, l35.fvalue(pv, v909), " && ", l328.fvalue(pv, (function(){ + var tmp = v909; return tmp === l5.value? l5.value: tmp.cdr; - })(), v904)))); + })(), v910)))); })(); })); return l328; @@ -8154,37 +8165,7 @@ var l329 = {name: "DEFINE-BUILTIN-COMPARISON"}; l329; var l330 = {name: ">"}; (function(){ - var v906 = l47.fvalue(pv, l330, (function (values,v908){ - checkArgsAtLeast(arguments, 2); - var v907= l5.value; - for (var i = arguments.length-1; i>=2; i--) - v907 = {car: arguments[i], cdr: - v907}; - return (function(){ - return (function(v909){ - return l324.fvalue(values, v909, (function (values,v910){ - checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v910, ">")), ";", (function(){ - var symbol = l156; - var value = symbol.value; - if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; - return value; - })()); - })); - })(({car: v908, cdr: v907})); - })(); - })); - var v911 = ({car: v906, cdr: (function(){ - var symbol = l320; - var value = symbol.value; - if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; - return value; - })()}); - return ((l320).value = v911); -})(); -var l331 = {name: "<"}; -(function(){ - var v912 = l47.fvalue(pv, l331, (function (values,v914){ + var v912 = l47.fvalue(pv, l330, (function (values,v914){ checkArgsAtLeast(arguments, 2); var v913= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -8194,7 +8175,7 @@ var l331 = {name: "<"}; return (function(v915){ return l324.fvalue(values, v915, (function (values,v916){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v916, "<")), ";", (function(){ + return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v916, ">")), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8212,9 +8193,9 @@ var l331 = {name: "<"}; })()}); return ((l320).value = v917); })(); -var l332 = {name: ">="}; +var l331 = {name: "<"}; (function(){ - var v918 = l47.fvalue(pv, l332, (function (values,v920){ + var v918 = l47.fvalue(pv, l331, (function (values,v920){ checkArgsAtLeast(arguments, 2); var v919= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -8224,7 +8205,7 @@ var l332 = {name: ">="}; return (function(v921){ return l324.fvalue(values, v921, (function (values,v922){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v922, ">=")), ";", (function(){ + return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v922, "<")), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8242,9 +8223,9 @@ var l332 = {name: ">="}; })()}); return ((l320).value = v923); })(); -var l333 = {name: "<="}; +var l332 = {name: ">="}; (function(){ - var v924 = l47.fvalue(pv, l333, (function (values,v926){ + var v924 = l47.fvalue(pv, l332, (function (values,v926){ checkArgsAtLeast(arguments, 2); var v925= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -8254,7 +8235,7 @@ var l333 = {name: "<="}; return (function(v927){ return l324.fvalue(values, v927, (function (values,v928){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v928, "<=")), ";", (function(){ + return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v928, ">=")), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8272,8 +8253,9 @@ var l333 = {name: "<="}; })()}); return ((l320).value = v929); })(); +var l333 = {name: "<="}; (function(){ - var v930 = l47.fvalue(pv, l21, (function (values,v932){ + var v930 = l47.fvalue(pv, l333, (function (values,v932){ checkArgsAtLeast(arguments, 2); var v931= l5.value; for (var i = arguments.length-1; i>=2; i--) @@ -8283,7 +8265,7 @@ var l333 = {name: "<="}; return (function(v933){ return l324.fvalue(values, v933, (function (values,v934){ checkArgs(arguments, 2); - return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v934, "==")), ";", (function(){ + return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v934, "<=")), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8301,36 +8283,65 @@ var l333 = {name: "<="}; })()}); return ((l320).value = v935); })(); +(function(){ + var v936 = l47.fvalue(pv, l21, (function (values,v938){ + checkArgsAtLeast(arguments, 2); + var v937= l5.value; + for (var i = arguments.length-1; i>=2; i--) + v937 = {car: arguments[i], cdr: + v937}; + return (function(){ + return (function(v939){ + return l324.fvalue(values, v939, (function (values,v940){ + checkArgs(arguments, 2); + return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v940, "==")), ";", (function(){ + var symbol = l156; + var value = symbol.value; + if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; + return value; + })()); + })); + })(({car: v938, cdr: v937})); + })(); + })); + var v941 = ({car: v936, cdr: (function(){ + var symbol = l320; + var value = symbol.value; + if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; + return value; + })()}); + return ((l320).value = v941); +})(); var l334 = {name: "NUMBERP"}; (function(){ - var v936 = l47.fvalue(pv, l334, (function (values,v937){ + var v942 = l47.fvalue(pv, l334, (function (values,v943){ checkArgs(arguments, 2); return (function(){ - return (function(v938){ - return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v938, ") == \"number\")")); - })(l193.fvalue(pv, v937)); + return (function(v944){ + return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v944, ") == \"number\")")); + })(l193.fvalue(pv, v943)); })(); })); - var v939 = ({car: v936, cdr: (function(){ + var v945 = ({car: v942, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v939); + return ((l320).value = v945); })(); var l335 = {name: "FLOOR"}; (function(){ - var v940 = l47.fvalue(pv, l335, (function (values,v941){ + var v946 = l47.fvalue(pv, l335, (function (values,v947){ checkArgs(arguments, 2); return (function(){ - return (function(v942){ + return (function(v948){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v942, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v948, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8351,45 +8362,45 @@ var l335 = {name: "FLOOR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v941)); + })(l193.fvalue(pv, v947)); })(); })); - var v943 = ({car: v940, cdr: (function(){ + var v949 = ({car: v946, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v943); + return ((l320).value = v949); })(); (function(){ - var v944 = l47.fvalue(pv, l30, (function (values,v945,v946){ + var v950 = l47.fvalue(pv, l30, (function (values,v951,v952){ checkArgs(arguments, 3); return (function(){ - return (function(v947,v948){ - return l191.fvalue(values, "({car: ", v947, ", cdr: ", v948, "})"); - })(l193.fvalue(pv, v945),l193.fvalue(pv, v946)); + return (function(v953,v954){ + return l191.fvalue(values, "({car: ", v953, ", cdr: ", v954, "})"); + })(l193.fvalue(pv, v951),l193.fvalue(pv, v952)); })(); })); - var v949 = ({car: v944, cdr: (function(){ + var v955 = ({car: v950, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v949); + return ((l320).value = v955); })(); (function(){ - var v950 = l47.fvalue(pv, l31, (function (values,v951){ + var v956 = l47.fvalue(pv, l31, (function (values,v957){ checkArgs(arguments, 2); return (function(){ - return (function(v952){ + return (function(v958){ return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var tmp = ", v952, ";", (function(){ + })(), l195.fvalue(pv, "var tmp = ", v958, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8400,28 +8411,28 @@ var l335 = {name: "FLOOR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()")); - })(l193.fvalue(pv, v951)); + })(l193.fvalue(pv, v957)); })(); })); - var v953 = ({car: v950, cdr: (function(){ + var v959 = ({car: v956, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v953); + return ((l320).value = v959); })(); (function(){ - var v954 = l47.fvalue(pv, l32, (function (values,v955){ + var v960 = l47.fvalue(pv, l32, (function (values,v961){ checkArgs(arguments, 2); return (function(){ - return (function(v956){ + return (function(v962){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var tmp = ", v956, ";", (function(){ + })(), l195.fvalue(pv, "var tmp = ", v962, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8432,28 +8443,28 @@ var l335 = {name: "FLOOR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v955)); + })(l193.fvalue(pv, v961)); })(); })); - var v957 = ({car: v954, cdr: (function(){ + var v963 = ({car: v960, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v957); + return ((l320).value = v963); })(); (function(){ - var v958 = l47.fvalue(pv, l33, (function (values,v959){ + var v964 = l47.fvalue(pv, l33, (function (values,v965){ checkArgs(arguments, 2); return (function(){ - return (function(v960){ + return (function(v966){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var tmp = ", v960, ";", (function(){ + })(), l195.fvalue(pv, "var tmp = ", v966, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8464,28 +8475,28 @@ var l335 = {name: "FLOOR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v959)); + })(l193.fvalue(pv, v965)); })(); })); - var v961 = ({car: v958, cdr: (function(){ + var v967 = ({car: v964, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v961); + return ((l320).value = v967); })(); (function(){ - var v962 = l47.fvalue(pv, l124, (function (values,v963,v964){ + var v968 = l47.fvalue(pv, l124, (function (values,v969,v970){ checkArgs(arguments, 3); return (function(){ - return (function(v965,v966){ + return (function(v971,v972){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v965, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v971, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8500,34 +8511,34 @@ var l335 = {name: "FLOOR"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.car = ", v966, ", x)"), ";", (function(){ + })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.car = ", v972, ", x)"), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v963),l193.fvalue(pv, v964)); + })(l193.fvalue(pv, v969),l193.fvalue(pv, v970)); })(); })); - var v967 = ({car: v962, cdr: (function(){ + var v973 = ({car: v968, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v967); + return ((l320).value = v973); })(); (function(){ - var v968 = l47.fvalue(pv, l125, (function (values,v969,v970){ + var v974 = l47.fvalue(pv, l125, (function (values,v975,v976){ checkArgs(arguments, 3); return (function(){ - return (function(v971,v972){ + return (function(v977,v978){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v971, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v977, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8542,35 +8553,35 @@ var l335 = {name: "FLOOR"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.cdr = ", v972, ", x)"), ";", (function(){ + })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.cdr = ", v978, ", x)"), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v969),l193.fvalue(pv, v970)); + })(l193.fvalue(pv, v975),l193.fvalue(pv, v976)); })(); })); - var v973 = ({car: v968, cdr: (function(){ + var v979 = ({car: v974, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v973); + return ((l320).value = v979); })(); var l336 = {name: "SYMBOLP"}; (function(){ - var v974 = l47.fvalue(pv, l336, (function (values,v975){ + var v980 = l47.fvalue(pv, l336, (function (values,v981){ checkArgs(arguments, 2); return (function(){ - return (function(v976){ + return (function(v982){ return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var tmp = ", v976, ";", (function(){ + })(), l195.fvalue(pv, "var tmp = ", v982, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8581,29 +8592,29 @@ var l336 = {name: "SYMBOLP"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()")); - })(l193.fvalue(pv, v975)); + })(l193.fvalue(pv, v981)); })(); })); - var v977 = ({car: v974, cdr: (function(){ + var v983 = ({car: v980, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v977); + return ((l320).value = v983); })(); var l337 = {name: "MAKE-SYMBOL"}; (function(){ - var v978 = l47.fvalue(pv, l337, (function (values,v979){ + var v984 = l47.fvalue(pv, l337, (function (values,v985){ checkArgs(arguments, 2); return (function(){ - return (function(v980){ + return (function(v986){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "name", " = ", v980, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "name", " = ", v986, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8624,99 +8635,99 @@ var l337 = {name: "MAKE-SYMBOL"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v979)); + })(l193.fvalue(pv, v985)); })(); })); - var v981 = ({car: v978, cdr: (function(){ + var v987 = ({car: v984, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v981); + return ((l320).value = v987); })(); var l338 = {name: "SYMBOL-NAME"}; (function(){ - var v982 = l47.fvalue(pv, l338, (function (values,v983){ + var v988 = l47.fvalue(pv, l338, (function (values,v989){ checkArgs(arguments, 2); return (function(){ - return (function(v984){ - return l191.fvalue(values, "(", v984, ").name"); - })(l193.fvalue(pv, v983)); + return (function(v990){ + return l191.fvalue(values, "(", v990, ").name"); + })(l193.fvalue(pv, v989)); })(); })); - var v985 = ({car: v982, cdr: (function(){ + var v991 = ({car: v988, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v985); + return ((l320).value = v991); })(); (function(){ - var v986 = l47.fvalue(pv, l256, (function (values,v987,v988){ + var v992 = l47.fvalue(pv, l256, (function (values,v993,v994){ checkArgs(arguments, 3); return (function(){ - return (function(v989,v990){ - return l191.fvalue(values, "(", v989, ").value = ", v990); - })(l193.fvalue(pv, v987),l193.fvalue(pv, v988)); + return (function(v995,v996){ + return l191.fvalue(values, "(", v995, ").value = ", v996); + })(l193.fvalue(pv, v993),l193.fvalue(pv, v994)); })(); })); - var v991 = ({car: v986, cdr: (function(){ + var v997 = ({car: v992, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v991); + return ((l320).value = v997); })(); var l339 = {name: "FSET"}; (function(){ - var v992 = l47.fvalue(pv, l339, (function (values,v993,v994){ + var v998 = l47.fvalue(pv, l339, (function (values,v999,v1000){ checkArgs(arguments, 3); return (function(){ - return (function(v995,v996){ - return l191.fvalue(values, "(", v995, ").fvalue = ", v996); - })(l193.fvalue(pv, v993),l193.fvalue(pv, v994)); + return (function(v1001,v1002){ + return l191.fvalue(values, "(", v1001, ").fvalue = ", v1002); + })(l193.fvalue(pv, v999),l193.fvalue(pv, v1000)); })(); })); - var v997 = ({car: v992, cdr: (function(){ + var v1003 = ({car: v998, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v997); + return ((l320).value = v1003); })(); (function(){ - var v998 = l47.fvalue(pv, l20, (function (values,v999){ + var v1004 = l47.fvalue(pv, l20, (function (values,v1005){ checkArgs(arguments, 2); return (function(){ - return (function(v1000){ - return l192.fvalue(values, l191.fvalue(pv, "(", v1000, ".value !== undefined)")); - })(l193.fvalue(pv, v999)); + return (function(v1006){ + return l192.fvalue(values, l191.fvalue(pv, "(", v1006, ".value !== undefined)")); + })(l193.fvalue(pv, v1005)); })(); })); - var v1001 = ({car: v998, cdr: (function(){ + var v1007 = ({car: v1004, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1001); + return ((l320).value = v1007); })(); var l340 = {name: "SYMBOL-VALUE"}; (function(){ - var v1002 = l47.fvalue(pv, l340, (function (values,v1003){ + var v1008 = l47.fvalue(pv, l340, (function (values,v1009){ checkArgs(arguments, 2); return (function(){ - return (function(v1004){ + return (function(v1010){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var symbol = ", v1004, ";", (function(){ + })(), l195.fvalue(pv, "var symbol = ", v1010, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8737,28 +8748,28 @@ var l340 = {name: "SYMBOL-VALUE"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1003)); + })(l193.fvalue(pv, v1009)); })(); })); - var v1005 = ({car: v1002, cdr: (function(){ + var v1011 = ({car: v1008, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1005); + return ((l320).value = v1011); })(); (function(){ - var v1006 = l47.fvalue(pv, l264, (function (values,v1007){ + var v1012 = l47.fvalue(pv, l264, (function (values,v1013){ checkArgs(arguments, 2); return (function(){ - return (function(v1008){ + return (function(v1014){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var symbol = ", v1008, ";", (function(){ + })(), l195.fvalue(pv, "var symbol = ", v1014, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8779,101 +8790,101 @@ var l340 = {name: "SYMBOL-VALUE"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1007)); + })(l193.fvalue(pv, v1013)); })(); })); - var v1009 = ({car: v1006, cdr: (function(){ + var v1015 = ({car: v1012, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1009); + return ((l320).value = v1015); })(); var l341 = {name: "SYMBOL-PLIST"}; (function(){ - var v1010 = l47.fvalue(pv, l341, (function (values,v1011){ + var v1016 = l47.fvalue(pv, l341, (function (values,v1017){ checkArgs(arguments, 2); return (function(){ - return (function(v1012){ - return l191.fvalue(values, "((", v1012, ").plist || ", l193.fvalue(pv, l5.value), ")"); - })(l193.fvalue(pv, v1011)); + return (function(v1018){ + return l191.fvalue(values, "((", v1018, ").plist || ", l193.fvalue(pv, l5.value), ")"); + })(l193.fvalue(pv, v1017)); })(); })); - var v1013 = ({car: v1010, cdr: (function(){ + var v1019 = ({car: v1016, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1013); + return ((l320).value = v1019); })(); var l342 = {name: "LAMBDA-CODE"}; (function(){ - var v1014 = l47.fvalue(pv, l342, (function (values,v1015){ + var v1020 = l47.fvalue(pv, l342, (function (values,v1021){ checkArgs(arguments, 2); return (function(){ - return (function(v1016){ - return l191.fvalue(values, "(", v1016, ").toString()"); - })(l193.fvalue(pv, v1015)); + return (function(v1022){ + return l191.fvalue(values, "(", v1022, ").toString()"); + })(l193.fvalue(pv, v1021)); })(); })); - var v1017 = ({car: v1014, cdr: (function(){ + var v1023 = ({car: v1020, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1017); + return ((l320).value = v1023); })(); var l343 = {name: "EQ"}; (function(){ - var v1018 = l47.fvalue(pv, l343, (function (values,v1019,v1020){ + var v1024 = l47.fvalue(pv, l343, (function (values,v1025,v1026){ checkArgs(arguments, 3); return (function(){ - return (function(v1021,v1022){ - return l192.fvalue(values, l191.fvalue(pv, "(", v1021, " === ", v1022, ")")); - })(l193.fvalue(pv, v1019),l193.fvalue(pv, v1020)); + return (function(v1027,v1028){ + return l192.fvalue(values, l191.fvalue(pv, "(", v1027, " === ", v1028, ")")); + })(l193.fvalue(pv, v1025),l193.fvalue(pv, v1026)); })(); })); - var v1023 = ({car: v1018, cdr: (function(){ + var v1029 = ({car: v1024, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1023); + return ((l320).value = v1029); })(); var l344 = {name: "EQUAL"}; (function(){ - var v1024 = l47.fvalue(pv, l344, (function (values,v1025,v1026){ + var v1030 = l47.fvalue(pv, l344, (function (values,v1031,v1032){ checkArgs(arguments, 3); return (function(){ - return (function(v1027,v1028){ - return l192.fvalue(values, l191.fvalue(pv, "(", v1027, " == ", v1028, ")")); - })(l193.fvalue(pv, v1025),l193.fvalue(pv, v1026)); + return (function(v1033,v1034){ + return l192.fvalue(values, l191.fvalue(pv, "(", v1033, " == ", v1034, ")")); + })(l193.fvalue(pv, v1031),l193.fvalue(pv, v1032)); })(); })); - var v1029 = ({car: v1024, cdr: (function(){ + var v1035 = ({car: v1030, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1029); + return ((l320).value = v1035); })(); var l345 = {name: "CHAR-TO-STRING"}; (function(){ - var v1030 = l47.fvalue(pv, l345, (function (values,v1031){ + var v1036 = l47.fvalue(pv, l345, (function (values,v1037){ checkArgs(arguments, 2); return (function(){ - return (function(v1032){ + return (function(v1038){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1032, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1038, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8894,47 +8905,47 @@ var l345 = {name: "CHAR-TO-STRING"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1031)); + })(l193.fvalue(pv, v1037)); })(); })); - var v1033 = ({car: v1030, cdr: (function(){ + var v1039 = ({car: v1036, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1033); + return ((l320).value = v1039); })(); var l346 = {name: "STRINGP"}; (function(){ - var v1034 = l47.fvalue(pv, l346, (function (values,v1035){ + var v1040 = l47.fvalue(pv, l346, (function (values,v1041){ checkArgs(arguments, 2); return (function(){ - return (function(v1036){ - return l192.fvalue(values, l191.fvalue(pv, "(typeof(", v1036, ") == \"string\")")); - })(l193.fvalue(pv, v1035)); + return (function(v1042){ + return l192.fvalue(values, l191.fvalue(pv, "(typeof(", v1042, ") == \"string\")")); + })(l193.fvalue(pv, v1041)); })(); })); - var v1037 = ({car: v1034, cdr: (function(){ + var v1043 = ({car: v1040, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1037); + return ((l320).value = v1043); })(); var l347 = {name: "STRING-UPCASE"}; (function(){ - var v1038 = l47.fvalue(pv, l347, (function (values,v1039){ + var v1044 = l47.fvalue(pv, l347, (function (values,v1045){ checkArgs(arguments, 2); return (function(){ - return (function(v1040){ + return (function(v1046){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1040, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1046, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8955,29 +8966,29 @@ var l347 = {name: "STRING-UPCASE"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1039)); + })(l193.fvalue(pv, v1045)); })(); })); - var v1041 = ({car: v1038, cdr: (function(){ + var v1047 = ({car: v1044, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1041); + return ((l320).value = v1047); })(); var l348 = {name: "STRING-LENGTH"}; (function(){ - var v1042 = l47.fvalue(pv, l348, (function (values,v1043){ + var v1048 = l47.fvalue(pv, l348, (function (values,v1049){ checkArgs(arguments, 2); return (function(){ - return (function(v1044){ + return (function(v1050){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1044, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1050, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -8998,26 +9009,26 @@ var l348 = {name: "STRING-LENGTH"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1043)); + })(l193.fvalue(pv, v1049)); })(); })); - var v1045 = ({car: v1042, cdr: (function(){ + var v1051 = ({car: v1048, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1045); + return ((l320).value = v1051); })(); var l349 = {name: "SLICE"}; (function(){ - var v1046 = l47.fvalue(pv, l349, (function (values,v1047,v1048,v1049){ + var v1052 = l47.fvalue(pv, l349, (function (values,v1053,v1054,v1055){ checkArgsAtLeast(arguments, 3); checkArgsAtMost(arguments, 4); - var v1049; + var v1055; switch(arguments.length-1){ case 2: - v1049=l5.value; + v1055=l5.value; default: break; } return (function(){ @@ -9026,12 +9037,12 @@ var l349 = {name: "SLICE"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var str = ", l193.fvalue(pv, v1047), ";", (function(){ + })(), l195.fvalue(pv, "var str = ", l193.fvalue(pv, v1053), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var a = ", l193.fvalue(pv, v1048), ";", (function(){ + })(), "var a = ", l193.fvalue(pv, v1054), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9041,7 +9052,7 @@ var l349 = {name: "SLICE"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), (v1049 !== l5.value ? l191.fvalue(pv, "b = ", l193.fvalue(pv, v1049), ";", (function(){ + })(), (v1055 !== l5.value ? l191.fvalue(pv, "b = ", l193.fvalue(pv, v1055), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9054,31 +9065,31 @@ var l349 = {name: "SLICE"}; })()), "})()"); })(); })); - var v1050 = ({car: v1046, cdr: (function(){ + var v1056 = ({car: v1052, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1050); + return ((l320).value = v1056); })(); var l350 = {name: "CHAR"}; (function(){ - var v1051 = l47.fvalue(pv, l350, (function (values,v1052,v1053){ + var v1057 = l47.fvalue(pv, l350, (function (values,v1058,v1059){ checkArgs(arguments, 3); return (function(){ - return (function(v1054,v1055){ + return (function(v1060,v1061){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1054, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1060, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l191.fvalue(pv, "var ", "index", " = ", v1055, ";", (function(){ + })()), l191.fvalue(pv, "var ", "index", " = ", v1061, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9109,33 +9120,33 @@ var l350 = {name: "CHAR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1052),l193.fvalue(pv, v1053)); + })(l193.fvalue(pv, v1058),l193.fvalue(pv, v1059)); })(); })); - var v1056 = ({car: v1051, cdr: (function(){ + var v1062 = ({car: v1057, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1056); + return ((l320).value = v1062); })(); (function(){ - var v1057 = l47.fvalue(pv, l76, (function (values,v1058,v1059){ + var v1063 = l47.fvalue(pv, l76, (function (values,v1064,v1065){ checkArgs(arguments, 3); return (function(){ - return (function(v1060,v1061){ + return (function(v1066,v1067){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string1", " = ", v1060, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string1", " = ", v1066, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l191.fvalue(pv, "var ", "string2", " = ", v1061, ";", (function(){ + })()), l191.fvalue(pv, "var ", "string2", " = ", v1067, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9166,32 +9177,32 @@ var l350 = {name: "CHAR"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1058),l193.fvalue(pv, v1059)); + })(l193.fvalue(pv, v1064),l193.fvalue(pv, v1065)); })(); })); - var v1062 = ({car: v1057, cdr: (function(){ + var v1068 = ({car: v1063, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1062); + return ((l320).value = v1068); })(); var l351 = {name: "FUNCALL"}; (function(){ - var v1063 = l47.fvalue(pv, l351, (function (values,v1065){ + var v1069 = l47.fvalue(pv, l351, (function (values,v1071){ checkArgsAtLeast(arguments, 2); - var v1064= l5.value; + var v1070= l5.value; for (var i = arguments.length-1; i>=2; i--) - v1064 = {car: arguments[i], cdr: - v1064}; + v1070 = {car: arguments[i], cdr: + v1070}; return (function(){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1065), ";", (function(){ + })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1071), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9206,33 +9217,33 @@ var l351 = {name: "FUNCALL"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1064)}), ", "), ")"), "})()"); + })(), v1070)}), ", "), ")"), "})()"); })(); })); - var v1066 = ({car: v1063, cdr: (function(){ + var v1072 = ({car: v1069, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1066); + return ((l320).value = v1072); })(); var l352 = {name: "APPLY"}; (function(){ - var v1067 = l47.fvalue(pv, l352, (function (values,v1069){ + var v1073 = l47.fvalue(pv, l352, (function (values,v1075){ checkArgsAtLeast(arguments, 2); - var v1068= l5.value; + var v1074= l5.value; for (var i = arguments.length-1; i>=2; i--) - v1068 = {car: arguments[i], cdr: - v1068}; + v1074 = {car: arguments[i], cdr: + v1074}; return (function(){ - return (l13.fvalue(pv, v1068) !== l5.value ? l191.fvalue(values, "(", l193.fvalue(pv, v1069), ")()") : (function(v1070,v1071){ + return (l13.fvalue(pv, v1074) !== l5.value ? l191.fvalue(values, "(", l193.fvalue(pv, v1075), ")()") : (function(v1076,v1077){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1069), ";", (function(){ + })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1075), ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9247,12 +9258,12 @@ var l352 = {name: "APPLY"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1070)}), ", "), "];", (function(){ + })(), v1076)}), ", "), "];", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var tail = (", l193.fvalue(pv, v1071), ");", (function(){ + })(), "var tail = (", l193.fvalue(pv, v1077), ");", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9283,32 +9294,32 @@ var l352 = {name: "APPLY"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l95.fvalue(pv, v1068),(function(){ - var tmp = l94.fvalue(pv, v1068); + })(l95.fvalue(pv, v1074),(function(){ + var tmp = l94.fvalue(pv, v1074); return tmp === l5.value? l5.value: tmp.car; })())); })(); })); - var v1072 = ({car: v1067, cdr: (function(){ + var v1078 = ({car: v1073, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1072); + return ((l320).value = v1078); })(); var l353 = {name: "JS-EVAL"}; (function(){ - var v1073 = l47.fvalue(pv, l353, (function (values,v1074){ + var v1079 = l47.fvalue(pv, l353, (function (values,v1080){ checkArgs(arguments, 2); return (function(){ - return (function(v1075){ + return (function(v1081){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1075, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1081, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9369,48 +9380,48 @@ var l353 = {name: "JS-EVAL"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1074)); + })(l193.fvalue(pv, v1080)); })(); })); - var v1076 = ({car: v1073, cdr: (function(){ + var v1082 = ({car: v1079, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1076); + return ((l320).value = v1082); })(); var l354 = {name: "ERROR"}; (function(){ - var v1077 = l47.fvalue(pv, l354, (function (values,v1078){ + var v1083 = l47.fvalue(pv, l354, (function (values,v1084){ checkArgs(arguments, 2); return (function(){ - return (function(v1079){ + return (function(v1085){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "throw ", v1079, ";", (function(){ + })(), l195.fvalue(pv, "throw ", v1085, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1078)); + })(l193.fvalue(pv, v1084)); })(); })); - var v1080 = ({car: v1077, cdr: (function(){ + var v1086 = ({car: v1083, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1080); + return ((l320).value = v1086); })(); var l355 = {name: "NEW"}; (function(){ - var v1081 = l47.fvalue(pv, l355, (function (values){ + var v1087 = l47.fvalue(pv, l355, (function (values){ checkArgsAtMost(arguments, 1); return (function(){ return (function(){ @@ -9418,44 +9429,44 @@ var l355 = {name: "NEW"}; })(); })(); })); - var v1082 = ({car: v1081, cdr: (function(){ + var v1088 = ({car: v1087, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1082); + return ((l320).value = v1088); })(); var l356 = {name: "OBJECTP"}; (function(){ - var v1083 = l47.fvalue(pv, l356, (function (values,v1084){ + var v1089 = l47.fvalue(pv, l356, (function (values,v1090){ checkArgs(arguments, 2); return (function(){ - return (function(v1085){ - return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v1085, ") === 'object')")); - })(l193.fvalue(pv, v1084)); + return (function(v1091){ + return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v1091, ") === 'object')")); + })(l193.fvalue(pv, v1090)); })(); })); - var v1086 = ({car: v1083, cdr: (function(){ + var v1092 = ({car: v1089, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1086); + return ((l320).value = v1092); })(); var l357 = {name: "OGET"}; (function(){ - var v1087 = l47.fvalue(pv, l357, (function (values,v1088,v1089){ + var v1093 = l47.fvalue(pv, l357, (function (values,v1094,v1095){ checkArgs(arguments, 3); return (function(){ - return (function(v1090,v1091){ + return (function(v1096,v1097){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var tmp = ", "(", v1090, ")[", v1091, "];", (function(){ + })(), l195.fvalue(pv, "var tmp = ", "(", v1096, ")[", v1097, "];", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9466,83 +9477,83 @@ var l357 = {name: "OGET"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1088),l193.fvalue(pv, v1089)); + })(l193.fvalue(pv, v1094),l193.fvalue(pv, v1095)); })(); })); - var v1092 = ({car: v1087, cdr: (function(){ + var v1098 = ({car: v1093, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1092); + return ((l320).value = v1098); })(); var l358 = {name: "OSET"}; (function(){ - var v1093 = l47.fvalue(pv, l358, (function (values,v1094,v1095,v1096){ + var v1099 = l47.fvalue(pv, l358, (function (values,v1100,v1101,v1102){ checkArgs(arguments, 4); return (function(){ - return (function(v1097,v1098,v1099){ - return l191.fvalue(values, "((", v1097, ")[", v1098, "] = ", v1099, ")"); - })(l193.fvalue(pv, v1094),l193.fvalue(pv, v1095),l193.fvalue(pv, v1096)); + return (function(v1103,v1104,v1105){ + return l191.fvalue(values, "((", v1103, ")[", v1104, "] = ", v1105, ")"); + })(l193.fvalue(pv, v1100),l193.fvalue(pv, v1101),l193.fvalue(pv, v1102)); })(); })); - var v1100 = ({car: v1093, cdr: (function(){ + var v1106 = ({car: v1099, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1100); + return ((l320).value = v1106); })(); var l359 = {name: "IN"}; (function(){ - var v1101 = l47.fvalue(pv, l359, (function (values,v1102,v1103){ + var v1107 = l47.fvalue(pv, l359, (function (values,v1108,v1109){ checkArgs(arguments, 3); return (function(){ - return (function(v1104,v1105){ - return l192.fvalue(values, l191.fvalue(pv, "((", v1104, ") in (", v1105, "))")); - })(l193.fvalue(pv, v1102),l193.fvalue(pv, v1103)); + return (function(v1110,v1111){ + return l192.fvalue(values, l191.fvalue(pv, "((", v1110, ") in (", v1111, "))")); + })(l193.fvalue(pv, v1108),l193.fvalue(pv, v1109)); })(); })); - var v1106 = ({car: v1101, cdr: (function(){ + var v1112 = ({car: v1107, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1106); + return ((l320).value = v1112); })(); var l360 = {name: "FUNCTIONP"}; (function(){ - var v1107 = l47.fvalue(pv, l360, (function (values,v1108){ + var v1113 = l47.fvalue(pv, l360, (function (values,v1114){ checkArgs(arguments, 2); return (function(){ - return (function(v1109){ - return l192.fvalue(values, l191.fvalue(pv, "(typeof ", v1109, " == 'function')")); - })(l193.fvalue(pv, v1108)); + return (function(v1115){ + return l192.fvalue(values, l191.fvalue(pv, "(typeof ", v1115, " == 'function')")); + })(l193.fvalue(pv, v1114)); })(); })); - var v1110 = ({car: v1107, cdr: (function(){ + var v1116 = ({car: v1113, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1110); + return ((l320).value = v1116); })(); var l361 = {name: "WRITE-STRING"}; (function(){ - var v1111 = l47.fvalue(pv, l361, (function (values,v1112){ + var v1117 = l47.fvalue(pv, l361, (function (values,v1118){ checkArgs(arguments, 2); return (function(){ - return (function(v1113){ + return (function(v1119){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1113, ";", (function(){ + })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1119, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9563,23 +9574,23 @@ var l361 = {name: "WRITE-STRING"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l193.fvalue(pv, v1112)); + })(l193.fvalue(pv, v1118)); })(); })); - var v1114 = ({car: v1111, cdr: (function(){ + var v1120 = ({car: v1117, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1114); + return ((l320).value = v1120); })(); var l362 = {name: "MAKE-ARRAY"}; (function(){ - var v1115 = l47.fvalue(pv, l362, (function (values,v1116){ + var v1121 = l47.fvalue(pv, l362, (function (values,v1122){ checkArgs(arguments, 2); return (function(){ - return (function(v1117){ + return (function(v1123){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; @@ -9590,7 +9601,7 @@ var l362 = {name: "MAKE-ARRAY"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "for (var i = 0; i < ", v1117, "; i++)", (function(){ + })(), "for (var i = 0; i < ", v1123, "; i++)", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9606,57 +9617,57 @@ var l362 = {name: "MAKE-ARRAY"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1116)); + })(l193.fvalue(pv, v1122)); })(); })); - var v1118 = ({car: v1115, cdr: (function(){ + var v1124 = ({car: v1121, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1118); + return ((l320).value = v1124); })(); var l363 = {name: "ARRAYP"}; (function(){ - var v1119 = l47.fvalue(pv, l363, (function (values,v1120){ + var v1125 = l47.fvalue(pv, l363, (function (values,v1126){ checkArgs(arguments, 2); return (function(){ - return (function(v1121){ + return (function(v1127){ return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var x = ", v1121, ";", (function(){ + })(), l195.fvalue(pv, "var x = ", v1127, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return typeof x === 'object' && 'length' in x;"), "})()")); - })(l193.fvalue(pv, v1120)); + })(l193.fvalue(pv, v1126)); })(); })); - var v1122 = ({car: v1119, cdr: (function(){ + var v1128 = ({car: v1125, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1122); + return ((l320).value = v1128); })(); var l364 = {name: "AREF"}; (function(){ - var v1123 = l47.fvalue(pv, l364, (function (values,v1124,v1125){ + var v1129 = l47.fvalue(pv, l364, (function (values,v1130,v1131){ checkArgs(arguments, 3); return (function(){ - return (function(v1126,v1127){ + return (function(v1132,v1133){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var x = ", "(", v1126, ")[", v1127, "];", (function(){ + })(), l195.fvalue(pv, "var x = ", "(", v1132, ")[", v1133, "];", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9672,34 +9683,34 @@ var l364 = {name: "AREF"}; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1124),l193.fvalue(pv, v1125)); + })(l193.fvalue(pv, v1130),l193.fvalue(pv, v1131)); })(); })); - var v1128 = ({car: v1123, cdr: (function(){ + var v1134 = ({car: v1129, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1128); + return ((l320).value = v1134); })(); var l365 = {name: "ASET"}; (function(){ - var v1129 = l47.fvalue(pv, l365, (function (values,v1130,v1131,v1132){ + var v1135 = l47.fvalue(pv, l365, (function (values,v1136,v1137,v1138){ checkArgs(arguments, 4); return (function(){ - return (function(v1133,v1134,v1135){ + return (function(v1139,v1140,v1141){ return l191.fvalue(values, "(function(){", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l195.fvalue(pv, "var x = ", v1133, ";", (function(){ + })(), l195.fvalue(pv, "var x = ", v1139, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var i = ", v1134, ";", (function(){ + })(), "var i = ", v1140, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9709,26 +9720,26 @@ var l365 = {name: "ASET"}; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return x[i] = ", v1135, ";", (function(){ + })(), "return x[i] = ", v1141, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l193.fvalue(pv, v1130),l193.fvalue(pv, v1131),l193.fvalue(pv, v1132)); + })(l193.fvalue(pv, v1136),l193.fvalue(pv, v1137),l193.fvalue(pv, v1138)); })(); })); - var v1136 = ({car: v1129, cdr: (function(){ + var v1142 = ({car: v1135, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1136); + return ((l320).value = v1142); })(); var l366 = {name: "GET-UNIX-TIME"}; (function(){ - var v1137 = l47.fvalue(pv, l366, (function (values){ + var v1143 = l47.fvalue(pv, l366, (function (values){ checkArgsAtMost(arguments, 1); return (function(){ return (function(){ @@ -9736,43 +9747,43 @@ var l366 = {name: "GET-UNIX-TIME"}; })(); })(); })); - var v1138 = ({car: v1137, cdr: (function(){ + var v1144 = ({car: v1143, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1138); + return ((l320).value = v1144); })(); var l367 = {name: "VALUES-ARRAY"}; (function(){ - var v1139 = l47.fvalue(pv, l367, (function (values,v1140){ + var v1145 = l47.fvalue(pv, l367, (function (values,v1146){ checkArgs(arguments, 2); return (function(){ - return (function(v1141){ + return (function(v1147){ return ((function(){ var symbol = l196; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l191.fvalue(values, "values.apply(this, ", v1141, ")") : l191.fvalue(values, "pv.apply(this, ", v1141, ")")); - })(l193.fvalue(pv, v1140)); + })() !== l5.value ? l191.fvalue(values, "values.apply(this, ", v1147, ")") : l191.fvalue(values, "pv.apply(this, ", v1147, ")")); + })(l193.fvalue(pv, v1146)); })(); })); - var v1142 = ({car: v1139, cdr: (function(){ + var v1148 = ({car: v1145, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1142); + return ((l320).value = v1148); })(); (function(){ - var v1143 = l47.fvalue(pv, l165, (function (values){ - var v1144= l5.value; + var v1149 = l47.fvalue(pv, l165, (function (values){ + var v1150= l5.value; for (var i = arguments.length-1; i>=1; i--) - v1144 = {car: arguments[i], cdr: - v1144}; + v1150 = {car: arguments[i], cdr: + v1150}; return (function(){ return ((function(){ var symbol = l196; @@ -9784,35 +9795,35 @@ var l367 = {name: "VALUES-ARRAY"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1144), ", "), ")") : l191.fvalue(values, "pv(", l159.fvalue(pv, l81.fvalue(pv, (function(){ + })(), v1150), ", "), ")") : l191.fvalue(values, "pv(", l159.fvalue(pv, l81.fvalue(pv, (function(){ var symbol = l193; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1144), ", "), ")")); + })(), v1150), ", "), ")")); })(); })); - var v1145 = ({car: v1143, cdr: (function(){ + var v1151 = ({car: v1149, cdr: (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()}); - return ((l320).value = v1145); + return ((l320).value = v1151); })(); (function(){ - (l222).fvalue = (function(v1148){ - ((v1148)["fname"] = "MACRO"); - return v1148; - })((function (values,v1146){ + (l222).fvalue = (function(v1154){ + ((v1154)["fname"] = "MACRO"); + return v1154; + })((function (values,v1152){ checkArgs(arguments, 2); return (function(){ return (((function(){ - var tmp = v1146; + var tmp = v1152; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (function(v1147){ - return (((l199.fvalue(pv, v1147) === l222)?l4.value: l5.value) !== l5.value ? v1147 : l5.value); - })(l211.fvalue(pv, v1146, (function(){ + })()?l4.value: l5.value) !== l5.value ? (function(v1153){ + return (((l199.fvalue(pv, v1153) === l222)?l4.value: l5.value) !== l5.value ? v1153 : l5.value); + })(l211.fvalue(pv, v1152, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9823,23 +9834,23 @@ var l367 = {name: "VALUES-ARRAY"}; return l222; })(); (function(){ - (l120).fvalue = (function(v1153){ - ((v1153)["fname"] = "LS-MACROEXPAND-1"); - return v1153; - })((function (values,v1149){ + (l120).fvalue = (function(v1159){ + ((v1159)["fname"] = "LS-MACROEXPAND-1"); + return v1159; + })((function (values,v1155){ checkArgs(arguments, 2); return (function(){ - return (function(v1150){ - return (v1150 !== l5.value ? (function(v1151){ - (l62.fvalue(pv, v1151) !== l5.value ? (function(v1152){ - l202.fvalue(pv, v1150, v1152); - return (v1151 = v1152); - })(l272.fvalue(pv, v1151)) : l5.value); + return (function(v1156){ + return (v1156 !== l5.value ? (function(v1157){ + (l62.fvalue(pv, v1157) !== l5.value ? (function(v1158){ + l202.fvalue(pv, v1156, v1158); + return (v1157 = v1158); + })(l272.fvalue(pv, v1157)) : l5.value); return (function(){ - var f = v1151; + var f = v1157; var args = [values]; var tail = ((function(){ - var tmp = v1149; + var tmp = v1155; return tmp === l5.value? l5.value: tmp.cdr; })()); while (tail != l5.value){ @@ -9848,9 +9859,9 @@ var l367 = {name: "VALUES-ARRAY"}; } return (typeof f === 'function'? f : f.fvalue).apply(this, args); })(); - })(l200.fvalue(pv, v1150)) : v1149); + })(l200.fvalue(pv, v1156)) : v1155); })(l222.fvalue(pv, (function(){ - var tmp = v1149; + var tmp = v1155; return tmp === l5.value? l5.value: tmp.car; })())); })(); @@ -9858,57 +9869,57 @@ var l367 = {name: "VALUES-ARRAY"}; return l120; })(); var l368 = {name: "COMPILE-FUNCALL"}; -var l369 = {name: "G764"}; +var l369 = {name: "G1056"}; (function(){ - (l368).fvalue = (function(v1158){ - ((v1158)["fname"] = "COMPILE-FUNCALL"); - return v1158; - })((function (values,v1154,v1155){ + (l368).fvalue = (function(v1164){ + ((v1164)["fname"] = "COMPILE-FUNCALL"); + return v1164; + })((function (values,v1160,v1161){ checkArgs(arguments, 3); return (function(){ return (function(){ - var v1156 = ((function(){ + var v1162 = ((function(){ var symbol = l196; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"); - var v1157 = l157.fvalue(pv, "(", l159.fvalue(pv, ({car: v1156, cdr: l81.fvalue(pv, (function(){ + var v1163 = l157.fvalue(pv, "(", l159.fvalue(pv, ({car: v1162, cdr: l81.fvalue(pv, (function(){ var symbol = l193; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1155)}), ", "), ")"); - return (l267.fvalue(pv, v1154) !== l5.value ? l157.fvalue(values, l267.fvalue(pv, v1154), v1157) : ((((function(){ - var tmp = v1154; + })(), v1161)}), ", "), ")"); + return (l267.fvalue(pv, v1160) !== l5.value ? l157.fvalue(values, l267.fvalue(pv, v1160), v1163) : ((((function(){ + var tmp = v1160; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (((l145.fvalue(pv, v1154) === l136.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){ + })()?l4.value: l5.value) !== l5.value ? (((l145.fvalue(pv, v1160) === l136.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){ var symbol = l369; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1154)), ".fvalue", v1157) : l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l113, v1154)), v1157))); + })() : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1160)), ".fvalue", v1163) : l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l113, v1160)), v1163))); })(); })(); })); return l368; })(); (function(){ - (l254).fvalue = (function(v1161){ - ((v1161)["fname"] = "LS-COMPILE-BLOCK"); - return v1161; - })((function (values,v1159,v1160){ + (l254).fvalue = (function(v1167){ + ((v1167)["fname"] = "LS-COMPILE-BLOCK"); + return v1167; + })((function (values,v1165,v1166){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v1160; + var v1166; switch(arguments.length-1){ case 1: - v1160=l5.value; + v1166=l5.value; default: break; } return (function(){ - return (v1160 !== l5.value ? l191.fvalue(values, l254.fvalue(pv, l95.fvalue(pv, v1159)), "return ", l193.fvalue(pv, (function(){ - var tmp = l94.fvalue(pv, v1159); + return (v1166 !== l5.value ? l191.fvalue(values, l254.fvalue(pv, l95.fvalue(pv, v1165)), "return ", l193.fvalue(pv, (function(){ + var tmp = l94.fvalue(pv, v1165); return tmp === l5.value? l5.value: tmp.car; })(), (function(){ var symbol = l196; @@ -9925,7 +9936,7 @@ var l369 = {name: "G764"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1159)), l157.fvalue(pv, ";", (function(){ + })(), v1165)), l157.fvalue(pv, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; @@ -9936,158 +9947,158 @@ var l369 = {name: "G764"}; return l254; })(); (function(){ - (l193).fvalue = (function(v1171){ - ((v1171)["fname"] = "LS-COMPILE"); - return v1171; - })((function (values,v1162,v1163){ + (l193).fvalue = (function(v1177){ + ((v1177)["fname"] = "LS-COMPILE"); + return v1177; + })((function (values,v1168,v1169){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v1163; + var v1169; switch(arguments.length-1){ case 1: - v1163=l5.value; + v1169=l5.value; default: break; } return (function(){ - return (function(v1164){ + return (function(v1170){ try { var tmp; tmp = l196.value; - l196.value = v1164; - v1164 = tmp; + l196.value = v1170; + v1170 = tmp; return (((function(){ - var tmp = v1162; + var tmp = v1168; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (function(v1165){ - return ((v1165 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v1165))) : l5.value) !== l5.value ? l200.fvalue(values, v1165) : ((function(v1166){ - return (v1166 !== l5.value ? v1166 : l96.fvalue(pv, l228, l201.fvalue(pv, v1165))); - })(l144.fvalue(pv, v1162)) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1162)), ".value") : l193.fvalue(values, l47.fvalue(pv, l340, l47.fvalue(pv, l186, v1162))))); - })(l211.fvalue(pv, v1162, (function(){ + })()?l4.value: l5.value) !== l5.value ? (function(v1171){ + return ((v1171 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v1171))) : l5.value) !== l5.value ? l200.fvalue(values, v1171) : ((function(v1172){ + return (v1172 !== l5.value ? v1172 : l96.fvalue(pv, l228, l201.fvalue(pv, v1171))); + })(l144.fvalue(pv, v1168)) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1168)), ".value") : l193.fvalue(values, l47.fvalue(pv, l340, l47.fvalue(pv, l186, v1168))))); + })(l211.fvalue(pv, v1168, (function(){ var symbol = l212; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l114)) : (l89.fvalue(pv, v1162) !== l5.value ? l19.fvalue(values, v1162) : (((typeof(v1162) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v1162), "\"") : (((function(){ - var x = v1162; + })(), l114)) : (l89.fvalue(pv, v1168) !== l5.value ? l19.fvalue(values, v1168) : (((typeof(v1168) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v1168), "\"") : (((function(){ + var x = v1168; return typeof x === 'object' && 'length' in x; - })()?l4.value: l5.value) !== l5.value ? l262.fvalue(values, v1162) : (l62.fvalue(pv, v1162) !== l5.value ? (function(v1167,v1168){ - return (l106.fvalue(pv, v1167, (function(){ + })()?l4.value: l5.value) !== l5.value ? l262.fvalue(values, v1168) : (l62.fvalue(pv, v1168) !== l5.value ? (function(v1173,v1174){ + return (l106.fvalue(pv, v1173, (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) !== l5.value ? (function(v1169){ + })()) !== l5.value ? (function(v1175){ return (function(){ - var f = v1169; + var f = v1175; var args = [values]; - var tail = (v1168); + var tail = (v1174); while (tail != l5.value){ args.push(tail.car); tail = tail.cdr; } return (typeof f === 'function'? f : f.fvalue).apply(this, args); })(); - })(l43.fvalue(pv, l106.fvalue(pv, v1167, (function(){ + })(l43.fvalue(pv, l106.fvalue(pv, v1173, (function(){ var symbol = l230; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()))) : ((l106.fvalue(pv, v1167, (function(){ + })()))) : ((l106.fvalue(pv, v1173, (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) !== l5.value ? l29.fvalue(pv, l224.fvalue(pv, v1167, l113, l227)) : l5.value) !== l5.value ? (function(v1170){ + })()) !== l5.value ? l29.fvalue(pv, l224.fvalue(pv, v1173, l113, l227)) : l5.value) !== l5.value ? (function(v1176){ return (function(){ - var f = v1170; + var f = v1176; var args = [values]; - var tail = (v1168); + var tail = (v1174); while (tail != l5.value){ args.push(tail.car); tail = tail.cdr; } return (typeof f === 'function'? f : f.fvalue).apply(this, args); })(); - })(l43.fvalue(pv, l106.fvalue(pv, v1167, (function(){ + })(l43.fvalue(pv, l106.fvalue(pv, v1173, (function(){ var symbol = l320; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()))) : (l222.fvalue(pv, v1167) !== l5.value ? l193.fvalue(values, l120.fvalue(pv, v1162), v1163) : l368.fvalue(values, v1167, v1168)))); + })()))) : (l222.fvalue(pv, v1173) !== l5.value ? l193.fvalue(values, l120.fvalue(pv, v1168), v1169) : l368.fvalue(values, v1173, v1174)))); })((function(){ - var tmp = v1162; + var tmp = v1168; return tmp === l5.value? l5.value: tmp.car; })(),(function(){ - var tmp = v1162; + var tmp = v1168; return tmp === l5.value? l5.value: tmp.cdr; })()) : (function(){ - throw l157.fvalue(pv, "How should I compile ", l166.fvalue(pv, v1162), "?"); + throw l157.fvalue(pv, "How should I compile ", l166.fvalue(pv, v1168), "?"); })()))))); } finally { - l196.value = v1164; + l196.value = v1170; } - })(v1163); + })(v1169); })(); })); return l193; })(); var l370 = {name: "LS-COMPILE-TOPLEVEL"}; (function(){ - (l370).fvalue = (function(v1178){ - ((v1178)["fname"] = "LS-COMPILE-TOPLEVEL"); - return v1178; - })((function (values,v1172,v1173){ + (l370).fvalue = (function(v1184){ + ((v1184)["fname"] = "LS-COMPILE-TOPLEVEL"); + return v1184; + })((function (values,v1178,v1179){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); - var v1173; + var v1179; switch(arguments.length-1){ case 1: - v1173=l5.value; + v1179=l5.value; default: break; } return (function(){ - return (function(v1174){ + return (function(v1180){ try { var tmp; tmp = l217.value; - l217.value = v1174; - v1174 = tmp; + l217.value = v1180; + v1180 = tmp; return ((((function(){ - var tmp = v1172; + var tmp = v1178; return (typeof tmp == 'object' && 'car' in tmp); })()?l4.value: l5.value) !== l5.value ? (((function(){ - var tmp = v1172; + var tmp = v1178; return tmp === l5.value? l5.value: tmp.car; - })() === l123)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v1176){ + })() === l123)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v1182){ return l159.fvalue(values, l98.fvalue(pv, (function(){ var symbol = l219; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v1176)); - })(l81.fvalue(pv, (function (values,v1175){ + })(), v1182)); + })(l81.fvalue(pv, (function (values,v1181){ checkArgs(arguments, 2); - return l370.fvalue(values, v1175, l4.value); + return l370.fvalue(values, v1181, l4.value); }), (function(){ - var tmp = v1172; + var tmp = v1178; return tmp === l5.value? l5.value: tmp.cdr; - })())) : (function(v1177){ + })())) : (function(v1183){ return l191.fvalue(values, l160.fvalue(pv, l220.fvalue(pv), l191.fvalue(pv, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), (v1177 !== l5.value ? l191.fvalue(pv, v1177, ";", (function(){ + })())), (v1183 !== l5.value ? l191.fvalue(pv, v1183, ";", (function(){ var symbol = l156; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : l5.value)); - })(l193.fvalue(pv, v1172, v1173))); + })(l193.fvalue(pv, v1178, v1179))); } finally { - l217.value = v1174; + l217.value = v1180; } })(l5.value); })(); @@ -10095,14 +10106,14 @@ var l370 = {name: "LS-COMPILE-TOPLEVEL"}; return l370; })(); (function(){ - (l272).fvalue = (function(v1180){ - ((v1180)["fname"] = "EVAL"); - return v1180; - })((function (values,v1179){ + (l272).fvalue = (function(v1186){ + ((v1186)["fname"] = "EVAL"); + return v1186; + })((function (values,v1185){ checkArgs(arguments, 2); return (function(){ return (function(){ - var string = l370.fvalue(pv, v1179, l4.value); + var string = l370.fvalue(pv, v1185, l4.value); if (typeof string != 'string') throw 'The value ' + string + ' is not a type string.'; return (function(){ @@ -10159,17 +10170,17 @@ l154.fvalue(values, l372); if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); -(lisp.compile = (function (values,v1181){ +(lisp.compile = (function (values,v1187){ checkArgs(arguments, 2); - return l370.fvalue(values, v1181, l4.value); + return l370.fvalue(values, v1187, l4.value); })); -(lisp.evalString = (function (values,v1182){ +(lisp.evalString = (function (values,v1188){ checkArgs(arguments, 2); - return l272.fvalue(values, l190.fvalue(pv, v1182)); + return l272.fvalue(values, l190.fvalue(pv, v1188)); })); -(lisp.compileString = (function (values,v1183){ +(lisp.compileString = (function (values,v1189){ checkArgs(arguments, 2); - return l370.fvalue(values, l190.fvalue(pv, v1183), l4.value); + return l370.fvalue(values, l190.fvalue(pv, v1189), l4.value); })); var l373 = {name: "OP"}; var l374 = {name: "SYM"}; @@ -10186,46 +10197,46 @@ var l384 = {name: "CLAUSULES"}; var l385 = {name: "VALUE"}; var l386 = {name: "C"}; var l387 = {name: "INTEGER"}; -var l388 = {name: "PLACE"}; -var l389 = {name: "DUMMIES"}; -var l390 = {name: "VALS"}; -var l391 = {name: "NEWVAL"}; -var l392 = {name: "SETTER"}; -var l393 = {name: "GETTER"}; -var l394 = {name: "G"}; -var l395 = {name: "PAIRS"}; -var l396 = {name: "VARS"}; -var l397 = {name: "STORE-VARS"}; -var l398 = {name: "WRITER-FORM"}; -var l399 = {name: "READER-FORM"}; -var l400 = {name: "RESULT"}; -var l401 = {name: "ACCESS-FN"}; -var l402 = {name: "LAMBDA-LIST"}; -var l403 = {name: "VALUE-FROM"}; -var l404 = {name: "VARIABLES"}; -var l405 = {name: "ITERATION"}; -var l406 = {name: "SEQ"}; -var l407 = {name: "INDEX"}; -var l408 = {name: "HEAD"}; -var l409 = {name: "TAIL"}; -var l410 = {name: "COLLECT"}; -var l411 = {name: "VARLIST"}; -var l412 = {name: "ENDLIST"}; -var l413 = {name: "V"}; -var l414 = {name: "ASSIGNMENTS"}; -var l415 = {name: "FORM1"}; -var l416 = {name: "FORMS"}; -var l417 = {name: "!FORM"}; -var l418 = {name: "CLAUSULE"}; -var l419 = {name: "ITER"}; -var l420 = {name: "G!TO"}; -var l421 = {name: "VAR"}; -var l422 = {name: "TO"}; -var l423 = {name: "G!LIST"}; +var l388 = {name: "PAIRS"}; +var l389 = {name: "PLACE"}; +var l390 = {name: "VARS"}; +var l391 = {name: "VALS"}; +var l392 = {name: "STORE-VARS"}; +var l393 = {name: "WRITER-FORM"}; +var l394 = {name: "READER-FORM"}; +var l395 = {name: "RESULT"}; +var l396 = {name: "ACCESS-FN"}; +var l397 = {name: "LAMBDA-LIST"}; +var l398 = {name: "VALUE-FROM"}; +var l399 = {name: "VARIABLES"}; +var l400 = {name: "ITERATION"}; +var l401 = {name: "SEQ"}; +var l402 = {name: "INDEX"}; +var l403 = {name: "HEAD"}; +var l404 = {name: "TAIL"}; +var l405 = {name: "COLLECT"}; +var l406 = {name: "VARLIST"}; +var l407 = {name: "ENDLIST"}; +var l408 = {name: "V"}; +var l409 = {name: "ASSIGNMENTS"}; +var l410 = {name: "FORM1"}; +var l411 = {name: "FORMS"}; +var l412 = {name: "G"}; +var l413 = {name: "!FORM"}; +var l414 = {name: "CLAUSULE"}; +var l415 = {name: "ITER"}; +var l416 = {name: "G!TO"}; +var l417 = {name: "VAR"}; +var l418 = {name: "TO"}; +var l419 = {name: "G!LIST"}; +var l420 = {name: "DUMMIES"}; +var l421 = {name: "NEWVAL"}; +var l422 = {name: "SETTER"}; +var l423 = {name: "GETTER"}; var l424 = {name: "DELTA"}; var l425 = {name: "CONDITION"}; var l426 = {name: "DOCSTRING"}; -var l427 = QIList(QIList(QIList(l320,l114,l5,QIList(l226,l5),l5),QIList(l304,l114,l5,QIList(l226,l5),l5),QIList(l303,l114,l5,QIList(l226,l5),l5),QIList(l302,l114,l5,QIList(l226,l5),l5),QIList(l301,l114,l5,QIList(l226,l5),l5),QIList(l300,l114,l5,QIList(l226,l5),l5),QIList(l299,l114,l5,QIList(l226,l5),l5),QIList(l298,l114,l5,QIList(l226,l5),l5),QIList(l297,l114,l5,QIList(l226,l5),l5),QIList(l296,l114,l5,QIList(l226,l5),l5),QIList(l287,l114,l5,QIList(l226,l5),l5),QIList(l286,l114,l5,QIList(l226,l5),l5),QIList(l280,l114,l5,QIList(l226,l5),l5),QIList(l270,l114,l5,QIList(l226,l5),l5),QIList(l260,l114,l5,QIList(l226,l5),l5),QIList(l259,l114,l5,QIList(l226,l5),l5),QIList(l233,l114,l5,QIList(l226,l5),l5),QIList(l230,l114,l5,QIList(l226,l5),l5),QIList(l217,l114,l5,QIList(l226,l5),l5),QIList(l213,l114,l5,QIList(l226,l5),l5),QIList(l212,l114,l5,QIList(l226,l5),l5),QIList(l196,l114,l5,QIList(l226,l5),l5),QIList(l185,l114,l5,QIList(l226,l5),l5),QIList(l156,l114,l5,QIList(l226,l5),l5),QIList(l146,l114,l5,QIList(l226,l5),l5),QIList(l143,l114,l5,QIList(l226,l5),l5),QIList(l142,l114,l5,QIList(l226,l5),l5),QIList(l141,l114,l5,QIList(l226,l5),l5),QIList(l130,l114,l5,QIList(l226,l5),l5),QIList(l117,l114,l5,QIList(l226,l5),l5),QIList(l17,l114,l5,QIList(l226,l5),l5),QIList(l5,l114,l5,QIList(l228,l226,l5),l5),QIList(l4,l114,l5,QIList(l228,l226,l5),l5),l5),QIList(QIList(l329,l222,QIList(l113,QIList(l6,QIList(l373,l374,l5),QIList(l187,QIList(l321,QIList(l189,l373,l5),QIList(l375,l235,l376,l5),QIList(l276,QIList(QIList(l376,QIList(l30,l375,l376,l5),l5),l5),QIList(l325,l376,QIList(l192,QIList(l328,l376,QIList(l189,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l325,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l8,QIList(l336,l376,l5),QIList(l354,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l187,QIList(l324,QIList(l189,l376,l5),QIList(l6,QIList(QIList(l189,l376,l5),l5),QIList(l191,"return ",QIList(l188,l377,l5),";",l156,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l323,l222,QIList(l113,QIList(l6,QIList(l378,l235,l377,l5),QIList(l187,QIList(l194,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"var ",QIList(l189,QIList(l42,l379,l5),l5)," = ",QIList(l189,QIList(l44,l379,l5),l5),";",l156,l5),l5),l5),l378,l5),l5),QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"if (typeof ",QIList(l189,QIList(l42,l379,l5),l5)," != '",QIList(l189,QIList(l43,l379,l5),l5),"')",l156,QIList(l195,"throw 'The value ' + ",QIList(l189,QIList(l42,l379,l5),l5)," + ' is not a type ",QIList(l189,QIList(l43,l379,l5),l5),".';",l156,l5),l5),l5),l5),l378,l5),l5),QIList(l191,"return ",QIList(l123,QIList(l188,l377,l5),l5),";",l156,l5),l5),l5),l5),l5),l5,l5),QIList(l322,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l321,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l381,l5),QIList(l187,QIList(QIList(l189,l381,l5),QIList(l193,QIList(l189,l381,l5),l5),l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l321,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l320,l5),l5),l5),l5),l5,l5),QIList(l187,l222,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l306,l375,l5),l5),l5),l5,l5),QIList(l273,l222,QIList(l113,QIList(l6,QIList(l380,l376,l382,l5),QIList(l187,QIList(l231,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l193,QIList(l189,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l231,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l230,l5),l5),l5),l5),l5,l5),QIList(l194,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l191,"(function(){",l156,QIList(l195,QIList(l188,l377,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l158,l222,QIList(l113,QIList(l6,QIList(l114,l235,l382,l5),QIList(l187,QIList(l119,QIList(l189,l114,l5),QIList(l157,QIList(l189,l114,l5),QIList(l123,QIList(l188,l382,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l147,l222,QIList(l113,QIList(l6,QIList(l383,l5),QIList(l187,QIList(l271,QIList(l119,l146,QIList(l134,QIList(l189,l383,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l126,l222,QIList(l113,QIList(l6,QIList(l375,l235,l384,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l375,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l386,l5),QIList(l232,QIList(l343,QIList(l32,l386,l5),l4,l5),QIList(l187,QIList(QIList(l4,QIList(l188,QIList(l46,l386,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(QIList(l189,QIList(l56,QIList(l32,l386,l5),QIList(l387,QIList(l186,l89,l5),l5),QIList(l30,QIList(l186,l31,l5),l5),QIList(l107,QIList(l186,l346,l5),l5),QIList(l48,QIList(l186,l48,l5),l5),QIList(l13,QIList(l186,l13,l5),l5),l5),l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l58,QIList(l46,l386,l5),QIList(l47,l5,l5),l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l388,l5),QIList(l115,QIList(l389,l390,l391,l392,l393,l5),QIList(l118,l388,l5),QIList(l276,QIList(QIList(l394,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l394,l5),QIList(l189,l375,l5),l5),QIList(l188,QIList(l81,QIList(l113,l47,l5),l389,l390,l5),l5),QIList(QIList(l189,QIList(l32,l391,l5),l5),QIList(l30,QIList(l189,l394,l5),QIList(l189,l393,l5),l5),l5),QIList(l188,QIList(l33,l391,l5),l5),l5),QIList(l189,l392,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l122,l222,QIList(l113,QIList(l6,QIList(l235,l395,l5),QIList(l54,QIList(QIList(l13,l395,l5),l5,l5),QIList(QIList(l13,QIList(l33,l395,l5),l5),QIList(l354,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l395,l5),l5),QIList(l276,QIList(QIList(l388,QIList(l42,l395,l5),l5),QIList(l385,QIList(l43,l395,l5),l5),l5),QIList(l115,QIList(l396,l390,l397,l398,l399,l5),QIList(l118,l388,l5),QIList(l187,QIList(l279,QIList(l189,QIList(l81,QIList(l113,l47,l5),l396,l390,l5),l5),QIList(l115,QIList(l189,l397,l5),QIList(l189,l385,l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l187,QIList(l123,QIList(l188,QIList(l72,QIList(QIList(l395,l395,QIList(l37,l395,l5),l5),QIList(l400,QIList(l186,l5,l5),QIList(l30,QIList(l187,QIList(l122,QIList(l189,QIList(l32,l395,l5),l5),QIList(l189,QIList(l35,l395,l5),l5),l5),l5),l400,l5),l5),l5),QIList(QIList(l13,l395,l5),QIList(l70,l400,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l222,QIList(l113,QIList(l6,QIList(l401,l402,l235,l377,l5),QIList(l8,QIList(l336,l401,l5),QIList(l354,"ACCESS-FN must be a symbol.",l5),l5),QIList(l187,QIList(l123,QIList(l51,QIList(l30,QIList(l186,QIList(l189,l401,l5),l5),QIList(l6,QIList(l189,l402,l5),QIList(l188,l377,l5),l5),l5),l117,l5),QIList(l186,QIList(l189,l401,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l222,QIList(l113,QIList(l6,QIList(l403,l5),QIList(l187,QIList(l294,QIList(l113,l47,l5),QIList(l189,l403,l5),l5),l5),l5),l5),l5,l5),QIList(l115,l222,QIList(l113,QIList(l6,QIList(l404,l403,l235,l377,l5),QIList(l187,QIList(l294,QIList(l6,QIList(l234,QIList(l188,l404,l5),l235,QIList(l189,QIList(l18,l5),l5),l5),QIList(l188,l377,l5),l5),QIList(l189,l403,l5),l5),l5),l5),l5),l5,l5),QIList(l103,l222,QIList(l113,QIList(l6,QIList(l405,l235,l377,l5),QIList(l276,QIList(QIList(l406,QIList(l18,l5),l5),QIList(l407,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l406,l5),QIList(l189,QIList(l43,l405,l5),l5),l5),l5),QIList(l54,QIList(QIList(l346,QIList(l189,l406,l5),l5),QIList(l276,QIList(QIList(QIList(l189,l407,l5),0,l5),l5),QIList(l53,QIList(QIList(l189,l407,l5),QIList(l75,QIList(l189,l406,l5),l5),l5),QIList(l276,QIList(QIList(QIList(l189,QIList(l42,l405,l5),l5),QIList(l350,QIList(l189,l406,l5),QIList(l189,l407,l5),l5),l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),QIList(QIList(l62,QIList(l189,l406,l5),l5),QIList(l52,QIList(QIList(l189,QIList(l42,l405,l5),l5),QIList(l189,l406,l5),l5),QIList(l188,l377,l5),l5),l5),QIList(l4,QIList(l354,"type-error!",l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l80,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l16,l4,QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l276,QIList(QIList(l408,QIList(l18,l5),l5),QIList(l409,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l408,l5),QIList(l30,QIList(l186,l79,l5),l5,l5),l5),QIList(QIList(l189,l409,l5),QIList(l189,l408,l5),l5),l5),QIList(l268,QIList(QIList(l410,QIList(l375,l5),QIList(l125,QIList(l189,l409,l5),QIList(l30,l375,l5,l5),l5),QIList(l119,QIList(l189,l409,l5),QIList(l33,QIList(l189,l409,l5),l5),l5),l375,l5),l5),QIList(l188,l377,l5),l5),QIList(l33,QIList(l189,l408,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l222,QIList(l113,QIList(l6,QIList(l411,l412,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l279,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l411,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l412,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l412,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l413,l5),QIList(l57,QIList(l31,QIList(l37,l413,l5),l5),QIList(l47,QIList(l42,l413,l5),QIList(l44,l413,l5),l5),l5),l5),l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l222,QIList(l113,QIList(l6,QIList(l411,l412,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l411,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l412,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l412,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l71,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l413,l5),QIList(l57,QIList(l31,QIList(l37,l413,l5),l5),QIList(l47,QIList(l42,l413,l5),QIList(l44,l413,l5),l5),l5),l5),l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l222,QIList(l113,QIList(l6,QIList(l235,l395,l5),QIList(l276,QIList(QIList(l414,QIList(l186,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l395,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l395,l5),l5),QIList(l354,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l276,QIList(QIList(l114,QIList(l32,l395,l5),l5),QIList(l385,QIList(l35,l395,l5),l5),l5),QIList(l51,QIList(l187,QIList(QIList(l189,l114,l5),QIList(l189,QIList(l18,l5),l5),QIList(l189,l385,l5),l5),l5),l414,l5),QIList(l119,l395,QIList(l37,l395,l5),l5),l5),l5),l5),l5),QIList(l119,l414,QIList(l70,l414,l5),l5),QIList(l187,QIList(l276,QIList(l189,QIList(l81,QIList(l113,l33,l5),l414,l5),l5),QIList(l119,QIList(l188,QIList(l63,QIList(l113,l68,l5),QIList(l81,QIList(l113,l95,l5),l414,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l222,QIList(l113,QIList(l6,QIList(l415,l400,l235,l377,l5),QIList(l187,QIList(l59,QIList(l123,QIList(l189,l415,l5),QIList(l189,l400,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l59,l222,QIList(l113,QIList(l6,QIList(l382,l235,l377,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l382,l5),l5),l5),QIList(l188,l377,l5),QIList(l189,l385,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l222,QIList(l113,QIList(l6,QIList(l235,l416,l5),QIList(l54,QIList(QIList(l13,l416,l5),l5,l5),QIList(QIList(l13,QIList(l33,l416,l5),l5),QIList(l32,l416,l5),l5),QIList(l4,QIList(l276,QIList(QIList(l394,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l394,l5),QIList(l189,QIList(l32,l416,l5),l5),l5),l5),QIList(l232,QIList(l189,l394,l5),QIList(l189,l394,l5),QIList(l58,QIList(l188,QIList(l33,l416,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l222,QIList(l113,QIList(l6,QIList(l235,l416,l5),QIList(l54,QIList(QIList(l13,l416,l5),l4,l5),QIList(QIList(l13,QIList(l33,l416,l5),l5),QIList(l32,l416,l5),l5),QIList(l4,QIList(l187,QIList(l232,QIList(l189,QIList(l32,l416,l5),l5),QIList(l57,QIList(l188,QIList(l33,l416,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l187,QIList(l55,QIList(l189,l382,l5),QIList(l188,QIList(l68,l384,QIList(l187,QIList(QIList(l4,QIList(l354,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l276,QIList(QIList(l417,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l417,l5),QIList(l189,l382,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l418,l5),QIList(l232,QIList(l343,QIList(l32,l418,l5),l4,l5),l418,QIList(l187,QIList(QIList(l28,QIList(l189,l417,l5),QIList(l186,QIList(l189,QIList(l32,l418,l5),l5),l5),l5),QIList(l188,QIList(l33,l418,l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l222,QIList(l113,QIList(l6,QIList(l235,l384,l5),QIList(l232,QIList(l13,l384,l5),l5,QIList(l232,QIList(l343,QIList(l34,l384,l5),l4,l5),QIList(l187,QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),l5),QIList(l187,QIList(l232,QIList(l189,QIList(l34,l384,l5),l5),QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),QIList(l54,QIList(l188,QIList(l33,l384,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l222,QIList(l113,QIList(l6,QIList(l419,l235,l377,l5),QIList(l276,QIList(QIList(l420,QIList(l18,l5),l5),QIList(l421,QIList(l42,l419,l5),l5),QIList(l422,QIList(l43,l419,l5),l5),QIList(l400,QIList(l44,l419,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l421,l5),0,l5),QIList(QIList(l189,l420,l5),QIList(l189,l422,l5),l5),l5),QIList(l263,QIList(l331,QIList(l189,l421,l5),QIList(l189,l420,l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l49,QIList(l189,l421,l5),l5),l5),QIList(l189,l400,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l222,QIList(l113,QIList(l6,QIList(l419,l235,l377,l5),QIList(l276,QIList(QIList(l421,QIList(l42,l419,l5),l5),QIList(l423,QIList(l18,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l423,l5),QIList(l189,QIList(l43,l419,l5),l5),l5),QIList(QIList(l189,l421,l5),l5,l5),l5),QIList(l263,QIList(l189,l423,l5),QIList(l119,QIList(l189,l421,l5),QIList(l32,QIList(l189,l423,l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l189,l423,l5),QIList(l33,QIList(l189,l423,l5),l5),l5),l5),QIList(l189,QIList(l44,l419,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l388,l5),QIList(l187,QIList(l119,QIList(l189,l388,l5),QIList(l30,QIList(l189,l375,l5),QIList(l189,l388,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l66,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l65,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l16,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l263,QIList(l189,l425,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l222,QIList(l113,QIList(l6,QIList(l234,l385,l5),QIList(l187,QIList(l283,l5,QIList(l189,l385,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l123,QIList(l339,QIList(l186,QIList(l189,l380,l5),l5),QIList(l11,QIList(l189,QIList(l338,l380,l5),l5),QIList(l189,l376,l5),QIList(l188,QIList(l232,QIList(l57,QIList(l346,QIList(l32,l377,l5),l5),QIList(l29,QIList(l13,QIList(l33,l377,l5),l5),l5),l5),QIList(l187,QIList(QIList(l189,QIList(l32,l377,l5),l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,QIList(l33,l377,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l276,QIList(QIList(l375,QIList(l18,"FN",l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l375,l5),QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),QIList(l358,QIList(l189,l375,l5),"fname",QIList(l189,l380,l5),l5),QIList(l189,l375,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l8,QIList(l20,QIList(l186,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),l5,QIList(l123,QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),QIList(l123,QIList(l188,l377,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l187,QIList(l113,QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l2,QIList(l228,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l222,QIList(l113,QIList(l6,QIList(l235,l378,l5),QIList(l187,QIList(l271,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l225,QIList(l186,QIList(l189,l379,l5),l5),l5),l5),l5),l378,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l271,QIList(l221,QIList(l186,QIList(l189,l380,l5),l5),QIList(l186,QIList(l113,QIList(l6,QIList(l189,QIList(l81,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l232,QIList(l343,l375,QIList(l186,l371,l5),l5),QIList(l186,l235,l5),l375,l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5); +var l427 = QIList(QIList(QIList(l320,l114,l5,QIList(l226,l5),l5),QIList(l304,l114,l5,QIList(l226,l5),l5),QIList(l303,l114,l5,QIList(l226,l5),l5),QIList(l302,l114,l5,QIList(l226,l5),l5),QIList(l301,l114,l5,QIList(l226,l5),l5),QIList(l300,l114,l5,QIList(l226,l5),l5),QIList(l299,l114,l5,QIList(l226,l5),l5),QIList(l298,l114,l5,QIList(l226,l5),l5),QIList(l297,l114,l5,QIList(l226,l5),l5),QIList(l296,l114,l5,QIList(l226,l5),l5),QIList(l287,l114,l5,QIList(l226,l5),l5),QIList(l286,l114,l5,QIList(l226,l5),l5),QIList(l280,l114,l5,QIList(l226,l5),l5),QIList(l270,l114,l5,QIList(l226,l5),l5),QIList(l260,l114,l5,QIList(l226,l5),l5),QIList(l259,l114,l5,QIList(l226,l5),l5),QIList(l233,l114,l5,QIList(l226,l5),l5),QIList(l230,l114,l5,QIList(l226,l5),l5),QIList(l217,l114,l5,QIList(l226,l5),l5),QIList(l213,l114,l5,QIList(l226,l5),l5),QIList(l212,l114,l5,QIList(l226,l5),l5),QIList(l196,l114,l5,QIList(l226,l5),l5),QIList(l185,l114,l5,QIList(l226,l5),l5),QIList(l156,l114,l5,QIList(l226,l5),l5),QIList(l146,l114,l5,QIList(l226,l5),l5),QIList(l143,l114,l5,QIList(l226,l5),l5),QIList(l142,l114,l5,QIList(l226,l5),l5),QIList(l141,l114,l5,QIList(l226,l5),l5),QIList(l130,l114,l5,QIList(l226,l5),l5),QIList(l117,l114,l5,QIList(l226,l5),l5),QIList(l17,l114,l5,QIList(l226,l5),l5),QIList(l5,l114,l5,QIList(l228,l226,l5),l5),QIList(l4,l114,l5,QIList(l228,l226,l5),l5),l5),QIList(QIList(l329,l222,QIList(l113,QIList(l6,QIList(l373,l374,l5),QIList(l187,QIList(l321,QIList(l189,l373,l5),QIList(l375,l235,l376,l5),QIList(l276,QIList(QIList(l376,QIList(l30,l375,l376,l5),l5),l5),QIList(l325,l376,QIList(l192,QIList(l328,l376,QIList(l189,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l325,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l8,QIList(l336,l376,l5),QIList(l354,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l187,QIList(l324,QIList(l189,l376,l5),QIList(l6,QIList(QIList(l189,l376,l5),l5),QIList(l191,"return ",QIList(l188,l377,l5),";",l156,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l323,l222,QIList(l113,QIList(l6,QIList(l378,l235,l377,l5),QIList(l187,QIList(l194,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"var ",QIList(l189,QIList(l42,l379,l5),l5)," = ",QIList(l189,QIList(l44,l379,l5),l5),";",l156,l5),l5),l5),l378,l5),l5),QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"if (typeof ",QIList(l189,QIList(l42,l379,l5),l5)," != '",QIList(l189,QIList(l43,l379,l5),l5),"')",l156,QIList(l195,"throw 'The value ' + ",QIList(l189,QIList(l42,l379,l5),l5)," + ' is not a type ",QIList(l189,QIList(l43,l379,l5),l5),".';",l156,l5),l5),l5),l5),l378,l5),l5),QIList(l191,"return ",QIList(l123,QIList(l188,l377,l5),l5),";",l156,l5),l5),l5),l5),l5),l5,l5),QIList(l322,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l321,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l381,l5),QIList(l187,QIList(QIList(l189,l381,l5),QIList(l193,QIList(l189,l381,l5),l5),l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l321,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l320,l5),l5),l5),l5),l5,l5),QIList(l187,l222,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l306,l375,l5),l5),l5),l5,l5),QIList(l273,l222,QIList(l113,QIList(l6,QIList(l380,l376,l382,l5),QIList(l187,QIList(l231,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l193,QIList(l189,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l231,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l230,l5),l5),l5),l5),l5,l5),QIList(l194,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l191,"(function(){",l156,QIList(l195,QIList(l188,l377,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l158,l222,QIList(l113,QIList(l6,QIList(l114,l235,l382,l5),QIList(l187,QIList(l119,QIList(l189,l114,l5),QIList(l157,QIList(l189,l114,l5),QIList(l123,QIList(l188,l382,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l147,l222,QIList(l113,QIList(l6,QIList(l383,l5),QIList(l187,QIList(l271,QIList(l119,l146,QIList(l134,QIList(l189,l383,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l126,l222,QIList(l113,QIList(l6,QIList(l375,l235,l384,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l375,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l386,l5),QIList(l232,QIList(l343,QIList(l32,l386,l5),l4,l5),QIList(l187,QIList(QIList(l4,QIList(l188,QIList(l46,l386,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(QIList(l189,QIList(l56,QIList(l32,l386,l5),QIList(l387,QIList(l186,l89,l5),l5),QIList(l30,QIList(l186,l31,l5),l5),QIList(l107,QIList(l186,l346,l5),l5),QIList(l48,QIList(l186,l48,l5),l5),QIList(l13,QIList(l186,l13,l5),l5),l5),l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l58,QIList(l46,l386,l5),QIList(l47,l5,l5),l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l122,l222,QIList(l113,QIList(l6,QIList(l235,l388,l5),QIList(l54,QIList(QIList(l13,l388,l5),l5,l5),QIList(QIList(l13,QIList(l33,l388,l5),l5),QIList(l354,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l388,l5),l5),QIList(l276,QIList(QIList(l389,QIList(l42,l388,l5),l5),QIList(l385,QIList(l43,l388,l5),l5),l5),QIList(l115,QIList(l390,l391,l392,l393,l394,l5),QIList(l118,l389,l5),QIList(l187,QIList(l279,QIList(l189,QIList(l81,QIList(l113,l47,l5),l390,l391,l5),l5),QIList(l115,QIList(l189,l392,l5),QIList(l189,l385,l5),QIList(l189,l393,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l187,QIList(l123,QIList(l188,QIList(l72,QIList(QIList(l388,l388,QIList(l37,l388,l5),l5),QIList(l395,QIList(l186,l5,l5),QIList(l30,QIList(l187,QIList(l122,QIList(l189,QIList(l32,l388,l5),l5),QIList(l189,QIList(l35,l388,l5),l5),l5),l5),l395,l5),l5),l5),QIList(QIList(l13,l388,l5),QIList(l70,l395,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l222,QIList(l113,QIList(l6,QIList(l396,l397,l235,l377,l5),QIList(l8,QIList(l336,l396,l5),QIList(l354,"ACCESS-FN must be a symbol.",l5),l5),QIList(l187,QIList(l123,QIList(l51,QIList(l30,QIList(l186,QIList(l189,l396,l5),l5),QIList(l6,QIList(l189,l397,l5),QIList(l188,l377,l5),l5),l5),l117,l5),QIList(l186,QIList(l189,l396,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l222,QIList(l113,QIList(l6,QIList(l398,l5),QIList(l187,QIList(l294,QIList(l113,l47,l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5,l5),QIList(l115,l222,QIList(l113,QIList(l6,QIList(l399,l398,l235,l377,l5),QIList(l187,QIList(l294,QIList(l6,QIList(l234,QIList(l188,l399,l5),l235,QIList(l189,QIList(l18,l5),l5),l5),QIList(l188,l377,l5),l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5,l5),QIList(l103,l222,QIList(l113,QIList(l6,QIList(l400,l235,l377,l5),QIList(l276,QIList(QIList(l401,QIList(l18,l5),l5),QIList(l402,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l401,l5),QIList(l189,QIList(l43,l400,l5),l5),l5),l5),QIList(l54,QIList(QIList(l346,QIList(l189,l401,l5),l5),QIList(l276,QIList(QIList(QIList(l189,l402,l5),0,l5),l5),QIList(l53,QIList(QIList(l189,l402,l5),QIList(l75,QIList(l189,l401,l5),l5),l5),QIList(l276,QIList(QIList(QIList(l189,QIList(l42,l400,l5),l5),QIList(l350,QIList(l189,l401,l5),QIList(l189,l402,l5),l5),l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),QIList(QIList(l62,QIList(l189,l401,l5),l5),QIList(l52,QIList(QIList(l189,QIList(l42,l400,l5),l5),QIList(l189,l401,l5),l5),QIList(l188,l377,l5),l5),l5),QIList(l4,QIList(l354,"type-error!",l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l80,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l16,l4,QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l276,QIList(QIList(l403,QIList(l18,l5),l5),QIList(l404,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l403,l5),QIList(l30,QIList(l186,l79,l5),l5,l5),l5),QIList(QIList(l189,l404,l5),QIList(l189,l403,l5),l5),l5),QIList(l268,QIList(QIList(l405,QIList(l375,l5),QIList(l125,QIList(l189,l404,l5),QIList(l30,l375,l5,l5),l5),QIList(l119,QIList(l189,l404,l5),QIList(l33,QIList(l189,l404,l5),l5),l5),l375,l5),l5),QIList(l188,l377,l5),l5),QIList(l33,QIList(l189,l403,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l222,QIList(l113,QIList(l6,QIList(l406,l407,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l279,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l406,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l407,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l407,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l408,l5),QIList(l57,QIList(l31,QIList(l37,l408,l5),l5),QIList(l47,QIList(l42,l408,l5),QIList(l44,l408,l5),l5),l5),l5),l406,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l222,QIList(l113,QIList(l6,QIList(l406,l407,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l406,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l407,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l407,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l71,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l408,l5),QIList(l57,QIList(l31,QIList(l37,l408,l5),l5),QIList(l47,QIList(l42,l408,l5),QIList(l44,l408,l5),l5),l5),l5),l406,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l222,QIList(l113,QIList(l6,QIList(l235,l388,l5),QIList(l276,QIList(QIList(l409,QIList(l186,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l388,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l388,l5),l5),QIList(l354,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l276,QIList(QIList(l114,QIList(l32,l388,l5),l5),QIList(l385,QIList(l35,l388,l5),l5),l5),QIList(l51,QIList(l187,QIList(QIList(l189,l114,l5),QIList(l189,QIList(l18,l5),l5),QIList(l189,l385,l5),l5),l5),l409,l5),QIList(l119,l388,QIList(l37,l388,l5),l5),l5),l5),l5),l5),QIList(l119,l409,QIList(l70,l409,l5),l5),QIList(l187,QIList(l276,QIList(l189,QIList(l81,QIList(l113,l33,l5),l409,l5),l5),QIList(l119,QIList(l188,QIList(l63,QIList(l113,l68,l5),QIList(l81,QIList(l113,l95,l5),l409,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l222,QIList(l113,QIList(l6,QIList(l410,l395,l235,l377,l5),QIList(l187,QIList(l59,QIList(l123,QIList(l189,l410,l5),QIList(l189,l395,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l59,l222,QIList(l113,QIList(l6,QIList(l382,l235,l377,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l382,l5),l5),l5),QIList(l188,l377,l5),QIList(l189,l385,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l222,QIList(l113,QIList(l6,QIList(l235,l411,l5),QIList(l54,QIList(QIList(l13,l411,l5),l5,l5),QIList(QIList(l13,QIList(l33,l411,l5),l5),QIList(l32,l411,l5),l5),QIList(l4,QIList(l276,QIList(QIList(l412,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l412,l5),QIList(l189,QIList(l32,l411,l5),l5),l5),l5),QIList(l232,QIList(l189,l412,l5),QIList(l189,l412,l5),QIList(l58,QIList(l188,QIList(l33,l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l222,QIList(l113,QIList(l6,QIList(l235,l411,l5),QIList(l54,QIList(QIList(l13,l411,l5),l4,l5),QIList(QIList(l13,QIList(l33,l411,l5),l5),QIList(l32,l411,l5),l5),QIList(l4,QIList(l187,QIList(l232,QIList(l189,QIList(l32,l411,l5),l5),QIList(l57,QIList(l188,QIList(l33,l411,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l187,QIList(l55,QIList(l189,l382,l5),QIList(l188,QIList(l68,l384,QIList(l187,QIList(QIList(l4,QIList(l354,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l276,QIList(QIList(l413,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l413,l5),QIList(l189,l382,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l414,l5),QIList(l232,QIList(l343,QIList(l32,l414,l5),l4,l5),l414,QIList(l187,QIList(QIList(l28,QIList(l189,l413,l5),QIList(l186,QIList(l189,QIList(l32,l414,l5),l5),l5),l5),QIList(l188,QIList(l33,l414,l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l222,QIList(l113,QIList(l6,QIList(l235,l384,l5),QIList(l232,QIList(l13,l384,l5),l5,QIList(l232,QIList(l343,QIList(l34,l384,l5),l4,l5),QIList(l187,QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),l5),QIList(l187,QIList(l232,QIList(l189,QIList(l34,l384,l5),l5),QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),QIList(l54,QIList(l188,QIList(l33,l384,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l222,QIList(l113,QIList(l6,QIList(l415,l235,l377,l5),QIList(l276,QIList(QIList(l416,QIList(l18,l5),l5),QIList(l417,QIList(l42,l415,l5),l5),QIList(l418,QIList(l43,l415,l5),l5),QIList(l395,QIList(l44,l415,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l417,l5),0,l5),QIList(QIList(l189,l416,l5),QIList(l189,l418,l5),l5),l5),QIList(l263,QIList(l331,QIList(l189,l417,l5),QIList(l189,l416,l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l49,QIList(l189,l417,l5),l5),l5),QIList(l189,l395,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l222,QIList(l113,QIList(l6,QIList(l415,l235,l377,l5),QIList(l276,QIList(QIList(l417,QIList(l42,l415,l5),l5),QIList(l419,QIList(l18,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l419,l5),QIList(l189,QIList(l43,l415,l5),l5),l5),QIList(QIList(l189,l417,l5),l5,l5),l5),QIList(l263,QIList(l189,l419,l5),QIList(l119,QIList(l189,l417,l5),QIList(l32,QIList(l189,l419,l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l189,l419,l5),QIList(l33,QIList(l189,l419,l5),l5),l5),l5),QIList(l189,QIList(l44,l415,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l389,l5),QIList(l115,QIList(l420,l391,l421,l422,l423,l5),QIList(l118,l389,l5),QIList(l276,QIList(QIList(l412,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l412,l5),QIList(l189,l375,l5),l5),QIList(l188,QIList(l81,QIList(l113,l47,l5),l420,l391,l5),l5),QIList(QIList(l189,QIList(l32,l421,l5),l5),QIList(l30,QIList(l189,l412,l5),QIList(l189,l423,l5),l5),l5),QIList(l188,QIList(l33,l421,l5),l5),l5),QIList(l189,l422,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l66,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l65,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l16,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l263,QIList(l189,l425,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l222,QIList(l113,QIList(l6,QIList(l234,l385,l5),QIList(l187,QIList(l283,l5,QIList(l189,l385,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l123,QIList(l339,QIList(l186,QIList(l189,l380,l5),l5),QIList(l11,QIList(l189,QIList(l338,l380,l5),l5),QIList(l189,l376,l5),QIList(l188,QIList(l232,QIList(l57,QIList(l346,QIList(l32,l377,l5),l5),QIList(l29,QIList(l13,QIList(l33,l377,l5),l5),l5),l5),QIList(l187,QIList(QIList(l189,QIList(l32,l377,l5),l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,QIList(l33,l377,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l276,QIList(QIList(l375,QIList(l18,"FN",l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l375,l5),QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),QIList(l358,QIList(l189,l375,l5),"fname",QIList(l189,l380,l5),l5),QIList(l189,l375,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l8,QIList(l20,QIList(l186,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),l5,QIList(l123,QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),QIList(l123,QIList(l188,l377,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l187,QIList(l113,QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l2,QIList(l228,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l222,QIList(l113,QIList(l6,QIList(l235,l378,l5),QIList(l187,QIList(l271,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l225,QIList(l186,QIList(l189,l379,l5),l5),l5),l5),l5),l378,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l271,QIList(l221,QIList(l186,QIList(l189,l380,l5),l5),QIList(l186,QIList(l113,QIList(l6,QIList(l189,QIList(l81,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l232,QIList(l343,l375,QIList(l186,l371,l5),l5),QIList(l186,l235,l5),l375,l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5); ((l212).value = l427); var l428 = QIList(QIList(l426,"l426"),QIList(l425,"l425"),QIList(l424,"l424"),QIList(l423,"l423"),QIList(l422,"l422"),QIList(l421,"l421"),QIList(l420,"l420"),QIList(l419,"l419"),QIList(l418,"l418"),QIList(l417,"l417"),QIList(l416,"l416"),QIList(l415,"l415"),QIList(l414,"l414"),QIList(l413,"l413"),QIList(l412,"l412"),QIList(l411,"l411"),QIList(l410,"l410"),QIList(l409,"l409"),QIList(l408,"l408"),QIList(l407,"l407"),QIList(l406,"l406"),QIList(l405,"l405"),QIList(l404,"l404"),QIList(l403,"l403"),QIList(l402,"l402"),QIList(l401,"l401"),QIList(l400,"l400"),QIList(l399,"l399"),QIList(l398,"l398"),QIList(l397,"l397"),QIList(l396,"l396"),QIList(l395,"l395"),QIList(l394,"l394"),QIList(l393,"l393"),QIList(l392,"l392"),QIList(l391,"l391"),QIList(l390,"l390"),QIList(l389,"l389"),QIList(l388,"l388"),QIList(l387,"l387"),QIList(l386,"l386"),QIList(l385,"l385"),QIList(l384,"l384"),QIList(l383,"l383"),QIList(l382,"l382"),QIList(l381,"l381"),QIList(l380,"l380"),QIList(l379,"l379"),QIList(l378,"l378"),QIList(l377,"l377"),QIList(l376,"l376"),QIList(l375,"l375"),QIList(l374,"l374"),QIList(l373,"l373"),QIList(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l340,"l340"),QIList(l339,"l339"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l334,"l334"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l5); (function(){ @@ -10653,8 +10664,8 @@ var l428 = QIList(QIList(l426,"l426"),QIList(l425,"l425"),QIList(l424,"l424"),QI l148.fvalue(pv, l2); l148.fvalue(pv, l1); ((l259).value = l428); - ((l213).value = 1183); - ((l17).value = 454); + ((l213).value = 1189); + ((l17).value = 460); return ((l280).value = 332); })(); ((l260).value = 428); diff --git a/ecmalisp.lisp b/ecmalisp.lisp index dc694a6..bbc6340 100644 --- a/ecmalisp.lisp +++ b/ecmalisp.lisp @@ -954,7 +954,9 @@ (concat (prin1-to-string (car last)) " . " (prin1-to-string (cdr last))))) ")")) ((arrayp form) - (concat "#" (prin1-to-string (vector-to-list form)))) + (concat "#" (if (zerop (length form)) + "()" + (prin1-to-string (vector-to-list form))))) ((packagep form) (concat "#"))))