hưs2€D€p€,€l�FASD-DATA€D€¬€wkf€¬�Orson Welles†€?¦¯F€{F€D€p€,�COMPILER,‚NEW-DESTINATIONSp€ì€GLOBALl€T€p€B€ ¬€SITEl‚Gigamos Cambridge€p€B€ ,�PACKAGE€ì�LISP-INTERNALSp€B€ l�READTABLE€¬‚standard Common-Lisp1€D€C�IN-PACKAGED€ÀQUOTE€B€51€D€ÀDEFVARƒ…*VANILLA-EVALHOOK-FIRST-POSITION-FUNCTIONS?*B€-¬˜Use 'eval' to evaluate the function in a function application. If NIL, the�function is evaluated without using 'eval'. This determines whether or not�evaluating the function will be evalhooked.€1€D€B€?„*VANILLA-ALLOW-FREE-VARIABLES?*€ƒ€NIL€,ŒBound to T while EVAL-SPECIAL-OK is running. When NIL, free variable references�cause an error.1€D€B€?Ã�FOO-*EVALHOOK*B€E1€D€B€?‚FOO-*APPLYHOOK*€B€E1€D€B€?ÂFOO-*MACROEXPAND-HOOK*D€B€;�FUNCALL€1€D€pÀl€NCì‚PUT-GLOBAL-DECLARATIOND€B€;ÀNFRAMED€B€;ƒ‚DEFSTRUCT-DESCRIPTORD€B€;$€€B€Ep€B€+ì€ART-Q€E€F€B€EB€EB€EF€B€Wƒ�MAKE-NFRAME€B€EB€ED€B€WD€ÀPARENTD€B€;C�UNDEFINED€D€ƒ€TYPEB€dD€�BINDINGSB€E1€D€ƒ€SETQpÀ¬€SETF,ƒ*GRODY-SETF-MACRO-TABLE*D€p€B€+¬€CONSD€B€;D€‚NFRAME-BINDINGS€Ã€LAMBDAD€B€WD€ƒ€LET*D€D€pÀB€o,‚SINGLE-TEMPVARS€D€p€B€+ì€MAPCARD€�FUNCTIOND€B€uD€ÀIGNORED€p€B€+,�GENTEMP€D€B€;D€B€WD€pÀB€o,�STOREVARD€p€B€+ì€GENSYMD€pÀB€o,�TEMPVARSB€yD€ÀVALUESB€�D€p€B€+¬€LISTB€WD€B€”B€‰D€ƒ€LET€D€D€ÀDO7926B€‰D€B€WD€p€B€+¬€NTH€€B€�D€pÀl€SIl�XR-BQ-LISTD€B€;Ã�STRUCTURE-SET€D€B€;D€B€;B€WF€B€WB€˜D€pÀB€ ¬�XR-BQ-LIST*€D€B€;B€tB€�D€C€IFD€p€B€+ì€BOUNDPD€B€;B€qB€qB€EB€t1€D€pÀB€T,‚DEF-DECLARATION€B€tÀSUBST€D€B€;D€pÀB€T¬�NAMED-LAMBDAB€tD€B€WD€Ã�STRUCTURE-REF€D€B€;B€WF€B€W1€D€B€nB€qD€B€sD€B€;D€ƒ�NFRAME-TYPE€B€uD€B€WD€B€wD€D€B€yD€B€{B€ƒD€B€;D€B€WB€�D€B€�B€yD€B€’B€�D€B€”B€WB€–D€B€—D€D€ÀDO7925B€‰D€B€WD€B€›€B€�D€B€¢B€¤D€B€;D€B€;B€WF€B€WB€ÒD€B€«D€B€;B€ÉB€�B€·B€É1€D€B€¼B€ÉB€½D€B€;D€B€¿B€ÉD€B€WD€B€ÁD€B€;B€WF€B€W1€D€B€nB€qD€B€sD€B€;D€Ã�NFRAME-PARENT€B€uD€B€WD€B€wD€D€B€yD€B€{B€ƒD€B€;D€B€WB€�D€B€�B€yD€B€’B€�D€B€”B€WB€–D€B€—D€D€ÀDO7924B€‰D€B€WD€B€›€B€�D€B€¢B€¤D€B€;D€B€;B€WF€B€WB€÷D€B€«D€B€;B€îB€�B€·B€î1€D€B€¼B€îB€½D€B€;D€B€¿B€îD€B€WD€B€ÁD€B€;B€WF€B€W1€D€B€VD€B€;B€WD€B€;Ã�TYPE-EXPANDER€D€B€|D€B€uB€ED€B€;D€C�SATISFIES€�NFRAME-PB€W1€D€B€¼B€B€½D€B€;D€B€¿B€D€ÀTHING€D€‚TYPEP-STRUCTURE€B€D€B€;B€WB€W1€D€B€VD€B€;�BINDING€D€B€;B€YD€B€;$€€B€EB€\E€F€B€EB€EB€EF€B€'ƒ�MAKE-BINDINGB€EB€ED€B€'D€C�IDENTIFIERB€dD€B€fB€dD€ÀVALUE€B€d1€D€B€nB€qD€B€sD€B€;D€Ã�BINDING-VALUE€B€uD€B€'D€B€wD€D€B€yD€B€{B€ƒD€B€;D€B€'B€�D€B€�B€yD€B€’B€�D€B€”B€'B€–D€B€—D€D€C�STRUCT7930B€‰D€B€'D€B€›€B€�D€B€¢B€¤D€B€;D€B€;B€'F€B€'B€AD€B€«D€B€;B€8B€�B€·B€81€D€B€¼B€8B€½D€B€;D€B€¿B€8D€B€'D€B€ÁD€B€;B€'F€B€'1€D€B€nB€qD€B€sD€B€;D€ƒ�BINDING-TYPEB€uD€B€'D€B€wD€D€B€yD€B€{B€ƒD€B€;D€B€'B€�D€B€�B€yD€B€’B€�D€B€”B€'B€–D€B€—D€D€C�STRUCT7929B€‰D€B€'D€B€›€B€�D€B€¢B€¤D€B€;D€B€;B€'F€B€'B€fD€B€«D€B€;B€]B€�B€·B€]1€D€B€¼B€]B€½D€B€;D€B€¿B€]D€B€'D€B€ÁD€B€;B€'F€B€'1€D€B€nB€qD€B€sD€B€;D€C‚BINDING-IDENTIFIERB€uD€B€'D€B€wD€D€B€yD€B€{B€ƒD€B€;D€B€'B€�D€B€�B€yD€B€’B€�D€B€”B€'B€–D€B€—D€D€C�STRUCT7928B€‰D€B€'D€B€›€B€�D€B€¢B€¤D€B€;D€B€;B€'F€B€'B€‹D€B€«D€B€;B€‚B€�B€·B€‚1€D€B€¼B€‚B€½D€B€;D€B€¿B€‚D€B€'D€B€ÁD€B€;B€'F€B€'1€D€B€VD€B€;B€'D€B€;B€D€B€|D€B€uB€ED€B€;D€B€C�BINDING-P€B€'1€D€B€¼B€©B€½D€B€;D€B€¿B€©B€D€B€ B€D€B€;B€'B€'1€D€B€¼Ã‚ADJOIN-VARIABLE-FRAME€B€½D€B€;D€B€¿B€¶D€C�PARENT-ENV,‹Return a new environment created by adjoining an empty variable frame onto �PARENT-ENV.€D€B€aB€·p€B€ ,�VARIABLE1€D€B€¼ƒ‚ADJOIN-FUNMAC-FRAME€B€½D€B€;D€B€¿B€ÁD€B€·ì‹Return a new environment created by adjoining an empty function/macro frame �onto PARENT-ENV.€D€B€aB€·p€B€ ì€FUNMAC1€D€B€¼C‚ADJOIN-BLOCK-FRAMEB€½D€B€;D€B€¿B€ËD€B€·¬ŠReturn a new environment created by adjoining an empty block frame onto �PARENT-ENV.D€B€aB€·p€B€ ì€BLOCK€1€D€B€¼C‚ADJOIN-GOTAG-FRAMEB€½D€B€;D€B€¿B€ÕD€B€·¬ŠReturn a new environment created by adjoining an empty gotag frame onto �PARENT-ENV.D€B€aB€·p€B€ ì€GOTAG€1€D€B€¼C‚ADJOIN-JUNK-FRAME€B€½D€B€;D€B€¿B€ßD€B€·¬ŠReturn a new environment created by adjoining an empty junk frame onto �PARENT-ENV.€D€B€aB€·p€B€ ¬�PLACEHOLDER€1€D€B€¼C�BLOCK-NAMEB€½D€B€;D€B€¿B€éD€C�BLOCK-EXPRD€ƒ€CADRB€ê1€D€B€¼C�BLOCK-BODYB€½D€B€;D€B€¿B€òD€B€êD€ƒ€CDDRB€ê1€D€B€¼C�CATCH-TAG€B€½D€B€;D€B€¿B€úD€C�CATCH-EXPRD€B€ìB€û1€D€B€¼ƒ�CATCH-FORMS€B€½D€B€;D€B€¿B€D€B€ûD€B€ôB€û1€D€B€¼ƒEVAL-WHEN-SITUATION-LISTB€½D€B€;D€B€¿B€ D€Ã�EVAL-WHEN-EXPRD€B€ìB€ 1€D€B€¼‚EVAL-WHEN-FORMS€B€½D€B€;D€B€¿B€D€B€ D€B€ôB€ 1€D€B€¼ƒ�FUNCTION-FN€B€½D€B€;D€B€¿B€D€Ã�FUNCTION-EXPR€D€B€ìB€1€D€B€¼�GO-GOTAGB€½D€B€;D€B€¿B€ D€�GO-EXPR€D€B€ìB€!1€D€B€¼ƒ�IF-PREDICATEB€½D€B€;D€B€¿B€(D€�IF-EXPR€D€B€ìB€)1€D€B€¼Ã�IF-CONSEQUENT€B€½D€B€;D€B€¿B€0D€B€)D€ÀCADDR€B€)1€D€B€¼ƒ�IF-ALTERNATEB€½D€B€;D€B€¿B€8D€B€)D€B€²D€C€>€D€ÀLENGTHB€)F€D€ÀCADDDRB€)1€D€B€¼ƒ�LET-BINDINGSB€½D€B€;D€B€¿B€FD€�LET-EXPRD€B€ìB€G1€D€B€¼�LET-BODYB€½D€B€;D€B€¿B€ND€B€GD€B€ôB€G1€D€B€¼ƒƒMULTIPLE-VALUE-CALL-FUNCTIONB€½D€B€;D€B€¿B€UD€ƒMULTIPLE-VALUE-CALL-EXPRD€B€ìB€V1€D€B€¼CƒMULTIPLE-VALUE-CALL-FORMS€B€½D€B€;D€B€¿B€]D€B€VD€B€ôB€V1€D€B€¼„MULTIPLE-VALUE-PROG1-FIRST-FORM€B€½D€B€;D€B€¿B€dD€CƒMULTIPLE-VALUE-PROG1-EXPR€D€B€ìB€e1€D€B€¼„MULTIPLE-VALUE-PROG1-OTHER-FORMSB€½D€B€;D€B€¿B€lD€B€eD€B€ôB€e1€D€B€¼ƒ�PROGN-FORMS€B€½D€B€;D€B€¿B€sD€C�PROGN-EXPRD€ƒ€CDR€B€t1€D€B€¼Ã�PROGV-SYMBOLS€B€½D€B€;D€B€¿B€|D€C�PROGV-EXPRD€B€ìB€}1€D€B€¼ƒ�PROGV-VALUESB€½D€B€;D€B€¿B€„D€B€}D€B€2B€}1€D€B€¼ƒ�PROGV-FORMS€B€½D€B€;D€B€¿B€‹D€B€}D€ÀCDDDR€B€}1€D€B€¼ƒ�QUOTE-OBJECTB€½D€B€;D€B€¿B€“D€C�QUOTE-EXPRD€B€ìB€”1€D€B€¼‚RETURN-FROM-NAMEB€½D€B€;D€B€¿B€›D€‚RETURN-FROM-EXPRD€B€ìB€œ1€D€B€¼C‚RETURN-FROM-RESULTB€½D€B€;D€B€¿B€£D€B€œD€B€²D€B€:D€B€;B€œF€D€B€2B€œB€E1€D€B€¼C�SETQ-ARGS€B€½D€B€;D€B€¿B€®D€C�SETQ-EXPR€D€B€vB€¯1€D€B€¼ƒ�TAGBODY-BODYB€½D€B€;D€B€¿B€¶D€ƒ�TAGBODY-EXPRD€B€vB€·1€D€B€¼Ã�THE-VALUE-TYPEB€½D€B€;D€B€¿B€¾D€�THE-EXPRD€B€ìB€¿1€D€B€¼�THE-FORMB€½D€B€;D€B€¿B€ÆD€B€¿D€B€2B€¿1€D€B€¼C�THROW-TAG€B€½D€B€;D€B€¿B€ÍD€C�THROW-EXPRD€B€ìB€Î1€D€B€¼ƒ�THROW-RESULTB€½D€B€;D€B€¿B€ÕD€B€ÎD€B€2B€Î1€D€B€¼ÃƒUNWIND-PROTECT-PROTECTED-FORM€B€½D€B€;D€B€¿B€ÜD€ƒ‚UNWIND-PROTECT-EXPR€D€B€ìB€Ý1€D€B€¼ƒƒUNWIND-PROTECT-CLEANUP-FORMSB€½D€B€;D€B€¿B€äD€B€ÝD€B€ôB€Ý1€D€B€?Cƒ*ALLOW-LOSING-&-SYMBOLS?*€B€-lŽIf NIL, any symbol beginning with & is not legal to bind.�If non-nil, only real lambda-list keywords are illegal.€€€