From d0aa92d6993f9487ab9064312e801718406c1b15 Mon Sep 17 00:00:00 2001 From: David Vazquez Date: Mon, 11 Feb 2013 01:39:27 +0000 Subject: [PATCH] MAKE-PACKAGE accepts :USE keyword argument --- ecmalisp.js | 4415 +++++++++++++++++++++++++++------------------------------ ecmalisp.lisp | 4 +- 2 files changed, 2065 insertions(+), 2354 deletions(-) diff --git a/ecmalisp.js b/ecmalisp.js index fca007f..517ba99 100644 --- a/ecmalisp.js +++ b/ecmalisp.js @@ -84,7 +84,6 @@ var l13 = {name: "NULL"}; return v2; })((function (values,v1){ checkArgs(arguments, 2); - var i; return (function(){ return ((v1 === l5.value)?l4.value: l5.value); })(); @@ -113,7 +112,6 @@ var l18 = {name: "INTEGER-TO-STRING"}; v3="G"; default: break; } - var i; return (function(){ ((l16).value = (function(){ var x1 = (function(){ @@ -155,7 +153,6 @@ var l19 = {name: "BOUNDP"}; return v6; })((function (values,v5){ checkArgs(arguments, 2); - var i; return (function(){ return ((v5.value !== undefined)?l4.value: l5.value); })(); @@ -169,7 +166,6 @@ var l20 = {name: "="}; return v9; })((function (values,v7,v8){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var x1 = v7; @@ -189,7 +185,6 @@ var l21 = {name: "*"}; return v12; })((function (values,v10,v11){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var x1 = v10; @@ -209,7 +204,6 @@ var l22 = {name: "/"}; return v15; })((function (values,v13,v14){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var x1 = v13; @@ -229,7 +223,6 @@ var l23 = {name: "1+"}; return v17; })((function (values,v16){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var x1 = v16; @@ -247,7 +240,6 @@ var l24 = {name: "1-"}; return v19; })((function (values,v18){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var x1 = v18; @@ -265,7 +257,6 @@ var l25 = {name: "ZEROP"}; return v21; })((function (values,v20){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var x1 = v20; @@ -283,7 +274,6 @@ var l26 = {name: "TRUNCATE"}; return v24; })((function (values,v22,v23){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var x = (function(){ @@ -308,7 +298,6 @@ var l27 = {name: "EQL"}; return v27; })((function (values,v25,v26){ checkArgs(arguments, 3); - var i; return (function(){ return ((v25 === v26)?l4.value: l5.value); })(); @@ -322,7 +311,6 @@ var l28 = {name: "NOT"}; return v29; })((function (values,v28){ checkArgs(arguments, 2); - var i; return (function(){ return (v28 !== l5.value ? l5.value : l4.value); })(); @@ -336,7 +324,6 @@ var l29 = {name: "CONS"}; return v32; })((function (values,v30,v31){ checkArgs(arguments, 3); - var i; return (function(){ return ({car: v30, cdr: v31}); })(); @@ -350,7 +337,6 @@ var l30 = {name: "CONSP"}; return v34; })((function (values,v33){ checkArgs(arguments, 2); - var i; return (function(){ return ((function(){ var tmp = v33; @@ -368,7 +354,6 @@ var l31 = {name: "CAR"}; })((function(){ var func = (function (values,v35){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = v35; @@ -388,7 +373,6 @@ var l32 = {name: "CDR"}; return v38; })((function (values,v37){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = v37; @@ -405,7 +389,6 @@ var l33 = {name: "CAAR"}; return v40; })((function (values,v39){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -425,7 +408,6 @@ var l34 = {name: "CADR"}; return v42; })((function (values,v41){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -445,7 +427,6 @@ var l35 = {name: "CDAR"}; return v44; })((function (values,v43){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -465,7 +446,6 @@ var l36 = {name: "CDDR"}; return v46; })((function (values,v45){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -485,7 +465,6 @@ var l37 = {name: "CADDR"}; return v48; })((function (values,v47){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -508,7 +487,6 @@ var l38 = {name: "CDDDR"}; return v50; })((function (values,v49){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -531,7 +509,6 @@ var l39 = {name: "CADDDR"}; return v52; })((function (values,v51){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = (function(){ @@ -557,7 +534,6 @@ var l40 = {name: "FIRST"}; return v54; })((function (values,v53){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = v53; @@ -574,7 +550,6 @@ var l41 = {name: "SECOND"}; return v56; })((function (values,v55){ checkArgs(arguments, 2); - var i; return (function(){ return l34.fvalue(values, v55); })(); @@ -588,7 +563,6 @@ var l42 = {name: "THIRD"}; return v58; })((function (values,v57){ checkArgs(arguments, 2); - var i; return (function(){ return l37.fvalue(values, v57); })(); @@ -602,7 +576,6 @@ var l43 = {name: "FOURTH"}; return v60; })((function (values,v59){ checkArgs(arguments, 2); - var i; return (function(){ return l39.fvalue(values, v59); })(); @@ -616,7 +589,6 @@ var l44 = {name: "REST"}; return v62; })((function (values,v61){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var tmp = v61; @@ -636,7 +608,6 @@ var l45 = {name: "LIST"}; for (var i = arguments.length-1; i>=1; i--) v63 = {car: arguments[i], cdr: v63}; - var i; return (function(){ return v63; })(); @@ -650,7 +621,6 @@ var l46 = {name: "ATOM"}; return v66; })((function (values,v65){ checkArgs(arguments, 2); - var i; return (function(){ return l28.fvalue(values, ((function(){ var tmp = v65; @@ -692,7 +662,6 @@ var l60 = {name: "LISTP"}; return v68; })((function (values,v67){ checkArgs(arguments, 2); - var i; return (function(){ return (l60.fvalue(pv, v67) !== l5.value ? v67 : l45.fvalue(values, v67)); })(); @@ -706,7 +675,6 @@ var l61 = {name: "!REDUCE"}; return v72; })((function (values,v69,v70,v71){ checkArgs(arguments, 4); - var i; return (function(){ return (l13.fvalue(pv, v70) !== l5.value ? v71 : l61.fvalue(values, v69, (function(){ var tmp = v70; @@ -729,7 +697,6 @@ var l62 = {name: "+"}; for (var i = arguments.length-1; i>=1; i--) v73 = {car: arguments[i], cdr: v73}; - var i; return (function(){ return (function(v74){ return (function(){ @@ -775,7 +742,6 @@ var l63 = {name: "-"}; for (var i = arguments.length-1; i>=2; i--) v78 = {car: arguments[i], cdr: v78}; - var i; return (function(){ return (l13.fvalue(pv, v78) !== l5.value ? (function(){ var x1 = v79; @@ -822,7 +788,6 @@ var l65 = {name: "APPEND"}; return v86; })((function (values,v84,v85){ checkArgs(arguments, 3); - var i; return (function(){ return (l13.fvalue(pv, v84) !== l5.value ? v85 : ({car: (function(){ var tmp = v84; @@ -844,7 +809,6 @@ var l65 = {name: "APPEND"}; for (var i = arguments.length-1; i>=1; i--) v87 = {car: arguments[i], cdr: v87}; - var i; return (function(){ return l61.fvalue(values, (function(){ var symbol = l64; @@ -863,7 +827,6 @@ var l66 = {name: "REVAPPEND"}; return v91; })((function (values,v89,v90){ checkArgs(arguments, 3); - var i; return (function(){ (function(){ return (function(){ @@ -891,7 +854,6 @@ var l67 = {name: "REVERSE"}; return v93; })((function (values,v92){ checkArgs(arguments, 2); - var i; return (function(){ return l66.fvalue(values, v92, l5); })(); @@ -911,7 +873,6 @@ var l71 = {name: "LIST-LENGTH"}; return v96; })((function (values,v94){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v95){ (function(){ @@ -942,7 +903,6 @@ var l72 = {name: "LENGTH"}; return v98; })((function (values,v97){ checkArgs(arguments, 2); - var i; return (function(){ return (((typeof(v97) == "string")?l4.value: l5.value) !== l5.value ? (function(){ var x = v97; @@ -967,7 +927,6 @@ var l73 = {name: "CONCAT-TWO"}; return v101; })((function (values,v99,v100){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var string1 = v99; @@ -992,7 +951,6 @@ var l76 = {name: "SENTINEL"}; return v108; })((function (values,v102,v103){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var v104 = ({car: l76, cdr: l5.value}); @@ -1014,7 +972,6 @@ var l76 = {name: "SENTINEL"}; })(); })((function (values,v106){ checkArgs(arguments, 2); - var i; (function(){ var x = v105; if (typeof x != 'object') @@ -1049,7 +1006,6 @@ var l78 = {name: "MAPCAR"}; for (var i = arguments.length-1; i>=3; i--) v109 = {car: arguments[i], cdr: v109}; - var i; return (function(){ return (function(v112){ return (function(){ @@ -1133,7 +1089,6 @@ var l78 = {name: "MAPCAR"}; })(); })((function (values,v115){ checkArgs(arguments, 2); - var i; (function(){ var x = v114; if (typeof x != 'object') @@ -1163,7 +1118,6 @@ var l79 = {name: "IDENTITY"}; return v122; })((function (values,v121){ checkArgs(arguments, 2); - var i; return (function(){ return v121; })(); @@ -1177,14 +1131,12 @@ var l80 = {name: "CONSTANTLY"}; return v125; })((function (values,v123){ checkArgs(arguments, 2); - var i; return (function(){ return (function (values){ var v124= l5.value; for (var i = arguments.length-1; i>=1; i--) v124 = {car: arguments[i], cdr: v124}; - var i; return v123; }); })(); @@ -1198,7 +1150,6 @@ var l81 = {name: "COPY-LIST"}; return v127; })((function (values,v126){ checkArgs(arguments, 2); - var i; return (function(){ return l78.fvalue(values, (function(){ var symbol = l79; @@ -1217,7 +1168,6 @@ var l82 = {name: "CODE-CHAR"}; return v129; })((function (values,v128){ checkArgs(arguments, 2); - var i; return (function(){ return v128; })(); @@ -1231,7 +1181,6 @@ var l83 = {name: "CHAR-CODE"}; return v131; })((function (values,v130){ checkArgs(arguments, 2); - var i; return (function(){ return v130; })(); @@ -1245,7 +1194,6 @@ var l84 = {name: "CHAR="}; return v134; })((function (values,v132,v133){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var x1 = v132; @@ -1265,7 +1213,6 @@ var l85 = {name: "INTEGERP"}; return v136; })((function (values,v135){ checkArgs(arguments, 2); - var i; return (function(){ return (((typeof (v135) == "number")?l4.value: l5.value) !== l5.value ? (function(){ var x1 = (function(){ @@ -1290,7 +1237,6 @@ var l86 = {name: "PLUSP"}; return v138; })((function (values,v137){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var x1 = v137; @@ -1308,7 +1254,6 @@ var l87 = {name: "MINUSP"}; return v140; })((function (values,v139){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ var x1 = v139; @@ -1325,7 +1270,6 @@ var l87 = {name: "MINUSP"}; return v143; })((function (values,v141){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v142){ return (v142 !== l5.value ? v142 : l13.fvalue(values, v141)); @@ -1344,7 +1288,6 @@ var l88 = {name: "NTHCDR"}; return v146; })((function (values,v144,v145){ checkArgs(arguments, 3); - var i; return (function(){ (function(){ return (function(){ @@ -1369,7 +1312,6 @@ var l89 = {name: "NTH"}; return v149; })((function (values,v147,v148){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var tmp = l88.fvalue(pv, v147, v148); @@ -1386,7 +1328,6 @@ var l90 = {name: "LAST"}; return v151; })((function (values,v150){ checkArgs(arguments, 2); - var i; return (function(){ (function(){ return (function(){ @@ -1416,7 +1357,6 @@ var l91 = {name: "BUTLAST"}; return v153; })((function (values,v152){ checkArgs(arguments, 2); - var i; return (function(){ return (((function(){ var tmp = (function(){ @@ -1442,7 +1382,6 @@ var l92 = {name: "MEMBER"}; return v156; })((function (values,v154,v155){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ try { @@ -1480,7 +1419,6 @@ var l93 = {name: "REMOVE"}; return v159; })((function (values,v157,v158){ checkArgs(arguments, 3); - var i; return (function(){ return (l13.fvalue(pv, v158) !== l5.value ? l5.value : (l27.fvalue(pv, v157, (function(){ var tmp = v158; @@ -1506,7 +1444,6 @@ var l94 = {name: "REMOVE-IF"}; return v162; })((function (values,v160,v161){ checkArgs(arguments, 3); - var i; return (function(){ return (l13.fvalue(pv, v161) !== l5.value ? l5.value : ((v160)(pv, (function(){ var tmp = v161; @@ -1532,7 +1469,6 @@ var l95 = {name: "REMOVE-IF-NOT"}; return v165; })((function (values,v163,v164){ checkArgs(arguments, 3); - var i; return (function(){ return (l13.fvalue(pv, v164) !== l5.value ? l5.value : ((v163)(pv, (function(){ var tmp = v164; @@ -1558,7 +1494,6 @@ var l96 = {name: "DIGIT-CHAR-P"}; return v167; })((function (values,v166){ checkArgs(arguments, 2); - var i; return (function(){ return (((function(){ var x1 = v166; @@ -1584,7 +1519,6 @@ var l97 = {name: "DIGIT-CHAR"}; return v169; })((function (values,v168){ checkArgs(arguments, 2); - var i; return (function(){ return ((function(){ var x1 = v168; @@ -1616,7 +1550,6 @@ var l98 = {name: "SUBSEQ"}; v172=l5.value; default: break; } - var i; return (function(){ return (((typeof(v170) == "string")?l4.value: l5.value) !== l5.value ? (v172 !== l5.value ? (function(){ var str = v170; @@ -1643,7 +1576,6 @@ var l99 = {name: "SOME"}; return v180; })((function (values,v174,v175){ checkArgs(arguments, 3); - var i; return (function(){ try { return (((typeof(v175) == "string")?l4.value: l5.value) !== l5.value ? (function(v176,v177){ @@ -1729,7 +1661,6 @@ var l100 = {name: "EVERY"}; return v187; })((function (values,v181,v182){ checkArgs(arguments, 3); - var i; return (function(){ try { return (((typeof(v182) == "string")?l4.value: l5.value) !== l5.value ? (function(v183,v184){ @@ -1815,7 +1746,6 @@ var l101 = {name: "ASSOC"}; return v190; })((function (values,v188,v189){ checkArgs(arguments, 3); - var i; return (function(){ (function(){ try { @@ -1852,7 +1782,6 @@ var l102 = {name: "STRING"}; return v192; })((function (values,v191){ checkArgs(arguments, 2); - var i; return (function(){ return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? v191 : (((function(){ var tmp = v191; @@ -1874,7 +1803,6 @@ var l103 = {name: "STRING="}; return v195; })((function (values,v193,v194){ checkArgs(arguments, 3); - var i; return (function(){ return ((v193 == v194)?l4.value: l5.value); })(); @@ -1888,7 +1816,6 @@ var l104 = {name: "FDEFINITION"}; return v197; })((function (values,v196){ checkArgs(arguments, 2); - var i; return (function(){ return (((typeof v196 == 'function')?l4.value: l5.value) !== l5.value ? v196 : (((function(){ var tmp = v196; @@ -1913,7 +1840,6 @@ var l106 = {name: "WRITE-LINE"}; return v199; })((function (values,v198){ checkArgs(arguments, 2); - var i; return (function(){ l106.fvalue(pv, (l104.fvalue(pv, v198)).toString()); return l5.value; @@ -1931,7 +1857,6 @@ var l109 = {name: "VARIABLE"}; })((function(){ var func = (function (values,v200,v201){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v202){ return (l27.fvalue(pv, v202, l108) !== l5.value ? (function(v203){ @@ -1978,7 +1903,6 @@ var l114 = {name: "SETQ"}; return v209; })((function (values,v205){ checkArgs(arguments, 2); - var i; return (function(){ return (((function(){ var tmp = v205; @@ -2029,7 +1953,6 @@ var l118 = {name: "RPLACA"}; (function(){ ((l112).value = ({car: ({car: l31, cdr: (function (values,v210){ checkArgs(arguments, 2); - var i; return (function(v211,v212){ return values(l45.fvalue(pv, v211), l45.fvalue(pv, v210), l45.fvalue(pv, v212), l65.fvalue(pv, l45.fvalue(pv, l117), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l118), l45.fvalue(pv, v211), l45.fvalue(pv, v212))), l45.fvalue(pv, v212)), l65.fvalue(pv, l45.fvalue(pv, l31), l45.fvalue(pv, v211))); })(l17.fvalue(pv),l17.fvalue(pv)); @@ -2045,7 +1968,6 @@ var l119 = {name: "RPLACD"}; (function(){ ((l112).value = ({car: ({car: l32, cdr: (function (values,v213){ checkArgs(arguments, 2); - var i; return (function(v214,v215){ return values(l45.fvalue(pv, v214), l45.fvalue(pv, v213), l45.fvalue(pv, v215), l65.fvalue(pv, l45.fvalue(pv, l117), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l119), l45.fvalue(pv, v214), l45.fvalue(pv, v215))), l45.fvalue(pv, v215)), l65.fvalue(pv, l45.fvalue(pv, l31), l45.fvalue(pv, v214))); })(l17.fvalue(pv),l17.fvalue(pv)); @@ -2069,7 +1991,6 @@ var l121 = {name: "LIST-ALL-PACKAGES"}; return v216; })((function (values){ checkArgsAtMost(arguments, 1); - var i; return (function(){ return (function(){ var symbol = l120; @@ -2082,20 +2003,29 @@ var l121 = {name: "LIST-ALL-PACKAGES"}; return l121; })(); var l122 = {name: "MAKE-PACKAGE"}; -var l123 = {name: "FIND-PACKAGE-OR-FAIL"}; +var l123 = {name: "USE", 'package': 'KEYWORD'}; +var l124 = {name: "FIND-PACKAGE-OR-FAIL"}; (function(){ (l122).fvalue = (function(v221){ ((v221)["fname"] = "MAKE-PACKAGE"); return v221; - })((function (values,v217,v218){ + })((function (values,v217){ checkArgsAtLeast(arguments, 2); - checkArgsAtMost(arguments, 3); - switch(arguments.length-1){ - case 1: - v218=l5.value; - default: break; - } + var v218; var i; + for (i=2; i=3; i--) v262 = {car: arguments[i], cdr: v262}; - var i; return (v264 !== l5.value ? values(v263, v264) : (function(v265){ (function(){ var tmp = (v265)[v259]; @@ -2497,13 +2415,13 @@ var l143 = {name: "EXPORT"}; return (function(v266){ ((v266)["package"] = v261); (((v261 === (function(){ - var symbol = l132; + var symbol = l133; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())?l4.value: l5.value) !== l5.value ? (function(){ ((v266)["value"] = v266); - return l143.fvalue(pv, l45.fvalue(pv, v266), v261); + return l144.fvalue(pv, l45.fvalue(pv, v266), v261); })() : l5.value); ((v265)[v259] = v266); return values(v266, l5.value); @@ -2513,13 +2431,13 @@ var l143 = {name: "EXPORT"}; throw 'The value ' + name + ' is not a type string.'; return ({name: name}); })()); - })(l127.fvalue(pv, v261))); + })(l128.fvalue(pv, v261))); }); var args = [values]; return (function(){ var values = mv; var vs; - vs = l138.fvalue(values, v259, v261); + vs = l139.fvalue(values, v259, v261); if (typeof vs === 'object' && 'multiple-value' in vs) args = args.concat(vs); else @@ -2527,18 +2445,17 @@ var l143 = {name: "EXPORT"}; return func.apply(window, args); })(); })(); - })(l123.fvalue(pv, v260)); + })(l124.fvalue(pv, v260)); })(); })); - return l142; + return l143; })(); (function(){ - (l134).fvalue = (function(v269){ + (l135).fvalue = (function(v269){ ((v269)["fname"] = "SYMBOL-PACKAGE"); return v269; })((function (values,v268){ checkArgs(arguments, 2); - var i; return (function(){ (((function(){ var tmp = v268; @@ -2552,10 +2469,10 @@ var l143 = {name: "EXPORT"}; })(); })(); })); - return l134; + return l135; })(); (function(){ - (l143).fvalue = (function(v275){ + (l144).fvalue = (function(v275){ ((v275)["fname"] = "EXPORT"); return v275; })((function (values,v270,v271){ @@ -2564,14 +2481,13 @@ var l143 = {name: "EXPORT"}; switch(arguments.length-1){ case 1: v271=(function(){ - var symbol = l135; + var symbol = l136; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(); default: break; } - var i; return (function(){ return (function(v272){ return (function(){ @@ -2595,19 +2511,18 @@ var l143 = {name: "EXPORT"}; return l4.value; })(v270,l5.value); })(); - })(l129.fvalue(pv, v271)); + })(l130.fvalue(pv, v271)); })(); })); - return l143; + return l144; })(); -var l144 = {name: "GET-UNIVERSAL-TIME"}; +var l145 = {name: "GET-UNIVERSAL-TIME"}; (function(){ - (l144).fvalue = (function(v276){ + (l145).fvalue = (function(v276){ ((v276)["fname"] = "GET-UNIVERSAL-TIME"); return v276; })((function (values){ checkArgsAtMost(arguments, 1); - var i; return (function(){ return (function(){ var x1 = (Math.round(new Date() / 1000)); @@ -2616,16 +2531,16 @@ var l144 = {name: "GET-UNIVERSAL-TIME"}; })(); })(); })); - return l144; + return l145; })(); -var l145 = {name: "*NEWLINE*"}; +var l146 = {name: "*NEWLINE*"}; (function(){ - (((l145.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l145).value = l102.fvalue(pv, l82.fvalue(pv, 10)))); - return l145; + (((l146.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l146).value = l102.fvalue(pv, l82.fvalue(pv, 10)))); + return l146; })(); -var l146 = {name: "CONCAT"}; +var l147 = {name: "CONCAT"}; (function(){ - (l146).fvalue = (function(v278){ + (l147).fvalue = (function(v278){ ((v278)["fname"] = "CONCAT"); return v278; })((function (values){ @@ -2633,7 +2548,6 @@ var l146 = {name: "CONCAT"}; for (var i = arguments.length-1; i>=1; i--) v277 = {car: arguments[i], cdr: v277}; - var i; return (function(){ return l61.fvalue(values, (function(){ var symbol = l73; @@ -2643,13 +2557,13 @@ var l146 = {name: "CONCAT"}; })(), v277, ""); })(); })); - return l146; + return l147; })(); -var l147 = {name: "CONCATF"}; -l147; -var l148 = {name: "JOIN"}; +var l148 = {name: "CONCATF"}; +l148; +var l149 = {name: "JOIN"}; (function(){ - (l148).fvalue = (function(v281){ + (l149).fvalue = (function(v281){ ((v281)["fname"] = "JOIN"); return v281; })((function (values,v279,v280){ @@ -2660,7 +2574,6 @@ var l148 = {name: "JOIN"}; v280=""; default: break; } - var i; return (function(){ return (l13.fvalue(pv, v279) !== l5.value ? "" : (l13.fvalue(pv, (function(){ var tmp = v279; @@ -2668,20 +2581,20 @@ var l148 = {name: "JOIN"}; })()) !== l5.value ? (function(){ var tmp = v279; return tmp === l5.value? l5.value: tmp.car; - })() : l146.fvalue(values, (function(){ + })() : l147.fvalue(values, (function(){ var tmp = v279; return tmp === l5.value? l5.value: tmp.car; - })(), v280, l148.fvalue(pv, (function(){ + })(), v280, l149.fvalue(pv, (function(){ var tmp = v279; return tmp === l5.value? l5.value: tmp.cdr; })(), v280)))); })(); })); - return l148; + return l149; })(); -var l149 = {name: "JOIN-TRAILING"}; +var l150 = {name: "JOIN-TRAILING"}; (function(){ - (l149).fvalue = (function(v284){ + (l150).fvalue = (function(v284){ ((v284)["fname"] = "JOIN-TRAILING"); return v284; })((function (values,v282,v283){ @@ -2692,41 +2605,38 @@ var l149 = {name: "JOIN-TRAILING"}; v283=""; default: break; } - var i; return (function(){ - return (l13.fvalue(pv, v282) !== l5.value ? "" : l146.fvalue(values, (function(){ + return (l13.fvalue(pv, v282) !== l5.value ? "" : l147.fvalue(values, (function(){ var tmp = v282; return tmp === l5.value? l5.value: tmp.car; - })(), v283, l149.fvalue(pv, (function(){ + })(), v283, l150.fvalue(pv, (function(){ var tmp = v282; return tmp === l5.value? l5.value: tmp.cdr; })(), v283))); })(); })); - return l149; + return l150; })(); -var l150 = {name: "MAPCONCAT"}; +var l151 = {name: "MAPCONCAT"}; (function(){ - (l150).fvalue = (function(v287){ + (l151).fvalue = (function(v287){ ((v287)["fname"] = "MAPCONCAT"); return v287; })((function (values,v285,v286){ checkArgs(arguments, 3); - var i; return (function(){ - return l148.fvalue(values, l78.fvalue(pv, v285, v286)); + return l149.fvalue(values, l78.fvalue(pv, v285, v286)); })(); })); - return l150; + return l151; })(); -var l151 = {name: "VECTOR-TO-LIST"}; +var l152 = {name: "VECTOR-TO-LIST"}; (function(){ - (l151).fvalue = (function(v293){ + (l152).fvalue = (function(v293){ ((v293)["fname"] = "VECTOR-TO-LIST"); return v293; })((function (values,v288){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v289,v290){ return (function(){ @@ -2760,16 +2670,15 @@ var l151 = {name: "VECTOR-TO-LIST"}; })(l5.value,l72.fvalue(pv, v288)); })(); })); - return l151; + return l152; })(); -var l152 = {name: "LIST-TO-VECTOR"}; +var l153 = {name: "LIST-TO-VECTOR"}; (function(){ - (l152).fvalue = (function(v299){ + (l153).fvalue = (function(v299){ ((v299)["fname"] = "LIST-TO-VECTOR"); return v299; })((function (values,v294){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v295,v296){ return (function(){ @@ -2811,25 +2720,24 @@ var l152 = {name: "LIST-TO-VECTOR"}; })(),0); })(); })); - return l152; + return l153; })(); -var l153 = {name: "VALUES-LIST"}; +var l154 = {name: "VALUES-LIST"}; (function(){ - (l153).fvalue = (function(v301){ + (l154).fvalue = (function(v301){ ((v301)["fname"] = "VALUES-LIST"); return v301; })((function (values,v300){ checkArgs(arguments, 2); - var i; return (function(){ - return values.apply(this, l152.fvalue(pv, v300)); + return values.apply(this, l153.fvalue(pv, v300)); })(); })); - return l153; + return l154; })(); -var l154 = {name: "VALUES"}; +var l155 = {name: "VALUES"}; (function(){ - (l154).fvalue = (function(v303){ + (l155).fvalue = (function(v303){ ((v303)["fname"] = "VALUES"); return v303; })((function (values){ @@ -2837,12 +2745,11 @@ var l154 = {name: "VALUES"}; for (var i = arguments.length-1; i>=1; i--) v302 = {car: arguments[i], cdr: v302}; - var i; return (function(){ - return l153.fvalue(values, v302); + return l154.fvalue(values, v302); })(); })); - return l154; + return l155; })(); (function(){ (l18).fvalue = (function(v307){ @@ -2850,9 +2757,8 @@ var l154 = {name: "VALUES"}; return v307; })((function (values,v304){ checkArgs(arguments, 2); - var i; return (function(){ - return (l25.fvalue(pv, v304) !== l5.value ? "0" : (l87.fvalue(pv, v304) !== l5.value ? l146.fvalue(values, "-", l18.fvalue(pv, (function(){ + return (l25.fvalue(pv, v304) !== l5.value ? "0" : (l87.fvalue(pv, v304) !== l5.value ? l147.fvalue(values, "-", l18.fvalue(pv, (function(){ var x1 = v304; if (typeof x1 !== 'number') throw 'Not a number!'; return 0-x1; @@ -2873,9 +2779,8 @@ var l154 = {name: "VALUES"}; }return l5.value; })(); })(); - return l150.fvalue(values, (function (values,v306){ + return l151.fvalue(values, (function (values,v306){ checkArgs(arguments, 2); - var i; return l102.fvalue(values, l97.fvalue(pv, v306)); }), v305); })(l5.value))); @@ -2883,15 +2788,14 @@ var l154 = {name: "VALUES"}; })); return l18; })(); -var l155 = {name: "PRIN1-TO-STRING"}; -var l156 = {name: "ESCAPE-STRING"}; +var l156 = {name: "PRIN1-TO-STRING"}; +var l157 = {name: "ESCAPE-STRING"}; (function(){ - (l155).fvalue = (function(v316){ + (l156).fvalue = (function(v316){ ((v316)["fname"] = "PRIN1-TO-STRING"); return v316; })((function (values,v308){ checkArgs(arguments, 2); - var i; return (function(){ return (((function(){ var tmp = v308; @@ -2909,17 +2813,16 @@ var l156 = {name: "ESCAPE-STRING"}; for (var i = arguments.length-1; i>=3; i--) v309 = {car: arguments[i], cdr: v309}; - var i; return ((v311 !== l5.value ? ((v310 === v308)?l4.value: l5.value) : l5.value) !== l5.value ? (v308).name : (function(v312,v313){ - return l146.fvalue(values, (l13.fvalue(pv, v312) !== l5.value ? "#" : (((v312 === l125.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l126.fvalue(pv, v312))), ":", v313); - })(l134.fvalue(pv, v308),(v308).name)); + return l147.fvalue(values, (l13.fvalue(pv, v312) !== l5.value ? "#" : (((v312 === l126.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l127.fvalue(pv, v312))), ":", v313); + })(l135.fvalue(pv, v308),(v308).name)); }); var args = [values]; return (function(){ var values = mv; var vs; - vs = l138.fvalue(values, (v308).name, (function(){ - var symbol = l135; + vs = l139.fvalue(values, (v308).name, (function(){ + var symbol = l136; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -2930,13 +2833,13 @@ var l156 = {name: "ESCAPE-STRING"}; args.push(vs); return func.apply(window, args); })(); - })() : (l85.fvalue(pv, v308) !== l5.value ? l18.fvalue(values, v308) : (((typeof(v308) == "string")?l4.value: l5.value) !== l5.value ? l146.fvalue(values, "\"", l156.fvalue(pv, v308), "\"") : (((typeof v308 == 'function')?l4.value: l5.value) !== l5.value ? (function(v314){ - return (v314 !== l5.value ? l146.fvalue(values, "#") : l146.fvalue(values, "#")); + })() : (l85.fvalue(pv, v308) !== l5.value ? l18.fvalue(values, v308) : (((typeof(v308) == "string")?l4.value: l5.value) !== l5.value ? l147.fvalue(values, "\"", l157.fvalue(pv, v308), "\"") : (((typeof v308 == 'function')?l4.value: l5.value) !== l5.value ? (function(v314){ + return (v314 !== l5.value ? l147.fvalue(values, "#") : l147.fvalue(values, "#")); })((function(){ var tmp = (v308)["fname"]; return tmp == undefined? l5.value: tmp ; - })()) : (l60.fvalue(pv, v308) !== l5.value ? l146.fvalue(values, "(", l149.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l155; + })()) : (l60.fvalue(pv, v308) !== l5.value ? l147.fvalue(values, "(", l150.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l156; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -2944,23 +2847,23 @@ var l156 = {name: "ESCAPE-STRING"}; return (l13.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? l155.fvalue(pv, (function(){ + })()) !== l5.value ? l156.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.car; - })()) : l146.fvalue(pv, l155.fvalue(pv, (function(){ + })()) : l147.fvalue(pv, l156.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.car; - })()), " . ", l155.fvalue(pv, (function(){ + })()), " . ", l156.fvalue(pv, (function(){ var tmp = v315; return tmp === l5.value? l5.value: tmp.cdr; })()))); })(l90.fvalue(pv, v308)), ")") : (((function(){ var x = v308; return typeof x === 'object' && 'length' in x; - })()?l4.value: l5.value) !== l5.value ? l146.fvalue(values, "#", l155.fvalue(pv, l151.fvalue(pv, v308))) : (l124.fvalue(pv, v308) !== l5.value ? l146.fvalue(values, "#") : l5.value))))))); + })()?l4.value: l5.value) !== l5.value ? l147.fvalue(values, "#", l156.fvalue(pv, l152.fvalue(pv, v308))) : (l125.fvalue(pv, v308) !== l5.value ? l147.fvalue(values, "#") : l5.value))))))); })(); })); - return l155; + return l156; })(); (function(){ (l106).fvalue = (function(v318){ @@ -2968,7 +2871,6 @@ var l156 = {name: "ESCAPE-STRING"}; return v318; })((function (values,v317){ checkArgs(arguments, 2); - var i; return (function(){ (function(){ var x = v317; @@ -2978,7 +2880,7 @@ var l156 = {name: "ESCAPE-STRING"}; })(); (function(){ var x = (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -2992,14 +2894,13 @@ var l156 = {name: "ESCAPE-STRING"}; })); return l106; })(); -var l157 = {name: "WARN"}; +var l158 = {name: "WARN"}; (function(){ - (l157).fvalue = (function(v320){ + (l158).fvalue = (function(v320){ ((v320)["fname"] = "WARN"); return v320; })((function (values,v319){ checkArgs(arguments, 2); - var i; return (function(){ (function(){ var x = "WARNING: "; @@ -3010,45 +2911,42 @@ var l157 = {name: "WARN"}; return l106.fvalue(values, v319); })(); })); - return l157; + return l158; })(); -var l158 = {name: "PRINT"}; +var l159 = {name: "PRINT"}; (function(){ - (l158).fvalue = (function(v322){ + (l159).fvalue = (function(v322){ ((v322)["fname"] = "PRINT"); return v322; })((function (values,v321){ checkArgs(arguments, 2); - var i; return (function(){ - l106.fvalue(pv, l155.fvalue(pv, v321)); + l106.fvalue(pv, l156.fvalue(pv, v321)); return v321; })(); })); - return l158; + return l159; })(); -var l159 = {name: "MAKE-STRING-STREAM"}; +var l160 = {name: "MAKE-STRING-STREAM"}; (function(){ - (l159).fvalue = (function(v324){ + (l160).fvalue = (function(v324){ ((v324)["fname"] = "MAKE-STRING-STREAM"); return v324; })((function (values,v323){ checkArgs(arguments, 2); - var i; return (function(){ return ({car: v323, cdr: 0}); })(); })); - return l159; + return l160; })(); -var l160 = {name: "%PEEK-CHAR"}; +var l161 = {name: "%PEEK-CHAR"}; (function(){ - (l160).fvalue = (function(v326){ + (l161).fvalue = (function(v326){ ((v326)["fname"] = "%PEEK-CHAR"); return v326; })((function (values,v325){ checkArgs(arguments, 2); - var i; return (function(){ return ((function(){ var x1 = (function(){ @@ -3079,16 +2977,15 @@ var l160 = {name: "%PEEK-CHAR"}; })() : l5.value); })(); })); - return l160; + return l161; })(); -var l161 = {name: "%READ-CHAR"}; +var l162 = {name: "%READ-CHAR"}; (function(){ - (l161).fvalue = (function(v329){ + (l162).fvalue = (function(v329){ ((v329)["fname"] = "%READ-CHAR"); return v329; })((function (values,v327){ checkArgs(arguments, 2); - var i; return (function(){ return ((function(){ var x1 = (function(){ @@ -3130,16 +3027,15 @@ var l161 = {name: "%READ-CHAR"}; })()) : l5.value); })(); })); - return l161; + return l162; })(); -var l162 = {name: "WHITESPACEP"}; +var l163 = {name: "WHITESPACEP"}; (function(){ - (l162).fvalue = (function(v333){ + (l163).fvalue = (function(v333){ ((v333)["fname"] = "WHITESPACEP"); return v333; })((function (values,v330){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v331){ return (v331 !== l5.value ? v331 : (function(v332){ @@ -3148,69 +3044,66 @@ var l162 = {name: "WHITESPACEP"}; })(l84.fvalue(pv, v330, 32)); })(); })); - return l162; + return l163; })(); -var l163 = {name: "SKIP-WHITESPACES"}; +var l164 = {name: "SKIP-WHITESPACES"}; (function(){ - (l163).fvalue = (function(v336){ + (l164).fvalue = (function(v336){ ((v336)["fname"] = "SKIP-WHITESPACES"); return v336; })((function (values,v334){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v335){ - (v335 = l160.fvalue(pv, v334)); + (v335 = l161.fvalue(pv, v334)); return (function(){ return (function(){ - while((v335 !== l5.value ? l162.fvalue(pv, v335) : l5.value) !== l5.value){ - l161.fvalue(pv, v334); - (v335 = l160.fvalue(pv, v334)); + while((v335 !== l5.value ? l163.fvalue(pv, v335) : l5.value) !== l5.value){ + l162.fvalue(pv, v334); + (v335 = l161.fvalue(pv, v334)); }return l5.value; })(); })(); })(l5.value); })(); })); - return l163; + return l164; })(); -var l164 = {name: "TERMINALP"}; +var l165 = {name: "TERMINALP"}; (function(){ - (l164).fvalue = (function(v341){ + (l165).fvalue = (function(v341){ ((v341)["fname"] = "TERMINALP"); return v341; })((function (values,v337){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v338){ return (v338 !== l5.value ? v338 : (function(v339){ return (v339 !== l5.value ? v339 : (function(v340){ return (v340 !== l5.value ? v340 : l84.fvalue(values, 40, v337)); })(l84.fvalue(pv, 41, v337))); - })(l162.fvalue(pv, v337))); + })(l163.fvalue(pv, v337))); })(l13.fvalue(pv, v337)); })(); })); - return l164; + return l165; })(); -var l165 = {name: "READ-UNTIL"}; +var l166 = {name: "READ-UNTIL"}; (function(){ - (l165).fvalue = (function(v346){ + (l166).fvalue = (function(v346){ ((v346)["fname"] = "READ-UNTIL"); return v346; })((function (values,v342,v343){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v344,v345){ - (v345 = l160.fvalue(pv, v342)); + (v345 = l161.fvalue(pv, v342)); (function(){ return (function(){ while((v345 !== l5.value ? l28.fvalue(pv, (v343)(pv, v345)) : l5.value) !== l5.value){ - (v344 = l146.fvalue(pv, v344, l102.fvalue(pv, v345))); - l161.fvalue(pv, v342); - (v345 = l160.fvalue(pv, v342)); + (v344 = l147.fvalue(pv, v344, l102.fvalue(pv, v345))); + l162.fvalue(pv, v342); + (v345 = l161.fvalue(pv, v342)); }return l5.value; })(); })(); @@ -3218,90 +3111,86 @@ var l165 = {name: "READ-UNTIL"}; })("",l5.value); })(); })); - return l165; + return l166; })(); -var l166 = {name: "SKIP-WHITESPACES-AND-COMMENTS"}; +var l167 = {name: "SKIP-WHITESPACES-AND-COMMENTS"}; (function(){ - (l166).fvalue = (function(v350){ + (l167).fvalue = (function(v350){ ((v350)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS"); return v350; })((function (values,v347){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v348){ - l163.fvalue(pv, v347); - (v348 = l160.fvalue(pv, v347)); + l164.fvalue(pv, v347); + (v348 = l161.fvalue(pv, v347)); return (function(){ return (function(){ while((v348 !== l5.value ? l84.fvalue(pv, v348, 59) : l5.value) !== l5.value){ - l165.fvalue(pv, v347, (function (values,v349){ + l166.fvalue(pv, v347, (function (values,v349){ checkArgs(arguments, 2); - var i; return l84.fvalue(values, v349, 10); })); - l163.fvalue(pv, v347); - (v348 = l160.fvalue(pv, v347)); + l164.fvalue(pv, v347); + (v348 = l161.fvalue(pv, v347)); }return l5.value; })(); })(); })(l5.value); })(); })); - return l166; + return l167; })(); -var l167 = {name: "%READ-LIST"}; -var l168 = {name: "LS-READ"}; +var l168 = {name: "%READ-LIST"}; +var l169 = {name: "LS-READ"}; (function(){ - (l167).fvalue = (function(v354){ + (l168).fvalue = (function(v354){ ((v354)["fname"] = "%READ-LIST"); return v354; })((function (values,v351){ checkArgs(arguments, 2); - var i; return (function(){ - l166.fvalue(pv, v351); + l167.fvalue(pv, v351); return (function(v352){ return (l13.fvalue(pv, v352) !== l5.value ? (function(){ throw "Unspected EOF"; })() : (l84.fvalue(pv, v352, 41) !== l5.value ? (function(){ - l161.fvalue(pv, v351); + l162.fvalue(pv, v351); return l5.value; })() : (l84.fvalue(pv, v352, 46) !== l5.value ? (function(){ - l161.fvalue(pv, v351); + l162.fvalue(pv, v351); return (function(v353){ - l166.fvalue(pv, v351); - (l84.fvalue(pv, l161.fvalue(pv, v351), 41) !== l5.value ? l5.value : (function(){ + l167.fvalue(pv, v351); + (l84.fvalue(pv, l162.fvalue(pv, v351), 41) !== l5.value ? l5.value : (function(){ throw "')' was expected."; })()); return v353; - })(l168.fvalue(pv, v351)); - })() : ({car: l168.fvalue(pv, v351), cdr: l167.fvalue(pv, v351)})))); - })(l160.fvalue(pv, v351)); + })(l169.fvalue(pv, v351)); + })() : ({car: l169.fvalue(pv, v351), cdr: l168.fvalue(pv, v351)})))); + })(l161.fvalue(pv, v351)); })(); })); - return l167; + return l168; })(); -var l169 = {name: "READ-STRING"}; +var l170 = {name: "READ-STRING"}; (function(){ - (l169).fvalue = (function(v358){ + (l170).fvalue = (function(v358){ ((v358)["fname"] = "READ-STRING"); return v358; })((function (values,v355){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v356,v357){ - (v357 = l161.fvalue(pv, v355)); + (v357 = l162.fvalue(pv, v355)); (function(){ return (function(){ while(l28.fvalue(pv, l27.fvalue(pv, v357, 34)) !== l5.value){ (l13.fvalue(pv, v357) !== l5.value ? (function(){ throw "Unexpected EOF"; })() : l5.value); - (l27.fvalue(pv, v357, 92) !== l5.value ? (v357 = l161.fvalue(pv, v355)) : l5.value); - (v356 = l146.fvalue(pv, v356, l102.fvalue(pv, v357))); - (v357 = l161.fvalue(pv, v355)); + (l27.fvalue(pv, v357, 92) !== l5.value ? (v357 = l162.fvalue(pv, v355)) : l5.value); + (v356 = l147.fvalue(pv, v356, l102.fvalue(pv, v357))); + (v357 = l162.fvalue(pv, v355)); }return l5.value; })(); })(); @@ -3309,23 +3198,22 @@ var l169 = {name: "READ-STRING"}; })("",l5.value); })(); })); - return l169; + return l170; })(); -var l170 = {name: "READ-SHARP"}; +var l171 = {name: "READ-SHARP"}; (function(){ - (l170).fvalue = (function(v363){ + (l171).fvalue = (function(v363){ ((v363)["fname"] = "READ-SHARP"); return v363; })((function (values,v359){ checkArgs(arguments, 2); - var i; return (function(){ - l161.fvalue(pv, v359); + l162.fvalue(pv, v359); return (function(v360){ - return (l27.fvalue(pv, v360, 39) !== l5.value ? l45.fvalue(values, l108, l168.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 40) !== l5.value ? l152.fvalue(values, l167.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 58) !== l5.value ? (function(){ + return (l27.fvalue(pv, v360, 39) !== l5.value ? l45.fvalue(values, l108, l169.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 40) !== l5.value ? l153.fvalue(values, l168.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 58) !== l5.value ? (function(){ var name = (function(){ - var x = l165.fvalue(pv, v359, (function(){ - var symbol = l164; + var x = l166.fvalue(pv, v359, (function(){ + var symbol = l165; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -3347,39 +3235,38 @@ var l170 = {name: "READ-SHARP"}; throw 'The value ' + index + ' is not a type number.'; return string.charCodeAt(index); })())))); - })(l146.fvalue(pv, l102.fvalue(pv, l161.fvalue(pv, v359)), l165.fvalue(pv, v359, (function(){ - var symbol = l164; + })(l147.fvalue(pv, l102.fvalue(pv, l162.fvalue(pv, v359)), l166.fvalue(pv, v359, (function(){ + var symbol = l165; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()))) : (l27.fvalue(pv, v360, 43) !== l5.value ? (function(v362){ return (l103.fvalue(pv, v362, "common-lisp") !== l5.value ? (function(){ - l168.fvalue(pv, v359); - return l168.fvalue(values, v359); - })() : (l103.fvalue(pv, v362, "ecmalisp") !== l5.value ? l168.fvalue(values, v359) : (function(){ + l169.fvalue(pv, v359); + return l169.fvalue(values, v359); + })() : (l103.fvalue(pv, v362, "ecmalisp") !== l5.value ? l169.fvalue(values, v359) : (function(){ throw "Unknown reader form."; })())); - })(l165.fvalue(pv, v359, (function(){ - var symbol = l164; + })(l166.fvalue(pv, v359, (function(){ + var symbol = l165; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })())) : (function(){ throw "ECASE expression failed."; })()))))); - })(l161.fvalue(pv, v359)); + })(l162.fvalue(pv, v359)); })(); })); - return l170; + return l171; })(); -var l171 = {name: "READ-SYMBOL"}; +var l172 = {name: "READ-SYMBOL"}; (function(){ - (l171).fvalue = (function(v371){ + (l172).fvalue = (function(v371){ ((v371)["fname"] = "READ-SYMBOL"); return v371; })((function (values,v364){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v365,v366,v367,v368,v369){ (v369 = 0); @@ -3417,7 +3304,7 @@ var l171 = {name: "READ-SYMBOL"}; })() !== l5.value ? (function(){ (v367 = v364); (v366 = (function(){ - var symbol = l135; + var symbol = l136; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -3459,23 +3346,22 @@ var l171 = {name: "READ-SYMBOL"}; throw 'The value ' + x + ' is not a type string.'; return x.toUpperCase(); })()); - (v366 = l125.fvalue(pv, v366)); + (v366 = l126.fvalue(pv, v366)); return ((function(v370){ - return (v370 !== l5.value ? v370 : ((v366 === l125.fvalue(pv, "KEYWORD"))?l4.value: l5.value)); - })(v368) !== l5.value ? l142.fvalue(values, v367, v366) : l138.fvalue(values, v367, v366)); + return (v370 !== l5.value ? v370 : ((v366 === l126.fvalue(pv, "KEYWORD"))?l4.value: l5.value)); + })(v368) !== l5.value ? l143.fvalue(values, v367, v366) : l139.fvalue(values, v367, v366)); })(l72.fvalue(pv, v364),l5.value,l5.value,l5.value,l5.value); })(); })); - return l171; + return l172; })(); -var l172 = {name: "!PARSE-INTEGER"}; +var l173 = {name: "!PARSE-INTEGER"}; (function(){ - (l172).fvalue = (function(v382){ + (l173).fvalue = (function(v382){ ((v382)["fname"] = "!PARSE-INTEGER"); return v382; })((function (values,v372,v373){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ try { @@ -3614,98 +3500,95 @@ var l172 = {name: "!PARSE-INTEGER"}; })(); })(); })); - return l172; + return l173; })(); -var l173 = {name: "PARSE-INTEGER"}; +var l174 = {name: "PARSE-INTEGER"}; (function(){ - (l173).fvalue = (function(v384){ + (l174).fvalue = (function(v384){ ((v384)["fname"] = "PARSE-INTEGER"); return v384; })((function (values,v383){ checkArgs(arguments, 2); - var i; return (function(){ - return l172.fvalue(values, v383, l5.value); + return l173.fvalue(values, v383, l5.value); })(); })); - return l173; + return l174; })(); -var l174 = {name: "*EOF*"}; +var l175 = {name: "*EOF*"}; (function(){ - (((l174.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l174).value = l17.fvalue(pv))); - return l174; + (((l175.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l175).value = l17.fvalue(pv))); + return l175; })(); -var l175 = {name: "QUOTE"}; -var l176 = {name: "BACKQUOTE"}; -var l177 = {name: "UNQUOTE-SPLICING"}; -var l178 = {name: "UNQUOTE"}; +var l176 = {name: "QUOTE"}; +var l177 = {name: "BACKQUOTE"}; +var l178 = {name: "UNQUOTE-SPLICING"}; +var l179 = {name: "UNQUOTE"}; (function(){ - (l168).fvalue = (function(v390){ + (l169).fvalue = (function(v390){ ((v390)["fname"] = "LS-READ"); return v390; })((function (values,v385){ checkArgs(arguments, 2); - var i; return (function(){ - l166.fvalue(pv, v385); + l167.fvalue(pv, v385); return (function(v386){ return ((function(v387){ return (v387 !== l5.value ? v387 : l84.fvalue(pv, v386, 41)); })(l13.fvalue(pv, v386)) !== l5.value ? (function(){ - var symbol = l174; + var symbol = l175; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() : (l84.fvalue(pv, v386, 40) !== l5.value ? (function(){ - l161.fvalue(pv, v385); - return l167.fvalue(values, v385); + l162.fvalue(pv, v385); + return l168.fvalue(values, v385); })() : (l84.fvalue(pv, v386, 39) !== l5.value ? (function(){ - l161.fvalue(pv, v385); - return l45.fvalue(values, l175, l168.fvalue(pv, v385)); + l162.fvalue(pv, v385); + return l45.fvalue(values, l176, l169.fvalue(pv, v385)); })() : (l84.fvalue(pv, v386, 96) !== l5.value ? (function(){ - l161.fvalue(pv, v385); - return l45.fvalue(values, l176, l168.fvalue(pv, v385)); + l162.fvalue(pv, v385); + return l45.fvalue(values, l177, l169.fvalue(pv, v385)); })() : (l84.fvalue(pv, v386, 34) !== l5.value ? (function(){ - l161.fvalue(pv, v385); - return l169.fvalue(values, v385); + l162.fvalue(pv, v385); + return l170.fvalue(values, v385); })() : (l84.fvalue(pv, v386, 44) !== l5.value ? (function(){ - l161.fvalue(pv, v385); - return (l27.fvalue(pv, l160.fvalue(pv, v385), 64) !== l5.value ? (function(){ - l161.fvalue(pv, v385); - return l45.fvalue(values, l177, l168.fvalue(pv, v385)); - })() : l45.fvalue(values, l178, l168.fvalue(pv, v385))); - })() : (l84.fvalue(pv, v386, 35) !== l5.value ? l170.fvalue(values, v385) : (function(v388){ + l162.fvalue(pv, v385); + return (l27.fvalue(pv, l161.fvalue(pv, v385), 64) !== l5.value ? (function(){ + l162.fvalue(pv, v385); + return l45.fvalue(values, l178, l169.fvalue(pv, v385)); + })() : l45.fvalue(values, l179, l169.fvalue(pv, v385))); + })() : (l84.fvalue(pv, v386, 35) !== l5.value ? l171.fvalue(values, v385) : (function(v388){ return (function(v389){ - return (v389 !== l5.value ? v389 : l171.fvalue(values, v388)); - })(pv(l172.fvalue(pv, v388, l5.value))); - })(l165.fvalue(pv, v385, (function(){ - var symbol = l164; + return (v389 !== l5.value ? v389 : l172.fvalue(values, v388)); + })(pv(l173.fvalue(pv, v388, l5.value))); + })(l166.fvalue(pv, v385, (function(){ + var symbol = l165; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()))))))))); - })(l160.fvalue(pv, v385)); + })(l161.fvalue(pv, v385)); })(); })); - return l168; + return l169; })(); -var l179 = {name: "LS-READ-FROM-STRING"}; +var l180 = {name: "LS-READ-FROM-STRING"}; (function(){ - (l179).fvalue = (function(v392){ + (l180).fvalue = (function(v392){ ((v392)["fname"] = "LS-READ-FROM-STRING"); return v392; })((function (values,v391){ checkArgs(arguments, 2); - var i; return (function(){ - return l168.fvalue(values, l159.fvalue(pv, v391)); + return l169.fvalue(values, l160.fvalue(pv, v391)); })(); })); - return l179; + return l180; })(); -var l180 = {name: "CODE"}; +var l181 = {name: "CODE"}; (function(){ - (l180).fvalue = (function(v395){ + (l181).fvalue = (function(v395){ ((v395)["fname"] = "CODE"); return v395; })((function (values){ @@ -3713,39 +3596,36 @@ var l180 = {name: "CODE"}; for (var i = arguments.length-1; i>=1; i--) v393 = {car: arguments[i], cdr: v393}; - var i; return (function(){ - return l150.fvalue(values, (function (values,v394){ + return l151.fvalue(values, (function (values,v394){ checkArgs(arguments, 2); - var i; return (l13.fvalue(pv, v394) !== l5.value ? "" : (l85.fvalue(pv, v394) !== l5.value ? l18.fvalue(values, v394) : (((typeof(v394) == "string")?l4.value: l5.value) !== l5.value ? v394 : (function(){ throw "Unknown argument."; })()))); }), v393); })(); })); - return l180; + return l181; })(); -var l181 = {name: "JS!BOOL"}; -var l182 = {name: "LS-COMPILE"}; +var l182 = {name: "JS!BOOL"}; +var l183 = {name: "LS-COMPILE"}; (function(){ - (l181).fvalue = (function(v397){ + (l182).fvalue = (function(v397){ ((v397)["fname"] = "JS!BOOL"); return v397; })((function (values,v396){ checkArgs(arguments, 2); - var i; return (function(){ - return l180.fvalue(values, "(", v396, "?", l182.fvalue(pv, l4.value), ": ", l182.fvalue(pv, l5.value), ")"); + return l181.fvalue(values, "(", v396, "?", l183.fvalue(pv, l4.value), ": ", l183.fvalue(pv, l5.value), ")"); })(); })); - return l181; + return l182; })(); -var l183 = {name: "JS!SELFCALL"}; -l183; -var l184 = {name: "INDENT"}; +var l184 = {name: "JS!SELFCALL"}; +l184; +var l185 = {name: "INDENT"}; (function(){ - (l184).fvalue = (function(v404){ + (l185).fvalue = (function(v404){ ((v404)["fname"] = "INDENT"); return v404; })((function (values){ @@ -3753,11 +3633,10 @@ var l184 = {name: "INDENT"}; for (var i = arguments.length-1; i>=1; i--) v398 = {car: arguments[i], cdr: v398}; - var i; return (function(){ return (function(v399){ return (function(v400,v401,v402){ - (l86.fvalue(pv, l72.fvalue(pv, v399)) !== l5.value ? (v400 = l146.fvalue(pv, v400, " ")) : l5.value); + (l86.fvalue(pv, l72.fvalue(pv, v399)) !== l5.value ? (v400 = l147.fvalue(pv, v400, " ")) : l5.value); (function(){ return (function(){ while((function(){ @@ -3768,7 +3647,7 @@ var l184 = {name: "INDENT"}; return (x1=2; i--) v517 = {car: arguments[i], cdr: v517}; - var i; return (function(){ - return (v518 !== l5.value ? l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return (v518 !== l5.value ? l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var func = ", l148.fvalue(pv, v517), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var func = ", l149.fvalue(pv, v517), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "func.docstring = '", v518, "';", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return func;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()") : (function(){ var f = (function(){ - var symbol = l180; + var symbol = l181; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -4699,17 +4543,16 @@ var l235 = {name: "LAMBDA-DOCSTRING-WRAPPER"}; })()); })(); })); - return l235; + return l236; })(); -var l236 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"}; -var l237 = {name: "N/A"}; +var l237 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"}; +var l238 = {name: "N/A"}; (function(){ - (l236).fvalue = (function(v525){ + (l237).fvalue = (function(v525){ ((v525)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT"); return v525; })((function (values,v520,v521,v522){ checkArgs(arguments, 4); - var i; return (function(){ return (function(v523,v524){ return (function(){ @@ -4720,24 +4563,24 @@ var l237 = {name: "N/A"}; return (1=1; i--) v568 = {car: arguments[i], cdr: v568}; - var i; return (function(){ return (function(v569){ (function(){ @@ -5115,7 +4949,7 @@ var l244 = {name: "SET"}; })()) !== l5.value ? (function(){ throw "Odd paris in SETQ"; })() : (function(){ - (v569 = l146.fvalue(pv, v569, l146.fvalue(pv, l243.fvalue(pv, (function(){ + (v569 = l147.fvalue(pv, v569, l147.fvalue(pv, l244.fvalue(pv, (function(){ var tmp = v568; return tmp === l5.value? l5.value: tmp.car; })(), l34.fvalue(pv, v568)), (l13.fvalue(pv, l36.fvalue(pv, v568)) !== l5.value ? "" : ", ")))); @@ -5131,48 +4965,45 @@ var l244 = {name: "SET"}; throw cf; } })(); - return l180.fvalue(values, "(", v569, ")"); + return l181.fvalue(values, "(", v569, ")"); })(""); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l245 = {name: "JS-VREF"}; -((l219).value = ({car: l45.fvalue(pv, l245, (function (values,v570){ +var l246 = {name: "JS-VREF"}; +((l220).value = ({car: l45.fvalue(pv, l246, (function (values,v570){ checkArgs(arguments, 2); - var i; return (function(){ return v570; })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l246 = {name: "JS-VSET"}; -((l219).value = ({car: l45.fvalue(pv, l246, (function (values,v571,v572){ +var l247 = {name: "JS-VSET"}; +((l220).value = ({car: l45.fvalue(pv, l247, (function (values,v571,v572){ checkArgs(arguments, 3); - var i; return (function(){ - return l180.fvalue(values, "(", v571, " = ", l182.fvalue(pv, v572), ")"); + return l181.fvalue(values, "(", v571, " = ", l183.fvalue(pv, v572), ")"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); (function(){ - (l156).fvalue = (function(v579){ + (l157).fvalue = (function(v579){ ((v579)["fname"] = "ESCAPE-STRING"); return v579; })((function (values,v573){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v574,v575,v576){ (function(){ @@ -5187,12 +5018,12 @@ var l246 = {name: "JS-VSET"}; (function(v577){ ((function(v578){ return (v578 !== l5.value ? v578 : l84.fvalue(pv, v577, 92)); - })(l84.fvalue(pv, v577, 34)) !== l5.value ? (v574 = l146.fvalue(pv, v574, "\\")) : l5.value); + })(l84.fvalue(pv, v577, 34)) !== l5.value ? (v574 = l147.fvalue(pv, v574, "\\")) : l5.value); (l84.fvalue(pv, v577, 10) !== l5.value ? (function(){ - (v574 = l146.fvalue(pv, v574, "\\")); + (v574 = l147.fvalue(pv, v574, "\\")); return (v577 = 110); })() : l5.value); - return (v574 = l146.fvalue(pv, v574, l102.fvalue(pv, v577))); + return (v574 = l147.fvalue(pv, v574, l102.fvalue(pv, v577))); })((function(){ var string = v573; var index = v575; @@ -5214,30 +5045,29 @@ var l246 = {name: "JS-VSET"}; })("",0,l72.fvalue(pv, v573)); })(); })); - return l156; + return l157; })(); -var l247 = {name: "*LITERAL-SYMBOLS*"}; +var l248 = {name: "*LITERAL-SYMBOLS*"}; (function(){ - (((l247.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l247).value = l5.value)); - return l247; + (((l248.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l248).value = l5.value)); + return l248; })(); -var l248 = {name: "*LITERAL-COUNTER*"}; +var l249 = {name: "*LITERAL-COUNTER*"}; (function(){ - (((l248.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l248).value = 0)); - return l248; + (((l249.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l249).value = 0)); + return l249; })(); -var l249 = {name: "GENLIT"}; +var l250 = {name: "GENLIT"}; (function(){ - (l249).fvalue = (function(v580){ + (l250).fvalue = (function(v580){ ((v580)["fname"] = "GENLIT"); return v580; })((function (values){ checkArgsAtMost(arguments, 1); - var i; return (function(){ - return l180.fvalue(values, "l", ((l248).value = (function(){ + return l181.fvalue(values, "l", ((l249).value = (function(){ var x1 = (function(){ - var symbol = l248; + var symbol = l249; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5247,11 +5077,11 @@ var l249 = {name: "GENLIT"}; })())); })(); })); - return l249; + return l250; })(); -var l250 = {name: "LITERAL"}; +var l251 = {name: "LITERAL"}; (function(){ - (l250).fvalue = (function(v595){ + (l251).fvalue = (function(v595){ ((v595)["fname"] = "LITERAL"); return v595; })((function (values,v581,v582){ @@ -5262,27 +5092,26 @@ var l250 = {name: "LITERAL"}; v582=l5.value; default: break; } - var i; return (function(){ - return (l85.fvalue(pv, v581) !== l5.value ? l18.fvalue(values, v581) : (((typeof(v581) == "string")?l4.value: l5.value) !== l5.value ? l180.fvalue(values, "\"", l156.fvalue(pv, v581), "\"") : (((function(){ + return (l85.fvalue(pv, v581) !== l5.value ? l18.fvalue(values, v581) : (((typeof(v581) == "string")?l4.value: l5.value) !== l5.value ? l181.fvalue(values, "\"", l157.fvalue(pv, v581), "\"") : (((function(){ var tmp = v581; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v583){ return (v583 !== l5.value ? v583 : (function(v585,v586){ - ((l247).value = ({car: ({car: v581, cdr: v585}), cdr: (function(){ - var symbol = l247; + ((l248).value = ({car: ({car: v581, cdr: v585}), cdr: (function(){ + var symbol = l248; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); - l207.fvalue(pv, l180.fvalue(pv, "var ", v585, " = ", v586)); + l208.fvalue(pv, l181.fvalue(pv, "var ", v585, " = ", v586)); return v585; - })(l249.fvalue(pv),(function(v584){ - return (l13.fvalue(pv, v584) !== l5.value ? l180.fvalue(pv, "{name: \"", l156.fvalue(pv, (v581).name), "\"}") : l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l142), l45.fvalue(pv, (v581).name), l45.fvalue(pv, l126.fvalue(pv, v584))))); - })(l134.fvalue(pv, v581)))); + })(l250.fvalue(pv),(function(v584){ + return (l13.fvalue(pv, v584) !== l5.value ? l181.fvalue(pv, "{name: \"", l157.fvalue(pv, (v581).name), "\"}") : l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l143), l45.fvalue(pv, (v581).name), l45.fvalue(pv, l127.fvalue(pv, v584))))); + })(l135.fvalue(pv, v581)))); })((function(){ var tmp = l101.fvalue(pv, v581, (function(){ - var symbol = l247; + var symbol = l248; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5294,135 +5123,129 @@ var l250 = {name: "LITERAL"}; })()?l4.value: l5.value) !== l5.value ? (function(){ var v587 = l91.fvalue(pv, v581); var v588 = l90.fvalue(pv, v581); - var v589 = l180.fvalue(pv, "QIList(", l149.fvalue(pv, l78.fvalue(pv, (function (values,v590){ + var v589 = l181.fvalue(pv, "QIList(", l150.fvalue(pv, l78.fvalue(pv, (function (values,v590){ checkArgs(arguments, 2); - var i; - return l250.fvalue(values, v590, l4.value); - }), v587), ","), l250.fvalue(pv, (function(){ + return l251.fvalue(values, v590, l4.value); + }), v587), ","), l251.fvalue(pv, (function(){ var tmp = v588; return tmp === l5.value? l5.value: tmp.car; - })(), l4.value), ",", l250.fvalue(pv, (function(){ + })(), l4.value), ",", l251.fvalue(pv, (function(){ var tmp = v588; return tmp === l5.value? l5.value: tmp.cdr; })(), l4.value), ")"); return (v582 !== l5.value ? v589 : (function(v591){ - l207.fvalue(pv, l180.fvalue(pv, "var ", v591, " = ", v589)); + l208.fvalue(pv, l181.fvalue(pv, "var ", v591, " = ", v589)); return v591; - })(l249.fvalue(pv))); + })(l250.fvalue(pv))); })() : (((function(){ var x = v581; return typeof x === 'object' && 'length' in x; })()?l4.value: l5.value) !== l5.value ? (function(v592){ return (function(v593){ return (v582 !== l5.value ? v593 : (function(v594){ - l207.fvalue(pv, l180.fvalue(pv, "var ", v594, " = ", v593)); + l208.fvalue(pv, l181.fvalue(pv, "var ", v594, " = ", v593)); return v594; - })(l249.fvalue(pv))); - })(l146.fvalue(pv, "[", l148.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l250; + })(l250.fvalue(pv))); + })(l147.fvalue(pv, "[", l149.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l251; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v592), ", "), "]")); - })(l151.fvalue(pv, v581)) : l5.value))))); + })(l152.fvalue(pv, v581)) : l5.value))))); })(); })); - return l250; + return l251; })(); -((l219).value = ({car: l45.fvalue(pv, l175, (function (values,v596){ +((l220).value = ({car: l45.fvalue(pv, l176, (function (values,v596){ checkArgs(arguments, 2); - var i; return (function(){ - return l250.fvalue(values, v596); + return l251.fvalue(values, v596); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l251 = {name: "%WHILE"}; -((l219).value = ({car: l45.fvalue(pv, l251, (function (values,v598){ +var l252 = {name: "%WHILE"}; +((l220).value = ({car: l45.fvalue(pv, l252, (function (values,v598){ checkArgsAtLeast(arguments, 2); var v597= l5.value; for (var i = arguments.length-1; i>=2; i--) v597 = {car: arguments[i], cdr: v597}; - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "while(", l182.fvalue(pv, v598), " !== ", l182.fvalue(pv, l5.value), "){", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "while(", l183.fvalue(pv, v598), " !== ", l183.fvalue(pv, l5.value), "){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l242.fvalue(pv, v597)), "}", "return ", l182.fvalue(pv, l5.value), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l243.fvalue(pv, v597)), "}", "return ", l183.fvalue(pv, l5.value), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l252 = {name: "SYMBOL-FUNCTION"}; -((l219).value = ({car: l45.fvalue(pv, l108, (function (values,v599){ +var l253 = {name: "SYMBOL-FUNCTION"}; +((l220).value = ({car: l45.fvalue(pv, l108, (function (values,v599){ checkArgs(arguments, 2); - var i; return (function(){ return ((l60.fvalue(pv, v599) !== l5.value ? (((function(){ var tmp = v599; return tmp === l5.value? l5.value: tmp.car; - })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l241.fvalue(values, l34.fvalue(pv, v599), l36.fvalue(pv, v599)) : (((function(){ + })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l242.fvalue(values, l34.fvalue(pv, v599), l36.fvalue(pv, v599)) : (((function(){ var tmp = v599; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v600){ - return (v600 !== l5.value ? l189.fvalue(values, v600) : l182.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l252), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, v599)))))); - })(l200.fvalue(pv, v599, (function(){ - var symbol = l201; + return (v600 !== l5.value ? l190.fvalue(values, v600) : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l253), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v599)))))); + })(l201.fvalue(pv, v599, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l108)) : l5.value)); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l253 = {name: "MAKE-FUNCTION-BINDING"}; +var l254 = {name: "MAKE-FUNCTION-BINDING"}; (function(){ - (l253).fvalue = (function(v602){ + (l254).fvalue = (function(v602){ ((v602)["fname"] = "MAKE-FUNCTION-BINDING"); return v602; })((function (values,v601){ checkArgs(arguments, 2); - var i; return (function(){ - return l186.fvalue(values, v601, l108, l203.fvalue(pv, v601)); + return l187.fvalue(values, v601, l108, l204.fvalue(pv, v601)); })(); })); - return l253; + return l254; })(); -var l254 = {name: "COMPILE-FUNCTION-DEFINITION"}; +var l255 = {name: "COMPILE-FUNCTION-DEFINITION"}; (function(){ - (l254).fvalue = (function(v604){ + (l255).fvalue = (function(v604){ ((v604)["fname"] = "COMPILE-FUNCTION-DEFINITION"); return v604; })((function (values,v603){ checkArgs(arguments, 2); - var i; return (function(){ - return l241.fvalue(values, (function(){ + return l242.fvalue(values, (function(){ var tmp = v603; return tmp === l5.value? l5.value: tmp.car; })(), (function(){ @@ -5431,41 +5254,39 @@ var l254 = {name: "COMPILE-FUNCTION-DEFINITION"}; })()); })(); })); - return l254; + return l255; })(); -var l255 = {name: "TRANSLATE-FUNCTION"}; +var l256 = {name: "TRANSLATE-FUNCTION"}; (function(){ - (l255).fvalue = (function(v607){ + (l256).fvalue = (function(v607){ ((v607)["fname"] = "TRANSLATE-FUNCTION"); return v607; })((function (values,v605){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v606){ - return l189.fvalue(values, v606); - })(l200.fvalue(pv, v605, (function(){ - var symbol = l201; + return l190.fvalue(values, v606); + })(l201.fvalue(pv, v605, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l108)); })(); })); - return l255; + return l256; })(); -var l256 = {name: "FLET"}; -((l219).value = ({car: l45.fvalue(pv, l256, (function (values,v609){ +var l257 = {name: "FLET"}; +((l220).value = ({car: l45.fvalue(pv, l257, (function (values,v609){ checkArgsAtLeast(arguments, 2); var v608= l5.value; for (var i = arguments.length-1; i>=2; i--) v608 = {car: arguments[i], cdr: v608}; - var i; return (function(){ return (function(){ try { - var v614 = l201.value; + var v614 = l202.value; var v610 = l78.fvalue(pv, (function(){ var symbol = l31; var func = symbol.fvalue; @@ -5479,213 +5300,206 @@ var l256 = {name: "FLET"}; return func; })(), v609); var v612 = l78.fvalue(pv, (function(){ - var symbol = l254; + var symbol = l255; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v611); - ((l201).value = l199.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l253; + ((l202).value = l200.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l254; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v610), (function(){ - var symbol = l201; + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l108)); - return l180.fvalue(values, "(function(", l148.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l255; + return l181.fvalue(values, "(function(", l149.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l256; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v610), ","), "){", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(v613){ - return l184.fvalue(pv, v613); - })(l242.fvalue(pv, v608, l4.value)), "})(", l148.fvalue(pv, v612, ","), ")"); + return l185.fvalue(pv, v613); + })(l243.fvalue(pv, v608, l4.value)), "})(", l149.fvalue(pv, v612, ","), ")"); } finally { - l201.value = v614; + l202.value = v614; } })(); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l257 = {name: "LABELS"}; -((l219).value = ({car: l45.fvalue(pv, l257, (function (values,v616){ +var l258 = {name: "LABELS"}; +((l220).value = ({car: l45.fvalue(pv, l258, (function (values,v616){ checkArgsAtLeast(arguments, 2); var v615= l5.value; for (var i = arguments.length-1; i>=2; i--) v615 = {car: arguments[i], cdr: v615}; - var i; return (function(){ return (function(){ try { - var v619 = l201.value; + var v619 = l202.value; var v617 = l78.fvalue(pv, (function(){ var symbol = l31; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v616); - ((l201).value = l199.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l253; + ((l202).value = l200.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l254; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v617), (function(){ - var symbol = l201; + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l108)); - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l150.fvalue(pv, (function (values,v618){ + })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v618){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "var ", l255.fvalue(pv, (function(){ + return l181.fvalue(values, "var ", l256.fvalue(pv, (function(){ var tmp = v618; return tmp === l5.value? l5.value: tmp.car; - })()), " = ", l241.fvalue(pv, l34.fvalue(pv, v618), l36.fvalue(pv, v618)), ";", (function(){ - var symbol = l145; + })()), " = ", l242.fvalue(pv, l34.fvalue(pv, v618), l36.fvalue(pv, v618)), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - }), v616), l242.fvalue(pv, v615, l4.value)), "})()"); + }), v616), l243.fvalue(pv, v615, l4.value)), "})()"); } finally { - l201.value = v619; + l202.value = v619; } })(); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l258 = {name: "*COMPILING-FILE*"}; +var l259 = {name: "*COMPILING-FILE*"}; (function(){ - (((l258.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l258).value = l5.value)); - return l258; + (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = l5.value)); + return l259; })(); -var l259 = {name: "EVAL-WHEN-COMPILE"}; -var l260 = {name: "EVAL"}; -((l219).value = ({car: l45.fvalue(pv, l259, (function (values){ +var l260 = {name: "EVAL-WHEN-COMPILE"}; +var l261 = {name: "EVAL"}; +((l220).value = ({car: l45.fvalue(pv, l260, (function (values){ var v620= l5.value; for (var i = arguments.length-1; i>=1; i--) v620 = {car: arguments[i], cdr: v620}; - var i; return (function(){ return ((function(){ - var symbol = l258; + var symbol = l259; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? (function(){ - l260.fvalue(pv, ({car: l117, cdr: v620})); + l261.fvalue(pv, ({car: l117, cdr: v620})); return l5.value; - })() : l182.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v620))); + })() : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v620))); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l261 = {name: "DEFINE-TRANSFORMATION"}; -l261; -((l219).value = ({car: l45.fvalue(pv, l117, (function (values){ +var l262 = {name: "DEFINE-TRANSFORMATION"}; +l262; +((l220).value = ({car: l45.fvalue(pv, l117, (function (values){ var v621= l5.value; for (var i = arguments.length-1; i>=1; i--) v621 = {car: arguments[i], cdr: v621}; - var i; return (function(){ return (l13.fvalue(pv, (function(){ var tmp = v621; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? l182.fvalue(values, (function(){ + })()) !== l5.value ? l183.fvalue(values, (function(){ var tmp = v621; return tmp === l5.value? l5.value: tmp.car; })(), (function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) : l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + })()) : l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l242.fvalue(pv, v621, l4.value)), "})()")); + })(), l185.fvalue(pv, l243.fvalue(pv, v621, l4.value)), "})()")); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l262 = {name: "SPECIAL-VARIABLE-P"}; +var l263 = {name: "SPECIAL-VARIABLE-P"}; (function(){ - (l262).fvalue = (function(v623){ + (l263).fvalue = (function(v623){ ((v623)["fname"] = "SPECIAL-VARIABLE-P"); return v623; })((function (values,v622){ checkArgs(arguments, 2); - var i; return (function(){ - return (l213.fvalue(pv, v622, l109, l215) !== l5.value ? l4.value : l5.value); + return (l214.fvalue(pv, v622, l109, l216) !== l5.value ? l4.value : l5.value); })(); })); - return l262; + return l263; })(); -var l263 = {name: "LET-BINDING-WRAPPER"}; +var l264 = {name: "LET-BINDING-WRAPPER"}; (function(){ - (l263).fvalue = (function(v630){ + (l264).fvalue = (function(v630){ ((v630)["fname"] = "LET-BINDING-WRAPPER"); return v630; })((function (values,v624,v625){ checkArgs(arguments, 3); - var i; return (function(){ try { (l13.fvalue(pv, v624) !== l5.value ? (function(){ var values = mv; throw ({type: 'block', id: 218, values: v625, message: 'Return from unknown block LET-BINDING-WRAPPER.'}) })() : l5.value); - return l180.fvalue(values, "try {", (function(){ - var symbol = l145; + return l181.fvalue(values, "try {", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tmp;", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tmp;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l150.fvalue(pv, (function (values,v626){ + })(), l151.fvalue(pv, (function (values,v626){ checkArgs(arguments, 2); - var i; return (function(v627){ - return l180.fvalue(values, "tmp = ", v627, ".value;", (function(){ - var symbol = l145; + return l181.fvalue(values, "tmp = ", v627, ".value;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5693,7 +5507,7 @@ var l263 = {name: "LET-BINDING-WRAPPER"}; var tmp = v626; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5701,49 +5515,48 @@ var l263 = {name: "LET-BINDING-WRAPPER"}; var tmp = v626; return tmp === l5.value? l5.value: tmp.cdr; })(), " = tmp;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, (function(){ + })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ var tmp = v626; return tmp === l5.value? l5.value: tmp.car; })())))); }), v624), v625, (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "finally {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l150.fvalue(pv, (function (values,v628){ + })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v628){ checkArgs(arguments, 2); - var i; return (function(v629){ - return l180.fvalue(values, v629, ".value", " = ", (function(){ + return l181.fvalue(values, v629, ".value", " = ", (function(){ var tmp = v628; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, (function(){ + })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ var tmp = v628; return tmp === l5.value? l5.value: tmp.car; })())))); }), v624)), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5757,20 +5570,19 @@ var l263 = {name: "LET-BINDING-WRAPPER"}; } })(); })); - return l263; + return l264; })(); -var l264 = {name: "LET"}; -((l219).value = ({car: l45.fvalue(pv, l264, (function (values,v632){ +var l265 = {name: "LET"}; +((l220).value = ({car: l45.fvalue(pv, l265, (function (values,v632){ checkArgsAtLeast(arguments, 2); var v631= l5.value; for (var i = arguments.length-1; i>=2; i--) v631 = {car: arguments[i], cdr: v631}; - var i; return (function(){ return (function(){ try { - var v640 = l201.value; + var v640 = l202.value; var v633 = l78.fvalue(pv, (function(){ var symbol = l59; var func = symbol.fvalue; @@ -5784,7 +5596,7 @@ var l264 = {name: "LET"}; return func; })(), v633); var v635 = l78.fvalue(pv, (function(){ - var symbol = l182; + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -5794,68 +5606,66 @@ var l264 = {name: "LET"}; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v633)); - ((l201).value = l205.fvalue(pv, l94.fvalue(pv, (function(){ - var symbol = l262; + ((l202).value = l206.fvalue(pv, l94.fvalue(pv, (function(){ + var symbol = l263; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v634))); var v636 = l5.value; - return l180.fvalue(values, "(function(", l148.fvalue(pv, l78.fvalue(pv, (function (values,v637){ + return l181.fvalue(values, "(function(", l149.fvalue(pv, l78.fvalue(pv, (function (values,v637){ checkArgs(arguments, 2); - var i; - return (l262.fvalue(pv, v637) !== l5.value ? (function(v638){ + return (l263.fvalue(pv, v637) !== l5.value ? (function(v638){ (v636 = ({car: ({car: v637, cdr: v638}), cdr: v636})); return v638; - })(l203.fvalue(pv, v637)) : l204.fvalue(values, v637)); + })(l204.fvalue(pv, v637)) : l205.fvalue(values, v637)); }), v634), ","), "){", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), (function(v639){ - return l184.fvalue(pv, l263.fvalue(pv, v636, v639)); - })(l242.fvalue(pv, v631, l4.value)), "})(", l148.fvalue(pv, v635, ","), ")"); + return l185.fvalue(pv, l264.fvalue(pv, v636, v639)); + })(l243.fvalue(pv, v631, l4.value)), "})(", l149.fvalue(pv, v635, ","), ")"); } finally { - l201.value = v640; + l202.value = v640; } })(); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l265 = {name: "LET*-INITIALIZE-VALUE"}; +var l266 = {name: "LET*-INITIALIZE-VALUE"}; (function(){ - (l265).fvalue = (function(v647){ + (l266).fvalue = (function(v647){ ((v647)["fname"] = "LET*-INITIALIZE-VALUE"); return v647; })((function (values,v641){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v642,v643){ - return (l262.fvalue(pv, v642) !== l5.value ? l180.fvalue(values, l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l114), l45.fvalue(pv, v642), l45.fvalue(pv, v643))), ";", (function(){ - var symbol = l145; + return (l263.fvalue(pv, v642) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l114), l45.fvalue(pv, v642), l45.fvalue(pv, v643))), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : (function(){ - var v644 = l203.fvalue(pv, v642); - var v645 = l186.fvalue(pv, v642, l109, v644); + var v644 = l204.fvalue(pv, v642); + var v645 = l187.fvalue(pv, v642, l109, v644); return (function(v646){ - l196.fvalue(pv, v645, (function(){ - var symbol = l201; + l197.fvalue(pv, v645, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l109); return v646; - })(l180.fvalue(pv, "var ", v644, " = ", l182.fvalue(pv, v643), ";", (function(){ - var symbol = l145; + })(l181.fvalue(pv, "var ", v644, " = ", l183.fvalue(pv, v643), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -5864,16 +5674,15 @@ var l265 = {name: "LET*-INITIALIZE-VALUE"}; })(l40.fvalue(pv, v641),l41.fvalue(pv, v641)); })(); })); - return l265; + return l266; })(); -var l266 = {name: "LET*-BINDING-WRAPPER"}; +var l267 = {name: "LET*-BINDING-WRAPPER"}; (function(){ - (l266).fvalue = (function(v656){ + (l267).fvalue = (function(v656){ ((v656)["fname"] = "LET*-BINDING-WRAPPER"); return v656; })((function (values,v648,v649){ checkArgs(arguments, 3); - var i; return (function(){ try { (l13.fvalue(pv, v648) !== l5.value ? (function(){ @@ -5881,67 +5690,64 @@ var l266 = {name: "LET*-BINDING-WRAPPER"}; throw ({type: 'block', id: 221, values: v649, message: 'Return from unknown block LET*-BINDING-WRAPPER.'}) })() : l5.value); return (function(v651){ - return l180.fvalue(values, "try {", (function(){ - var symbol = l145; + return l181.fvalue(values, "try {", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l150.fvalue(pv, (function (values,v652){ + })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v652){ checkArgs(arguments, 2); - var i; return (function(v653){ - return l180.fvalue(values, "var ", (function(){ + return l181.fvalue(values, "var ", (function(){ var tmp = v652; return tmp === l5.value? l5.value: tmp.cdr; })(), " = ", v653, ".value;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, (function(){ + })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ var tmp = v652; return tmp === l5.value? l5.value: tmp.car; })())))); }), v651), v649), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "finally {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l150.fvalue(pv, (function (values,v654){ + })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v654){ checkArgs(arguments, 2); - var i; return (function(v655){ - return l180.fvalue(values, v655, ".value", " = ", (function(){ + return l181.fvalue(values, v655, ".value", " = ", (function(){ var tmp = v654; return tmp === l5.value? l5.value: tmp.cdr; })(), ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, (function(){ + })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){ var tmp = v654; return tmp === l5.value? l5.value: tmp.car; })())))); }), v651)), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); })(l78.fvalue(pv, (function (values,v650){ checkArgs(arguments, 2); - var i; - return ({car: v650, cdr: l203.fvalue(pv, v650)}); + return ({car: v650, cdr: l204.fvalue(pv, v650)}); }), l95.fvalue(pv, (function(){ - var symbol = l262; + var symbol = l263; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -5955,32 +5761,31 @@ var l266 = {name: "LET*-BINDING-WRAPPER"}; } })(); })); - return l266; + return l267; })(); -var l267 = {name: "LET*"}; -((l219).value = ({car: l45.fvalue(pv, l267, (function (values,v658){ +var l268 = {name: "LET*"}; +((l220).value = ({car: l45.fvalue(pv, l268, (function (values,v658){ checkArgsAtLeast(arguments, 2); var v657= l5.value; for (var i = arguments.length-1; i>=2; i--) v657 = {car: arguments[i], cdr: v657}; - var i; return (function(){ return (function(v659,v660){ try { var tmp; - tmp = l201.value; - l201.value = v660; + tmp = l202.value; + l202.value = v660; v660 = tmp; - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, (function(v661,v662){ - return l266.fvalue(pv, v661, v662); + })(), l185.fvalue(pv, (function(v661,v662){ + return l267.fvalue(pv, v661, v662); })(l95.fvalue(pv, (function(){ - var symbol = l262; + var symbol = l263; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; @@ -5989,53 +5794,52 @@ var l267 = {name: "LET*"}; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v659)),l146.fvalue(pv, l150.fvalue(pv, (function(){ - var symbol = l265; + })(), v659)),l147.fvalue(pv, l151.fvalue(pv, (function(){ + var symbol = l266; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v659), l242.fvalue(pv, v657, l4.value)))), "})()"); + })(), v659), l243.fvalue(pv, v657, l4.value)))), "})()"); } finally { - l201.value = v660; + l202.value = v660; } })(l78.fvalue(pv, (function(){ var symbol = l59; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v658),l195.fvalue(pv, (function(){ - var symbol = l201; + })(), v658),l196.fvalue(pv, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l268 = {name: "*BLOCK-COUNTER*"}; +var l269 = {name: "*BLOCK-COUNTER*"}; (function(){ - (((l268.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l268).value = 0)); - return l268; + (((l269.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l269).value = 0)); + return l269; })(); -var l269 = {name: "MULTIPLE-VALUE"}; -var l270 = {name: "USED"}; -((l219).value = ({car: l45.fvalue(pv, l197, (function (values,v664){ +var l270 = {name: "MULTIPLE-VALUE"}; +var l271 = {name: "USED"}; +((l220).value = ({car: l45.fvalue(pv, l198, (function (values,v664){ checkArgsAtLeast(arguments, 2); var v663= l5.value; for (var i = arguments.length-1; i>=2; i--) v663 = {car: arguments[i], cdr: v663}; - var i; return (function(){ return (function(){ - var v665 = ((l268).value = (function(){ + var v665 = ((l269).value = (function(){ var x1 = (function(){ - var symbol = l268; + var symbol = l269; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6043,94 +5847,94 @@ var l270 = {name: "USED"}; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; })()); - var v666 = l186.fvalue(pv, v664, l197, v665); + var v666 = l187.fvalue(pv, v664, l198, v665); ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l193.fvalue(pv, l269, v666) : l5.value); + })() !== l5.value ? l194.fvalue(pv, l270, v666) : l5.value); return (function(){ try { - var v668 = l201.value; - ((l201).value = l199.fvalue(pv, l45.fvalue(pv, v666), (function(){ - var symbol = l201; + var v668 = l202.value; + ((l202).value = l200.fvalue(pv, l45.fvalue(pv, v666), (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l197)); - var v667 = l242.fvalue(pv, v663, l4.value); - return (l92.fvalue(pv, l270, l190.fvalue(pv, v666)) !== l5.value ? l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + })(), l198)); + var v667 = l243.fvalue(pv, v663, l4.value); + return (l92.fvalue(pv, l271, l191.fvalue(pv, v666)) !== l5.value ? l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "try {", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "try {", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, v667), "}", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, v667), "}", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "catch (cf){", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " if (cf.type == 'block' && cf.id == ", v665, ")", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? " return values.apply(this, forcemv(cf.values));" : " return cf.values;"), (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " else", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " throw cf;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), "})()") : l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + })()), "})()") : l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, v667), "})()")); + })(), l185.fvalue(pv, v667), "})()")); } finally { - l201.value = v668; + l202.value = v668; } })(); })(); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l271 = {name: "RETURN-FROM"}; -((l219).value = ({car: l45.fvalue(pv, l271, (function (values,v669,v670){ +var l272 = {name: "RETURN-FROM"}; +((l220).value = ({car: l45.fvalue(pv, l272, (function (values,v669,v670){ checkArgsAtLeast(arguments, 2); checkArgsAtMost(arguments, 3); switch(arguments.length-1){ @@ -6138,157 +5942,153 @@ var l271 = {name: "RETURN-FROM"}; v670=l5.value; default: break; } - var i; return (function(){ return (function(){ - var v671 = l200.fvalue(pv, v669, (function(){ - var symbol = l201; + var v671 = l201.fvalue(pv, v669, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l197); - var v672 = l92.fvalue(pv, l269, l190.fvalue(pv, v671)); + })(), l198); + var v672 = l92.fvalue(pv, l270, l191.fvalue(pv, v671)); (l13.fvalue(pv, v671) !== l5.value ? (function(){ - throw l146.fvalue(pv, "Unknown block `", (v669).name, "'."); + throw l147.fvalue(pv, "Unknown block `", (v669).name, "'."); })() : l5.value); - l193.fvalue(pv, l270, v671); - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + l194.fvalue(pv, l271, v671); + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, (v672 !== l5.value ? l180.fvalue(pv, "var values = mv;", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, (v672 !== l5.value ? l181.fvalue(pv, "var values = mv;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l189.fvalue(pv, v671), ", ", "values: ", l182.fvalue(pv, v670, v672), ", ", "message: 'Return from unknown block ", (v669).name, ".'", "})"), "})()"); + })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l190.fvalue(pv, v671), ", ", "values: ", l183.fvalue(pv, v670, v672), ", ", "message: 'Return from unknown block ", (v669).name, ".'", "})"), "})()"); })(); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l272 = {name: "CATCH"}; -((l219).value = ({car: l45.fvalue(pv, l272, (function (values,v674){ +var l273 = {name: "CATCH"}; +((l220).value = ({car: l45.fvalue(pv, l273, (function (values,v674){ checkArgsAtLeast(arguments, 2); var v673= l5.value; for (var i = arguments.length-1; i>=2; i--) v673 = {car: arguments[i], cdr: v673}; - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var id = ", l182.fvalue(pv, v674), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var id = ", l183.fvalue(pv, v674), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "try {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l242.fvalue(pv, v673, l4.value)), (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l243.fvalue(pv, v673, l4.value)), (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "catch (cf){", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " if (cf.type == 'catch' && cf.id == id)", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? " return values.apply(this, forcemv(cf.values));" : " return pv.apply(this, forcemv(cf.values));"), (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " else", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " throw cf;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l273 = {name: "THROW"}; -((l219).value = ({car: l45.fvalue(pv, l273, (function (values,v675,v676){ +var l274 = {name: "THROW"}; +((l220).value = ({car: l45.fvalue(pv, l274, (function (values,v675,v676){ checkArgs(arguments, 3); - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var values = mv;", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var values = mv;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "throw ({", "type: 'catch', ", "id: ", l182.fvalue(pv, v675), ", ", "values: ", l182.fvalue(pv, v676, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()"); + })(), "throw ({", "type: 'catch', ", "id: ", l183.fvalue(pv, v675), ", ", "values: ", l183.fvalue(pv, v676, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l274 = {name: "*TAGBODY-COUNTER*"}; -(function(){ - (((l274.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l274).value = 0)); - return l274; -})(); -var l275 = {name: "*GO-TAG-COUNTER*"}; +var l275 = {name: "*TAGBODY-COUNTER*"}; (function(){ (((l275.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l275).value = 0)); return l275; })(); -var l276 = {name: "GO-TAG-P"}; +var l276 = {name: "*GO-TAG-COUNTER*"}; (function(){ - (l276).fvalue = (function(v679){ + (((l276.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l276).value = 0)); + return l276; +})(); +var l277 = {name: "GO-TAG-P"}; +(function(){ + (l277).fvalue = (function(v679){ ((v679)["fname"] = "GO-TAG-P"); return v679; })((function (values,v677){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v678){ return (v678 !== l5.value ? v678 : ((function(){ @@ -6298,32 +6098,30 @@ var l276 = {name: "GO-TAG-P"}; })(l85.fvalue(pv, v677)); })(); })); - return l276; + return l277; })(); -var l277 = {name: "DECLARE-TAGBODY-TAGS"}; +var l278 = {name: "DECLARE-TAGBODY-TAGS"}; (function(){ - (l277).fvalue = (function(v685){ + (l278).fvalue = (function(v685){ ((v685)["fname"] = "DECLARE-TAGBODY-TAGS"); return v685; })((function (values,v680,v681){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v684){ - return l199.fvalue(values, v684, (function(){ - var symbol = l201; + return l200.fvalue(values, v684, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l198); + })(), l199); })(l78.fvalue(pv, (function (values,v682){ checkArgs(arguments, 2); - var i; return (function(v683){ - return l186.fvalue(values, v682, l198, l45.fvalue(pv, v680, v683)); - })(l18.fvalue(pv, ((l275).value = (function(){ + return l187.fvalue(values, v682, l199, l45.fvalue(pv, v680, v683)); + })(l18.fvalue(pv, ((l276).value = (function(){ var x1 = (function(){ - var symbol = l275; + var symbol = l276; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6332,34 +6130,33 @@ var l277 = {name: "DECLARE-TAGBODY-TAGS"}; return x1+1; })()))); }), l95.fvalue(pv, (function(){ - var symbol = l276; + var symbol = l277; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v681))); })(); })); - return l277; + return l278; })(); -var l278 = {name: "TAGBODY"}; -((l219).value = ({car: l45.fvalue(pv, l278, (function (values){ +var l279 = {name: "TAGBODY"}; +((l220).value = ({car: l45.fvalue(pv, l279, (function (values){ var v686= l5.value; for (var i = arguments.length-1; i>=1; i--) v686 = {car: arguments[i], cdr: v686}; - var i; return (function(){ try { (l99.fvalue(pv, (function(){ - var symbol = l276; + var symbol = l277; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v686) !== l5.value ? l5.value : (function(){ var values = mv; - throw ({type: 'block', id: 229, values: l182.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v686, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'}) + throw ({type: 'block', id: 229, values: l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v686, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'}) })()); - (l276.fvalue(pv, (function(){ + (l277.fvalue(pv, (function(){ var tmp = v686; return tmp === l5.value? l5.value: tmp.car; })()) !== l5.value ? l5.value : (v686 = ({car: l17.fvalue(pv, "START"), cdr: v686}))); @@ -6367,50 +6164,50 @@ var l278 = {name: "TAGBODY"}; return (function(v689,v688){ try { var tmp; - tmp = l201.value; - l201.value = v689; + tmp = l202.value; + l202.value = v689; v689 = tmp; (function(v690){ - return (v688 = l41.fvalue(pv, l189.fvalue(pv, v690))); - })(l200.fvalue(pv, l40.fvalue(pv, v686), (function(){ - var symbol = l201; + return (v688 = l41.fvalue(pv, l190.fvalue(pv, v690))); + })(l201.fvalue(pv, l40.fvalue(pv, v686), (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l198)); - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + })(), l199)); + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tagbody_", v687, " = ", v688, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tagbody_", v687, " = ", v688, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "tbloop:", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "while (true) {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "try {", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "try {", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, (function(v691){ - return l180.fvalue(pv, "switch(tagbody_", v687, "){", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, (function(v691){ + return l181.fvalue(pv, "switch(tagbody_", v687, "){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "case ", v688, ":", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6423,24 +6220,24 @@ var l278 = {name: "TAGBODY"}; return tmp === l5.value? l5.value: tmp.car; })()); (function(){ - (v691 = l146.fvalue(pv, v691, (l28.fvalue(pv, l276.fvalue(pv, v693)) !== l5.value ? l184.fvalue(pv, l182.fvalue(pv, v693), ";", (function(){ - var symbol = l145; + (v691 = l147.fvalue(pv, v691, (l28.fvalue(pv, l277.fvalue(pv, v693)) !== l5.value ? l185.fvalue(pv, l183.fvalue(pv, v693), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : (function(v694){ - return l180.fvalue(pv, "case ", l41.fvalue(pv, l189.fvalue(pv, v694)), ":", (function(){ - var symbol = l145; + return l181.fvalue(pv, "case ", l41.fvalue(pv, l190.fvalue(pv, v694)), ":", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); - })(l200.fvalue(pv, v693, (function(){ - var symbol = l201; + })(l201.fvalue(pv, v693, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l198))))); + })(), l199))))); return l5.value; })(); (v692 = (function(){ @@ -6455,74 +6252,74 @@ var l278 = {name: "TAGBODY"}; return tmp === l5.value? l5.value: tmp.cdr; })(),l5.value); })(), "default:", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " break tbloop;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()); })("")), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "catch (jump) {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " if (jump.type == 'tagbody' && jump.id == ", v687, ")", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " tagbody_", v687, " = jump.label;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " else", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " throw(jump);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return ", l182.fvalue(pv, l5.value), ";", (function(){ - var symbol = l145; + })(), "return ", l183.fvalue(pv, l5.value), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); } finally { - l201.value = v689; + l202.value = v689; } - })(l277.fvalue(pv, v687, v686),l5.value); + })(l278.fvalue(pv, v687, v686),l5.value); })((function(){ - var symbol = l274; + var symbol = l275; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6536,312 +6333,302 @@ var l278 = {name: "TAGBODY"}; } })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l279 = {name: "GO"}; -((l219).value = ({car: l45.fvalue(pv, l279, (function (values,v695){ +var l280 = {name: "GO"}; +((l220).value = ({car: l45.fvalue(pv, l280, (function (values,v695){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v696,v697){ (l13.fvalue(pv, v696) !== l5.value ? (function(){ - throw l146.fvalue(pv, "Unknown tag `", v697, "'."); + throw l147.fvalue(pv, "Unknown tag `", v697, "'."); })() : l5.value); - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l189.fvalue(pv, v696)), ", ", "label: ", l41.fvalue(pv, l189.fvalue(pv, v696)), ", ", "message: 'Attempt to GO to non-existing tag ", v697, "'", "})", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l190.fvalue(pv, v696)), ", ", "label: ", l41.fvalue(pv, l190.fvalue(pv, v696)), ", ", "message: 'Attempt to GO to non-existing tag ", v697, "'", "})", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l200.fvalue(pv, v695, (function(){ - var symbol = l201; + })(l201.fvalue(pv, v695, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l198),(((function(){ + })(), l199),(((function(){ var tmp = v695; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (v695).name : (l85.fvalue(pv, v695) !== l5.value ? l18.fvalue(pv, v695) : l5.value))); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l280 = {name: "UNWIND-PROTECT"}; -((l219).value = ({car: l45.fvalue(pv, l280, (function (values,v699){ +var l281 = {name: "UNWIND-PROTECT"}; +((l220).value = ({car: l45.fvalue(pv, l281, (function (values,v699){ checkArgsAtLeast(arguments, 2); var v698= l5.value; for (var i = arguments.length-1; i>=2; i--) v698 = {car: arguments[i], cdr: v698}; - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var ret = ", l182.fvalue(pv, l5.value), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var ret = ", l183.fvalue(pv, l5.value), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "try {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "ret = ", l182.fvalue(pv, v699), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "ret = ", l183.fvalue(pv, v699), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "} finally {", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l242.fvalue(pv, v698)), "}", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l243.fvalue(pv, v698)), "}", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return ret;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l281 = {name: "MULTIPLE-VALUE-CALL"}; -((l219).value = ({car: l45.fvalue(pv, l281, (function (values,v701){ +var l282 = {name: "MULTIPLE-VALUE-CALL"}; +((l220).value = ({car: l45.fvalue(pv, l282, (function (values,v701){ checkArgsAtLeast(arguments, 2); var v700= l5.value; for (var i = arguments.length-1; i>=2; i--) v700 = {car: arguments[i], cdr: v700}; - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var func = ", l182.fvalue(pv, v701), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var func = ", l183.fvalue(pv, v701), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var args = [", ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"), "];", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return ", l180.fvalue(pv, "(function(){", (function(){ - var symbol = l145; + })(), "return ", l181.fvalue(pv, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var values = mv;", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var values = mv;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var vs;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l150.fvalue(pv, (function (values,v702){ + })(), l151.fvalue(pv, (function (values,v702){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "vs = ", l182.fvalue(pv, v702, l4.value), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "vs = ", l183.fvalue(pv, v702, l4.value), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "args = args.concat(vs);", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "args = args.concat(vs);", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "else", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "args.push(vs);", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "args.push(vs);", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())); }), v700), "return func.apply(window, args);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"), ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l282 = {name: "MULTIPLE-VALUE-PROG1"}; -((l219).value = ({car: l45.fvalue(pv, l282, (function (values,v704){ +var l283 = {name: "MULTIPLE-VALUE-PROG1"}; +((l220).value = ({car: l45.fvalue(pv, l283, (function (values,v704){ checkArgsAtLeast(arguments, 2); var v703= l5.value; for (var i = arguments.length-1; i>=2; i--) v703 = {car: arguments[i], cdr: v703}; - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var args = ", l182.fvalue(pv, v704, (function(){ - var symbol = l185; + })(), l185.fvalue(pv, "var args = ", l183.fvalue(pv, v704, (function(){ + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l242.fvalue(pv, v703), "return args;", (function(){ - var symbol = l145; + })(), l243.fvalue(pv, v703), "return args;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l283 = {name: "BACKQUOTE-EXPAND-1"}; +var l284 = {name: "BACKQUOTE-EXPAND-1"}; (function(){ - (l283).fvalue = (function(v707){ + (l284).fvalue = (function(v707){ ((v707)["fname"] = "BACKQUOTE-EXPAND-1"); return v707; })((function (values,v705){ checkArgs(arguments, 2); - var i; return (function(){ return (((function(){ var tmp = v705; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l175, v705) : (l46.fvalue(pv, v705) !== l5.value ? v705 : ((((function(){ + })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l176, v705) : (l46.fvalue(pv, v705) !== l5.value ? v705 : ((((function(){ var tmp = v705; return tmp === l5.value? l5.value: tmp.car; - })() === l178)?l4.value: l5.value) !== l5.value ? (function(){ + })() === l179)?l4.value: l5.value) !== l5.value ? (function(){ var tmp = v705; return tmp === l5.value? l5.value: tmp.car; })() : ((((function(){ var tmp = v705; return tmp === l5.value? l5.value: tmp.car; - })() === l176)?l4.value: l5.value) !== l5.value ? l283.fvalue(values, l283.fvalue(pv, l34.fvalue(pv, v705))) : ({car: l65, cdr: l78.fvalue(pv, (function (values,v706){ + })() === l177)?l4.value: l5.value) !== l5.value ? l284.fvalue(values, l284.fvalue(pv, l34.fvalue(pv, v705))) : ({car: l65, cdr: l78.fvalue(pv, (function (values,v706){ checkArgs(arguments, 2); - var i; return ((l60.fvalue(pv, v706) !== l5.value ? (((function(){ var tmp = v706; return tmp === l5.value? l5.value: tmp.car; - })() === l178)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v706)) : ((l60.fvalue(pv, v706) !== l5.value ? (((function(){ + })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v706)) : ((l60.fvalue(pv, v706) !== l5.value ? (((function(){ var tmp = v706; return tmp === l5.value? l5.value: tmp.car; - })() === l177)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v706) : l45.fvalue(values, l45, l283.fvalue(pv, v706)))); + })() === l178)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v706) : l45.fvalue(values, l45, l284.fvalue(pv, v706)))); }), v705)}))))); })(); })); - return l283; + return l284; })(); -var l284 = {name: "BACKQUOTE-EXPAND"}; +var l285 = {name: "BACKQUOTE-EXPAND"}; (function(){ - (l284).fvalue = (function(v709){ + (l285).fvalue = (function(v709){ ((v709)["fname"] = "BACKQUOTE-EXPAND"); return v709; })((function (values,v708){ checkArgs(arguments, 2); - var i; return (function(){ return ((l60.fvalue(pv, v708) !== l5.value ? (((function(){ var tmp = v708; return tmp === l5.value? l5.value: tmp.car; - })() === l176)?l4.value: l5.value) : l5.value) !== l5.value ? l283.fvalue(values, l34.fvalue(pv, v708)) : v708); + })() === l177)?l4.value: l5.value) : l5.value) !== l5.value ? l284.fvalue(values, l34.fvalue(pv, v708)) : v708); })(); })); - return l284; + return l285; })(); -l176; -((l219).value = ({car: l45.fvalue(pv, l176, (function (values,v710){ +l177; +((l220).value = ({car: l45.fvalue(pv, l177, (function (values,v710){ checkArgs(arguments, 2); - var i; return (function(){ - return l182.fvalue(values, l283.fvalue(pv, v710)); + return l183.fvalue(values, l284.fvalue(pv, v710)); })(); })), cdr: (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l285 = {name: "*BUILTINS*"}; +var l286 = {name: "*BUILTINS*"}; (function(){ - (((l285.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l285).value = l5.value)); - return l285; + (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = l5.value)); + return l286; })(); -var l286 = {name: "DEFINE-RAW-BUILTIN"}; -l286; -var l287 = {name: "DEFINE-BUILTIN"}; +var l287 = {name: "DEFINE-RAW-BUILTIN"}; l287; -var l288 = {name: "TYPE-CHECK"}; +var l288 = {name: "DEFINE-BUILTIN"}; l288; -var l289 = {name: "VARIABLE-ARITY-CALL"}; +var l289 = {name: "TYPE-CHECK"}; +l289; +var l290 = {name: "VARIABLE-ARITY-CALL"}; (function(){ - (l289).fvalue = (function(v719){ + (l290).fvalue = (function(v719){ ((v719)["fname"] = "VARIABLE-ARITY-CALL"); return v719; })((function (values,v711,v712){ checkArgs(arguments, 3); - var i; return (function(){ (((function(){ var tmp = v711; @@ -6861,18 +6648,18 @@ var l289 = {name: "VARIABLE-ARITY-CALL"}; (function(){ (((typeof (v717) == "number")?l4.value: l5.value) !== l5.value ? (v714 = ({car: l18.fvalue(pv, v717), cdr: v714})) : (function(v718){ (v714 = ({car: v718, cdr: v714})); - return (v715 = l146.fvalue(pv, v715, l180.fvalue(pv, "var ", v718, " = ", l182.fvalue(pv, v717), ";", (function(){ - var symbol = l145; + return (v715 = l147.fvalue(pv, v715, l181.fvalue(pv, "var ", v718, " = ", l183.fvalue(pv, v717), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (typeof ", v718, " !== 'number') throw 'Not a number!';", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()))); - })(l180.fvalue(pv, "x", (v713 = (function(){ + })(l181.fvalue(pv, "x", (v713 = (function(){ var x1 = v713; if (typeof x1 !== 'number') throw 'Not a number!'; return x1+1; @@ -6888,85 +6675,82 @@ var l289 = {name: "VARIABLE-ARITY-CALL"}; return l5.value; })(v711,l5.value); })(); - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, v715, (v712)(pv, l67.fvalue(pv, v714))), "})()"); + })(), l185.fvalue(pv, v715, (v712)(pv, l67.fvalue(pv, v714))), "})()"); })(0,l5,""); })(); })); - return l289; + return l290; })(); -var l290 = {name: "VARIABLE-ARITY"}; -l290; -var l291 = {name: "NUM-OP-NUM"}; +var l291 = {name: "VARIABLE-ARITY"}; +l291; +var l292 = {name: "NUM-OP-NUM"}; (function(){ - (l291).fvalue = (function(v723){ + (l292).fvalue = (function(v723){ ((v723)["fname"] = "NUM-OP-NUM"); return v723; })((function (values,v720,v721,v722){ checkArgs(arguments, 4); - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "var ", "y", " = ", v722, ";", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "var ", "y", " = ", v722, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", l180.fvalue(pv, "x", v721, "y"), ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "x", v721, "y"), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); })(); })); - return l291; + return l292; })(); -((l285).value = ({car: l45.fvalue(pv, l62, (function (values){ +((l286).value = ({car: l45.fvalue(pv, l62, (function (values){ var v724= l5.value; for (var i = arguments.length-1; i>=1; i--) v724 = {car: arguments[i], cdr: v724}; - var i; return (function(){ - return (l13.fvalue(pv, v724) !== l5.value ? "0" : l289.fvalue(values, v724, (function (values,v725){ + return (l13.fvalue(pv, v724) !== l5.value ? "0" : l290.fvalue(values, v724, (function (values,v725){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l148.fvalue(pv, v725, "+"), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l149.fvalue(pv, v725, "+"), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -6974,28 +6758,26 @@ var l291 = {name: "NUM-OP-NUM"}; }))); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l63, (function (values,v727){ +((l286).value = ({car: l45.fvalue(pv, l63, (function (values,v727){ checkArgsAtLeast(arguments, 2); var v726= l5.value; for (var i = arguments.length-1; i>=2; i--) v726 = {car: arguments[i], cdr: v726}; - var i; return (function(){ return (function(v728){ - return l289.fvalue(values, v728, (function (values,v729){ + return l290.fvalue(values, v728, (function (values,v729){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", (l13.fvalue(pv, v726) !== l5.value ? l146.fvalue(pv, "-", (function(){ + return l181.fvalue(values, "return ", (l13.fvalue(pv, v726) !== l5.value ? l147.fvalue(pv, "-", (function(){ var tmp = v729; return tmp === l5.value? l5.value: tmp.car; - })()) : l148.fvalue(pv, v729, "-")), ";", (function(){ - var symbol = l145; + })()) : l149.fvalue(pv, v729, "-")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7004,23 +6786,21 @@ var l291 = {name: "NUM-OP-NUM"}; })(({car: v727, cdr: v726})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l21, (function (values){ +((l286).value = ({car: l45.fvalue(pv, l21, (function (values){ var v730= l5.value; for (var i = arguments.length-1; i>=1; i--) v730 = {car: arguments[i], cdr: v730}; - var i; return (function(){ - return (l13.fvalue(pv, v730) !== l5.value ? "1" : l289.fvalue(values, v730, (function (values,v731){ + return (l13.fvalue(pv, v730) !== l5.value ? "1" : l290.fvalue(values, v730, (function (values,v731){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l148.fvalue(pv, v731, "*"), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l149.fvalue(pv, v731, "*"), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7028,28 +6808,26 @@ var l291 = {name: "NUM-OP-NUM"}; }))); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l22, (function (values,v733){ +((l286).value = ({car: l45.fvalue(pv, l22, (function (values,v733){ checkArgsAtLeast(arguments, 2); var v732= l5.value; for (var i = arguments.length-1; i>=2; i--) v732 = {car: arguments[i], cdr: v732}; - var i; return (function(){ return (function(v734){ - return l289.fvalue(values, v734, (function (values,v735){ + return l290.fvalue(values, v734, (function (values,v735){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", (l13.fvalue(pv, v732) !== l5.value ? l146.fvalue(pv, "1 /", (function(){ + return l181.fvalue(values, "return ", (l13.fvalue(pv, v732) !== l5.value ? l147.fvalue(pv, "1 /", (function(){ var tmp = v735; return tmp === l5.value? l5.value: tmp.car; - })()) : l148.fvalue(pv, v735, "/")), ";", (function(){ - var symbol = l145; + })()) : l149.fvalue(pv, v735, "/")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7058,69 +6836,65 @@ var l291 = {name: "NUM-OP-NUM"}; })(({car: v733, cdr: v732})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l292 = {name: "MOD"}; -((l285).value = ({car: l45.fvalue(pv, l292, (function (values,v736,v737){ +var l293 = {name: "MOD"}; +((l286).value = ({car: l45.fvalue(pv, l293, (function (values,v736,v737){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v738,v739){ - return l291.fvalue(values, v738, "%", v739); - })(l182.fvalue(pv, v736),l182.fvalue(pv, v737)); + return l292.fvalue(values, v738, "%", v739); + })(l183.fvalue(pv, v736),l183.fvalue(pv, v737)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l293 = {name: "COMPARISON-CONJUNTION"}; +var l294 = {name: "COMPARISON-CONJUNTION"}; (function(){ - (l293).fvalue = (function(v742){ + (l294).fvalue = (function(v742){ ((v742)["fname"] = "COMPARISON-CONJUNTION"); return v742; })((function (values,v740,v741){ checkArgs(arguments, 3); - var i; return (function(){ return (l13.fvalue(pv, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.cdr; - })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v740)) !== l5.value ? l146.fvalue(values, (function(){ + })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v740)) !== l5.value ? l147.fvalue(values, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.car; - })(), v741, l34.fvalue(pv, v740)) : l146.fvalue(values, (function(){ + })(), v741, l34.fvalue(pv, v740)) : l147.fvalue(values, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.car; - })(), v741, l34.fvalue(pv, v740), " && ", l293.fvalue(pv, (function(){ + })(), v741, l34.fvalue(pv, v740), " && ", l294.fvalue(pv, (function(){ var tmp = v740; return tmp === l5.value? l5.value: tmp.cdr; })(), v741)))); })(); })); - return l293; + return l294; })(); -var l294 = {name: "DEFINE-BUILTIN-COMPARISON"}; -l294; -var l295 = {name: ">"}; -((l285).value = ({car: l45.fvalue(pv, l295, (function (values,v744){ +var l295 = {name: "DEFINE-BUILTIN-COMPARISON"}; +l295; +var l296 = {name: ">"}; +((l286).value = ({car: l45.fvalue(pv, l296, (function (values,v744){ checkArgsAtLeast(arguments, 2); var v743= l5.value; for (var i = arguments.length-1; i>=2; i--) v743 = {car: arguments[i], cdr: v743}; - var i; return (function(){ return (function(v745){ - return l289.fvalue(values, v745, (function (values,v746){ + return l290.fvalue(values, v745, (function (values,v746){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l181.fvalue(pv, l293.fvalue(pv, v746, ">")), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v746, ">")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7129,26 +6903,24 @@ var l295 = {name: ">"}; })(({car: v744, cdr: v743})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l296 = {name: "<"}; -((l285).value = ({car: l45.fvalue(pv, l296, (function (values,v748){ +var l297 = {name: "<"}; +((l286).value = ({car: l45.fvalue(pv, l297, (function (values,v748){ checkArgsAtLeast(arguments, 2); var v747= l5.value; for (var i = arguments.length-1; i>=2; i--) v747 = {car: arguments[i], cdr: v747}; - var i; return (function(){ return (function(v749){ - return l289.fvalue(values, v749, (function (values,v750){ + return l290.fvalue(values, v749, (function (values,v750){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l181.fvalue(pv, l293.fvalue(pv, v750, "<")), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v750, "<")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7157,26 +6929,24 @@ var l296 = {name: "<"}; })(({car: v748, cdr: v747})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l297 = {name: ">="}; -((l285).value = ({car: l45.fvalue(pv, l297, (function (values,v752){ +var l298 = {name: ">="}; +((l286).value = ({car: l45.fvalue(pv, l298, (function (values,v752){ checkArgsAtLeast(arguments, 2); var v751= l5.value; for (var i = arguments.length-1; i>=2; i--) v751 = {car: arguments[i], cdr: v751}; - var i; return (function(){ return (function(v753){ - return l289.fvalue(values, v753, (function (values,v754){ + return l290.fvalue(values, v753, (function (values,v754){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l181.fvalue(pv, l293.fvalue(pv, v754, ">=")), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v754, ">=")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7185,26 +6955,24 @@ var l297 = {name: ">="}; })(({car: v752, cdr: v751})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l298 = {name: "<="}; -((l285).value = ({car: l45.fvalue(pv, l298, (function (values,v756){ +var l299 = {name: "<="}; +((l286).value = ({car: l45.fvalue(pv, l299, (function (values,v756){ checkArgsAtLeast(arguments, 2); var v755= l5.value; for (var i = arguments.length-1; i>=2; i--) v755 = {car: arguments[i], cdr: v755}; - var i; return (function(){ return (function(v757){ - return l289.fvalue(values, v757, (function (values,v758){ + return l290.fvalue(values, v757, (function (values,v758){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l181.fvalue(pv, l293.fvalue(pv, v758, "<=")), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v758, "<=")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7213,25 +6981,23 @@ var l298 = {name: "<="}; })(({car: v756, cdr: v755})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l20, (function (values,v760){ +((l286).value = ({car: l45.fvalue(pv, l20, (function (values,v760){ checkArgsAtLeast(arguments, 2); var v759= l5.value; for (var i = arguments.length-1; i>=2; i--) v759 = {car: arguments[i], cdr: v759}; - var i; return (function(){ return (function(v761){ - return l289.fvalue(values, v761, (function (values,v762){ + return l290.fvalue(values, v761, (function (values,v762){ checkArgs(arguments, 2); - var i; - return l180.fvalue(values, "return ", l181.fvalue(pv, l293.fvalue(pv, v762, "==")), ";", (function(){ - var symbol = l145; + return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v762, "==")), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -7240,649 +7006,625 @@ var l298 = {name: "<="}; })(({car: v760, cdr: v759})); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l299 = {name: "NUMBERP"}; -((l285).value = ({car: l45.fvalue(pv, l299, (function (values,v763){ +var l300 = {name: "NUMBERP"}; +((l286).value = ({car: l45.fvalue(pv, l300, (function (values,v763){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v764){ - return l181.fvalue(values, l180.fvalue(pv, "(typeof (", v764, ") == \"number\")")); - })(l182.fvalue(pv, v763)); + return l182.fvalue(values, l181.fvalue(pv, "(typeof (", v764, ") == \"number\")")); + })(l183.fvalue(pv, v763)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l300 = {name: "FLOOR"}; -((l285).value = ({car: l45.fvalue(pv, l300, (function (values,v765){ +var l301 = {name: "FLOOR"}; +((l286).value = ({car: l45.fvalue(pv, l301, (function (values,v765){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v766){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v766, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v766, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v765)); + })(l183.fvalue(pv, v765)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l29, (function (values,v767,v768){ +((l286).value = ({car: l45.fvalue(pv, l29, (function (values,v767,v768){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v769,v770){ - return l180.fvalue(values, "({car: ", v769, ", cdr: ", v770, "})"); - })(l182.fvalue(pv, v767),l182.fvalue(pv, v768)); + return l181.fvalue(values, "({car: ", v769, ", cdr: ", v770, "})"); + })(l183.fvalue(pv, v767),l183.fvalue(pv, v768)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l30, (function (values,v771){ +((l286).value = ({car: l45.fvalue(pv, l30, (function (values,v771){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v772){ - return l181.fvalue(values, l180.fvalue(pv, "(function(){", (function(){ - var symbol = l145; + return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tmp = ", v772, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tmp = ", v772, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()")); - })(l182.fvalue(pv, v771)); + })(l183.fvalue(pv, v771)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l31, (function (values,v773){ +((l286).value = ({car: l45.fvalue(pv, l31, (function (values,v773){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v774){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tmp = ", v774, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tmp = ", v774, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return tmp === ", l182.fvalue(pv, l5.value), "? ", l182.fvalue(pv, l5.value), ": tmp.car;", (function(){ - var symbol = l145; + })(), "return tmp === ", l183.fvalue(pv, l5.value), "? ", l183.fvalue(pv, l5.value), ": tmp.car;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v773)); + })(l183.fvalue(pv, v773)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l32, (function (values,v775){ +((l286).value = ({car: l45.fvalue(pv, l32, (function (values,v775){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v776){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tmp = ", v776, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tmp = ", v776, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return tmp === ", l182.fvalue(pv, l5.value), "? ", l182.fvalue(pv, l5.value), ": tmp.cdr;", (function(){ - var symbol = l145; + })(), "return tmp === ", l183.fvalue(pv, l5.value), "? ", l183.fvalue(pv, l5.value), ": tmp.cdr;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v775)); + })(l183.fvalue(pv, v775)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l118, (function (values,v777,v778){ +((l286).value = ({car: l45.fvalue(pv, l118, (function (values,v777,v778){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v779,v780){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v779, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v779, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", l180.fvalue(pv, "(x.car = ", v780, ", x)"), ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "(x.car = ", v780, ", x)"), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v777),l182.fvalue(pv, v778)); + })(l183.fvalue(pv, v777),l183.fvalue(pv, v778)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l119, (function (values,v781,v782){ +((l286).value = ({car: l45.fvalue(pv, l119, (function (values,v781,v782){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v783,v784){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v783, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v783, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", l180.fvalue(pv, "(x.cdr = ", v784, ", x)"), ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "(x.cdr = ", v784, ", x)"), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v781),l182.fvalue(pv, v782)); + })(l183.fvalue(pv, v781),l183.fvalue(pv, v782)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l301 = {name: "SYMBOLP"}; -((l285).value = ({car: l45.fvalue(pv, l301, (function (values,v785){ +var l302 = {name: "SYMBOLP"}; +((l286).value = ({car: l45.fvalue(pv, l302, (function (values,v785){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v786){ - return l181.fvalue(values, l180.fvalue(pv, "(function(){", (function(){ - var symbol = l145; + return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tmp = ", v786, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tmp = ", v786, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()")); - })(l182.fvalue(pv, v785)); + })(l183.fvalue(pv, v785)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l302 = {name: "MAKE-SYMBOL"}; -((l285).value = ({car: l45.fvalue(pv, l302, (function (values,v787){ +var l303 = {name: "MAKE-SYMBOL"}; +((l286).value = ({car: l45.fvalue(pv, l303, (function (values,v787){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v788){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "name", " = ", v788, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "name", " = ", v788, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "({name: name})", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "({name: name})", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v787)); + })(l183.fvalue(pv, v787)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l303 = {name: "SYMBOL-NAME"}; -((l285).value = ({car: l45.fvalue(pv, l303, (function (values,v789){ +var l304 = {name: "SYMBOL-NAME"}; +((l286).value = ({car: l45.fvalue(pv, l304, (function (values,v789){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v790){ - return l180.fvalue(values, "(", v790, ").name"); - })(l182.fvalue(pv, v789)); + return l181.fvalue(values, "(", v790, ").name"); + })(l183.fvalue(pv, v789)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l244, (function (values,v791,v792){ +((l286).value = ({car: l45.fvalue(pv, l245, (function (values,v791,v792){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v793,v794){ - return l180.fvalue(values, "(", v793, ").value = ", v794); - })(l182.fvalue(pv, v791),l182.fvalue(pv, v792)); + return l181.fvalue(values, "(", v793, ").value = ", v794); + })(l183.fvalue(pv, v791),l183.fvalue(pv, v792)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l304 = {name: "FSET"}; -((l285).value = ({car: l45.fvalue(pv, l304, (function (values,v795,v796){ +var l305 = {name: "FSET"}; +((l286).value = ({car: l45.fvalue(pv, l305, (function (values,v795,v796){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v797,v798){ - return l180.fvalue(values, "(", v797, ").fvalue = ", v798); - })(l182.fvalue(pv, v795),l182.fvalue(pv, v796)); + return l181.fvalue(values, "(", v797, ").fvalue = ", v798); + })(l183.fvalue(pv, v795),l183.fvalue(pv, v796)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l19, (function (values,v799){ +((l286).value = ({car: l45.fvalue(pv, l19, (function (values,v799){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v800){ - return l181.fvalue(values, l180.fvalue(pv, "(", v800, ".value !== undefined)")); - })(l182.fvalue(pv, v799)); + return l182.fvalue(values, l181.fvalue(pv, "(", v800, ".value !== undefined)")); + })(l183.fvalue(pv, v799)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l305 = {name: "SYMBOL-VALUE"}; -((l285).value = ({car: l45.fvalue(pv, l305, (function (values,v801){ +var l306 = {name: "SYMBOL-VALUE"}; +((l286).value = ({car: l45.fvalue(pv, l306, (function (values,v801){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v802){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var symbol = ", v802, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var symbol = ", v802, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var value = symbol.value;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return value;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v801)); + })(l183.fvalue(pv, v801)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l252, (function (values,v803){ +((l286).value = ({car: l45.fvalue(pv, l253, (function (values,v803){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v804){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var symbol = ", v804, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var symbol = ", v804, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var func = symbol.fvalue;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return func;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v803)); + })(l183.fvalue(pv, v803)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l306 = {name: "SYMBOL-PLIST"}; -((l285).value = ({car: l45.fvalue(pv, l306, (function (values,v805){ +var l307 = {name: "SYMBOL-PLIST"}; +((l286).value = ({car: l45.fvalue(pv, l307, (function (values,v805){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v806){ - return l180.fvalue(values, "((", v806, ").plist || ", l182.fvalue(pv, l5.value), ")"); - })(l182.fvalue(pv, v805)); + return l181.fvalue(values, "((", v806, ").plist || ", l183.fvalue(pv, l5.value), ")"); + })(l183.fvalue(pv, v805)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l307 = {name: "LAMBDA-CODE"}; -((l285).value = ({car: l45.fvalue(pv, l307, (function (values,v807){ +var l308 = {name: "LAMBDA-CODE"}; +((l286).value = ({car: l45.fvalue(pv, l308, (function (values,v807){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v808){ - return l180.fvalue(values, "(", v808, ").toString()"); - })(l182.fvalue(pv, v807)); + return l181.fvalue(values, "(", v808, ").toString()"); + })(l183.fvalue(pv, v807)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l308 = {name: "EQ"}; -((l285).value = ({car: l45.fvalue(pv, l308, (function (values,v809,v810){ +var l309 = {name: "EQ"}; +((l286).value = ({car: l45.fvalue(pv, l309, (function (values,v809,v810){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v811,v812){ - return l181.fvalue(values, l180.fvalue(pv, "(", v811, " === ", v812, ")")); - })(l182.fvalue(pv, v809),l182.fvalue(pv, v810)); + return l182.fvalue(values, l181.fvalue(pv, "(", v811, " === ", v812, ")")); + })(l183.fvalue(pv, v809),l183.fvalue(pv, v810)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l309 = {name: "EQUAL"}; -((l285).value = ({car: l45.fvalue(pv, l309, (function (values,v813,v814){ +var l310 = {name: "EQUAL"}; +((l286).value = ({car: l45.fvalue(pv, l310, (function (values,v813,v814){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v815,v816){ - return l181.fvalue(values, l180.fvalue(pv, "(", v815, " == ", v816, ")")); - })(l182.fvalue(pv, v813),l182.fvalue(pv, v814)); + return l182.fvalue(values, l181.fvalue(pv, "(", v815, " == ", v816, ")")); + })(l183.fvalue(pv, v813),l183.fvalue(pv, v814)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l310 = {name: "CHAR-TO-STRING"}; -((l285).value = ({car: l45.fvalue(pv, l310, (function (values,v817){ +var l311 = {name: "CHAR-TO-STRING"}; +((l286).value = ({car: l45.fvalue(pv, l311, (function (values,v817){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v818){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v818, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v818, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v817)); + })(l183.fvalue(pv, v817)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l311 = {name: "STRINGP"}; -((l285).value = ({car: l45.fvalue(pv, l311, (function (values,v819){ +var l312 = {name: "STRINGP"}; +((l286).value = ({car: l45.fvalue(pv, l312, (function (values,v819){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v820){ - return l181.fvalue(values, l180.fvalue(pv, "(typeof(", v820, ") == \"string\")")); - })(l182.fvalue(pv, v819)); + return l182.fvalue(values, l181.fvalue(pv, "(typeof(", v820, ") == \"string\")")); + })(l183.fvalue(pv, v819)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l312 = {name: "STRING-UPCASE"}; -((l285).value = ({car: l45.fvalue(pv, l312, (function (values,v821){ +var l313 = {name: "STRING-UPCASE"}; +((l286).value = ({car: l45.fvalue(pv, l313, (function (values,v821){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v822){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v822, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v822, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v821)); + })(l183.fvalue(pv, v821)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l313 = {name: "STRING-LENGTH"}; -((l285).value = ({car: l45.fvalue(pv, l313, (function (values,v823){ +var l314 = {name: "STRING-LENGTH"}; +((l286).value = ({car: l45.fvalue(pv, l314, (function (values,v823){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v824){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v824, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v824, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "x.length", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "x.length", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v823)); + })(l183.fvalue(pv, v823)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l314 = {name: "SLICE"}; -((l285).value = ({car: l45.fvalue(pv, l314, (function (values,v825,v826,v827){ +var l315 = {name: "SLICE"}; +((l286).value = ({car: l45.fvalue(pv, l315, (function (values,v825,v826,v827){ checkArgsAtLeast(arguments, 3); checkArgsAtMost(arguments, 4); switch(arguments.length-1){ @@ -7890,244 +7632,239 @@ var l314 = {name: "SLICE"}; v827=l5.value; default: break; } - var i; return (function(){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var str = ", l182.fvalue(pv, v825), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var str = ", l183.fvalue(pv, v825), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var a = ", l182.fvalue(pv, v826), ";", (function(){ - var symbol = l145; + })(), "var a = ", l183.fvalue(pv, v826), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var b;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), (v827 !== l5.value ? l180.fvalue(pv, "b = ", l182.fvalue(pv, v827), ";", (function(){ - var symbol = l145; + })(), (v827 !== l5.value ? l181.fvalue(pv, "b = ", l183.fvalue(pv, v827), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : l5.value), "return str.slice(a,b);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l315 = {name: "CHAR"}; -((l285).value = ({car: l45.fvalue(pv, l315, (function (values,v828,v829){ +var l316 = {name: "CHAR"}; +((l286).value = ({car: l45.fvalue(pv, l316, (function (values,v828,v829){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v830,v831){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "string", " = ", v830, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string", " = ", v830, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "var ", "index", " = ", v831, ";", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "var ", "index", " = ", v831, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v828),l182.fvalue(pv, v829)); + })(l183.fvalue(pv, v828),l183.fvalue(pv, v829)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l73, (function (values,v832,v833){ +((l286).value = ({car: l45.fvalue(pv, l73, (function (values,v832,v833){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v834,v835){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "string1", " = ", v834, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string1", " = ", v834, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "var ", "string2", " = ", v835, ";", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "var ", "string2", " = ", v835, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v832),l182.fvalue(pv, v833)); + })(l183.fvalue(pv, v832),l183.fvalue(pv, v833)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l316 = {name: "FUNCALL"}; -((l285).value = ({car: l45.fvalue(pv, l316, (function (values,v837){ +var l317 = {name: "FUNCALL"}; +((l286).value = ({car: l45.fvalue(pv, l317, (function (values,v837){ checkArgsAtLeast(arguments, 2); var v836= l5.value; for (var i = arguments.length-1; i>=2; i--) v836 = {car: arguments[i], cdr: v836}; - var i; return (function(){ - return l180.fvalue(values, "(", l182.fvalue(pv, v837), ")(", l148.fvalue(pv, ({car: ((function(){ - var symbol = l185; + return l181.fvalue(values, "(", l183.fvalue(pv, v837), ")(", l149.fvalue(pv, ({car: ((function(){ + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){ - var symbol = l182; + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v836)}), ", "), ")"); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l317 = {name: "APPLY"}; -((l285).value = ({car: l45.fvalue(pv, l317, (function (values,v839){ +var l318 = {name: "APPLY"}; +((l286).value = ({car: l45.fvalue(pv, l318, (function (values,v839){ checkArgsAtLeast(arguments, 2); var v838= l5.value; for (var i = arguments.length-1; i>=2; i--) v838 = {car: arguments[i], cdr: v838}; - var i; return (function(){ - return (l13.fvalue(pv, v838) !== l5.value ? l180.fvalue(values, "(", l182.fvalue(pv, v839), ")()") : (function(v840,v841){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return (l13.fvalue(pv, v838) !== l5.value ? l181.fvalue(values, "(", l183.fvalue(pv, v839), ")()") : (function(v840,v841){ + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var f = ", l182.fvalue(pv, v839), ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var f = ", l183.fvalue(pv, v839), ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var args = [", l148.fvalue(pv, ({car: ((function(){ - var symbol = l185; + })(), "var args = [", l149.fvalue(pv, ({car: ((function(){ + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){ - var symbol = l182; + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v840)}), ", "), "];", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "var tail = (", l182.fvalue(pv, v841), ");", (function(){ - var symbol = l145; + })(), "var tail = (", l183.fvalue(pv, v841), ");", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "while (tail != ", l182.fvalue(pv, l5.value), "){", (function(){ - var symbol = l145; + })(), "while (tail != ", l183.fvalue(pv, l5.value), "){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " args.push(tail.car);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), " tail = tail.cdr;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return f.apply(this, args);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -8138,504 +7875,486 @@ var l317 = {name: "APPLY"}; })())); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l318 = {name: "JS-EVAL"}; -((l285).value = ({car: l45.fvalue(pv, l318, (function (values,v842){ +var l319 = {name: "JS-EVAL"}; +((l286).value = ({car: l45.fvalue(pv, l319, (function (values,v842){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v843){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "string", " = ", v843, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string", " = ", v843, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", ((function(){ - var symbol = l185; + })())), l181.fvalue(pv, "return ", ((function(){ + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l180.fvalue(pv, "(function(){", (function(){ - var symbol = l145; + })() !== l5.value ? l181.fvalue(pv, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "v = [v];", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "v = [v];", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "v['multiple-value'] = true;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "}", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return values.apply(this, v);", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()") : "eval.apply(window, [string])"), ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v842)); + })(l183.fvalue(pv, v842)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l319 = {name: "ERROR"}; -((l285).value = ({car: l45.fvalue(pv, l319, (function (values,v844){ +var l320 = {name: "ERROR"}; +((l286).value = ({car: l45.fvalue(pv, l320, (function (values,v844){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v845){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw ", v845, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw ", v845, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v844)); + })(l183.fvalue(pv, v844)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l320 = {name: "NEW"}; -((l285).value = ({car: l45.fvalue(pv, l320, (function (values){ +var l321 = {name: "NEW"}; +((l286).value = ({car: l45.fvalue(pv, l321, (function (values){ checkArgsAtMost(arguments, 1); - var i; return (function(){ return (function(){ return "{}"; })(); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l321 = {name: "OBJECTP"}; -((l285).value = ({car: l45.fvalue(pv, l321, (function (values,v846){ +var l322 = {name: "OBJECTP"}; +((l286).value = ({car: l45.fvalue(pv, l322, (function (values,v846){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v847){ - return l181.fvalue(values, l180.fvalue(pv, "(typeof (", v847, ") === 'object')")); - })(l182.fvalue(pv, v846)); + return l182.fvalue(values, l181.fvalue(pv, "(typeof (", v847, ") === 'object')")); + })(l183.fvalue(pv, v846)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l322 = {name: "OGET"}; -((l285).value = ({car: l45.fvalue(pv, l322, (function (values,v848,v849){ +var l323 = {name: "OGET"}; +((l286).value = ({car: l45.fvalue(pv, l323, (function (values,v848,v849){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v850,v851){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var tmp = ", "(", v850, ")[", v851, "];", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var tmp = ", "(", v850, ")[", v851, "];", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), "return tmp == undefined? ", l182.fvalue(pv, l5.value), ": tmp ;", (function(){ - var symbol = l145; + })(), "return tmp == undefined? ", l183.fvalue(pv, l5.value), ": tmp ;", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v848),l182.fvalue(pv, v849)); + })(l183.fvalue(pv, v848),l183.fvalue(pv, v849)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l323 = {name: "OSET"}; -((l285).value = ({car: l45.fvalue(pv, l323, (function (values,v852,v853,v854){ +var l324 = {name: "OSET"}; +((l286).value = ({car: l45.fvalue(pv, l324, (function (values,v852,v853,v854){ checkArgs(arguments, 4); - var i; return (function(){ return (function(v855,v856,v857){ - return l180.fvalue(values, "((", v855, ")[", v856, "] = ", v857, ")"); - })(l182.fvalue(pv, v852),l182.fvalue(pv, v853),l182.fvalue(pv, v854)); + return l181.fvalue(values, "((", v855, ")[", v856, "] = ", v857, ")"); + })(l183.fvalue(pv, v852),l183.fvalue(pv, v853),l183.fvalue(pv, v854)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l324 = {name: "IN"}; -((l285).value = ({car: l45.fvalue(pv, l324, (function (values,v858,v859){ +var l325 = {name: "IN"}; +((l286).value = ({car: l45.fvalue(pv, l325, (function (values,v858,v859){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v860,v861){ - return l181.fvalue(values, l180.fvalue(pv, "((", v860, ") in (", v861, "))")); - })(l182.fvalue(pv, v858),l182.fvalue(pv, v859)); + return l182.fvalue(values, l181.fvalue(pv, "((", v860, ") in (", v861, "))")); + })(l183.fvalue(pv, v858),l183.fvalue(pv, v859)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l325 = {name: "FUNCTIONP"}; -((l285).value = ({car: l45.fvalue(pv, l325, (function (values,v862){ +var l326 = {name: "FUNCTIONP"}; +((l286).value = ({car: l45.fvalue(pv, l326, (function (values,v862){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v863){ - return l181.fvalue(values, l180.fvalue(pv, "(typeof ", v863, " == 'function')")); - })(l182.fvalue(pv, v862)); + return l182.fvalue(values, l181.fvalue(pv, "(typeof ", v863, " == 'function')")); + })(l183.fvalue(pv, v862)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l326 = {name: "WRITE-STRING"}; -((l285).value = ({car: l45.fvalue(pv, l326, (function (values,v864){ +var l327 = {name: "WRITE-STRING"}; +((l286).value = ({car: l45.fvalue(pv, l327, (function (values,v864){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v865){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, l180.fvalue(pv, "var ", "x", " = ", v865, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v865, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), l180.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ - var symbol = l145; + })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), l180.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){ - var symbol = l145; + })())), l181.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })())), "})()"); - })(l182.fvalue(pv, v864)); + })(l183.fvalue(pv, v864)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l327 = {name: "MAKE-ARRAY"}; -((l285).value = ({car: l45.fvalue(pv, l327, (function (values,v866){ +var l328 = {name: "MAKE-ARRAY"}; +((l286).value = ({car: l45.fvalue(pv, l328, (function (values,v866){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v867){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var r = [];", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var r = [];", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "for (var i = 0; i < ", v867, "; i++)", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "r.push(", l182.fvalue(pv, l5.value), ");", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "r.push(", l183.fvalue(pv, l5.value), ");", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "return r;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v866)); + })(l183.fvalue(pv, v866)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l328 = {name: "ARRAYP"}; -((l285).value = ({car: l45.fvalue(pv, l328, (function (values,v868){ +var l329 = {name: "ARRAYP"}; +((l286).value = ({car: l45.fvalue(pv, l329, (function (values,v868){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v869){ - return l181.fvalue(values, l180.fvalue(pv, "(function(){", (function(){ - var symbol = l145; + return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var x = ", v869, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var x = ", v869, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return typeof x === 'object' && 'length' in x;"), "})()")); - })(l182.fvalue(pv, v868)); + })(l183.fvalue(pv, v868)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l329 = {name: "AREF"}; -((l285).value = ({car: l45.fvalue(pv, l329, (function (values,v870,v871){ +var l330 = {name: "AREF"}; +((l286).value = ({car: l45.fvalue(pv, l330, (function (values,v870,v871){ checkArgs(arguments, 3); - var i; return (function(){ return (function(v872,v873){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var x = ", "(", v872, ")[", v873, "];", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var x = ", "(", v872, ")[", v873, "];", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (x === undefined) throw 'Out of range';", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return x;", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v870),l182.fvalue(pv, v871)); + })(l183.fvalue(pv, v870),l183.fvalue(pv, v871)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l330 = {name: "ASET"}; -((l285).value = ({car: l45.fvalue(pv, l330, (function (values,v874,v875,v876){ +var l331 = {name: "ASET"}; +((l286).value = ({car: l45.fvalue(pv, l331, (function (values,v874,v875,v876){ checkArgs(arguments, 4); - var i; return (function(){ return (function(v877,v878,v879){ - return l180.fvalue(values, "(function(){", (function(){ - var symbol = l145; + return l181.fvalue(values, "(function(){", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l184.fvalue(pv, "var x = ", v877, ";", (function(){ - var symbol = l145; + })(), l185.fvalue(pv, "var x = ", v877, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "var i = ", v878, ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), "return x[i] = ", v879, ";", (function(){ - var symbol = l145; + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()), "})()"); - })(l182.fvalue(pv, v874),l182.fvalue(pv, v875),l182.fvalue(pv, v876)); + })(l183.fvalue(pv, v874),l183.fvalue(pv, v875),l183.fvalue(pv, v876)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l331 = {name: "GET-UNIX-TIME"}; -((l285).value = ({car: l45.fvalue(pv, l331, (function (values){ +var l332 = {name: "GET-UNIX-TIME"}; +((l286).value = ({car: l45.fvalue(pv, l332, (function (values){ checkArgsAtMost(arguments, 1); - var i; return (function(){ return (function(){ - return l180.fvalue(values, "(Math.round(new Date() / 1000))"); + return l181.fvalue(values, "(Math.round(new Date() / 1000))"); })(); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -var l332 = {name: "VALUES-ARRAY"}; -((l285).value = ({car: l45.fvalue(pv, l332, (function (values,v880){ +var l333 = {name: "VALUES-ARRAY"}; +((l286).value = ({car: l45.fvalue(pv, l333, (function (values,v880){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v881){ return ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l180.fvalue(values, "values.apply(this, ", v881, ")") : l180.fvalue(values, "pv.apply(this, ", v881, ")")); - })(l182.fvalue(pv, v880)); + })() !== l5.value ? l181.fvalue(values, "values.apply(this, ", v881, ")") : l181.fvalue(values, "pv.apply(this, ", v881, ")")); + })(l183.fvalue(pv, v880)); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); -((l285).value = ({car: l45.fvalue(pv, l154, (function (values){ +((l286).value = ({car: l45.fvalue(pv, l155, (function (values){ var v882= l5.value; for (var i = arguments.length-1; i>=1; i--) v882 = {car: arguments[i], cdr: v882}; - var i; return (function(){ return ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() !== l5.value ? l180.fvalue(values, "values(", l148.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l182; + })() !== l5.value ? l181.fvalue(values, "values(", l149.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v882), ", "), ")") : l180.fvalue(values, "pv(", l148.fvalue(pv, l78.fvalue(pv, (function(){ - var symbol = l182; + })(), v882), ", "), ")") : l181.fvalue(values, "pv(", l149.fvalue(pv, l78.fvalue(pv, (function(){ + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v882), ", "), ")")); })(); })), cdr: (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()})); (function(){ - (l211).fvalue = (function(v885){ + (l212).fvalue = (function(v885){ ((v885)["fname"] = "MACRO"); return v885; })((function (values,v883){ checkArgs(arguments, 2); - var i; return (function(){ return (((function(){ var tmp = v883; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v884){ - return (((l188.fvalue(pv, v884) === l211)?l4.value: l5.value) !== l5.value ? v884 : l5.value); - })(l200.fvalue(pv, v883, (function(){ - var symbol = l201; + return (((l189.fvalue(pv, v884) === l212)?l4.value: l5.value) !== l5.value ? v884 : l5.value); + })(l201.fvalue(pv, v883, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })(), l108)) : l5.value); })(); })); - return l211; + return l212; })(); -var l333 = {name: "LS-MACROEXPAND-1"}; +var l334 = {name: "LS-MACROEXPAND-1"}; (function(){ - (l333).fvalue = (function(v890){ + (l334).fvalue = (function(v890){ ((v890)["fname"] = "LS-MACROEXPAND-1"); return v890; })((function (values,v886){ checkArgs(arguments, 2); - var i; return (function(){ return (function(v887){ return (v887 !== l5.value ? (function(v888){ (l60.fvalue(pv, v888) !== l5.value ? (function(v889){ - l191.fvalue(pv, v887, v889); + l192.fvalue(pv, v887, v889); return (v888 = v889); - })(l260.fvalue(pv, v888)) : l5.value); + })(l261.fvalue(pv, v888)) : l5.value); return (function(){ var f = v888; var args = [values]; @@ -8649,54 +8368,53 @@ var l333 = {name: "LS-MACROEXPAND-1"}; } return f.apply(this, args); })(); - })(l189.fvalue(pv, v887)) : v886); - })(l211.fvalue(pv, (function(){ + })(l190.fvalue(pv, v887)) : v886); + })(l212.fvalue(pv, (function(){ var tmp = v886; return tmp === l5.value? l5.value: tmp.car; })())); })(); })); - return l333; + return l334; })(); -var l334 = {name: "COMPILE-FUNCALL"}; -var l335 = {name: "G764"}; +var l335 = {name: "COMPILE-FUNCALL"}; +var l336 = {name: "G870"}; (function(){ - (l334).fvalue = (function(v895){ + (l335).fvalue = (function(v895){ ((v895)["fname"] = "COMPILE-FUNCALL"); return v895; })((function (values,v891,v892){ checkArgs(arguments, 3); - var i; return (function(){ return (function(){ var v893 = ((function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })() !== l5.value ? "values" : "pv"); - var v894 = l146.fvalue(pv, "(", l148.fvalue(pv, ({car: v893, cdr: l78.fvalue(pv, (function(){ - var symbol = l182; + var v894 = l147.fvalue(pv, "(", l149.fvalue(pv, ({car: v893, cdr: l78.fvalue(pv, (function(){ + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v892)}), ", "), ")"); - return (l255.fvalue(pv, v891) !== l5.value ? l146.fvalue(values, l255.fvalue(pv, v891), v894) : ((((function(){ + return (l256.fvalue(pv, v891) !== l5.value ? l147.fvalue(values, l256.fvalue(pv, v891), v894) : ((((function(){ var tmp = v891; return (typeof tmp == 'object' && 'name' in tmp); - })()?l4.value: l5.value) !== l5.value ? (((l134.fvalue(pv, v891) === l125.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){ - var symbol = l335; + })()?l4.value: l5.value) !== l5.value ? (((l135.fvalue(pv, v891) === l126.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){ + var symbol = l336; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })() : l5.value) : l5.value) !== l5.value ? l180.fvalue(values, l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, v891))), ".fvalue", v894) : l180.fvalue(values, l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l108), l45.fvalue(pv, v891))), v894))); + })() : l5.value) : l5.value) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v891))), ".fvalue", v894) : l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l108), l45.fvalue(pv, v891))), v894))); })(); })(); })); - return l334; + return l335; })(); (function(){ - (l242).fvalue = (function(v898){ + (l243).fvalue = (function(v898){ ((v898)["fname"] = "LS-COMPILE-BLOCK"); return v898; })((function (values,v896,v897){ @@ -8707,38 +8425,37 @@ var l335 = {name: "G764"}; v897=l5.value; default: break; } - var i; return (function(){ - return (v897 !== l5.value ? l180.fvalue(values, l242.fvalue(pv, l91.fvalue(pv, v896)), "return ", l182.fvalue(pv, (function(){ + return (v897 !== l5.value ? l181.fvalue(values, l243.fvalue(pv, l91.fvalue(pv, v896)), "return ", l183.fvalue(pv, (function(){ var tmp = l90.fvalue(pv, v896); return tmp === l5.value? l5.value: tmp.car; })(), (function(){ - var symbol = l185; + var symbol = l186; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()), ";") : l149.fvalue(values, l94.fvalue(pv, (function(){ - var symbol = l208; + })()), ";") : l150.fvalue(values, l94.fvalue(pv, (function(){ + var symbol = l209; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), l78.fvalue(pv, (function(){ - var symbol = l182; + var symbol = l183; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; - })(), v896)), l146.fvalue(pv, ";", (function(){ - var symbol = l145; + })(), v896)), l147.fvalue(pv, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()))); })(); })); - return l242; + return l243; })(); (function(){ - (l182).fvalue = (function(v908){ + (l183).fvalue = (function(v908){ ((v908)["fname"] = "LS-COMPILE"); return v908; })((function (values,v899,v900){ @@ -8749,32 +8466,31 @@ var l335 = {name: "G764"}; v900=l5.value; default: break; } - var i; return (function(){ return (function(v901){ try { var tmp; - tmp = l185.value; - l185.value = v901; + tmp = l186.value; + l186.value = v901; v901 = tmp; return (((function(){ var tmp = v899; return (typeof tmp == 'object' && 'name' in tmp); })()?l4.value: l5.value) !== l5.value ? (function(v902){ - return ((v902 !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l215, l190.fvalue(pv, v902))) : l5.value) !== l5.value ? l189.fvalue(values, v902) : ((function(v903){ - return (v903 !== l5.value ? v903 : l92.fvalue(pv, l217, l190.fvalue(pv, v902))); - })(l133.fvalue(pv, v899)) !== l5.value ? l180.fvalue(values, l182.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, v899))), ".value") : l182.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l305), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l175), l45.fvalue(pv, v899))))))); - })(l200.fvalue(pv, v899, (function(){ - var symbol = l201; + return ((v902 !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l216, l191.fvalue(pv, v902))) : l5.value) !== l5.value ? l190.fvalue(values, v902) : ((function(v903){ + return (v903 !== l5.value ? v903 : l92.fvalue(pv, l218, l191.fvalue(pv, v902))); + })(l134.fvalue(pv, v899)) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v899))), ".value") : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l306), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v899))))))); + })(l201.fvalue(pv, v899, (function(){ + var symbol = l202; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })(), l109)) : (l85.fvalue(pv, v899) !== l5.value ? l18.fvalue(values, v899) : (((typeof(v899) == "string")?l4.value: l5.value) !== l5.value ? l180.fvalue(values, "\"", l156.fvalue(pv, v899), "\"") : (((function(){ + })(), l109)) : (l85.fvalue(pv, v899) !== l5.value ? l18.fvalue(values, v899) : (((typeof(v899) == "string")?l4.value: l5.value) !== l5.value ? l181.fvalue(values, "\"", l157.fvalue(pv, v899), "\"") : (((function(){ var x = v899; return typeof x === 'object' && 'length' in x; - })()?l4.value: l5.value) !== l5.value ? l250.fvalue(values, v899) : (l60.fvalue(pv, v899) !== l5.value ? (function(v904,v905){ + })()?l4.value: l5.value) !== l5.value ? l251.fvalue(values, v899) : (l60.fvalue(pv, v899) !== l5.value ? (function(v904,v905){ return (l101.fvalue(pv, v904, (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -8790,16 +8506,16 @@ var l335 = {name: "G764"}; return f.apply(this, args); })(); })(l41.fvalue(pv, l101.fvalue(pv, v904, (function(){ - var symbol = l219; + var symbol = l220; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()))) : ((l101.fvalue(pv, v904, (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()) !== l5.value ? l28.fvalue(pv, l213.fvalue(pv, v904, l108, l216)) : l5.value) !== l5.value ? (function(v907){ + })()) !== l5.value ? l28.fvalue(pv, l214.fvalue(pv, v904, l108, l217)) : l5.value) !== l5.value ? (function(v907){ return (function(){ var f = v907; var args = [values]; @@ -8811,11 +8527,11 @@ var l335 = {name: "G764"}; return f.apply(this, args); })(); })(l41.fvalue(pv, l101.fvalue(pv, v904, (function(){ - var symbol = l285; + var symbol = l286; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })()))) : (l211.fvalue(pv, v904) !== l5.value ? l182.fvalue(values, l333.fvalue(pv, v899), v900) : l334.fvalue(values, v904, v905)))); + })()))) : (l212.fvalue(pv, v904) !== l5.value ? l183.fvalue(values, l334.fvalue(pv, v899), v900) : l335.fvalue(values, v904, v905)))); })((function(){ var tmp = v899; return tmp === l5.value? l5.value: tmp.car; @@ -8827,16 +8543,16 @@ var l335 = {name: "G764"}; })()))))); } finally { - l185.value = v901; + l186.value = v901; } })(v900); })(); })); - return l182; + return l183; })(); -var l336 = {name: "LS-COMPILE-TOPLEVEL"}; +var l337 = {name: "LS-COMPILE-TOPLEVEL"}; (function(){ - (l336).fvalue = (function(v915){ + (l337).fvalue = (function(v915){ ((v915)["fname"] = "LS-COMPILE-TOPLEVEL"); return v915; })((function (values,v909,v910){ @@ -8847,13 +8563,12 @@ var l336 = {name: "LS-COMPILE-TOPLEVEL"}; v910=l5.value; default: break; } - var i; return (function(){ return (function(v911){ try { var tmp; - tmp = l206.value; - l206.value = v911; + tmp = l207.value; + l207.value = v911; v911 = tmp; return ((((function(){ var tmp = v909; @@ -8862,51 +8577,49 @@ var l336 = {name: "LS-COMPILE-TOPLEVEL"}; var tmp = v909; return tmp === l5.value? l5.value: tmp.car; })() === l117)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v913){ - return l148.fvalue(values, l94.fvalue(pv, (function(){ - var symbol = l208; + return l149.fvalue(values, l94.fvalue(pv, (function(){ + var symbol = l209; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })(), v913)); })(l78.fvalue(pv, (function (values,v912){ checkArgs(arguments, 2); - var i; - return l336.fvalue(values, v912, l4.value); + return l337.fvalue(values, v912, l4.value); }), (function(){ var tmp = v909; return tmp === l5.value? l5.value: tmp.cdr; })())) : (function(v914){ - return l180.fvalue(values, l149.fvalue(pv, l209.fvalue(pv), l180.fvalue(pv, ";", (function(){ - var symbol = l145; + return l181.fvalue(values, l150.fvalue(pv, l210.fvalue(pv), l181.fvalue(pv, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; - })())), (v914 !== l5.value ? l180.fvalue(pv, v914, ";", (function(){ - var symbol = l145; + })())), (v914 !== l5.value ? l181.fvalue(pv, v914, ";", (function(){ + var symbol = l146; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; })()) : l5.value)); - })(l182.fvalue(pv, v909, v910))); + })(l183.fvalue(pv, v909, v910))); } finally { - l206.value = v911; + l207.value = v911; } })(l5.value); })(); })); - return l336; + return l337; })(); (function(){ - (l260).fvalue = (function(v917){ + (l261).fvalue = (function(v917){ ((v917)["fname"] = "EVAL"); return v917; })((function (values,v916){ checkArgs(arguments, 2); - var i; return (function(){ return (function(){ - var string = l336.fvalue(pv, v916, l4.value); + var string = l337.fvalue(pv, v916, l4.value); if (typeof string != 'string') throw 'The value ' + string + ' is not a type string.'; return (function(){ @@ -8920,13 +8633,13 @@ var l336 = {name: "LS-COMPILE-TOPLEVEL"}; })(); })(); })); - return l260; + return l261; })(); -var l337 = {name: "&BODY"}; -var l338 = QIList(l224,l225,l223,l337,l21,l16,l135,l62,l63,l22,l23,l24,l296,l298,l20,l20,l295,l297,l55,l65,l317,l329,l328,l101,l46,l197,l19,l19,l91,l33,l39,l37,l34,l31,l31,l53,l272,l35,l38,l36,l32,l32,l315,l83,l84,l82,l52,l29,l30,l80,l81,l48,l2,l3,l10,l12,l1,l9,l97,l96,l105,l69,l70,l107,l50,l51,l54,l308,l27,l309,l319,l260,l100,l143,l104,l125,l138,l40,l256,l43,l304,l316,l108,l325,l17,l144,l279,l79,l221,l136,l47,l85,l85,l142,l133,l257,l6,l90,l72,l264,l267,l121,l45,l60,l327,l122,l302,l78,l92,l87,l292,l110,l281,l111,l282,l5,l28,l89,l88,l13,l299,l56,l126,l128,l124,l173,l86,l155,l158,l218,l57,l58,l117,l68,l49,l175,l93,l94,l95,l14,l271,l66,l67,l118,l119,l41,l244,l116,l114,l99,l312,l102,l103,l311,l98,l252,l303,l134,l306,l305,l301,l4,l278,l42,l273,l26,l8,l280,l154,l153,l109,l157,l7,l106,l326,l25,l5); -l143.fvalue(values, l338); -((l135).value = (function(){ - var symbol = l131; +var l338 = {name: "&BODY"}; +var l339 = QIList(l225,l226,l224,l338,l21,l16,l136,l62,l63,l22,l23,l24,l297,l299,l20,l20,l296,l298,l55,l65,l318,l330,l329,l101,l46,l198,l19,l19,l91,l33,l39,l37,l34,l31,l31,l53,l273,l35,l38,l36,l32,l32,l316,l83,l84,l82,l52,l29,l30,l80,l81,l48,l2,l3,l10,l12,l1,l9,l97,l96,l105,l69,l70,l107,l50,l51,l54,l309,l27,l310,l320,l261,l100,l144,l104,l126,l139,l40,l257,l43,l305,l317,l108,l326,l17,l145,l280,l79,l222,l137,l47,l85,l85,l143,l134,l258,l6,l90,l72,l265,l268,l121,l45,l60,l328,l122,l303,l78,l92,l87,l293,l110,l282,l111,l283,l5,l28,l89,l88,l13,l300,l56,l127,l129,l125,l174,l86,l156,l159,l219,l57,l58,l117,l68,l49,l176,l93,l94,l95,l14,l272,l66,l67,l118,l119,l41,l245,l116,l114,l99,l313,l102,l103,l312,l98,l253,l304,l135,l307,l306,l302,l4,l279,l42,l274,l26,l8,l281,l155,l154,l109,l158,l7,l106,l327,l25,l5); +l144.fvalue(values, l339); +((l136).value = (function(){ + var symbol = l132; var value = symbol.value; if (value === undefined) throw "Variable `" + symbol.name + "' is unbound."; return value; @@ -8946,471 +8659,469 @@ l143.fvalue(values, l338); })(); (lisp = {}); (lisp.read = (function(){ - var symbol = l179; + var symbol = l180; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); (lisp.print = (function(){ - var symbol = l155; + var symbol = l156; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); (lisp.eval = (function(){ - var symbol = l260; + var symbol = l261; var func = symbol.fvalue; if (func === undefined) throw "Function `" + symbol.name + "' is undefined."; return func; })()); (lisp.compile = (function (values,v918){ checkArgs(arguments, 2); - var i; - return l336.fvalue(values, v918, l4.value); + return l337.fvalue(values, v918, l4.value); })); (lisp.evalString = (function (values,v919){ checkArgs(arguments, 2); - var i; - return l260.fvalue(values, l179.fvalue(pv, v919)); + return l261.fvalue(values, l180.fvalue(pv, v919)); })); (lisp.compileString = (function (values,v920){ checkArgs(arguments, 2); - var i; - return l336.fvalue(values, l179.fvalue(pv, v920), l4.value); + return l337.fvalue(values, l180.fvalue(pv, v920), l4.value); })); -var l339 = {name: "OP"}; -var l340 = {name: "SYM"}; -var l341 = {name: "X"}; -var l342 = {name: "ARGS"}; -var l343 = {name: "BODY"}; -var l344 = {name: "DECLS"}; -var l345 = {name: "DECL"}; -var l346 = {name: "NAME"}; -var l347 = {name: "ARG"}; -var l348 = {name: "FORM"}; -var l349 = {name: "PACKAGE-DESIGNATOR"}; -var l350 = {name: "PAIRS"}; -var l351 = {name: "PLACE"}; -var l352 = {name: "VALUE"}; -var l353 = {name: "VARS"}; -var l354 = {name: "VALS"}; -var l355 = {name: "STORE-VARS"}; -var l356 = {name: "WRITER-FORM"}; -var l357 = {name: "READER-FORM"}; -var l358 = {name: "RESULT"}; -var l359 = {name: "ACCESS-FN"}; -var l360 = {name: "LAMBDA-LIST"}; -var l361 = {name: "VALUE-FROM"}; -var l362 = {name: "VARIABLES"}; -var l363 = {name: "HEAD"}; -var l364 = {name: "TAIL"}; -var l365 = {name: "COLLECT"}; -var l366 = {name: "VARLIST"}; -var l367 = {name: "ENDLIST"}; -var l368 = {name: "V"}; -var l369 = {name: "ASSIGNMENTS"}; -var l370 = {name: "FORM1"}; -var l371 = {name: "FORMS"}; -var l372 = {name: "G"}; -var l373 = {name: "CLAUSULES"}; -var l374 = {name: "!FORM"}; -var l375 = {name: "CLAUSULE"}; -var l376 = {name: "ITER"}; -var l377 = {name: "G!TO"}; -var l378 = {name: "VAR"}; -var l379 = {name: "TO"}; -var l380 = {name: "G!LIST"}; -var l381 = {name: "DELTA"}; -var l382 = {name: "CONDITION"}; -var l383 = {name: "DOCSTRING"}; -var l384 = QIList(QIList(QIList(l285,l109,l5,QIList(l215,l5),l5),QIList(l275,l109,l5,QIList(l215,l5),l5),QIList(l274,l109,l5,QIList(l215,l5),l5),QIList(l268,l109,l5,QIList(l215,l5),l5),QIList(l258,l109,l5,QIList(l215,l5),l5),QIList(l248,l109,l5,QIList(l215,l5),l5),QIList(l247,l109,l5,QIList(l215,l5),l5),QIList(l222,l109,l5,QIList(l215,l5),l5),QIList(l219,l109,l5,QIList(l215,l5),l5),QIList(l206,l109,l5,QIList(l215,l5),l5),QIList(l202,l109,l5,QIList(l215,l5),l5),QIList(l201,l109,l5,QIList(l215,l5),l5),QIList(l185,l109,l5,QIList(l215,l5),l5),QIList(l174,l109,l5,QIList(l215,l5),l5),QIList(l145,l109,l5,QIList(l215,l5),l5),QIList(l135,l109,l5,QIList(l215,l5),l5),QIList(l132,l109,l5,QIList(l215,l5),l5),QIList(l131,l109,l5,QIList(l215,l5),l5),QIList(l130,l109,l5,QIList(l215,l5),l5),QIList(l120,l109,l5,QIList(l215,l5),l5),QIList(l112,l109,l5,QIList(l215,l5),l5),QIList(l16,l109,l5,QIList(l215,l5),l5),QIList(l5,l109,l5,QIList(l217,l215,l5),l5),QIList(l4,l109,l5,QIList(l217,l215,l5),l5),l5),QIList(QIList(l294,l211,QIList(l108,QIList(l6,QIList(l339,l340,l5),QIList(l176,QIList(l286,QIList(l178,l339,l5),QIList(l341,l224,l342,l5),QIList(l264,QIList(QIList(l342,QIList(l29,l341,l342,l5),l5),l5),QIList(l290,l342,QIList(l181,QIList(l293,l342,QIList(l178,l340,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l290,l211,QIList(l108,QIList(l6,QIList(l342,l224,l343,l5),QIList(l8,QIList(l301,l342,l5),QIList(l319,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l176,QIList(l289,QIList(l178,l342,l5),QIList(l6,QIList(QIList(l178,l342,l5),l5),QIList(l180,"return ",QIList(l177,l343,l5),";",l145,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l288,l211,QIList(l108,QIList(l6,QIList(l344,l224,l343,l5),QIList(l176,QIList(l183,QIList(l177,QIList(l78,QIList(l6,QIList(l345,l5),QIList(l176,QIList(l180,"var ",QIList(l178,QIList(l40,l345,l5),l5)," = ",QIList(l178,QIList(l42,l345,l5),l5),";",l145,l5),l5),l5),l344,l5),l5),QIList(l177,QIList(l78,QIList(l6,QIList(l345,l5),QIList(l176,QIList(l180,"if (typeof ",QIList(l178,QIList(l40,l345,l5),l5)," != '",QIList(l178,QIList(l41,l345,l5),l5),"')",l145,QIList(l184,"throw 'The value ' + ",QIList(l178,QIList(l40,l345,l5),l5)," + ' is not a type ",QIList(l178,QIList(l41,l345,l5),l5),".';",l145,l5),l5),l5),l5),l344,l5),l5),QIList(l180,"return ",QIList(l117,QIList(l177,l343,l5),l5),";",l145,l5),l5),l5),l5),l5),l5,l5),QIList(l287,l211,QIList(l108,QIList(l6,QIList(l346,l342,l224,l343,l5),QIList(l176,QIList(l117,QIList(l286,QIList(l178,l346,l5),QIList(l178,l342,l5),QIList(l264,QIList(l178,QIList(l78,QIList(l6,QIList(l347,l5),QIList(l176,QIList(QIList(l178,l347,l5),QIList(l182,QIList(l178,l347,l5),l5),l5),l5),l5),l342,l5),l5),QIList(l177,l343,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l286,l211,QIList(l108,QIList(l6,QIList(l346,l342,l224,l343,l5),QIList(l176,QIList(l49,QIList(l45,QIList(l175,QIList(l178,l346,l5),l5),QIList(l6,QIList(l178,l342,l5),QIList(l197,QIList(l178,l346,l5),QIList(l177,l343,l5),l5),l5),l5),l285,l5),l5),l5),l5),l5,l5),QIList(l176,l211,QIList(l108,QIList(l6,QIList(l348,l5),QIList(l283,l348,l5),l5),l5),l5,l5),QIList(l261,l211,QIList(l108,QIList(l6,QIList(l346,l342,l348,l5),QIList(l176,QIList(l220,QIList(l178,l346,l5),QIList(l178,l342,l5),QIList(l182,QIList(l178,l348,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l220,l211,QIList(l108,QIList(l6,QIList(l346,l342,l224,l343,l5),QIList(l176,QIList(l49,QIList(l45,QIList(l175,QIList(l178,l346,l5),l5),QIList(l6,QIList(l178,l342,l5),QIList(l197,QIList(l178,l346,l5),QIList(l177,l343,l5),l5),l5),l5),l219,l5),l5),l5),l5),l5,l5),QIList(l183,l211,QIList(l108,QIList(l6,QIList(l224,l343,l5),QIList(l176,QIList(l180,"(function(){",l145,QIList(l184,QIList(l177,l343,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l147,l211,QIList(l108,QIList(l6,QIList(l109,l224,l348,l5),QIList(l176,QIList(l114,QIList(l178,l109,l5),QIList(l146,QIList(l178,l109,l5),QIList(l117,QIList(l177,l348,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l136,l211,QIList(l108,QIList(l6,QIList(l349,l5),QIList(l176,QIList(l259,QIList(l114,l135,QIList(l123,QIList(l178,l349,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l211,QIList(l108,QIList(l6,QIList(l224,l350,l5),QIList(l52,QIList(QIList(l13,l350,l5),l5,l5),QIList(QIList(l13,QIList(l32,l350,l5),l5),QIList(l319,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l36,l350,l5),l5),QIList(l264,QIList(QIList(l351,QIList(l40,l350,l5),l5),QIList(l352,QIList(l41,l350,l5),l5),l5),QIList(l110,QIList(l353,l354,l355,l356,l357,l5),QIList(l113,l351,l5),QIList(l176,QIList(l267,QIList(l178,QIList(l78,QIList(l108,l45,l5),l353,l354,l5),l5),QIList(l110,QIList(l178,l355,l5),QIList(l178,l352,l5),QIList(l178,l356,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l176,QIList(l117,QIList(l177,QIList(l69,QIList(QIList(l350,l350,QIList(l36,l350,l5),l5),QIList(l358,QIList(l175,l5,l5),QIList(l29,QIList(l176,QIList(l116,QIList(l178,QIList(l31,l350,l5),l5),QIList(l178,QIList(l34,l350,l5),l5),l5),l5),l358,l5),l5),l5),QIList(QIList(l13,l350,l5),QIList(l67,l358,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l115,l211,QIList(l108,QIList(l6,QIList(l359,l360,l224,l343,l5),QIList(l8,QIList(l301,l359,l5),QIList(l319,"ACCESS-FN must be a symbol.",l5),l5),QIList(l176,QIList(l117,QIList(l49,QIList(l29,QIList(l175,QIList(l178,l359,l5),l5),QIList(l6,QIList(l178,l360,l5),QIList(l177,l343,l5),l5),l5),l112,l5),QIList(l175,QIList(l178,l359,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l111,l211,QIList(l108,QIList(l6,QIList(l361,l5),QIList(l176,QIList(l281,QIList(l108,l45,l5),QIList(l178,l361,l5),l5),l5),l5),l5),l5,l5),QIList(l110,l211,QIList(l108,QIList(l6,QIList(l362,l361,l224,l343,l5),QIList(l176,QIList(l281,QIList(l6,QIList(l223,QIList(l177,l362,l5),l224,QIList(l178,QIList(l17,l5),l5),l5),QIList(l177,l343,l5),l5),QIList(l178,l361,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l211,QIList(l108,QIList(l6,QIList(l224,l343,l5),QIList(l176,QIList(l15,l4,QIList(l177,l343,l5),l5),l5),l5),l5),l5,l5),QIList(l74,l211,QIList(l108,QIList(l6,QIList(l224,l343,l5),QIList(l264,QIList(QIList(l363,QIList(l17,l5),l5),QIList(l364,QIList(l17,l5),l5),l5),QIList(l176,QIList(l267,QIList(QIList(QIList(l178,l363,l5),QIList(l29,QIList(l175,l76,l5),l5,l5),l5),QIList(QIList(l178,l364,l5),QIList(l178,l363,l5),l5),l5),QIList(l256,QIList(QIList(l365,QIList(l341,l5),QIList(l119,QIList(l178,l364,l5),QIList(l29,l341,l5,l5),l5),QIList(l114,QIList(l178,l364,l5),QIList(l32,QIList(l178,l364,l5),l5),l5),l341,l5),l5),QIList(l177,l343,l5),l5),QIList(l32,QIList(l178,l363,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l211,QIList(l108,QIList(l6,QIList(l366,l367,l224,l343,l5),QIList(l176,QIList(l197,l5,QIList(l267,QIList(l178,QIList(l78,QIList(l6,QIList(l341,l5),QIList(l45,QIList(l40,l341,l5),QIList(l41,l341,l5),l5),l5),l366,l5),l5),QIList(l15,l4,QIList(l7,QIList(l178,QIList(l31,l367,l5),l5),QIList(l14,QIList(l117,QIList(l178,QIList(l32,l367,l5),l5),l5),l5),l5),QIList(l278,QIList(l177,l343,l5),l5),QIList(l114,QIList(l177,QIList(l317,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l368,l5),QIList(l55,QIList(l30,QIList(l36,l368,l5),l5),QIList(l45,QIList(l40,l368,l5),QIList(l42,l368,l5),l5),l5),l5),l366,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l211,QIList(l108,QIList(l6,QIList(l366,l367,l224,l343,l5),QIList(l176,QIList(l197,l5,QIList(l264,QIList(l178,QIList(l78,QIList(l6,QIList(l341,l5),QIList(l45,QIList(l40,l341,l5),QIList(l41,l341,l5),l5),l5),l366,l5),l5),QIList(l15,l4,QIList(l7,QIList(l178,QIList(l31,l367,l5),l5),QIList(l14,QIList(l117,QIList(l178,QIList(l32,l367,l5),l5),l5),l5),l5),QIList(l278,QIList(l177,l343,l5),l5),QIList(l68,QIList(l177,QIList(l317,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l368,l5),QIList(l55,QIList(l30,QIList(l36,l368,l5),l5),QIList(l45,QIList(l40,l368,l5),QIList(l42,l368,l5),l5),l5),l5),l366,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l68,l211,QIList(l108,QIList(l6,QIList(l224,l350,l5),QIList(l264,QIList(QIList(l369,QIList(l175,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l350,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l350,l5),l5),QIList(l319,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l264,QIList(QIList(l109,QIList(l31,l350,l5),l5),QIList(l352,QIList(l34,l350,l5),l5),l5),QIList(l49,QIList(l176,QIList(QIList(l178,l109,l5),QIList(l178,QIList(l17,l5),l5),QIList(l178,l352,l5),l5),l5),l369,l5),QIList(l114,l350,QIList(l36,l350,l5),l5),l5),l5),l5),l5),QIList(l114,l369,QIList(l67,l369,l5),l5),QIList(l176,QIList(l264,QIList(l178,QIList(l78,QIList(l108,l32,l5),l369,l5),l5),QIList(l114,QIList(l177,QIList(l61,QIList(l108,l65,l5),QIList(l78,QIList(l108,l91,l5),l369,l5),QIList(l175,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l211,QIList(l108,QIList(l6,QIList(l370,l358,l224,l343,l5),QIList(l176,QIList(l57,QIList(l117,QIList(l178,l370,l5),QIList(l178,l358,l5),l5),QIList(l177,l343,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l211,QIList(l108,QIList(l6,QIList(l348,l224,l343,l5),QIList(l264,QIList(QIList(l352,QIList(l17,l5),l5),l5),QIList(l176,QIList(l264,QIList(QIList(QIList(l178,l352,l5),QIList(l178,l348,l5),l5),l5),QIList(l177,l343,l5),QIList(l178,l352,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l211,QIList(l108,QIList(l6,QIList(l224,l371,l5),QIList(l52,QIList(QIList(l13,l371,l5),l5,l5),QIList(QIList(l13,QIList(l32,l371,l5),l5),QIList(l31,l371,l5),l5),QIList(l4,QIList(l264,QIList(QIList(l372,QIList(l17,l5),l5),l5),QIList(l176,QIList(l264,QIList(QIList(QIList(l178,l372,l5),QIList(l178,QIList(l31,l371,l5),l5),l5),l5),QIList(l221,QIList(l178,l372,l5),QIList(l178,l372,l5),QIList(l56,QIList(l177,QIList(l32,l371,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l211,QIList(l108,QIList(l6,QIList(l224,l371,l5),QIList(l52,QIList(QIList(l13,l371,l5),l4,l5),QIList(QIList(l13,QIList(l32,l371,l5),l5),QIList(l31,l371,l5),l5),QIList(l4,QIList(l176,QIList(l221,QIList(l178,QIList(l31,l371,l5),l5),QIList(l55,QIList(l177,QIList(l32,l371,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l211,QIList(l108,QIList(l6,QIList(l348,l224,l373,l5),QIList(l176,QIList(l53,QIList(l178,l348,l5),QIList(l177,QIList(l65,l373,QIList(l176,QIList(QIList(l4,QIList(l319,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l211,QIList(l108,QIList(l6,QIList(l348,l224,l373,l5),QIList(l264,QIList(QIList(l374,QIList(l17,l5),l5),l5),QIList(l176,QIList(l264,QIList(QIList(QIList(l178,l374,l5),QIList(l178,l348,l5),l5),l5),QIList(l52,QIList(l177,QIList(l78,QIList(l6,QIList(l375,l5),QIList(l221,QIList(l308,QIList(l31,l375,l5),l4,l5),l375,QIList(l176,QIList(QIList(l27,QIList(l178,l374,l5),QIList(l175,QIList(l178,QIList(l31,l375,l5),l5),l5),l5),QIList(l177,QIList(l32,l375,l5),l5),l5),l5),l5),l5),l373,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l211,QIList(l108,QIList(l6,QIList(l224,l373,l5),QIList(l221,QIList(l13,l373,l5),l5,QIList(l221,QIList(l308,QIList(l33,l373,l5),l4,l5),QIList(l176,QIList(l117,QIList(l177,QIList(l35,l373,l5),l5),l5),l5),QIList(l176,QIList(l221,QIList(l178,QIList(l33,l373,l5),l5),QIList(l117,QIList(l177,QIList(l35,l373,l5),l5),l5),QIList(l52,QIList(l177,QIList(l32,l373,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l211,QIList(l108,QIList(l6,QIList(l376,l224,l343,l5),QIList(l264,QIList(QIList(l377,QIList(l17,l5),l5),QIList(l378,QIList(l40,l376,l5),l5),QIList(l379,QIList(l41,l376,l5),l5),QIList(l358,QIList(l42,l376,l5),l5),l5),QIList(l176,QIList(l197,l5,QIList(l264,QIList(QIList(QIList(l178,l378,l5),0,l5),QIList(QIList(l178,l377,l5),QIList(l178,l379,l5),l5),l5),QIList(l251,QIList(l296,QIList(l178,l378,l5),QIList(l178,l377,l5),l5),QIList(l278,QIList(l177,l343,l5),l5),QIList(l47,QIList(l178,l378,l5),l5),l5),QIList(l178,l358,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l211,QIList(l108,QIList(l6,QIList(l376,l224,l343,l5),QIList(l264,QIList(QIList(l378,QIList(l40,l376,l5),l5),QIList(l380,QIList(l17,l5),l5),l5),QIList(l176,QIList(l197,l5,QIList(l264,QIList(QIList(QIList(l178,l380,l5),QIList(l178,QIList(l41,l376,l5),l5),l5),QIList(QIList(l178,l378,l5),l5,l5),l5),QIList(l251,QIList(l178,l380,l5),QIList(l114,QIList(l178,l378,l5),QIList(l31,QIList(l178,l380,l5),l5),l5),QIList(l278,QIList(l177,l343,l5),l5),QIList(l114,QIList(l178,l380,l5),QIList(l32,QIList(l178,l380,l5),l5),l5),l5),QIList(l178,QIList(l42,l376,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l211,QIList(l108,QIList(l6,QIList(l341,l351,l5),QIList(l176,QIList(l114,QIList(l178,l351,l5),QIList(l29,QIList(l178,l341,l5),QIList(l178,l351,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l211,QIList(l108,QIList(l6,QIList(l341,l223,QIList(l381,1,l5),l5),QIList(l176,QIList(l114,QIList(l178,l341,l5),QIList(l63,QIList(l178,l341,l5),QIList(l178,l381,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l211,QIList(l108,QIList(l6,QIList(l341,l223,QIList(l381,1,l5),l5),QIList(l176,QIList(l114,QIList(l178,l341,l5),QIList(l62,QIList(l178,l341,l5),QIList(l178,l381,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l211,QIList(l108,QIList(l6,QIList(l382,l224,l343,l5),QIList(l176,QIList(l197,l5,QIList(l251,QIList(l178,l382,l5),QIList(l177,l343,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l211,QIList(l108,QIList(l6,QIList(l223,l352,l5),QIList(l176,QIList(l271,l5,QIList(l178,l352,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l211,QIList(l108,QIList(l6,QIList(l346,l342,l224,l343,l5),QIList(l176,QIList(l117,QIList(l304,QIList(l175,QIList(l178,l346,l5),l5),QIList(l11,QIList(l178,QIList(l303,l346,l5),l5),QIList(l178,l342,l5),QIList(l177,QIList(l221,QIList(l55,QIList(l311,QIList(l31,l343,l5),l5),QIList(l28,QIList(l13,QIList(l32,l343,l5),l5),l5),l5),QIList(l176,QIList(QIList(l178,QIList(l31,l343,l5),l5),QIList(l197,QIList(l178,l346,l5),QIList(l177,QIList(l32,l343,l5),l5),l5),l5),l5),QIList(l176,QIList(QIList(l197,QIList(l178,l346,l5),QIList(l177,l343,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l175,QIList(l178,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l211,QIList(l108,QIList(l6,QIList(l346,l342,l224,l343,l5),QIList(l264,QIList(QIList(l341,QIList(l17,"FN",l5),l5),l5),QIList(l176,QIList(l264,QIList(QIList(QIList(l178,l341,l5),QIList(l6,QIList(l178,l342,l5),QIList(l177,l343,l5),l5),l5),l5),QIList(l323,QIList(l178,l341,l5),"fname",QIList(l178,l346,l5),l5),QIList(l178,l341,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l211,QIList(l108,QIList(l6,QIList(l346,l352,l223,l383,l5),QIList(l176,QIList(l117,QIList(l114,QIList(l178,l346,l5),QIList(l178,l352,l5),l5),QIList(l177,QIList(l7,QIList(l311,l383,l5),QIList(l176,QIList(QIList(l323,QIList(l175,QIList(l178,l346,l5),l5),"vardoc",QIList(l178,l383,l5),l5),l5),l5),l5),l5),QIList(l175,QIList(l178,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l211,QIList(l108,QIList(l6,QIList(l346,l352,l223,l383,l5),QIList(l176,QIList(l117,QIList(l2,QIList(l215,QIList(l178,l346,l5),l5),l5),QIList(l8,QIList(l19,QIList(l175,QIList(l178,l346,l5),l5),l5),QIList(l114,QIList(l178,l346,l5),QIList(l178,l352,l5),l5),l5),QIList(l177,QIList(l7,QIList(l311,l383,l5),QIList(l176,QIList(QIList(l323,QIList(l175,QIList(l178,l346,l5),l5),"vardoc",QIList(l178,l383,l5),l5),l5),l5),l5),l5),QIList(l175,QIList(l178,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l211,QIList(l108,QIList(l6,QIList(l382,l224,l343,l5),QIList(l176,QIList(l221,QIList(l178,l382,l5),l5,QIList(l117,QIList(l177,l343,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l211,QIList(l108,QIList(l6,QIList(l382,l224,l343,l5),QIList(l176,QIList(l221,QIList(l178,l382,l5),QIList(l117,QIList(l177,l343,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l211,QIList(l108,QIList(l6,QIList(l342,l224,l343,l5),QIList(l176,QIList(l108,QIList(l6,QIList(l178,l342,l5),QIList(l177,l343,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l211,QIList(l108,QIList(l6,QIList(l346,l352,l223,l383,l5),QIList(l176,QIList(l117,QIList(l2,QIList(l215,QIList(l178,l346,l5),l5),l5),QIList(l2,QIList(l217,QIList(l178,l346,l5),l5),l5),QIList(l114,QIList(l178,l346,l5),QIList(l178,l352,l5),l5),QIList(l177,QIList(l7,QIList(l311,l383,l5),QIList(l176,QIList(QIList(l323,QIList(l175,QIList(l178,l346,l5),l5),"vardoc",QIList(l178,l383,l5),l5),l5),l5),l5),l5),QIList(l175,QIList(l178,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l211,QIList(l108,QIList(l6,QIList(l224,l344,l5),QIList(l176,QIList(l259,QIList(l177,QIList(l78,QIList(l6,QIList(l345,l5),QIList(l176,QIList(l214,QIList(l175,QIList(l178,l345,l5),l5),l5),l5),l5),l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l211,QIList(l108,QIList(l6,QIList(l346,l342,l224,l343,l5),QIList(l176,QIList(l259,QIList(l210,QIList(l175,QIList(l178,l346,l5),l5),QIList(l175,QIList(l108,QIList(l6,QIList(l178,QIList(l78,QIList(l108,QIList(l6,QIList(l341,l5),QIList(l221,QIList(l308,l341,QIList(l175,l337,l5),l5),QIList(l175,l224,l5),l341,l5),l5),l5),l342,l5),l5),QIList(l177,l343,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5); -((l201).value = l384); -var l385 = QIList(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(l372,"l372"),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(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(l291,"l291"),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(l237,"l237"),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(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(){ - l137.fvalue(pv, l383); - l137.fvalue(pv, l382); - l137.fvalue(pv, l381); - l137.fvalue(pv, l380); - l137.fvalue(pv, l379); - l137.fvalue(pv, l378); - l137.fvalue(pv, l377); - l137.fvalue(pv, l376); - l137.fvalue(pv, l375); - l137.fvalue(pv, l374); - l137.fvalue(pv, l373); - l137.fvalue(pv, l372); - l137.fvalue(pv, l371); - l137.fvalue(pv, l370); - l137.fvalue(pv, l369); - l137.fvalue(pv, l368); - l137.fvalue(pv, l367); - l137.fvalue(pv, l366); - l137.fvalue(pv, l365); - l137.fvalue(pv, l364); - l137.fvalue(pv, l363); - l137.fvalue(pv, l362); - l137.fvalue(pv, l361); - l137.fvalue(pv, l360); - l137.fvalue(pv, l359); - l137.fvalue(pv, l358); - l137.fvalue(pv, l357); - l137.fvalue(pv, l356); - l137.fvalue(pv, l355); - l137.fvalue(pv, l354); - l137.fvalue(pv, l353); - l137.fvalue(pv, l352); - l137.fvalue(pv, l351); - l137.fvalue(pv, l350); - l137.fvalue(pv, l349); - l137.fvalue(pv, l348); - l137.fvalue(pv, l347); - l137.fvalue(pv, l346); - l137.fvalue(pv, l345); - l137.fvalue(pv, l344); - l137.fvalue(pv, l343); - l137.fvalue(pv, l342); - l137.fvalue(pv, l341); - l137.fvalue(pv, l340); - l137.fvalue(pv, l339); - l137.fvalue(pv, l337); - l137.fvalue(pv, l336); - l137.fvalue(pv, l335); - l137.fvalue(pv, l334); - l137.fvalue(pv, l333); - l137.fvalue(pv, l332); - l137.fvalue(pv, l331); - l137.fvalue(pv, l330); - l137.fvalue(pv, l329); - l137.fvalue(pv, l328); - l137.fvalue(pv, l327); - l137.fvalue(pv, l326); - l137.fvalue(pv, l325); - l137.fvalue(pv, l324); - l137.fvalue(pv, l323); - l137.fvalue(pv, l322); - l137.fvalue(pv, l321); - l137.fvalue(pv, l320); - l137.fvalue(pv, l319); - l137.fvalue(pv, l318); - l137.fvalue(pv, l317); - l137.fvalue(pv, l316); - l137.fvalue(pv, l315); - l137.fvalue(pv, l314); - l137.fvalue(pv, l313); - l137.fvalue(pv, l312); - l137.fvalue(pv, l311); - l137.fvalue(pv, l310); - l137.fvalue(pv, l309); - l137.fvalue(pv, l308); - l137.fvalue(pv, l307); - l137.fvalue(pv, l306); - l137.fvalue(pv, l305); - l137.fvalue(pv, l304); - l137.fvalue(pv, l303); - l137.fvalue(pv, l302); - l137.fvalue(pv, l301); - l137.fvalue(pv, l300); - l137.fvalue(pv, l299); - l137.fvalue(pv, l298); - l137.fvalue(pv, l297); - l137.fvalue(pv, l296); - l137.fvalue(pv, l295); - l137.fvalue(pv, l294); - l137.fvalue(pv, l293); - l137.fvalue(pv, l292); - l137.fvalue(pv, l291); - l137.fvalue(pv, l290); - l137.fvalue(pv, l289); - l137.fvalue(pv, l288); - l137.fvalue(pv, l287); - l137.fvalue(pv, l286); - l137.fvalue(pv, l285); - l137.fvalue(pv, l284); - l137.fvalue(pv, l283); - l137.fvalue(pv, l282); - l137.fvalue(pv, l281); - l137.fvalue(pv, l280); - l137.fvalue(pv, l279); - l137.fvalue(pv, l278); - l137.fvalue(pv, l277); - l137.fvalue(pv, l276); - l137.fvalue(pv, l275); - l137.fvalue(pv, l274); - l137.fvalue(pv, l273); - l137.fvalue(pv, l272); - l137.fvalue(pv, l271); - l137.fvalue(pv, l270); - l137.fvalue(pv, l269); - l137.fvalue(pv, l268); - l137.fvalue(pv, l267); - l137.fvalue(pv, l266); - l137.fvalue(pv, l265); - l137.fvalue(pv, l264); - l137.fvalue(pv, l263); - l137.fvalue(pv, l262); - l137.fvalue(pv, l261); - l137.fvalue(pv, l260); - l137.fvalue(pv, l259); - l137.fvalue(pv, l258); - l137.fvalue(pv, l257); - l137.fvalue(pv, l256); - l137.fvalue(pv, l255); - l137.fvalue(pv, l254); - l137.fvalue(pv, l253); - l137.fvalue(pv, l252); - l137.fvalue(pv, l251); - l137.fvalue(pv, l250); - l137.fvalue(pv, l249); - l137.fvalue(pv, l248); - l137.fvalue(pv, l247); - l137.fvalue(pv, l246); - l137.fvalue(pv, l245); - l137.fvalue(pv, l244); - l137.fvalue(pv, l243); - l137.fvalue(pv, l242); - l137.fvalue(pv, l241); - l137.fvalue(pv, l240); - l137.fvalue(pv, l239); - l137.fvalue(pv, l238); - l137.fvalue(pv, l237); - l137.fvalue(pv, l236); - l137.fvalue(pv, l235); - l137.fvalue(pv, l234); - l137.fvalue(pv, l233); - l137.fvalue(pv, l232); - l137.fvalue(pv, l231); - l137.fvalue(pv, l230); - l137.fvalue(pv, l229); - l137.fvalue(pv, l228); - l137.fvalue(pv, l227); - l137.fvalue(pv, l225); - l137.fvalue(pv, l224); - l137.fvalue(pv, l223); - l137.fvalue(pv, l222); - l137.fvalue(pv, l221); - l137.fvalue(pv, l220); - l137.fvalue(pv, l219); - l137.fvalue(pv, l218); - l137.fvalue(pv, l217); - l137.fvalue(pv, l216); - l137.fvalue(pv, l215); - l137.fvalue(pv, l214); - l137.fvalue(pv, l213); - l137.fvalue(pv, l212); - l137.fvalue(pv, l211); - l137.fvalue(pv, l210); - l137.fvalue(pv, l209); - l137.fvalue(pv, l208); - l137.fvalue(pv, l207); - l137.fvalue(pv, l206); - l137.fvalue(pv, l205); - l137.fvalue(pv, l204); - l137.fvalue(pv, l203); - l137.fvalue(pv, l202); - l137.fvalue(pv, l201); - l137.fvalue(pv, l200); - l137.fvalue(pv, l199); - l137.fvalue(pv, l198); - l137.fvalue(pv, l197); - l137.fvalue(pv, l196); - l137.fvalue(pv, l195); - l137.fvalue(pv, l194); - l137.fvalue(pv, l193); - l137.fvalue(pv, l192); - l137.fvalue(pv, l191); - l137.fvalue(pv, l190); - l137.fvalue(pv, l189); - l137.fvalue(pv, l188); - l137.fvalue(pv, l187); - l137.fvalue(pv, l186); - l137.fvalue(pv, l185); - l137.fvalue(pv, l184); - l137.fvalue(pv, l183); - l137.fvalue(pv, l182); - l137.fvalue(pv, l181); - l137.fvalue(pv, l180); - l137.fvalue(pv, l179); - l137.fvalue(pv, l178); - l137.fvalue(pv, l177); - l137.fvalue(pv, l176); - l137.fvalue(pv, l175); - l137.fvalue(pv, l174); - l137.fvalue(pv, l173); - l137.fvalue(pv, l172); - l137.fvalue(pv, l171); - l137.fvalue(pv, l170); - l137.fvalue(pv, l169); - l137.fvalue(pv, l168); - l137.fvalue(pv, l167); - l137.fvalue(pv, l166); - l137.fvalue(pv, l165); - l137.fvalue(pv, l164); - l137.fvalue(pv, l163); - l137.fvalue(pv, l162); - l137.fvalue(pv, l161); - l137.fvalue(pv, l160); - l137.fvalue(pv, l159); - l137.fvalue(pv, l158); - l137.fvalue(pv, l157); - l137.fvalue(pv, l156); - l137.fvalue(pv, l155); - l137.fvalue(pv, l154); - l137.fvalue(pv, l153); - l137.fvalue(pv, l152); - l137.fvalue(pv, l151); - l137.fvalue(pv, l150); - l137.fvalue(pv, l149); - l137.fvalue(pv, l148); - l137.fvalue(pv, l147); - l137.fvalue(pv, l146); - l137.fvalue(pv, l145); - l137.fvalue(pv, l144); - l137.fvalue(pv, l143); - l137.fvalue(pv, l142); - l137.fvalue(pv, l141); - l137.fvalue(pv, l140); - l137.fvalue(pv, l139); - l137.fvalue(pv, l138); - l137.fvalue(pv, l137); - l137.fvalue(pv, l136); - l137.fvalue(pv, l135); - l137.fvalue(pv, l134); - l137.fvalue(pv, l133); - l137.fvalue(pv, l132); - l137.fvalue(pv, l131); - l137.fvalue(pv, l130); - l137.fvalue(pv, l129); - l137.fvalue(pv, l128); - l137.fvalue(pv, l127); - l137.fvalue(pv, l126); - l137.fvalue(pv, l125); - l137.fvalue(pv, l124); - l137.fvalue(pv, l123); - l137.fvalue(pv, l122); - l137.fvalue(pv, l121); - l137.fvalue(pv, l120); - l137.fvalue(pv, l119); - l137.fvalue(pv, l118); - l137.fvalue(pv, l117); - l137.fvalue(pv, l116); - l137.fvalue(pv, l115); - l137.fvalue(pv, l114); - l137.fvalue(pv, l113); - l137.fvalue(pv, l112); - l137.fvalue(pv, l111); - l137.fvalue(pv, l110); - l137.fvalue(pv, l109); - l137.fvalue(pv, l108); - l137.fvalue(pv, l107); - l137.fvalue(pv, l106); - l137.fvalue(pv, l105); - l137.fvalue(pv, l104); - l137.fvalue(pv, l103); - l137.fvalue(pv, l102); - l137.fvalue(pv, l101); - l137.fvalue(pv, l100); - l137.fvalue(pv, l99); - l137.fvalue(pv, l98); - l137.fvalue(pv, l97); - l137.fvalue(pv, l96); - l137.fvalue(pv, l95); - l137.fvalue(pv, l94); - l137.fvalue(pv, l93); - l137.fvalue(pv, l92); - l137.fvalue(pv, l91); - l137.fvalue(pv, l90); - l137.fvalue(pv, l89); - l137.fvalue(pv, l88); - l137.fvalue(pv, l87); - l137.fvalue(pv, l86); - l137.fvalue(pv, l85); - l137.fvalue(pv, l84); - l137.fvalue(pv, l83); - l137.fvalue(pv, l82); - l137.fvalue(pv, l81); - l137.fvalue(pv, l80); - l137.fvalue(pv, l79); - l137.fvalue(pv, l78); - l137.fvalue(pv, l77); - l137.fvalue(pv, l76); - l137.fvalue(pv, l75); - l137.fvalue(pv, l74); - l137.fvalue(pv, l73); - l137.fvalue(pv, l72); - l137.fvalue(pv, l71); - l137.fvalue(pv, l70); - l137.fvalue(pv, l69); - l137.fvalue(pv, l68); - l137.fvalue(pv, l67); - l137.fvalue(pv, l66); - l137.fvalue(pv, l65); - l137.fvalue(pv, l64); - l137.fvalue(pv, l63); - l137.fvalue(pv, l62); - l137.fvalue(pv, l61); - l137.fvalue(pv, l60); - l137.fvalue(pv, l59); - l137.fvalue(pv, l58); - l137.fvalue(pv, l57); - l137.fvalue(pv, l56); - l137.fvalue(pv, l55); - l137.fvalue(pv, l54); - l137.fvalue(pv, l53); - l137.fvalue(pv, l52); - l137.fvalue(pv, l51); - l137.fvalue(pv, l50); - l137.fvalue(pv, l49); - l137.fvalue(pv, l48); - l137.fvalue(pv, l47); - l137.fvalue(pv, l46); - l137.fvalue(pv, l45); - l137.fvalue(pv, l44); - l137.fvalue(pv, l43); - l137.fvalue(pv, l42); - l137.fvalue(pv, l41); - l137.fvalue(pv, l40); - l137.fvalue(pv, l39); - l137.fvalue(pv, l38); - l137.fvalue(pv, l37); - l137.fvalue(pv, l36); - l137.fvalue(pv, l35); - l137.fvalue(pv, l34); - l137.fvalue(pv, l33); - l137.fvalue(pv, l32); - l137.fvalue(pv, l31); - l137.fvalue(pv, l30); - l137.fvalue(pv, l29); - l137.fvalue(pv, l28); - l137.fvalue(pv, l27); - l137.fvalue(pv, l26); - l137.fvalue(pv, l25); - l137.fvalue(pv, l24); - l137.fvalue(pv, l23); - l137.fvalue(pv, l22); - l137.fvalue(pv, l21); - l137.fvalue(pv, l20); - l137.fvalue(pv, l19); - l137.fvalue(pv, l18); - l137.fvalue(pv, l17); - l137.fvalue(pv, l16); - l137.fvalue(pv, l15); - l137.fvalue(pv, l14); - l137.fvalue(pv, l13); - l137.fvalue(pv, l12); - l137.fvalue(pv, l11); - l137.fvalue(pv, l10); - l137.fvalue(pv, l9); - l137.fvalue(pv, l8); - l137.fvalue(pv, l7); - l137.fvalue(pv, l6); - l137.fvalue(pv, l5); - l137.fvalue(pv, l4); - l137.fvalue(pv, l3); - l137.fvalue(pv, l2); - l137.fvalue(pv, l1); - ((l247).value = l385); - ((l202).value = 920); +var l340 = {name: "OP"}; +var l341 = {name: "SYM"}; +var l342 = {name: "X"}; +var l343 = {name: "ARGS"}; +var l344 = {name: "BODY"}; +var l345 = {name: "DECLS"}; +var l346 = {name: "DECL"}; +var l347 = {name: "NAME"}; +var l348 = {name: "ARG"}; +var l349 = {name: "FORM"}; +var l350 = {name: "PACKAGE-DESIGNATOR"}; +var l351 = {name: "PAIRS"}; +var l352 = {name: "PLACE"}; +var l353 = {name: "VALUE"}; +var l354 = {name: "VARS"}; +var l355 = {name: "VALS"}; +var l356 = {name: "STORE-VARS"}; +var l357 = {name: "WRITER-FORM"}; +var l358 = {name: "READER-FORM"}; +var l359 = {name: "RESULT"}; +var l360 = {name: "ACCESS-FN"}; +var l361 = {name: "LAMBDA-LIST"}; +var l362 = {name: "VALUE-FROM"}; +var l363 = {name: "VARIABLES"}; +var l364 = {name: "HEAD"}; +var l365 = {name: "TAIL"}; +var l366 = {name: "COLLECT"}; +var l367 = {name: "VARLIST"}; +var l368 = {name: "ENDLIST"}; +var l369 = {name: "V"}; +var l370 = {name: "ASSIGNMENTS"}; +var l371 = {name: "FORM1"}; +var l372 = {name: "FORMS"}; +var l373 = {name: "G"}; +var l374 = {name: "CLAUSULES"}; +var l375 = {name: "!FORM"}; +var l376 = {name: "CLAUSULE"}; +var l377 = {name: "ITER"}; +var l378 = {name: "G!TO"}; +var l379 = {name: "VAR"}; +var l380 = {name: "TO"}; +var l381 = {name: "G!LIST"}; +var l382 = {name: "DELTA"}; +var l383 = {name: "CONDITION"}; +var l384 = {name: "DOCSTRING"}; +var l385 = QIList(QIList(QIList(l286,l109,l5,QIList(l216,l5),l5),QIList(l276,l109,l5,QIList(l216,l5),l5),QIList(l275,l109,l5,QIList(l216,l5),l5),QIList(l269,l109,l5,QIList(l216,l5),l5),QIList(l259,l109,l5,QIList(l216,l5),l5),QIList(l249,l109,l5,QIList(l216,l5),l5),QIList(l248,l109,l5,QIList(l216,l5),l5),QIList(l223,l109,l5,QIList(l216,l5),l5),QIList(l220,l109,l5,QIList(l216,l5),l5),QIList(l207,l109,l5,QIList(l216,l5),l5),QIList(l203,l109,l5,QIList(l216,l5),l5),QIList(l202,l109,l5,QIList(l216,l5),l5),QIList(l186,l109,l5,QIList(l216,l5),l5),QIList(l175,l109,l5,QIList(l216,l5),l5),QIList(l146,l109,l5,QIList(l216,l5),l5),QIList(l136,l109,l5,QIList(l216,l5),l5),QIList(l133,l109,l5,QIList(l216,l5),l5),QIList(l132,l109,l5,QIList(l216,l5),l5),QIList(l131,l109,l5,QIList(l216,l5),l5),QIList(l120,l109,l5,QIList(l216,l5),l5),QIList(l112,l109,l5,QIList(l216,l5),l5),QIList(l16,l109,l5,QIList(l216,l5),l5),QIList(l5,l109,l5,QIList(l218,l216,l5),l5),QIList(l4,l109,l5,QIList(l218,l216,l5),l5),l5),QIList(QIList(l295,l212,QIList(l108,QIList(l6,QIList(l340,l341,l5),QIList(l177,QIList(l287,QIList(l179,l340,l5),QIList(l342,l225,l343,l5),QIList(l265,QIList(QIList(l343,QIList(l29,l342,l343,l5),l5),l5),QIList(l291,l343,QIList(l182,QIList(l294,l343,QIList(l179,l341,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l291,l212,QIList(l108,QIList(l6,QIList(l343,l225,l344,l5),QIList(l8,QIList(l302,l343,l5),QIList(l320,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l177,QIList(l290,QIList(l179,l343,l5),QIList(l6,QIList(QIList(l179,l343,l5),l5),QIList(l181,"return ",QIList(l178,l344,l5),";",l146,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l289,l212,QIList(l108,QIList(l6,QIList(l345,l225,l344,l5),QIList(l177,QIList(l184,QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l181,"var ",QIList(l179,QIList(l40,l346,l5),l5)," = ",QIList(l179,QIList(l42,l346,l5),l5),";",l146,l5),l5),l5),l345,l5),l5),QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l181,"if (typeof ",QIList(l179,QIList(l40,l346,l5),l5)," != '",QIList(l179,QIList(l41,l346,l5),l5),"')",l146,QIList(l185,"throw 'The value ' + ",QIList(l179,QIList(l40,l346,l5),l5)," + ' is not a type ",QIList(l179,QIList(l41,l346,l5),l5),".';",l146,l5),l5),l5),l5),l345,l5),l5),QIList(l181,"return ",QIList(l117,QIList(l178,l344,l5),l5),";",l146,l5),l5),l5),l5),l5),l5,l5),QIList(l288,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l117,QIList(l287,QIList(l179,l347,l5),QIList(l179,l343,l5),QIList(l265,QIList(l179,QIList(l78,QIList(l6,QIList(l348,l5),QIList(l177,QIList(QIList(l179,l348,l5),QIList(l183,QIList(l179,l348,l5),l5),l5),l5),l5),l343,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l287,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l49,QIList(l45,QIList(l176,QIList(l179,l347,l5),l5),QIList(l6,QIList(l179,l343,l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l286,l5),l5),l5),l5),l5,l5),QIList(l177,l212,QIList(l108,QIList(l6,QIList(l349,l5),QIList(l284,l349,l5),l5),l5),l5,l5),QIList(l262,l212,QIList(l108,QIList(l6,QIList(l347,l343,l349,l5),QIList(l177,QIList(l221,QIList(l179,l347,l5),QIList(l179,l343,l5),QIList(l183,QIList(l179,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l221,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l49,QIList(l45,QIList(l176,QIList(l179,l347,l5),l5),QIList(l6,QIList(l179,l343,l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l220,l5),l5),l5),l5),l5,l5),QIList(l184,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l177,QIList(l181,"(function(){",l146,QIList(l185,QIList(l178,l344,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l148,l212,QIList(l108,QIList(l6,QIList(l109,l225,l349,l5),QIList(l177,QIList(l114,QIList(l179,l109,l5),QIList(l147,QIList(l179,l109,l5),QIList(l117,QIList(l178,l349,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l137,l212,QIList(l108,QIList(l6,QIList(l350,l5),QIList(l177,QIList(l260,QIList(l114,l136,QIList(l124,QIList(l179,l350,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l212,QIList(l108,QIList(l6,QIList(l225,l351,l5),QIList(l52,QIList(QIList(l13,l351,l5),l5,l5),QIList(QIList(l13,QIList(l32,l351,l5),l5),QIList(l320,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l36,l351,l5),l5),QIList(l265,QIList(QIList(l352,QIList(l40,l351,l5),l5),QIList(l353,QIList(l41,l351,l5),l5),l5),QIList(l110,QIList(l354,l355,l356,l357,l358,l5),QIList(l113,l352,l5),QIList(l177,QIList(l268,QIList(l179,QIList(l78,QIList(l108,l45,l5),l354,l355,l5),l5),QIList(l110,QIList(l179,l356,l5),QIList(l179,l353,l5),QIList(l179,l357,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l177,QIList(l117,QIList(l178,QIList(l69,QIList(QIList(l351,l351,QIList(l36,l351,l5),l5),QIList(l359,QIList(l176,l5,l5),QIList(l29,QIList(l177,QIList(l116,QIList(l179,QIList(l31,l351,l5),l5),QIList(l179,QIList(l34,l351,l5),l5),l5),l5),l359,l5),l5),l5),QIList(QIList(l13,l351,l5),QIList(l67,l359,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l115,l212,QIList(l108,QIList(l6,QIList(l360,l361,l225,l344,l5),QIList(l8,QIList(l302,l360,l5),QIList(l320,"ACCESS-FN must be a symbol.",l5),l5),QIList(l177,QIList(l117,QIList(l49,QIList(l29,QIList(l176,QIList(l179,l360,l5),l5),QIList(l6,QIList(l179,l361,l5),QIList(l178,l344,l5),l5),l5),l112,l5),QIList(l176,QIList(l179,l360,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l111,l212,QIList(l108,QIList(l6,QIList(l362,l5),QIList(l177,QIList(l282,QIList(l108,l45,l5),QIList(l179,l362,l5),l5),l5),l5),l5),l5,l5),QIList(l110,l212,QIList(l108,QIList(l6,QIList(l363,l362,l225,l344,l5),QIList(l177,QIList(l282,QIList(l6,QIList(l224,QIList(l178,l363,l5),l225,QIList(l179,QIList(l17,l5),l5),l5),QIList(l178,l344,l5),l5),QIList(l179,l362,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l177,QIList(l15,l4,QIList(l178,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l74,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l265,QIList(QIList(l364,QIList(l17,l5),l5),QIList(l365,QIList(l17,l5),l5),l5),QIList(l177,QIList(l268,QIList(QIList(QIList(l179,l364,l5),QIList(l29,QIList(l176,l76,l5),l5,l5),l5),QIList(QIList(l179,l365,l5),QIList(l179,l364,l5),l5),l5),QIList(l257,QIList(QIList(l366,QIList(l342,l5),QIList(l119,QIList(l179,l365,l5),QIList(l29,l342,l5,l5),l5),QIList(l114,QIList(l179,l365,l5),QIList(l32,QIList(l179,l365,l5),l5),l5),l342,l5),l5),QIList(l178,l344,l5),l5),QIList(l32,QIList(l179,l364,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l212,QIList(l108,QIList(l6,QIList(l367,l368,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l268,QIList(l179,QIList(l78,QIList(l6,QIList(l342,l5),QIList(l45,QIList(l40,l342,l5),QIList(l41,l342,l5),l5),l5),l367,l5),l5),QIList(l15,l4,QIList(l7,QIList(l179,QIList(l31,l368,l5),l5),QIList(l14,QIList(l117,QIList(l179,QIList(l32,l368,l5),l5),l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l114,QIList(l178,QIList(l318,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l369,l5),QIList(l55,QIList(l30,QIList(l36,l369,l5),l5),QIList(l45,QIList(l40,l369,l5),QIList(l42,l369,l5),l5),l5),l5),l367,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l212,QIList(l108,QIList(l6,QIList(l367,l368,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(l179,QIList(l78,QIList(l6,QIList(l342,l5),QIList(l45,QIList(l40,l342,l5),QIList(l41,l342,l5),l5),l5),l367,l5),l5),QIList(l15,l4,QIList(l7,QIList(l179,QIList(l31,l368,l5),l5),QIList(l14,QIList(l117,QIList(l179,QIList(l32,l368,l5),l5),l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l68,QIList(l178,QIList(l318,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l369,l5),QIList(l55,QIList(l30,QIList(l36,l369,l5),l5),QIList(l45,QIList(l40,l369,l5),QIList(l42,l369,l5),l5),l5),l5),l367,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l68,l212,QIList(l108,QIList(l6,QIList(l225,l351,l5),QIList(l265,QIList(QIList(l370,QIList(l176,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l351,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l351,l5),l5),QIList(l320,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l265,QIList(QIList(l109,QIList(l31,l351,l5),l5),QIList(l353,QIList(l34,l351,l5),l5),l5),QIList(l49,QIList(l177,QIList(QIList(l179,l109,l5),QIList(l179,QIList(l17,l5),l5),QIList(l179,l353,l5),l5),l5),l370,l5),QIList(l114,l351,QIList(l36,l351,l5),l5),l5),l5),l5),l5),QIList(l114,l370,QIList(l67,l370,l5),l5),QIList(l177,QIList(l265,QIList(l179,QIList(l78,QIList(l108,l32,l5),l370,l5),l5),QIList(l114,QIList(l178,QIList(l61,QIList(l108,l65,l5),QIList(l78,QIList(l108,l91,l5),l370,l5),QIList(l176,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l212,QIList(l108,QIList(l6,QIList(l371,l359,l225,l344,l5),QIList(l177,QIList(l57,QIList(l117,QIList(l179,l371,l5),QIList(l179,l359,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l212,QIList(l108,QIList(l6,QIList(l349,l225,l344,l5),QIList(l265,QIList(QIList(l353,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l353,l5),QIList(l179,l349,l5),l5),l5),QIList(l178,l344,l5),QIList(l179,l353,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l212,QIList(l108,QIList(l6,QIList(l225,l372,l5),QIList(l52,QIList(QIList(l13,l372,l5),l5,l5),QIList(QIList(l13,QIList(l32,l372,l5),l5),QIList(l31,l372,l5),l5),QIList(l4,QIList(l265,QIList(QIList(l373,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l373,l5),QIList(l179,QIList(l31,l372,l5),l5),l5),l5),QIList(l222,QIList(l179,l373,l5),QIList(l179,l373,l5),QIList(l56,QIList(l178,QIList(l32,l372,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l212,QIList(l108,QIList(l6,QIList(l225,l372,l5),QIList(l52,QIList(QIList(l13,l372,l5),l4,l5),QIList(QIList(l13,QIList(l32,l372,l5),l5),QIList(l31,l372,l5),l5),QIList(l4,QIList(l177,QIList(l222,QIList(l179,QIList(l31,l372,l5),l5),QIList(l55,QIList(l178,QIList(l32,l372,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l212,QIList(l108,QIList(l6,QIList(l349,l225,l374,l5),QIList(l177,QIList(l53,QIList(l179,l349,l5),QIList(l178,QIList(l65,l374,QIList(l177,QIList(QIList(l4,QIList(l320,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l212,QIList(l108,QIList(l6,QIList(l349,l225,l374,l5),QIList(l265,QIList(QIList(l375,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l375,l5),QIList(l179,l349,l5),l5),l5),QIList(l52,QIList(l178,QIList(l78,QIList(l6,QIList(l376,l5),QIList(l222,QIList(l309,QIList(l31,l376,l5),l4,l5),l376,QIList(l177,QIList(QIList(l27,QIList(l179,l375,l5),QIList(l176,QIList(l179,QIList(l31,l376,l5),l5),l5),l5),QIList(l178,QIList(l32,l376,l5),l5),l5),l5),l5),l5),l374,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l212,QIList(l108,QIList(l6,QIList(l225,l374,l5),QIList(l222,QIList(l13,l374,l5),l5,QIList(l222,QIList(l309,QIList(l33,l374,l5),l4,l5),QIList(l177,QIList(l117,QIList(l178,QIList(l35,l374,l5),l5),l5),l5),QIList(l177,QIList(l222,QIList(l179,QIList(l33,l374,l5),l5),QIList(l117,QIList(l178,QIList(l35,l374,l5),l5),l5),QIList(l52,QIList(l178,QIList(l32,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l212,QIList(l108,QIList(l6,QIList(l377,l225,l344,l5),QIList(l265,QIList(QIList(l378,QIList(l17,l5),l5),QIList(l379,QIList(l40,l377,l5),l5),QIList(l380,QIList(l41,l377,l5),l5),QIList(l359,QIList(l42,l377,l5),l5),l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(QIList(QIList(l179,l379,l5),0,l5),QIList(QIList(l179,l378,l5),QIList(l179,l380,l5),l5),l5),QIList(l252,QIList(l297,QIList(l179,l379,l5),QIList(l179,l378,l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l47,QIList(l179,l379,l5),l5),l5),QIList(l179,l359,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l212,QIList(l108,QIList(l6,QIList(l377,l225,l344,l5),QIList(l265,QIList(QIList(l379,QIList(l40,l377,l5),l5),QIList(l381,QIList(l17,l5),l5),l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(QIList(QIList(l179,l381,l5),QIList(l179,QIList(l41,l377,l5),l5),l5),QIList(QIList(l179,l379,l5),l5,l5),l5),QIList(l252,QIList(l179,l381,l5),QIList(l114,QIList(l179,l379,l5),QIList(l31,QIList(l179,l381,l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l114,QIList(l179,l381,l5),QIList(l32,QIList(l179,l381,l5),l5),l5),l5),QIList(l179,QIList(l42,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l212,QIList(l108,QIList(l6,QIList(l342,l352,l5),QIList(l177,QIList(l114,QIList(l179,l352,l5),QIList(l29,QIList(l179,l342,l5),QIList(l179,l352,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l212,QIList(l108,QIList(l6,QIList(l342,l224,QIList(l382,1,l5),l5),QIList(l177,QIList(l114,QIList(l179,l342,l5),QIList(l63,QIList(l179,l342,l5),QIList(l179,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l212,QIList(l108,QIList(l6,QIList(l342,l224,QIList(l382,1,l5),l5),QIList(l177,QIList(l114,QIList(l179,l342,l5),QIList(l62,QIList(l179,l342,l5),QIList(l179,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l252,QIList(l179,l383,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l212,QIList(l108,QIList(l6,QIList(l224,l353,l5),QIList(l177,QIList(l272,l5,QIList(l179,l353,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l117,QIList(l305,QIList(l176,QIList(l179,l347,l5),l5),QIList(l11,QIList(l179,QIList(l304,l347,l5),l5),QIList(l179,l343,l5),QIList(l178,QIList(l222,QIList(l55,QIList(l312,QIList(l31,l344,l5),l5),QIList(l28,QIList(l13,QIList(l32,l344,l5),l5),l5),l5),QIList(l177,QIList(QIList(l179,QIList(l31,l344,l5),l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,QIList(l32,l344,l5),l5),l5),l5),l5),QIList(l177,QIList(QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l265,QIList(QIList(l342,QIList(l17,"FN",l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l342,l5),QIList(l6,QIList(l179,l343,l5),QIList(l178,l344,l5),l5),l5),l5),QIList(l324,QIList(l179,l342,l5),"fname",QIList(l179,l347,l5),l5),QIList(l179,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l2,QIList(l216,QIList(l179,l347,l5),l5),l5),QIList(l8,QIList(l19,QIList(l176,QIList(l179,l347,l5),l5),l5),QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l222,QIList(l179,l383,l5),l5,QIList(l117,QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l222,QIList(l179,l383,l5),QIList(l117,QIList(l178,l344,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l212,QIList(l108,QIList(l6,QIList(l343,l225,l344,l5),QIList(l177,QIList(l108,QIList(l6,QIList(l179,l343,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l2,QIList(l216,QIList(l179,l347,l5),l5),l5),QIList(l2,QIList(l218,QIList(l179,l347,l5),l5),l5),QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l212,QIList(l108,QIList(l6,QIList(l225,l345,l5),QIList(l177,QIList(l260,QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l215,QIList(l176,QIList(l179,l346,l5),l5),l5),l5),l5),l345,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l260,QIList(l211,QIList(l176,QIList(l179,l347,l5),l5),QIList(l176,QIList(l108,QIList(l6,QIList(l179,QIList(l78,QIList(l108,QIList(l6,QIList(l342,l5),QIList(l222,QIList(l309,l342,QIList(l176,l338,l5),l5),QIList(l176,l225,l5),l342,l5),l5),l5),l343,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5); +((l202).value = l385); +var l386 = QIList(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(l372,"l372"),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(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(l291,"l291"),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(l237,"l237"),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(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(){ + l138.fvalue(pv, l384); + l138.fvalue(pv, l383); + l138.fvalue(pv, l382); + l138.fvalue(pv, l381); + l138.fvalue(pv, l380); + l138.fvalue(pv, l379); + l138.fvalue(pv, l378); + l138.fvalue(pv, l377); + l138.fvalue(pv, l376); + l138.fvalue(pv, l375); + l138.fvalue(pv, l374); + l138.fvalue(pv, l373); + l138.fvalue(pv, l372); + l138.fvalue(pv, l371); + l138.fvalue(pv, l370); + l138.fvalue(pv, l369); + l138.fvalue(pv, l368); + l138.fvalue(pv, l367); + l138.fvalue(pv, l366); + l138.fvalue(pv, l365); + l138.fvalue(pv, l364); + l138.fvalue(pv, l363); + l138.fvalue(pv, l362); + l138.fvalue(pv, l361); + l138.fvalue(pv, l360); + l138.fvalue(pv, l359); + l138.fvalue(pv, l358); + l138.fvalue(pv, l357); + l138.fvalue(pv, l356); + l138.fvalue(pv, l355); + l138.fvalue(pv, l354); + l138.fvalue(pv, l353); + l138.fvalue(pv, l352); + l138.fvalue(pv, l351); + l138.fvalue(pv, l350); + l138.fvalue(pv, l349); + l138.fvalue(pv, l348); + l138.fvalue(pv, l347); + l138.fvalue(pv, l346); + l138.fvalue(pv, l345); + l138.fvalue(pv, l344); + l138.fvalue(pv, l343); + l138.fvalue(pv, l342); + l138.fvalue(pv, l341); + l138.fvalue(pv, l340); + l138.fvalue(pv, l338); + l138.fvalue(pv, l337); + l138.fvalue(pv, l336); + l138.fvalue(pv, l335); + l138.fvalue(pv, l334); + l138.fvalue(pv, l333); + l138.fvalue(pv, l332); + l138.fvalue(pv, l331); + l138.fvalue(pv, l330); + l138.fvalue(pv, l329); + l138.fvalue(pv, l328); + l138.fvalue(pv, l327); + l138.fvalue(pv, l326); + l138.fvalue(pv, l325); + l138.fvalue(pv, l324); + l138.fvalue(pv, l323); + l138.fvalue(pv, l322); + l138.fvalue(pv, l321); + l138.fvalue(pv, l320); + l138.fvalue(pv, l319); + l138.fvalue(pv, l318); + l138.fvalue(pv, l317); + l138.fvalue(pv, l316); + l138.fvalue(pv, l315); + l138.fvalue(pv, l314); + l138.fvalue(pv, l313); + l138.fvalue(pv, l312); + l138.fvalue(pv, l311); + l138.fvalue(pv, l310); + l138.fvalue(pv, l309); + l138.fvalue(pv, l308); + l138.fvalue(pv, l307); + l138.fvalue(pv, l306); + l138.fvalue(pv, l305); + l138.fvalue(pv, l304); + l138.fvalue(pv, l303); + l138.fvalue(pv, l302); + l138.fvalue(pv, l301); + l138.fvalue(pv, l300); + l138.fvalue(pv, l299); + l138.fvalue(pv, l298); + l138.fvalue(pv, l297); + l138.fvalue(pv, l296); + l138.fvalue(pv, l295); + l138.fvalue(pv, l294); + l138.fvalue(pv, l293); + l138.fvalue(pv, l292); + l138.fvalue(pv, l291); + l138.fvalue(pv, l290); + l138.fvalue(pv, l289); + l138.fvalue(pv, l288); + l138.fvalue(pv, l287); + l138.fvalue(pv, l286); + l138.fvalue(pv, l285); + l138.fvalue(pv, l284); + l138.fvalue(pv, l283); + l138.fvalue(pv, l282); + l138.fvalue(pv, l281); + l138.fvalue(pv, l280); + l138.fvalue(pv, l279); + l138.fvalue(pv, l278); + l138.fvalue(pv, l277); + l138.fvalue(pv, l276); + l138.fvalue(pv, l275); + l138.fvalue(pv, l274); + l138.fvalue(pv, l273); + l138.fvalue(pv, l272); + l138.fvalue(pv, l271); + l138.fvalue(pv, l270); + l138.fvalue(pv, l269); + l138.fvalue(pv, l268); + l138.fvalue(pv, l267); + l138.fvalue(pv, l266); + l138.fvalue(pv, l265); + l138.fvalue(pv, l264); + l138.fvalue(pv, l263); + l138.fvalue(pv, l262); + l138.fvalue(pv, l261); + l138.fvalue(pv, l260); + l138.fvalue(pv, l259); + l138.fvalue(pv, l258); + l138.fvalue(pv, l257); + l138.fvalue(pv, l256); + l138.fvalue(pv, l255); + l138.fvalue(pv, l254); + l138.fvalue(pv, l253); + l138.fvalue(pv, l252); + l138.fvalue(pv, l251); + l138.fvalue(pv, l250); + l138.fvalue(pv, l249); + l138.fvalue(pv, l248); + l138.fvalue(pv, l247); + l138.fvalue(pv, l246); + l138.fvalue(pv, l245); + l138.fvalue(pv, l244); + l138.fvalue(pv, l243); + l138.fvalue(pv, l242); + l138.fvalue(pv, l241); + l138.fvalue(pv, l240); + l138.fvalue(pv, l239); + l138.fvalue(pv, l238); + l138.fvalue(pv, l237); + l138.fvalue(pv, l236); + l138.fvalue(pv, l235); + l138.fvalue(pv, l234); + l138.fvalue(pv, l233); + l138.fvalue(pv, l232); + l138.fvalue(pv, l231); + l138.fvalue(pv, l230); + l138.fvalue(pv, l229); + l138.fvalue(pv, l228); + l138.fvalue(pv, l226); + l138.fvalue(pv, l225); + l138.fvalue(pv, l224); + l138.fvalue(pv, l223); + l138.fvalue(pv, l222); + l138.fvalue(pv, l221); + l138.fvalue(pv, l220); + l138.fvalue(pv, l219); + l138.fvalue(pv, l218); + l138.fvalue(pv, l217); + l138.fvalue(pv, l216); + l138.fvalue(pv, l215); + l138.fvalue(pv, l214); + l138.fvalue(pv, l213); + l138.fvalue(pv, l212); + l138.fvalue(pv, l211); + l138.fvalue(pv, l210); + l138.fvalue(pv, l209); + l138.fvalue(pv, l208); + l138.fvalue(pv, l207); + l138.fvalue(pv, l206); + l138.fvalue(pv, l205); + l138.fvalue(pv, l204); + l138.fvalue(pv, l203); + l138.fvalue(pv, l202); + l138.fvalue(pv, l201); + l138.fvalue(pv, l200); + l138.fvalue(pv, l199); + l138.fvalue(pv, l198); + l138.fvalue(pv, l197); + l138.fvalue(pv, l196); + l138.fvalue(pv, l195); + l138.fvalue(pv, l194); + l138.fvalue(pv, l193); + l138.fvalue(pv, l192); + l138.fvalue(pv, l191); + l138.fvalue(pv, l190); + l138.fvalue(pv, l189); + l138.fvalue(pv, l188); + l138.fvalue(pv, l187); + l138.fvalue(pv, l186); + l138.fvalue(pv, l185); + l138.fvalue(pv, l184); + l138.fvalue(pv, l183); + l138.fvalue(pv, l182); + l138.fvalue(pv, l181); + l138.fvalue(pv, l180); + l138.fvalue(pv, l179); + l138.fvalue(pv, l178); + l138.fvalue(pv, l177); + l138.fvalue(pv, l176); + l138.fvalue(pv, l175); + l138.fvalue(pv, l174); + l138.fvalue(pv, l173); + l138.fvalue(pv, l172); + l138.fvalue(pv, l171); + l138.fvalue(pv, l170); + l138.fvalue(pv, l169); + l138.fvalue(pv, l168); + l138.fvalue(pv, l167); + l138.fvalue(pv, l166); + l138.fvalue(pv, l165); + l138.fvalue(pv, l164); + l138.fvalue(pv, l163); + l138.fvalue(pv, l162); + l138.fvalue(pv, l161); + l138.fvalue(pv, l160); + l138.fvalue(pv, l159); + l138.fvalue(pv, l158); + l138.fvalue(pv, l157); + l138.fvalue(pv, l156); + l138.fvalue(pv, l155); + l138.fvalue(pv, l154); + l138.fvalue(pv, l153); + l138.fvalue(pv, l152); + l138.fvalue(pv, l151); + l138.fvalue(pv, l150); + l138.fvalue(pv, l149); + l138.fvalue(pv, l148); + l138.fvalue(pv, l147); + l138.fvalue(pv, l146); + l138.fvalue(pv, l145); + l138.fvalue(pv, l144); + l138.fvalue(pv, l143); + l138.fvalue(pv, l142); + l138.fvalue(pv, l141); + l138.fvalue(pv, l140); + l138.fvalue(pv, l139); + l138.fvalue(pv, l138); + l138.fvalue(pv, l137); + l138.fvalue(pv, l136); + l138.fvalue(pv, l135); + l138.fvalue(pv, l134); + l138.fvalue(pv, l133); + l138.fvalue(pv, l132); + l138.fvalue(pv, l131); + l138.fvalue(pv, l130); + l138.fvalue(pv, l129); + l138.fvalue(pv, l128); + l138.fvalue(pv, l127); + l138.fvalue(pv, l126); + l138.fvalue(pv, l125); + l138.fvalue(pv, l124); + l138.fvalue(pv, l123); + l138.fvalue(pv, l122); + l138.fvalue(pv, l121); + l138.fvalue(pv, l120); + l138.fvalue(pv, l119); + l138.fvalue(pv, l118); + l138.fvalue(pv, l117); + l138.fvalue(pv, l116); + l138.fvalue(pv, l115); + l138.fvalue(pv, l114); + l138.fvalue(pv, l113); + l138.fvalue(pv, l112); + l138.fvalue(pv, l111); + l138.fvalue(pv, l110); + l138.fvalue(pv, l109); + l138.fvalue(pv, l108); + l138.fvalue(pv, l107); + l138.fvalue(pv, l106); + l138.fvalue(pv, l105); + l138.fvalue(pv, l104); + l138.fvalue(pv, l103); + l138.fvalue(pv, l102); + l138.fvalue(pv, l101); + l138.fvalue(pv, l100); + l138.fvalue(pv, l99); + l138.fvalue(pv, l98); + l138.fvalue(pv, l97); + l138.fvalue(pv, l96); + l138.fvalue(pv, l95); + l138.fvalue(pv, l94); + l138.fvalue(pv, l93); + l138.fvalue(pv, l92); + l138.fvalue(pv, l91); + l138.fvalue(pv, l90); + l138.fvalue(pv, l89); + l138.fvalue(pv, l88); + l138.fvalue(pv, l87); + l138.fvalue(pv, l86); + l138.fvalue(pv, l85); + l138.fvalue(pv, l84); + l138.fvalue(pv, l83); + l138.fvalue(pv, l82); + l138.fvalue(pv, l81); + l138.fvalue(pv, l80); + l138.fvalue(pv, l79); + l138.fvalue(pv, l78); + l138.fvalue(pv, l77); + l138.fvalue(pv, l76); + l138.fvalue(pv, l75); + l138.fvalue(pv, l74); + l138.fvalue(pv, l73); + l138.fvalue(pv, l72); + l138.fvalue(pv, l71); + l138.fvalue(pv, l70); + l138.fvalue(pv, l69); + l138.fvalue(pv, l68); + l138.fvalue(pv, l67); + l138.fvalue(pv, l66); + l138.fvalue(pv, l65); + l138.fvalue(pv, l64); + l138.fvalue(pv, l63); + l138.fvalue(pv, l62); + l138.fvalue(pv, l61); + l138.fvalue(pv, l60); + l138.fvalue(pv, l59); + l138.fvalue(pv, l58); + l138.fvalue(pv, l57); + l138.fvalue(pv, l56); + l138.fvalue(pv, l55); + l138.fvalue(pv, l54); + l138.fvalue(pv, l53); + l138.fvalue(pv, l52); + l138.fvalue(pv, l51); + l138.fvalue(pv, l50); + l138.fvalue(pv, l49); + l138.fvalue(pv, l48); + l138.fvalue(pv, l47); + l138.fvalue(pv, l46); + l138.fvalue(pv, l45); + l138.fvalue(pv, l44); + l138.fvalue(pv, l43); + l138.fvalue(pv, l42); + l138.fvalue(pv, l41); + l138.fvalue(pv, l40); + l138.fvalue(pv, l39); + l138.fvalue(pv, l38); + l138.fvalue(pv, l37); + l138.fvalue(pv, l36); + l138.fvalue(pv, l35); + l138.fvalue(pv, l34); + l138.fvalue(pv, l33); + l138.fvalue(pv, l32); + l138.fvalue(pv, l31); + l138.fvalue(pv, l30); + l138.fvalue(pv, l29); + l138.fvalue(pv, l28); + l138.fvalue(pv, l27); + l138.fvalue(pv, l26); + l138.fvalue(pv, l25); + l138.fvalue(pv, l24); + l138.fvalue(pv, l23); + l138.fvalue(pv, l22); + l138.fvalue(pv, l21); + l138.fvalue(pv, l20); + l138.fvalue(pv, l19); + l138.fvalue(pv, l18); + l138.fvalue(pv, l17); + l138.fvalue(pv, l16); + l138.fvalue(pv, l15); + l138.fvalue(pv, l14); + l138.fvalue(pv, l13); + l138.fvalue(pv, l12); + l138.fvalue(pv, l11); + l138.fvalue(pv, l10); + l138.fvalue(pv, l9); + l138.fvalue(pv, l8); + l138.fvalue(pv, l7); + l138.fvalue(pv, l6); + l138.fvalue(pv, l5); + l138.fvalue(pv, l4); + l138.fvalue(pv, l3); + l138.fvalue(pv, l2); + l138.fvalue(pv, l1); + ((l248).value = l386); + ((l203).value = 920); ((l16).value = 234); - return ((l268).value = 303); + return ((l269).value = 303); })(); -((l248).value = 385); +((l249).value = 386); diff --git a/ecmalisp.lisp b/ecmalisp.lisp index 149a777..4285024 100644 --- a/ecmalisp.lisp +++ b/ecmalisp.lisp @@ -636,7 +636,7 @@ (defun list-all-packages () *package-list*) - (defun make-package (name &optional use) + (defun make-package (name &key use) (let ((package (new)) (use (mapcar #'find-package-or-fail use))) (oset package "packageName" name) @@ -681,7 +681,7 @@ (make-package "CL")) (defvar *user-package* - (make-package "CL-USER" (list *common-lisp-package*))) + (make-package "CL-USER" :use (list *common-lisp-package*))) (defvar *keyword-package* (make-package "KEYWORD")) -- 1.7.10.4