‘XCL Compiler output for source file {DSK}kaplan>Local>medley3.5>lispcore>sources>XCLC-TOP-LEVEL.;10 Source file created 19-Sep-2020 22:02:59 FASL file created Saturday, 19 September 2020, 22:02:59 ے‌ک–#oggo ک•ŒFILECREATEDLOCکڈŒ*STANDARD-INPUT*کŒ1 top-level formکگŒFUNCTIONک“€ک•ŒDEFINE-FILE-INFOکڈŒOPENکگŒOUTPUTکگŒ DIRECTIONک“کگŒ READTABLEکŒXCLکگŒPACKAGEک“ک’Œ DEFPACKAGEک‘کŒXEROX-COMMON-LISPکŒCOMPILERک“کگŒUSEکŒLISPکŒXCLکŒ{Null}‌ک–!ggo؟oکŒ2 top-level forms™ک“€ک•ŒPUTPROPک•ŒXCLC-TOP-LEVELCOMSک•Œ FILEDATESک•ŒXCLC-TOP-LEVELک“)ک“ک•Œ*ک•Œ;;کŒTop-level entry points ک“ک•Œ STRUCTURESک’ŒCOMPILER-CONTEXTک‘کŒCOMPILERک“ک•Œ VARIABLESک’Œ*COMPILE-FILE-CONTEXT*™$ک’Œ*COMPILE-SCAN-CONTEXT*™$ک’Œ*COMPILE-DEFINER-CONTEXT*™$ک“ک•Œ FUNCTIONSک’ŒCOMPILER-ERROR™$ک“™,ک’ŒCOMPILER-APPLY™$ک“™'ک’Œ*EVAL-WHEN-COMPILE*™$ک’Œ *FASL-HANDLE*™$ک’Œ*INPUT-FILENAME*™$ک’Œ*INPUT-STREAM*™$ک’Œ*LAP-STREAM*™$ک’Œ*LOAD-COMPILED-CODE*™$ک’Œ*NEW-COMPILER-IS-EXPANDING*™$ک’Œ*OUTSTANDING-LOOSE-FORMS*™$ک’Œ*COMPILING-DEFINER*™$ک’Œ*LOOSE-NAME*™$ک“™,کڈŒCOMPILE-FILEک“™,ک’ŒSTART-COMPILATION™$ک’ŒFINISH-COMPILATION™$ک“™,ک’Œ SCAN-ONE-FORM™$ک’Œ FUNCTION-P™$ک“™,ک’ŒCOMPILER-MESSAGE™$ک’ŒCOMPILING-MESSAGE™$ک’ŒDONE-MESSAGE™$ک“ک•ŒCOMSک“™"ک’ŒUNKNOWN-FUNCTION-WARNING™$ک“™,ک’ŒCHECK-FOR-UNKNOWN-FUNCTION™$ک’ŒWARN-ABOUT-UNKNOWN-FUNCTIONS™$ک“™'ک’Œ*PROCESSED-FUNCTIONS*™$ک’Œ*UNKNOWN-FUNCTIONS*™$ک’Œ*CURRENT-FUNCTION*™$ک“™Hک“™"ک’ŒASSEMBLER-ERROR™$ک“™,™Sک“™™کŒReading the #, macroک“™'ک’Œ*COMPILER-IS-READING*™$ک“™"ک’ŒEVAL-WHEN-LOAD™$ک“™™کŒSupport for Block Compilationک“™'ک’Œ*BLOCK-HASH-TABLE*™$ک’Œ*BLOCKS*™$ک’Œ*CURRENT-BLOCK*™$ک“™"ک’Œ BLOCK-DECL™$ک“™,ک’ŒSET-UP-BLOCK-DECLS™$ک“™™کŒ'Processing of top-level forms in a fileک“™'ک’ŒPASS™$ک“™,ک’ŒCONSTANT-EXPRESSION-P™$ک“™,ک’ŒCOMPILE-AND-DUMP™$ک’ŒCOMPILE-AND-DUMP-1™$ک’ŒCOMPILE-ONE-LAMBDA™$ک“™,ک’ŒOPTIMIZE-AND-MACROEXPAND™$ک’ŒOPTIMIZE-AND-MACROEXPAND-1™$ک’ŒEXPAND-DEFINER™$ک’Œ PROCESS-FORMS™$ک“™,ک’ŒMAYBE-REMOVE-COMMENTS™$ک“™,ک’Œ!COMPILE-FILE-SETF-SYMBOL-FUNCTION™$ک’ŒCOMPILE-FILE-DEFINEQ™$ک’ŒCOMPILE-FILE-DEFCONSTANT™$ک’ŒCOMPILE-FILE-DECLARE:™$ک’ŒCOMPILE-FILE-DEFINE-FILE-INFO™$ک’ŒCOMPILE-FILE-PACKAGE-FORM™$ک’ŒCOMPILE-FILE-PROCLAMATION™$ک’ŒCOMPILE-FILE-COMPILER-LET™$ک’ŒCOMPILE-FILE-MACROLET™$ک’ŒCOMPILE-FILE-DEFINER™$ک’ŒCOMPILE-FILE-NAMED-PROGN™$ک’Œ$COMPILE-FILE-OUTSTANDING-LOOSE-FORMS™$ک’ŒCOMPILE-FILE-LOOSE-FORM™$ک’ŒCOMPILE-FILE-PROCESS-FUNCTION™$ک“™,ک’ŒCRACK-DEFMACRO™$ک’ŒESTABLISH-MACRO-IN-COMPILER™$ک“™™کŒ Support for :Process-Entire-Fileک“™'ک’Œ*DEFERRED-FORMS*™$ک’Œ*MAKING-SECOND-PASS*™$ک’Œ*PREPROCESSING-PHASE*™$ک“™,ک’ŒCOMPILE-SCAN-DECLARE:™$ک’ŒCOMPILE-SCAN-DEFINE-FILE-INFO™$ک’ŒCOMPILE-SCAN-MACROLET™$ک’ŒCOMPILE-SCAN-DEFINER™$ک’ŒCOMPILE-SCAN-LOOSE-FORM™$ک’Œ$COMPILE-SCAN-OUTSTANDING-LOOSE-FORMS™$ک“™,ک’ŒMERGE-FIRST-FORMS™$ک“™™کŒfor compiling definersک“™'ک’Œ *LAP-FLG*™$ک’Œ *AUTOMATIC-SPECIAL-DECLARATIONS*™$ک“™,کڈŒCOMPILEک’ŒCOMPILE-DEFINER™ ک“™,ک’ŒCOMPILE-FORM™ ک’ŒRAW-COMPILE™$ک“™,ک’ŒCOMPILE-DEFINER-DEFINER™$ک’ŒCOMPILE-DEFINER-NAMED-PROGN™$ک’Œ COMPILE-DEFINER-PROCESS-FUNCTION™$ک’Œ'COMPILE-DEFINER-OUTSTANDING-LOOSE-FORMS™$ک“™™کŒ(Arrange for correct compiler to be used.ک“ک•ŒPROPک•ŒFILETYPE™ک“™™کŒ,Arrange for the correct makefile environmentک“™‚«ک•ŒMAKEFILE-ENVIRONMENT™ک“ک”کŒ19-Sep-2020 22:02:59•ŒF{DSK}kaplan>Local>medley3.5>lispcore>sources>XCLC-TOP-LEVEL.;10‌ک–Zgio؟goolg ؟ggg؟g ؟g کŒDEFSTRUCT COMPILER-CONTEXT™ک“€TکڈŒESTABLISH-SETFS-AND-OPTIMIZERSIکڈŒESTABLISH-ACCESSORS>™)ک’Œ%STRUCTURE-DECLARE-DATATYPEک‘کŒSYSTEMکڈŒSET-PARSED-STRUCTUREO™%D™%9کڈŒTYPE-EXPAND-STRUCTURE4کگŒ TYPE-EXPANDER/™%#کڈŒSTRUCTURE-OBJECT™%™%ک“ک“™%ک•ŒPOINTERک“™%™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™% ™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™%™‚آک“™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آ™‚آک“کڈŒPS™%ک’ŒMAKE-COMPILER-CONTEXT™$ک“ک’ŒSETF-SYMBOL-FUNCTION-FN™$ک’Œ DEFINEQ-FN™$ک’ŒDEFCONSTANT-FN™$ک’ŒDECLARE:-FN™$ک’ŒDEFINE-FILE-INFO-FN™$ک’ŒPACKAGE-FORM-FN™$ک’ŒPROCLAIM-FN™$ک’ŒCOMPILER-LET-FN™$ک’ŒMACROLET-FN™$ک’Œ DEFINER-FN™$ک’ŒNAMED-PROGN-FN™$ک’ŒPROCESS-FUNCTION-FN™$ک’ŒPROCESS-LOOSE-FORM-FN™$ک’Œ"PROCESS-OUTSTANDING-LOOSE-FORMS-FN™$کڈŒDATATYPE€€کŒک“™‚ش€کڈŒDEFAULT-STRUCTURE-PRINTER€€€ک“ک“™‚ص€پ€™‚أ™‚صک“™‚ض€پ€™‚ؤ™‚ضک“™‚×€پ€™‚إ™‚×ک“™‚ط€پ€™‚ئ™‚طک“™‚ظ€پ€™‚ا™‚ظک“™‚ع€پ€™‚ب™‚عک“™‚غ€پ€™‚ة™‚غک“™‚ـ€پ€™‚ت™‚ـک“™‚ف€پ€™‚ث™‚فک“™‚ق€پ€™‚ج™‚قک“™‚ك€پ€™‚ح™‚كک“™‚à€پ€™‚خ™‚àک“™‚ل€پ€™‚د™‚لک“™‚â€پ€™‚ذ™‚â€€™‚ز€ک“کگŒACCESSORکگŒ PREDICATEپ€€œ™‚شک–‚âgµh¸h¹ƒa¸i¹gµh؛h»ƒa؛i»gµh¼h½ƒa¼i½gµ h¾h_؟…a¾i_؟gµh_؟h_؟‡a_؟i_؟gµh_؟h_؟‡a_؟i_؟gµh_؟h_؟‡a_؟i_؟gµh_؟h_؟‡a_؟i_؟gµh_ ؟h_"؟‡a_ ؟i_"؟gµh_$؟h_&؟‡a_$؟i_&؟gµh_(؟h_*؟‡a_(؟i_*؟gµh_,؟h_.؟‡a_,؟i_.؟gµh_0؟h_2؟‡a_0؟i_2؟gµh_4؟h_6؟‡a_4؟i_6؟`_8؟I•O8H؟K•O8J؟M•O8L؟O•O8N؟O–O8O؟O–O8O ؟O–O8O؟O–O8O؟O"–O8O ؟O&–O8O$؟O*–O8O(؟O.–O8O,؟O2–O8O0؟O6–O8O4؟O8™‚ش‚ےےےے™ک“ک“کڈŒ&KEYکگŒSETF-SYMBOL-FUNCTION-FNکگŒ DEFINEQ-FNکگŒDEFCONSTANT-FNکگŒDECLARE:-FNکگŒDEFINE-FILE-INFO-FNکگŒPACKAGE-FORM-FNکگŒPROCLAIM-FNکگŒCOMPILER-LET-FNکگŒMACROLET-FNکگŒ DEFINER-FNکگŒNAMED-PROGN-FNکگŒPROCESS-FUNCTION-FNکگŒPROCESS-LOOSE-FORM-FNکگŒ"PROCESS-OUTSTANDING-LOOSE-FORMS-FN‚Qک’ŒCOMPILER-CONTEXTTYPE#™$‚7™‚ ‚™‚ ‚™‚‚é™‚‚د™‚‚µ™‚‚›™‚‚پ™‚g™‚M™‚7™‚%™‚ے™‚‏™‚‎‌ک–‚،o ؟gggggggggggggggggggggggggggg c™(کŒ#DEFPARAMETER *COMPILE-FILE-CONTEXT*™ک“€‚™™‚شکڈŒPROCLAIM‚“™‚ƒ‚ژ™‚ ‚‰™‚„‚„™‚ ™‚…z™‚u™‚‚p™‚k™‚پf™‚a™‚€\™‚W™R™‚M™~H™‚C™}>™‚9™|4™‚/™{*™‚%™z ™‚ے™y™‚‏™x™‚‎ک“کڈŒSPECIAL™(‌ک–‚،o ؟gggggggggggggggggggggggggggg c™)کŒ#DEFPARAMETER *COMPILE-SCAN-CONTEXT*™ک“€‚™™‚ش™‚‚“™‚•‚ژ™‚ ‚‰™‚”‚„™‚ ™-z™‚u™‚”p™‚k™‚“f™‚a™‚’\™‚W™‚”R™‚M™~H™‚C™}>™‚9™‚‘4™‚/™‚گ*™‚%™‚” ™‚ے™‚”™‚‏™‚”™‚‎ک“™‚™)‌ک–‚،o ؟gggggggggggggggggggggggggggg c™*کŒ&DEFPARAMETER *COMPILE-DEFINER-CONTEXT*™ک“€‚™™‚ش™‚‚“™‚§‚ژ™‚ ‚‰™‚„‚„™‚ ™‚¦z™‚u™‚¥p™‚k™‚¤f™‚a™‚€\™‚W™R™‚M™~H™‚C™}>™‚9™-4™‚/™-*™‚%™z ™‚ے™y™‚‏™x™‚‎ک“™‚™*œ™-ک–ejَ§kh ؟he#¸o@H™-‚ےےےے™ک“ک“کŒCOMPILER-CONTEXTکڈŒ&RESTکŒARGSکڈŒERRORک’ŒARGUMENT-ERROR™‚¼کŒ4Unexpected compiler error. Context is ~s args are ~sœک’Œexpand-COMPILER-APPLY™$ک–i@X¹HZ»J\’L€h½L^_؟gI oo _؟M²gOKhKMOgOKhKh™‚& ™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT9کڈŒINTERN4کڈŒFIND-PACKAGE*کڈŒCONCATENATE کڈŒSTRINGXکڈŒFUNCALLD™‚/™‚./کŒCOMPILER%کŒ-FN‌ک–&gg ؟ggoکŒDEFMACRO COMPILER-APPLY™ک“€ ™ک•ŒSETF-MACRO-FUNCTIONک•ŒARGNAMES™/™‚&™/ک“کŒKEYکŒCOMPILER-CONTEXTکڈŒ &OPTIONALکŒFORM™‚کŒ OTHER-ARGS‌ک–1o ؟g X£hc؟ggo™1کŒDEFVAR *EVAL-WHEN-COMPILE*™ک“€+ک•ŒSET-DOCUMENTATIONکڈŒBOUNDP™‚!کڈŒVARIABLE™1™1&کŒFBound to T during processing of forms to be evaluated at compile-time.ک“™‚™1‌ک–1o ؟g X£hc؟ggo™2کŒDEFVAR *FASL-HANDLE*™ک“€+™‚@™‚A™‚!™‚B™2™2&کŒ4Handle used for writing out the code to a FASL file.ک“™‚™2‌ک–1o ؟g X£hc؟ggo™3کŒDEFVAR *INPUT-FILENAME*™ک“€+™‚@™‚A™‚!™‚B™3™3&کŒ%Full name of the file being compiled.ک“™‚™3‌ک–1o ؟g X£hc؟ggo™4کŒDEFVAR *INPUT-STREAM*™ک“€+™‚@™‚A™‚!™‚B™4™4&کŒ+Stream from which compile-file reads forms.ک“™‚™4‌ک–1o ؟g X£hc؟ggo™5کŒDEFVAR *LAP-STREAM*™ک“€+™‚@™‚A™‚!™‚B™5™5&کŒ/Stream to which compile-file writes LAP output.ک“™‚™5‌ک–1o ؟g X£hc؟ggo™6کŒDEFVAR *LOAD-COMPILED-CODE*™ک“€+™‚@™‚A™‚!™‚B™6™6&کŒ‚‘Non-nil if new compiled code should be installed in running Lisp. :save if old versions should be saved on the property list before installingک“™‚™6‌ک–1o ؟g X£hc؟ggo™7کŒ"DEFVAR *NEW-COMPILER-IS-EXPANDING*™ک“€+™‚@™‚A™‚!™‚B™7™7&کŒ‚ٹBound to T whenever the new compiler might be expanding macros. Used in some optimizers to let them only take effect in the new compiler.ک“™‚™7‌ک–1o ؟g X£hc؟ggo™8کŒ DEFVAR *OUTSTANDING-LOOSE-FORMS*™ک“€+™‚@™‚A™‚!™‚B™8™8&کŒbA list of the random top-level forms to be gathered together into a single lambda for compilation.ک“™‚™8‌ک–o ؟g X‘Hhc™9کŒDEFVAR *COMPILING-DEFINER*™ک“€™‚A™‚™9ک“™‚™9‌ک–o ؟g X‘Hhc™:کŒDEFVAR *LOOSE-NAME*™ک“€™‚A™‚™:ک“™‚™:œ™<ک–‚!n¸ejَ§kh ؟H@؟gµ hH‎؟…aH‎؟gµ hH‎؟…aH‎؟gµ hH‎؟…aH‎؟gµ iH‎؟…aH‎؟gµhH‎ ؟hH‎؟‹aH‎ ؟iH‎؟gµhH‎؟hH‎؟‹aH‎؟iH‎؟gµh¹پa¹W.hH‎؟hH‎؟hH‎؟Igigjgi i`W0W2W4W6W8œnoHkoH-™4™3™2™5™8™O™Pک’Œ*INPUT-FILECOMS-VARIABLE*™$ک•Œ LOCALFREEVARS ک•ŒDONTCOMPILEFNSک•ŒLAMAک•ŒNLAML ک•ŒNLAMA ک•Œ GLOBALVARSک•Œ LOCALVARSک•ŒSPECVARSک’Œ*CONSTANTS-HASH-TABLE*™$ک’Œ *ENVIRONMENT*™$ک’Œ *CONTEXT*™$™6کڈŒ*ERROR-OUTPUT*™‚}™‚w™‚v™‚u™‚t™‚s™<‚ےےےے™ک“ک“ کŒ INPUT-FILE™‚üکگŒOUTPUT-FILEکگŒLAP-FILEکگŒ ERROR-FILEکگŒERRORS-TO-TERMINALکگŒFILE-MANAGER-FORMATکگŒPROCESS-ENTIRE-FILEکگŒLOAD‚ٍکڈŒMAKE-HASH-TABLE‚يک’ŒMAKE-ENV™$‚âک’ŒMAKE-CONTEXT™$™‚#‚ّک•ŒSYSLOCALVARS‚çکگŒPARENT‚ـکگŒVALUES-USED‚ضکگŒTOP-LEVEL-P‚³™‚…‚‘™‚„o™‚ƒY™‚‚C™‚پ-™‚€™‚‚ک–‚nHY؟Hة Z’J°Hةo Z¢±…Jc؟Jggc؟g ²Jg ²‚®ک•Œ SKIPSEPRCODES‚“کڈŒMAKE-BROADCAST-STREAM‚{™‚hکڈŒ MAKE-PATHNAME‚8™‚%™‚‍‚ُک’ŒOPEN-FASL-HANDLEک‘کŒFASL‚ê™‚‍‚س™‚.‚إکڈŒPATHNAME‚¸™‚"‚§ک•ŒOPENTEXTSTREAMp™gک•Œ\TEDIT.FORMATTEDP1_ک•ŒRANDACCESSPVکڈŒFBOUNDPJ™‚¦=™$کڈŒ PROBE-FILEکڈŒMERGE-PATHNAMES ™‚§‚ذک•ŒREADER-ENVIRONMENT‚©ک•Œ FILERDTBL‚v™‚q™‚`کگŒDEFAULTS‚[کگŒNEWEST‚VکگŒVERSION‚LکگŒTYPE‚3™‚.™‚™‚«‚™‚¬‚™‚‚ ™‚®‚â™‚«‚ف™‚¬‚ط™‚‚ج™‚®Q™‚¤E™‚£8کگŒINPUT3™‚QکŒlog‚کŒdlap‚°کŒ1The file "~A" is nonexistent or cannot be read.~%‚،ک“ک•ŒREADONLYپ‚ڈک–Hة ¹hH‎؟I¹j@؟I™‚–™‚—ک“ک“کŒG17976™‚¤‚„ک–HةgHةکŒClean-up forms™‚—ک“€کڈŒCLOSEکگŒABORTکŒ.lisp‚€ک•ŒCOMPILED-CLOSUREک•Œ \PTRHUNK4‚ک–KQ –Q ؟R‘i€h²RgHة‘h€i؟Hة کHة ؟S –S h™4™2™5™‚¹™‚—ک“€C™‚»<کڈŒSTREAMP5™‚»,™‚أ#ک’ŒCLOSE-FASL-HANDLE™‚ ™‚»™‚أ™‚¼‚ ™‚؟ک•Œ \PTRHUNK12œ™>—ک–‚ˆnX؟R H‎؟U H‎؟gHة hhhnokoH-؟R ؟S ²0SoT T koh-koh- hک’Œ*RESETFORMS*™‚¼™2™5™3™4™>™ک“€ ‚€کڈŒFORMATrکڈŒGET-UNIVERSAL-TIMEeکڈŒFILE-WRITE-DATE_کڈŒ NAMESTRINGQ™‚أJک’ŒBEGIN-BLOCK™‚ %ک•ŒOUTPUTک•ŒREAD-FILECREATEDک’Œ BEGIN-TEXT™‚ ™‚دYکŒ]XCL Compiler output for source file ~A~%~ Source file created ~A.~%~ LAP file created ~A.~%~%@ک–‚ڈoh ؟HةY‘I…R Hة ؟h ؟oh ؟HةY‘IچR koh-Hة ؟h ؟oh ؟koh-Hة ؟h ¹j@؟I™3™‚–™‚—ک“ک“کŒG18054‚ƒک•ŒTERPRI|ک•ŒPRIN3l™‚ثfک•ŒPRIN1Z™‚ضS™‚×C™‚ج3™‚ط'™‚ض ™‚×™‚ح™‚ط`کŒFASL file created -کŒSource file created کŒ$XCL Compiler output for source file 8ک–™‚¹™‚—ک“€ک’ŒRESETUNWIND™‚¼4™‚؟ک•Œ \PTRHUNK2™‚لxک–f@ X¹HZ»J\½L^_؟N__؟O__؟O_؟hoOo OOkصo OMKI کŒDATE-STRING ™‚—ک“ک“کŒ UNIV-TIME`™‚تUکڈŒNTHE™‚وک•Œ\MVLISTکڈŒDECODE-UNIVERSAL-TIMEPک“کŒJanuaryکŒFebruaryکŒMarchکŒAprilکŒMayکŒJuneکŒJulyکŒAugustکŒ SeptemberکŒOctoberکŒNovemberکŒDecember@ک“کŒMondayکŒTuesdayکŒ WednesdayکŒThursdayکŒFridayکŒSaturdayکŒSunday9کŒ~A, ~D ~A ~D, ~D:~2,'0D:~2,'0D™‚لk™‚ے™‚ـr™‚ے™‚ـI™‚ےœ™?ک–PQ ¸jH ے—Q °hoQ H o ` ؟™3™?™ک“€ J™L?کڈŒREMOVE5™‚++کڈŒ STRING-UPCASE&™‚ت کڈŒ PATHNAME-NAME™‚ کڈŒLENGTHکڈŒ PATHNAME-TYPEDک•ŒNOTCOMPILEDFILES:™‚0کŒ INTERLISPکŒ~A.~Aœ™Aک–‚ï@¢±é@XgًY’I°HgًZ‘J†Hgً–@ Hgً²h¹@؛h»J‘J€چ[A ¹J؛°ïIHgً²=@Yd3@ً²"W¬I@ ؟@ Ab؟b؟±ے}ooIHgً¢±ل@Y‘h€i[‘K…I‘i€h‍g@ً‘h‚i€h¢±©g@Y‘Iˆg@¹g@[‘Kˆg@»g@Z‘Jˆg@؛K²/J‘J…W‘I€hh½@¾h_؟N‘N€ژ_A ½N¾°îMJ‘J…W‘I€h²%h½@_؟h¾O’O€ڈ^ ½O_؟°ëMhoo@HgًکA@lAةHgًکA@lAةHgًکA@lAةHgًکA@lAةHgًکA@lAةHgًZ’J°pHgً[’K°dHgًY’I°XHgً]’M°LHgً^’N°@Hgً_“O°2Hgً_“O°$Hgً_“O°Hgً_’O†HgًکA@lAة HgًکA@lAةHgًکA@lAةHgًZ‘J†HgًکA@lAةHgًکA@lAةHgًکA@lAةWکA@lAة@ Z»JYڑKAb؟b؟±‎ A@lAة@™1™‚چ™1™A™ک“ک“کŒFORMکŒCOMPILER-CONTEXT‚ج™‚ç‚ا™r‚{کڈŒCERROR‚^کڈŒEVAL‚2™A‚’™‚x™rq™‚ˆl™‚‡G™A)™‚"‚ھک’ŒNAMED-PROGN™ ‚™ک’ŒDEFINER™ ‚ˆک’Œ %MACROLET™‚¼‚}کڈŒMACROLET‚lکڈŒCOMPILER-LET‚[™‚‚J™‚=کڈŒIMPORT‚/کڈŒ UNUSE-PACKAGE‚!کڈŒUSE-PACKAGE‚کڈŒUNEXPORT‚کڈŒEXPORT‚ûکڈŒSHADOWING-IMPORT‚ïکڈŒSHADOW‚مکڈŒ IN-PACKAGE‚×کڈŒMAKE-PACKAGE‚ئ™‚µک•ŒDEFINEQ‚¤ک•ŒSETF-SYMBOL-FUNCTION‚“ک•ŒDECLARE:‚‚کڈŒDEFCONSTANT‚™‚‍‚ّک•ŒCOMPILE‚îکڈŒLOAD‚لک•ŒLOAD‚×™‚‚تک•ŒEVAL‚¶کڈŒQUOTE‚™کڈŒ EVAL-WHENUکڈŒDEFMACRO0کڈŒPROGN!™‚&کڈŒFUNCTION ک•ŒFUNCTION‚uکŒIll-formed EVAL-WHEN:~%~S‚pکŒIgnore its contents.‚ŒکŒ~S is not a legal macro name.‚‡کŒIgnore this DEFMACRO.œ™Bک–+@‘i€h²"@gًX‘H‡@gًک@‘ihhh™B™ک“ک“کŒFORM™‚+™‚*œک’Œexpand-COMPILER-MESSAGE™$ک–@X¹H؛ggIJ™‚5™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚} ™‚ت‌ک–&gg ؟ggoکŒDEFMACRO COMPILER-MESSAGE™ک“€ ™™‚5™‚6™D™‚5™Dک“کŒ FORMAT-STRING™‚کŒFORMAT-ARGSœک’Œexpand-COMPILING-MESSAGE™$ک–@X¹goIh™‚A™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™DکŒ Compiling ~a ‌ک–&gg ؟ggoکŒDEFMACRO COMPILING-MESSAGE™ک“€ ™™‚5™‚6™E™‚A™Eک“کŒNAMEœک’Œexpand-DONE-MESSAGE™$ک–o™‚M™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک“™DکŒ Done~%‌ک–"gg ؟gghکŒDEFMACRO DONE-MESSAGE™ک“€™™‚5™‚6™F™‚M™F‌ک–Zgio؟goolg ؟ggg؟g ؟g کŒ)DEFINE-CONDITION UNKNOWN-FUNCTION-WARNING™ک“€T™‚¹I™‚؛>™)™‚½™‚¾O™ID™I9™‚؟4™‚ہ/™I#ک’ŒWARNING™ ™I™Iک“ک“™Iک•ŒXPOINTERک“™I™‚آک“™I™‚آک“™‚[™‚آ™‚آک“™‚س™Iک’Œ$UNKNOWN-FUNCTION-WARNING constructor™$ک“ک’Œ--STRUCTURE-DUMMY-SLOT--™‚¼ک’Œ CONDITION™ ک’Œ CALL-LIST™$™‚ن€™‚ZکŒUNKNOWN-FUNCTION-WARNING-ک“™‚a€ک•Œ%PRINT-CONDITION€€€ک“ک“™‚b€™‚[پ™‚\€ک“™‚c€پپ™‚]ک’Œ"UNKNOWN-FUNCTION-WARNING-CONDITION™$ک“™‚d€پپ™‚^ک’Œ"UNKNOWN-FUNCTION-WARNING-CALL-LIST™$€€™‚`€™‚ù€€€œ™‚aک–\gµh¸h¹ƒa¸i¹gµh؛h»ƒa؛i»`¼LnًLبهhزnےهنح؟Ljkطذhسح؟I”LH؟K”LJ؟Lک•Œ\INTERRUPTABLE™‚a‚ےےےے™ک“ک“™‚üکگŒ CONDITIONکگŒ CALL-LIST%ک’ŒUNKNOWN-FUNCTION-WARNINGTYPE#™$™‚s™‚rœک’Œ&UNKNOWN-FUNCTION-WARNING report method™$ک–‚¹io ؟@ة¸h¹H‘Hپh¹ioI؟I²wI²bI²GI؛J،°-J ؟J›o ؟چJڑo ؟J؛°سo ؟؟°3ioII؟°ioI؟‹io ؟H¸±ےbکڈŒ*STANDARD-OUTPUT*™‚x™ک“ک“کŒ CONDITION™‚y ‚™‚ت‚ ™‚ت‚ڈ™‚تzکڈŒTERPRItکڈŒPRINCd™‚~U™‚~FکڈŒPRIN1(™‚ت™‚ت™I‚¨کŒnowhere?!~%‚ککŒ~S.~%‚ƒکŒ~S and ~S.~%oکŒ._کŒ and PکŒ, !کŒ ~S -- called from کŒ\The following functions were called in the code just compiled, but are not known to exist:~%‌ک–,ggg ؟ggh™‚X™ک“€&™™کڈŒSYMBOL-FUNCTION ک•Œ%CONDITION-HANDLER™I™‚xک•Œ%CONDITION-REPORTER™Iœ™Kک–w@ ’h°D@V’h°=W@ X’H°0@ءةg'Y’I°@ءةg'Z‘Jٹ@ءةg'‘h€i²(@TX²H¹U؛H»UK‘K‚JK»IK@UhTch™P™Q™O™‚{™K™ک“ک“کŒNAMEک’ŒENV-INLINE-DISALLOWED™$™‚¦Cک•ŒDOPVAL4ک’Œ TRANSFORM™$$ک’ŒOPTIMIZER-LIST™$œ™Lک–P‘i€h²ggPh™P™L™ک“€کڈŒWARN ™‚s™I‌ک–o کŒDEFVAR *PROCESSED-FUNCTIONS*™ک“€™‚ک“™‚™O‌ک–o کŒDEFVAR *UNKNOWN-FUNCTIONS*™ک“€™‚ک“™‚™P‌ک–o کŒDEFVAR *CURRENT-FUNCTION*™ک“€™‚ک“™‚™Q‌ک–Zgio؟goolg ؟ggg؟g ؟g کŒ DEFINE-CONDITION ASSEMBLER-ERROR™ک“€T™‚¹I™‚؛>™)™‚½™‚¾O™SD™S9™‚؟4™‚ہ/™S#™‚"™S™Sک“ک“™S™‚[ک“™S™‚آک“™S™‚آک“™‚[™‚آ™‚آک“™‚س™Sک’ŒASSEMBLER-ERROR constructor™$ک“™‚bک’Œ FORMAT-STRING™$ک’ŒFORMAT-ARGUMENTS™$™‚ن€™‚"کŒASSEMBLER-ERROR-ک“™‚¬€™‚h€€€ک“ک“™‚b€™‚[پ™‚§€ک“™‚€پپ™‚¨ک’ŒASSEMBLER-ERROR-FORMAT-STRING™$ک“™‚®€پپ™‚©ک’Œ ASSEMBLER-ERROR-FORMAT-ARGUMENTS™$€€™‚«€™‚ù€€€œ™‚¬ک–\gµh¸h¹ƒa¸i¹gµh؛h»ƒa؛i»`¼LnًLبهhزnےهنح؟Ljkطذhسح؟I”LH؟K”LJ؟L™‚q™‚¬‚ےےےے™ک“ک“™‚üکگŒ FORMAT-STRINGکگŒFORMAT-ARGUMENTS%ک’ŒASSEMBLER-ERRORTYPE#™$™‚»™‚؛œک’ŒASSEMBLER-ERROR report method™$ک–Po@ة@ة™‚y™‚}™‚ہ™ک“ک“کŒ CONDITION™‚y™‚ت™S™SکŒError during assembly:~% ~?‌ک–,ggg ؟ggh™‚¥™ک“€&™™™‚ٹ ™‚‹™S™‚ہ™‚Œ™Sœ™Sک–*ejَ§kh ؟he#¸gg@gH ™S‚ےےےے™ک“ک“کŒSTRING™‚کŒ ARGUMENTS$™‚"™‚#™‚»™‚؛™S‌ک–1o ؟g X£hc؟ggo™YکŒDEFVAR *COMPILER-IS-READING*™ک“€+™‚@™‚A™‚!™‚B™Y™Y&کŒABound to T during compile-file so that READ can properly treat #,ک“™‚™Y‌ک–Dgio؟goolg ؟gggکŒDEFSTRUCT EVAL-WHEN-LOAD™ک“€>™)™‚½™‚¾9™‚؟4™‚ہ/™[#™‚ء™[™[ک“ک“™[™‚آک“™‚آک“™‚س™[ک’ŒMAKE-EVAL-WHEN-LOAD™$ک“ک•ŒFORM™‚ن€€کŒEVAL-WHEN-LOAD-ک“™‚×ک’ŒEVAL-WHEN-LOAD-P™$™‚çک’ŒCOPY-EVAL-WHEN-LOAD™$€€ک“ک“™‚ط€پ€™‚شک’ŒEVAL-WHEN-LOAD-FORM™$€کŒkStructure wrapping a form to be evaluated at load time. Used in the implementation of the #, reader macro.™‚ض€™‚ù€€€œ™‚ـک–@أ™‚ـ™ک“ک“کŒOBJECT™[‌ک–"g ؟g ؟g ™‚ز™ک“€™‚¹™‚؛کڈŒESTABLISH-PREDICATE™[™[™[œ™‚×ک–#gµh¸h¹ƒa¸i¹`؛I”JH؟J™‚×‚ےےےے™ک“ک“™‚üکگŒFORMک’ŒEVAL-WHEN-LOADTYPE#™$™‚ëœ™‚فک–3@¸@أ‘°igHgh b؟°ك`X@ة؟H™‚ف™ک“ک“کŒEVAL-WHEN-LOADک•ŒCHECK-TYPE-FAIL$™‚î™[ ™[™[‌ک–ggo™‚ز™ک“€™‚@کڈŒ STRUCTURE™[™‚ل‌ک–o ؟g X‘Hhc™_کŒDEFVAR *BLOCK-HASH-TABLE*™ک“€™‚A™‚™_ک“™‚™_‌ک–o ؟g X‘Hhc™`کŒDEFVAR *BLOCKS*™ک“€™‚A™‚™`ک“™‚™`‌ک–o ؟g X‘Hhc™aکŒDEFVAR *CURRENT-BLOCK*™ک“€™‚A™‚™aک“™‚™a‌ک–Dgio؟goolg ؟gggکŒDEFSTRUCT BLOCK-DECL™ک“€>™)™‚½™‚¾9™‚؟4™‚ہ/™c#™‚ء™c™cک“ک“™c™‚آک“™c™‚آک“™c™‚آک“™c™‚آک“™c™‚آک“™c ™‚آک“™‚آ™‚آ™‚آ™‚آ™‚آ™‚آک“™‚س™cک’ŒMAKE-BLOCK-DECL™$ک“ک’ŒNAME™$ک’ŒFN-NAME-MAP™$ک’ŒSPECVARS™$ک’Œ LOCALVARS™$ک’Œ LOCALFREEVARS™$ک’Œ GLOBALVARS™$™‚ن€€کŒBLOCK-DECL-ک“™‚ک’ŒBLOCK-DECL-P™$™‚çک’ŒCOPY-BLOCK-DECL™$€€ک“ک“™‚€پ€™‚ک’ŒBLOCK-DECL-NAME™$ک“™‚€پ€™‚ک’ŒBLOCK-DECL-FN-NAME-MAP™$ک“™‚€پ€™‚ک’ŒBLOCK-DECL-SPECVARS™$ک“™‚€پ€™‚ ک’ŒBLOCK-DECL-LOCALVARS™$ک“™‚€پ€™‚ ک’ŒBLOCK-DECL-LOCALFREEVARS™$ک“™‚€پ€™‚ک’ŒBLOCK-DECL-GLOBALVARS™$€€™‚ €€€€€œ™‚ک–@أ™‚™ک“ک“کŒOBJECT™c‌ک–g ؟g ™‚™ک“€™‚¹™‚؛™c™cœ™‚ک–‚آgµh¸h¹ƒa¸i¹gµh؛h»ƒa؛i»gµh¼h½ƒa¼i½gµ h¾h_؟…a¾i_؟gµh_؟h_؟‡a_؟i_؟gµh_؟h_؟‡a_؟i_؟`_؟I•OH؟K•OJ؟M•OL؟O•ON؟O–OO؟O–OO ؟O™‚ ‚ےےےے™ک“ک“™‚üکگŒNAMEکگŒFN-NAME-MAPکگŒSPECVARSکگŒ LOCALVARSکگŒ LOCALFREEVARSکگŒ GLOBALVARS‚پک’ŒBLOCK-DECLTYPE#™$g™‚4M™‚37™‚2%™‚1™‚0™‚/œ™‚ک–V@¸@أ‘°igHgh b؟°ك`X@ة؟H@ة؟H@ة؟H@ة؟H@ة؟H@ة ؟H™‚™ک“ک“کŒ BLOCK-DECL™‚َ$™‚7™c ™c™cœ™eک– ‚ء¸@¹h؛I‘I‚±°Z»gK ¼W$W&W(KW*W, _؟h_؟Kکi¾`½‡i½`¾J_؟h_؟O’O‚±›_d3@ً²%OO_؟LOH _؟OHO؟±fO‘i€h¢±IO_gً_’O‡OgًڑO ؟±6Ogً_’O‡Ogً²hO_؟O_‘i€h™Ogً€h›O _؟O‘h€i_ ’O †O‘i€h²OOO ؟±إOO ؟±¸Ogً_’O‡Ogً²oO ؟±ڈOgًœo ؟°xOgً_“O°'Ogً_“O°Ogً_ ’O ‡Ogً²O‘i€h²8OO _؟°)ooO؟°ooO؟O_؟±‏bLM؟LN؟LO؟LO ؟K _؟K _؟K²uLOO _؟h_؟h_؟h_ ؟O£O°MO_"goOoO" O _ ؟OکOO &_؟ˆO h__؟O_؟°°؟I¹±‎OH™‚w™‚r™‚x™‚y™‚y™‚x™‚wک•ŒRETFNSک•Œ NOLINKFNS™e™ک“ک“کŒDECLS‚Œ™‚+‚…™‚-‚™‚.‚LکڈŒNSET-DIFFERENCE‚7کڈŒSYMBOL-PACKAGE‚.™‚.‚ô™‚‚à™‚‚ةکڈŒAPPEND‚|™‚—‚e™‚—‚<کڈŒSET‚/™‚E‚*کڈŒUNION‚%کڈŒSYMBOL-VALUE‚™‚%‚¾™‚%‚ژکڈŒPUTHASH‚€ک•ŒGETHASH9™‚F™‚™‚ˆ‚l™‚.‚C™c‚#™c‚™c‚™c‚™c‚²ک•ŒENTRIES‚¤™‚=‚•™‚>‚†ک•ŒBLKAPPLYFNS‚p™‚s‚Uک•ŒLINKFNS‚Gک•Œ BLKLIBRARY‚َ™‚×™‚r‚ة™‚w‚µ™‚x‚§™‚yS™‚‹Jک•ŒSYSSPECVARS™‚/‚xکŒ/‚qکŒ\‚يکŒ(Illegal item in a BLOCK: declaration: ~S‚èکŒIgnore the illegal item‚طکŒ5Unknown variable ~S mentioned in a BLOCK: declaration‚سکŒIgnore the unknown variable.‚wکŒ7DONTCOMPILEFNS is not supported in BLOCK: declarations.‚]کŒ&The ~S feature is no longer supported.‌ک–8gh ؟g؟o ؟ggoکŒDEFCONSTANT PASS™ک“€2™‚@™‚ک’Œ SET-CONSTANTP™ (™‚B#™i™i ™i™i-کŒ0Useful for ameliorating the obvious quoting bug.ک“ک’ŒCONSTANT™‚¼™iœ™kک–Z@ X‘H@‘i€h²G@Yءةg'Zgً².Jgً²"@»h¼K‘K‡h\]‘Mپi\ ،hK»°çhhh™k™ک“ک“کŒFORMG™kکڈŒ CONSTANTP,کگŒNONE"™‚cک’ŒSIDE-EFFECTS-DATA™$œ™mک–‚گ@d3@ً—Bgً€h²t@W‘hWک@W €hY²TI؛J‘Jپh»@K \’L€@½K K K K MAB؟J؛°µ@AB@AB ™‚w™‚r™‚x™‚y™a™a ™_™‚s™m ™ک“ک“کŒNAMEکŒDEFNکŒKIND ‚ٹ™n‚پ™no™nd™‚$[™‚"R™‚ I™‚;™‚"™‚I™œ™nک–‚ہBgً²@Wc؟@Wggc؟@@A »h¼W ²KW ؟W ؟W ؟o ؟؟o½h¾M¹n_؟MW K \h¾g‚h¹_gً³8Oأ²$W"oO؟o ؟؟hOM ؟o ؟؟Bgً›WL@؟°'BgًڑWL ؟°hgBo؟o ؟؟W‘i€h¢±†Bgً²VgWً²*@ ² @ ‘i€hں@g ‘h†i„h‚h€h²@g@ ؟@L Bgً› jL hgBoh ک•Œ FILEPKGFLGک•Œ*CONDITION-HANDLER-BINDINGS*ک’Œ*CATCH-RETURN-PC*™‚¼™Qک’Œ*CATCH-RETURN-TO*™‚¼™5™O ™P™2™6™‚m™‚}™n™ک“ک“کŒNAMEکŒDEFNکŒKIND‚¸ک•Œ ECASE-FAIL‚¥ک’ŒINTERN-DCODEک‘کŒD-ASSEM‚’™‚‚چ™‚x‚…™‚€™‚ٹ‚hک•ŒHASDEF‚W™‚ٹ‚O™‚¦‚+ک•ŒBLOCK‚%™‚~‚™‚u‚ک’ŒDUMP-FUNCALL™‚ ‚َک’ŒDUMP-FUNCTION-DEF™‚ ‚ل™‚z‚غ™‚~‚ذک’ŒCONDITION-CASE-ERROR™‚¼‚أ™‚}‚½™‚~‚²™‚ت‚پک’ŒASSEMBLE-FUNCTION™‚wa™‚z[™‚~P™‚}H™‚}@کڈŒPPRINT6™‚أ,™o™‚‚ک’ŒKIND™$‚™کگŒONE-SHOT‚zک•ŒEXPR‚c™,‚DکگŒSAVE‚<™‚™‚€‚ü™‚پ‚è™‚¢™S‚ککگŒNORMAL‚ٹ™‚„کڈŒCARکگŒKEY™‚³ک“™™‚پ‚ کŒ.‚ک“™™‚پ‚ضکŒ.‚¸کŒAborted.‚«کŒ~&~A~%gک›ک“ک’ŒCREATE-CONDITION-CASE-LITERALS™‚¼ک“™‚&™SVکŒ.œ™oک–AnX؟`Ag@H‎؟hH‎؟noHkoH-؟Hة™‚œ™‚|™o™ک“ک“کŒNAMEکŒDEFNک’ŒALPHA-LAMBDA™$™‚/ک’Œ*NULL-CONTEXT*™$5ک–%Hة dH‎؟¹j@؟I™‚–™‚—ک“ک“کŒG19253ک’ŒPEEPHOLE-OPTIMIZE™$ک’Œ GENERATE-CODE™$ ک’Œ ANNOTATE-TREE™$ک’Œ META-EVALUATE™$*ک– Hة ™‚¹™‚—ک“€ک’ŒRELEASE-TREE™$&™‚؟™‚àœ™qک–hejَ”elَکkl ؟ekظdjًla¸kظjً¦la¹ƒU¸V¹h؛h»@HI \؛L[¥@h$JHI \؛L[‘°ëJi$™‚{™‚|™q‚ےےےے™ک“ک“کŒFORM™‚9کŒENVIRONMENTکŒCONTEXTS™‚çN™r8™‚ç3™r ™‚#œ™rک–‚ؤejَ”elَکkl ؟ekظdjًla¸kظjً§la¹…W¸W¹i@‘h€i[‘K‰@d3@ً‘h€i•@h$@ءةg'[‘i€h² H@gi‘hچH@ ‘h‚i€h²=K¼h½L‘Lپ°3½@HIlM^gً’h°Ngً‘h†N@ً‘h€i•Ni$L¼°ث@H ™7™‚{™‚|™r‚ےےےے™ک“ک“کŒFORM™‚9کŒENVIRONMENTکŒCONTEXT‚¾کڈŒ MACROEXPAND-1t™‚‘iک’ŒENV-FBOUNDP™$ ™‚#‚ ک•ŒIGNOREMACRO‚•™icکگŒLEXICAL-ONLYS™‚”œک’Œexpand-EXPAND-DEFINER™$ک–0@X¹HZ»J\’L€h½gogIKMhh™‚µ™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTک’Œ%EXPAND-DEFINER™ کڈŒLETک“ک“™7پ‌ک–&gg ؟ggoکŒDEFMACRO EXPAND-DEFINER™ک“€ ™™‚5™‚6™s™‚µ™sک“کŒDEFINERکŒBODY-WITHOUT-COMMENTS™‚9کŒENVIRONMENTœ™tک–‚چ@h¸1W ؟W ’±9iW hoXoً’±@¢±H‘i€h’H€h^gً™Hc"؟h±نNgً²HW"ً“H±ذH ±اNgً“H±»Ngً“H±¯Ngً“H±£Ngً“H±—Ngً¢±†H_؟h_؟h_؟h_؟O£O°tO_‘i€h²@O_gً“O°2Ogً“O°%Ogً“O°Ogً’O‰O پO_؟OکOO&_؟ˆOh__؟O_؟°ڈH ^W$ ؟ˆHW ؟±‏؛@²1iK L ^_؟O،°O_W ؟O_؟°èWة¾WkN™_ ™‚چ™Y™‚Œ™`™_™‚ژ™(™4™‚q™)™t™ک“ک“کŒPROCESS-ENTIRE-FILE‚s™A‚^کڈŒNREVERSE‚U™e‚G™A‚=™A‚5ک’ŒREMOVE-COMMENTS™ ‚™‚تn™‚ت&کڈŒREADک•ŒEOFP ک•Œ SKIPSEPRS‚ک•ŒBLOCKRECORD‚َک•ŒRECORD‚وک•ŒDATATYPE‚ظک•ŒDEFCLASS‚§™‚ ‚›™‚خ‚ڈ™‚د‚ƒ™‚ذw™‚رZک•ŒRPAQQHک•ŒPRETTYCOMPRINT-ک“€!™‚شœ™vک–g@ً‘P@ ™‚ط™v™ک“ک“کŒFORM ™‚ت™‚رœ™xک–dA¸A¹H ²H d3@ً–I ‚h€h²4@k@ة؟U–A ؟H؛I»@ة¼@hoKJJKlL@Al@ة™1™x™ک“ک“کŒCOMPILER-CONTEXTکŒFORMO™‚ت3™‚™B™‚™‚bGکŒ~s ~aœ™yک–_W–A ؟@k@ة؟A¸h¹h؛h»H،IH\کgL‚L½@ة¾@hoMLLMlN»I”JK&؛„KhZ¹H¸°¾™1™y™ک“ک“کŒCOMPILER-CONTEXTکŒFORMA™‚ت™‚%%ک•ŒLAMBDA8کŒ~s ~sœ™zک–‚‡@k@ة؟AX¹HZ»h¼K œK \ €hکIL ؟ŒV I ؟ggIgggIhhigA Vhh@ ™7™‚{™z™ک“ک“کŒCOMPILER-CONTEXTکŒFORM ‚پ™Aq™‚؛k™‚ت:ک’ŒENV-DECLARE-A-GLOBAL™$4ک’ŒFIND-TOP-ENVIRONMENT™$,ک’ŒSET-CONSTANT-VALUE™$"ک’ŒVALUE-FOLDABLE-P™$™‚™ke™‚!Uک’ŒGLOBAL™ PکڈŒDECLAREKکڈŒLOCALLYE™‚!@™‚œ™{ک–‚mekَ”elَ™ll ؟elظjً¤la¸پi¸WA؛J ‘hJd3@ً¢±×J[gً\’L°Kgً]‘M†Kgً’± Kgً•J؛±ûKgً\‘L†Kgً”i¹±مKgً”h¹±ضKgًœJZ ¹±ءKgً\‘L†Kgً”i¸±©Kgً”h¸±œKgًœJZ ¸±‡Kgً³}Kgً\‘L†Kgً³iWoJ؟°XgJًœ@JHl@ة؟°AgJً²!W™JVc؟°)oo ؟°I—J ؟HکJ@ ؟J؛±‏ہ™1™`™1™‚} ™‚ژ™{‚ےےےے™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚9کŒDOCOPY‚a™A‚V™‚%‚J™‚‚ ™‚ت‚ع™‚%‚ ™‚%+کڈŒENDP™‚#‚(ک•ŒBLOCK:‚™‚ ‚ّک•ŒCOMPILERVARS‚يک•ŒNOTFIRST‚نک•ŒFIRST‚دک•ŒCOPYWHEN‚آک•ŒDONTCOPY‚µک•ŒDOCOPY‚ھک•ŒCOPY‚•ک•ŒEVAL@COMPILEWHEN‚ˆک•ŒDONTEVAL@COMPILE{ک•ŒDOEVAL@COMPILEpک•ŒEVAL@COMPILEbک•Œ EVAL@LOADWHENWک•Œ DONTEVAL@LOADLک•ŒDOEVAL@LOAD@ک•Œ EVAL@LOAD‚EکŒXFiles with Interlisp BLOCK: declarations must be compiled with :PROCESS-ENTIRE-FILE = T.‚@کŒIgnore the BLOCK: declaration.‚کŒ1Warning: Ignoring unrecognized DECLARE: tag: ~S~%œ™|ک–1RA ؟@gooAhl@ة؟@k@ة™™™4™|™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚™‚»ک“™‚ًک“™‚™™ک“ک“™ک“™کŒ{Null}™™™œ™}ک–P¦A ؟@Al@ة؟@k@ة™‚چ™}™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚œ™~ک–‚âA ¸W ¹H¢±³HZgً²H[¼L¢±°L½IM ؟L¼°يJgً²H[¼L¢±ژL½IM ؟L¼°يJgً‍WH c؟±gJgً²HH‘i€h²Viً’±NVH c؟±@Hiً‍ic؟`c؟±,ooH؟±Jgً²JH‘i€h²Wiً’±‏WH c؟±ïHiً‍ic؟`c؟±غooH؟±اJgً[’K° Jgً\’L°Jgً]‘M†Jgً’±™Jgً›IH ؟±…JgًڑIH ؟°qJgً[‘K†Jgً³]JgًڑIH ؟°JH ’h°H ‘h‹IH ‘h€i²'ooH؟°ooH؟@Al@ة™‚y™‚x™‚w ™‚{™~™ک“ک“کŒCOMPILER-CONTEXTکŒFORM‚س™‚‚ہ™‚‚©ک’Œ ENV-DECL-P™$‚‍ک’ŒDECL-SPECIFIER-P™ ‚“کڈŒ TYPE-EXPANDER‚‰ک’Œ ENV-ADD-DECLS™$‚bک’ŒENV-DISALLOW-INLINES™$‚Nک’ŒENV-ALLOW-INLINES™$‚™‚‚â™‚F‚»™‚‚‘™‚Fj™‚FSک’ŒENV-PROCLAIM-GLOBAL™$1ک’ŒENV-PROCLAIM-SPECIAL™$™‚ى™‚‚کڈŒDECLARATION‚vکڈŒOPTIMIZE‚kکڈŒIGNORE‚XکڈŒ NOTINLINE‚DکڈŒINLINE‚9™‚*‚.™‚+‚"کڈŒFTYPE‚کڈŒTYPE‚ِ™‚N‚إ™‚x‚¥™‚‹v™‚y_™‚w=™‚ï™‚‚حکŒIllegal form in PROCLAIM:~%~S‚بکŒIgnore the proclamation.‚¹کŒ.Unknown declaration specifier in PROCLAIM: ~S.‚´کŒ Ignore it.‚کŒ"Illegal LOCALVARS proclamation: ~S‚کŒ Ignore it‚µکŒ!Illegal SPECVARS proclamation: ~S‚°کŒ Ignore itœ™ک–‚³nX@؟HةkHةة؟AY؛I[H‎؟h¼h½J¾h_؟N‘Nپ°m_²YO²IO‘i€hکO‘h‚i€h²OL¼O M½°4ooO؟OL¼hM½°OL¼hM½ˆOL¼hM½N¾°‘LMnoH™™ک“ک“کŒCOMPILER-CONTEXTکŒFORM‚ک•Œ \DO.PROGVr™‚\™‚‚£ک–%Hة¹I،°IZHة ؟I¹°يHةkHةةکŒ#lambda in COMPILE-FILE-COMPILER-LET™‚—ک“€™AkکŒBad binding in COMPILER-LET: ~SfکŒ"Bind the CAR of the binding to NIL‚ں™‚؟™‚àœ™‚€ک–dAX¹HZ»@k@ة؟W I½h¾M‘Mپ°#¾LNggN ؟M½°غK¾h½N‘N€چ]@ ؟N¾°ï@k@ة™‚{™‚{™‚€™ک“ک“کŒCOMPILER-CONTEXTکŒFORMR™A;ک’ŒENV-BIND-FUNCTION™$6™‚‡ک’ŒMAKE-CHILD-ENV™$/™‚(*کگŒMACROœ™‚پک–‚ŒAXY؛I[¼K]’M€h¾L _؟JO _؟i JON_؟WکO@ @k@ة؟ihoJOWoO؟O@ ؟@k@ة؟Wo ™:™9 ™7 ™‚}™9™‚پ ™ک“ک“کŒCOMPILER-CONTEXTکŒFORM‚†™‚تr™Ai™‚تX™‚تA™A2™‚؛"ک’Œ %DEFINER-NAME™ ™‚ت‚پ™‚Rb™‚FPکŒ~s ~sœ™‚‚ک–‚‚AX¹HZ»J\½W²!L¾L_؟O،NO_@ ؟O_؟°é@k@ة؟ihoIK WoO؟M¾N ڈN_@ ؟N¾°ï@k@ة؟Wo ™: ™9™‚}™9™‚‚™ک“ک“کŒCOMPILER-CONTEXTکŒFORM|™‚تc™AS™‚تB™‚ت$™Aw™‚RL™‚F;کŒ~s ~sœ™‚ƒک–rQ‘i€h²jS²TghQ g؟°GhoQ ¸RoH؟HghQ g؟Ro ؟hch™8™‚}™9™:™‚ƒ™ک“ک“کŒCOMPILER-CONTEXTf™‚تZ™mNکڈŒREVERSE@™‚ت3™‚ت.کڈŒLIST-LENGTH™m™‚\U™‚پGکڈŒLAMBDA™‚پ™‚^a™‚R:™‚F(کŒ~&~D top-level form~:Pœ™‚„ک–Q–A ؟APc™8™1™‚„™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚œ™‚…ک–:Q‍BCg؟°(PoA؟BCg؟Po ؟B™‚}™9™‚…™ک“ک“کŒCOMPILER-CONTEXTکŒMESSAGEکŒNAMEکŒ DEFINITION2™‚ت&™m™‚ت ™m!™™-™‚R™‚Fœ™‚‡ک–j@¸@¹@؛»¼IKJHWgL ]¾M__؟O_؟gKLhOgHNhh O$ ™‚{™‚‡ ™ک“ک“کŒFORM]™‚D-™‚ç(ک•ŒPARSE-DEFMACROکڈŒGENSYM™‚qPکڈŒBLOCKD™‚^!کگŒENVIRONMENTœ™‚ˆک–P @gA™‚{™‚ˆ™ک“ک“کŒNAMEکŒEXPN-FN™‚H™‚ى™‚J‌ک–1o ؟g X£hc؟ggo™‚ŒکŒDEFVAR *DEFERRED-FORMS*™ک“€+™‚@™‚A™‚!™‚B™‚Œ™‚Œ&کŒ‚A list onto which most forms will be pushed if we are preprocessing an Interlisp-format file. After the first pass through the file is done, and all macros and other eval-when(compile) forms have been processed, a second pass will be made down this list to actually compile the forms.ک“™‚™‚Œ‌ک–o ؟g X‘Hhc™‚چکŒDEFVAR *MAKING-SECOND-PASS*™ک“€™‚A™‚™‚چک“™‚™‚چ‌ک–o ؟g X‘Hhc™‚ژکŒDEFVAR *PREPROCESSING-PHASE*™ک“€™‚A™‚™‚ژک“™‚™‚ژœ™‚گک–‚‌ekَ”elَ™ll ؟elظdjًla¸kظjً¦la¹ƒi¸h¹h؛WWA½M ڑJ–J hMd3@ً¢±çM^gً_“O°Ngً_’O†Ngً’±Ngً•M½±Ngً_’O†Ngً”i¼±ôNgً”h¼±çNgًœM] ¼±زNgً_’O†Ngً”i¸±¸Ngً”h¸±«NgًœM] ¸±–Ngً”i¹±‰Ngً“h¹°|Ngً“i»°pWoM؟°_gMً‌@MHIl@ة؟°GgMًڑMWc؟°2L—M ؟H²%I² M@ ؟JO ؛ˆM@ ؟M½±‏ ™‚Œ™1ک•ŒDFNFLG ™`™‚‡™1 ™‚}™‚گ ‚ےےےے™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚9کŒDOCOPYکŒDOFIRST ‚‘™A‚†™‚D‚}™A‚k™‚%‚2™‚ت‚û™‚%‚؟™‚%D™‚—;™‚ّ™‚#‚R™‚ù‚:™‚ ‚™‚ْ‚™‚û‚™‚ü‚ً™‚‎‚م™‚‏‚ض™‚ے‚ة™‚‚´™‚‚§™‚‚ڑ™‚‚چ™‚™‚t™‚g™‚Y™‚‚+کŒ1Warning: Ignoring unrecognized DECLARE: tag: ~S~%œ™‚‘ک–RA ؟@Al@ة؟@k@ة™™™4™‚‘™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚œ™‚’ک–‚’AX¹HZ»h¼W I_؟h_؟O’Oپ°*_؟MOggO ؟O_؟°زK_؟h_؟O’Oپ°_@ ؟O_؟°èN¼L‘i€h²@gIL l@ةh™‚Œ™‚{ ™‚{™‚’ ™ک“ک“کŒCOMPILER-CONTEXTکŒFORM‚‚™‚\b™A@™‚H;™‚‡™‚I{™‚3™‚(.™‚Jœ™‚“ک–dAXY؛I[¼K]’M€h¾@ة_؟@L _؟JO _؟iJON_@ ؟gJOO lO™7™‚Œ™‚“ ™ک“ک“کŒCOMPILER-CONTEXTکŒFORMU™‚ةE™A<™‚؛,™‚P!™‚تK™‚œ™‚”ک–Q–A ؟APc™‚Œ™1™‚”™ک“ک“کŒCOMPILER-CONTEXTکŒFORM™‚œ™‚•ک–h™‚•™ک“ک“کŒCOMPILER-CONTEXTœ™‚—ک–9SX¹H ›I§S@ ؟hIgًںH@؟@ ZI؟hHX¹°خ™‚Œ™‚—™ک“ک“کŒFORMS'کڈŒLASTک•Œ\NCONC2™‚ّک•ŒFILECREATED‌ک–o ؟g X‘Hhc™‚›کŒDEFVAR *LAP-FLG*™ک“€™‚A™‚™‚›ک“™‚™‚›‌ک–o کŒ'DEFVAR *AUTOMATIC-SPECIAL-DECLARATIONS*™ک“€™‚ک“™‚™‚œœ™‚‍ک–‚tejَ§kh ؟ekظjً¤la¸پh¸gµh¹پa¹H’±½@i ؟@ X؛Hأ’±£J‘h€i[‘K…Jأ¢±پH‌io@؟Œio@؟@g ڑo €h²@ggI@ءةg'›o@ €h²@@ءةg'gIhio@؟hgigWW W"W$ @h @ I@H ؛؟@²9@g ‘hٹ@ ‘i€h²@g@ ؟@J ؟@J™‚› ™4™Q™P ™O ™‚z™‚w™‚r™‚x™‚y™‚{ک’Œ*HOST-ARCHITECTURE*™$™‚y™‚x™‚w™‚‍‚ےےےے™ک“ک“کŒNAME™‚9کŒDEFN™‚üکگŒLAP‚j™‚‚b™‚]ک•ŒGETD‚J™‚½‚A™‚y‚2™L‚,™‚¢‚™‚ˆ‚ô™‚‰‚ك™‚ت‚ذ™‚‍‚µکڈŒY-OR-N-P‚‌™‚ں‚ˆ™‚¾}™‚yq™‚تc™‚ت6™‚½/ک•ŒVIRGINFN™‚# ‚W™‚‚‚<™,‚يکگŒTARGET-ARCHITECTURE‚ç™‚Œ‚ت™‚؛‚ؤ™‚‚‚¨™‚‚‚—™‚؛‚’™,x™,Q™‚؟>ک•ŒLISTP™‚؛‚ظکŒQThere's something funny in the function cell of ~S.~%I'm not going any further.~%‚¯کŒ1Shall I use the definition on the EXPR property? ‚ƒکŒ&Shall I use the FUNCTIONS definition? kکŒ-There's nothing in the function cell of ~S.~%]کŒ~S is already compiled.~%œ™‚ںک–?ekَ¨lh ؟gµh¸پa¸gi !@Aho ؟@™8™1™‚{™‚ں‚ےےےے™ک“ک“کŒNAMEکŒTYPE™‚ü™‚؛7™‚،2ک•ŒGETDEF"™‚‰™‚#™‚Œ™‚؛-ک“ک•ŒNOCOPYپœ™‚،ک–wejَ§kh ؟gµh¸پa¸gigjgi HWWW h¹G@ W ¹O‌WkWة ¹؟I$™O™P ™8 ™‚r™‚w™‚x™‚y™‚›™‚z™‚{™‚| ™*™‚y™‚x™‚w™‚، ‚ےےےے™ک“ک“کŒFORM™‚ü™‚؛ l™Lf™‚çU™‚çP™AI™‚ت7™‚ˆ2™‚‰'™‚ٹ™‚#,™‚Œ!™‚چ™‚ژ ™‚؛œ™‚¢ک–‚°nZ؟@@A ¼h½W‘i€h²LW ’WپW ؟o¾h_؟N¹nف_؟NW L J‎؟noJkoJ-]h_؟g‚h¹_gً³'Oأ²WoO؟hON ؟M ™‚m™‚n™Q™‚o™‚›™‚y ™‚m™‚}™‚¢™ک“ک“کŒNAMEکŒ DEFINITION‚¨™‚}‚›™‚تM™‚~+™‚ ™‚أ ™o‚‹™S‚پ™‚„s™‚„‚”کŒ~&~A~%fک–Hة ¹j@؟I™‚–™‚—ک“ک“کŒG20509™‚x[ک– Hة ™‚¹™‚—ک“€ک’Œ RELEASE-DCODE™‚w1ک›ک“™‚چک“™‚&™SW™‚؟™‚àœ™‚¤ک–~AXY؛I[¼K]’M€h¾L _؟JO _؟i JON_؟WکO@ @k@ة؟ihoJOh_؟ O@ _؟Wک@k@ة_؟O ™:™9 ™7™9™8™‚¤™ک“ک“کŒCOMPILER-CONTEXTکŒFORMg™AX™‚تA™A2™‚؛"™‚P™‚تPکŒ~s ~sœ™‚¥ک–`AX¹HZ»J\½W²L¾N،°GN_@ ؟N¾°î@k@ة؟ihoIK M¾N ڈN_@ ؟N¾°ï@k@ة؟K ™:™9 ™9™‚¥ ™ک“ک“کŒCOMPILER-CONTEXTکŒFORMK™A9™‚ت™A2کŒ~s ~sœ™‚¦ک–oBRc؟BSggc؟T h¸IU؟BC ¸Bg ‘hٹB ‘i€h²BgB ؟BH ؟B™‚{™O™P™‚{™‚·™‚¦™ک“ک“کŒCOMPILER-CONTEXTکŒMESSAGEکŒNAMEکŒ DEFINITIONg™‚_™Z™‚½G™‚½>™‚y2™‚¢ک’ŒCOPY-ENV™$™‚T™‚‚9™,'ک’ŒENV™$™‚… ™‚†œ™‚§ک–