‘XCL Compiler output for source file {DSK}disk2>jdstools>lc3>lispcore3.0>sources>WALKER.;1 Source file created Thursday, 17 May 1990, 16:04:34. FASL file created Monday, 26 January 1998, 13:53:47. ے‌ک–#oggo ک•ŒFILECREATEDLOCکڈŒ*STANDARD-INPUT*کŒ1 top-level formکگŒFUNCTIONک“€ک•ŒDEFINE-FILE-INFOکڈŒOPENکگŒOUTPUTکگŒ DIRECTIONک“کگŒ READTABLEکŒXCLکگŒPACKAGEکŒXCLکŒ{Null}‌ک–!ggo؟oکŒ2 top-level forms™ک“€ک•ŒPUTPROPک•Œ WALKERCOMSک•Œ FILEDATESک•ŒWALKERک“ک“ک•Œ*ک•Œ;;کŒA simple code walker. ک“ک•Œ VARIABLESک’Œ*DECLARATIONS*ک‘کŒXEROX-COMMON-LISPک’Œ *ENVIRONMENT*™ک’Œ*LEXICAL-VARIABLES*™ک’Œ*WALK-FORM*™ک’Œ*WALK-FUNCTION*™ک’Œ*WALK-COPY*™ک“ک•Œ FUNCTIONSک’Œ WALK-FORM™ک’ŒWALK-FORM-INTERNAL™ک’Œ WALK-TEMPLATE™ک“ک•ŒCOMSک“™$ک’ŒVARIABLE-GLOBALLY-SPECIAL-P™ک’ŒVARIABLE-LEXICAL-P™ک’ŒVARIABLE-LEXICALLY-BOUNDP™ک’ŒVARIABLE-SPECIAL-P™ک“ک•ŒDECLARE:ک•ŒDOCOPYک•Œ DONTEVAL@LOADک“ک•ŒPک“ک•ŒMOVDک“کڈŒQUOTE™+ک“™4ک•ŒVARIABLE-LEXICAL-Pک“™3ک“™4™-ک“™4ک•ŒVARIABLE-SPECIAL-Pک“™$ک’ŒWALK-TEMPLATE-HANDLE-REPEAT™ک’ŒWALK-TEMPLATE-HANDLE-REPEAT-1™ک“™$ک’ŒRECONS™ک’ŒRELIST*™ک’ŒRELIST*-INTERNAL™ک“™$ک’ŒWALK-ARGLIST™ک’ŒWALK-BINDINGS-1™ک’ŒWALK-BINDINGS-2™ک’ŒWALK-COMPILER-LET™ک’ŒWALK-DECLARATIONS™ک’ŒWALK-DO™ک’ŒWALK-DO*™ک’ŒWALK-DO/DO*™ک’ŒWALK-FLET/LABELS™ک’ŒWALK-LAMBDA™ک’ŒWALK-LET™ک’Œ WALK-LET*™ک’Œ WALK-LET/LET*™ک’Œ WALK-MACROLET™ک’ŒWALK-MULTIPLE-VALUE-BIND™ک’Œ WALK-PROG™ک’Œ WALK-PROG*™ک’ŒWALK-TAGBODY™ک’ŒWALK-TAGBODY-1™ک’ŒWALK-UNEXPECTED-DECLARE™ک’ŒWITH-NEW-CONTOUR™ک“™$ک’ŒMAKE-LEXICAL-ENVIRONMENT™ک’ŒADD-MACROLET-ENVIRONMENT™ک’ŒADD-LABELS/FLET-ENVIRONMENT™ک’ŒNOTE-DECLARATION™ک’ŒNOTE-LEXICAL-BINDING™ک“™)ک“ک•ŒDEFINE-TYPESک’ŒWALKER-TEMPLATES™ک“™$ک’ŒDEFINE-WALKER-TEMPLATE™ک’ŒGET-WALKER-TEMPLATE™ک’ŒGET-WALKER-TEMPLATE-INTERNAL™ک“™™کŒTemplates for special formsک“#™dکڈŒANDکڈŒBLOCKکڈŒCATCHکڈŒCOMPILER-LETکڈŒCONDکڈŒDECLAREکڈŒDOکڈŒDO*کڈŒ EVAL-WHENکڈŒFLETکڈŒFUNCTIONکڈŒGOکڈŒIFکڈŒLABELSکڈŒLAMBDAکڈŒLETکڈŒLET*کڈŒMACROLETکڈŒMULTIPLE-VALUE-BINDکڈŒMULTIPLE-VALUE-CALLکڈŒMULTIPLE-VALUE-PROG1کڈŒMULTIPLE-VALUE-SETQکڈŒORکڈŒPROGکڈŒPROG*کڈŒPROGNکڈŒPROGV™4کڈŒRETURN-FROMکڈŒSETQکڈŒTAGBODYکڈŒTHEکڈŒTHROWکڈŒUNWIND-PROTECTک“™™کŒNFor Interlisp. Do not remove the template for IL:SETQ or the loadup may break.ک“ ™dک•ŒLOAD-TIME-EVALک•ŒSETQک•ŒRPAQ?ک•ŒRPAQک•ŒXNLSETQک•ŒERSETQک•ŒNLSETQک•Œ RESETVARSک“ک•ŒPROPک“ک•ŒFILETYPEک•ŒMAKEFILE-ENVIRONMENT™ک“ک”کŒ17-May-90 16:15:41•Œ.{DSK}local>lde>lispcore>sources>WALKER.;2‌ک–o کŒDEFVAR *DECLARATIONS*™ک“€کڈŒPROCLAIMک“کڈŒSPECIAL™‌ک–o کŒDEFVAR *ENVIRONMENT*™ک“€™‚¦ک“™‚§™‌ک–o کŒDEFVAR *LEXICAL-VARIABLES*™ک“€™‚¦ک“™‚§™‌ک–o کŒDEFVAR *WALK-FORM*™ک“€™‚¦ک“™‚§™ ‌ک–o کŒDEFVAR *WALK-FUNCTION*™ک“€™‚¦ک“™‚§™!‌ک–o کŒDEFVAR *WALK-COPY*™ک“€™‚¦ک“™‚§™"œ™%ک–oejَ§kh ؟gµh¸پa¸gµh¹پa¹gµh؛پa؛gµi»پa»gµno¼پa¼@g ½K‘Mh™!™"™™™™%‚ےےےے™ک“ک“کŒFORMکڈŒ&KEYکگŒDECLARATIONSکگŒLEXICAL-VARIABLESکگŒENVIRONMENTکگŒCOPYکگŒ WALK-FUNCTIONc™&ک’ŒARGUMENT-ERRORک‘کŒSYSTEM^کگŒEVALE™‚ؤ7™‚أ)™‚آ™‚ء ™‚ہRک–@کŒlambda in WALK-FORMکگŒCLOSUREک“ک“کŒXکŒYNک•ŒCOMPILED-CLOSUREœ™&ک–‚®h¸h¹h؛h»h¼h½@AlW ^¸NZ‘H@Hً²}H‘i€h²sH\ ]²Md3@ً–HAlMHMAHW ^¹N[™IAb؟b؟°“Ld3@ًںL ‘h‡L €h›oL HoAHHAb؟b؟±ےV™!™™&™ک“ک“کŒFORMکŒCONTEXT ‚›™'‚ژکڈŒERROR‚€کڈŒSPECIAL-FORM-PwکڈŒFBOUNDPYک•Œ\MVLISTTکڈŒ MACROEXPAND-1K™'3™g™‚غ‚•ک“کگŒCALLکگŒREPEATک“™‚ت‚ˆکŒy~S is a special form, not defined in the CommonLisp manual. Please define a template for this special form and try again.œ™'ک–‚^A¢±±AXgً²;@@AZ‘h€i[‘K…J‘i€hکA …@kA”A„ABHgً²(@AA²@ A ص@ €hBHgً²@ABb؟b؟b؟±ےp@²@@AB@AB@AgًX‘H„A‘h€i‘@AgًX’H°,AgًZ’J° Agً[’K°Agً\‘L†Agً›@g Agً›@g AgًX‘H†Agً²@²@`—@B @@hgAo™ ™'™ک“ک“کŒFORMکŒTEMPLATEکŒCONTEXT ‚Xک•Œ ECASE-FAIL‚B™P‚™&‚™&‚™C‚¨™'‚‍™'t™@lکڈŒNTHCDReکڈŒLENGTH]™‚êE™'-کڈŒEVAL‚Mک’ŒTEMPLATE™‚9ک•ŒLAMBDASPLST‚+™‚ف‚ کگŒLAMBDA‚کگŒSET‚™‚ï‚™‚ت‚ّکگŒRETURN‚يکگŒEFFECT‚لکگŒTEST‚ص™‚ة™‚ت‚¶کگŒQUOTE{کگŒREMOTEL™‚ق کگŒIF‚Sک“ ™‚َ€™‚ت™™‚ٍ™‚ٌ™‚ً™‚ï™‚î™‚فœ™*ک– @ءةg'™*™ک“ک“کŒSYMBOLک•ŒGLOBALLY-SPECIALœ™+ک–!g ‍@ iً‘h@Pg™™+™ک“ک“کŒVAR ™-کڈŒBOUNDPکگŒUNSURE™!œ™,ک– g ‌@P@ i$g™™,™ک“ک“کŒVAR™-™‚™‚™!œ™-ک–Ig ².R¸h¹H‘H‚h°Ygً–@I‘i„H¸°هY‘I@ @ Y‘Ig™™-™ک“ک“کŒVAR:™*3™*™‚C™‚™‚§™!‌ک–!gg ؟gg کŒ2 top-level forms™ک“€™3™3™:™-™6™+œ™@ک–@Bً™@AC@AABC ™@™ک“ک“کŒFORMکŒTEMPLATEکŒ STOP-FORMکŒCONTEXT™A ™'œ™Aک–Z@²V@Cً²Bڑo CADB² @@BD@ABCD @AACDb؟b؟b؟b؟b؟°«h™A™ک“ک“کŒFORMکŒTEMPLATEکŒREPEAT-TEMPLATEکŒ STOP-FORMکŒCONTEXT;™C6™A)™'™'™‚طکŒDWhile handling repeat: Ran into stop while still in repeat template.œ™Cک–!Q²@Aً‘h€iX‘H‡@Bً‘h€i“AB@h™"™C™ک“ک“کŒXکŒCARکŒCDRœ™Dک–ejَ§kh ؟he#¸Q—@H h™"™D‚ےےےے™ک“ک“کŒXکڈŒ&RESTکŒARGS™E™‚ةœ™Eک–A²@A@A A™E™ک“ک“کŒXکŒARGS™C™Eœ™Gک–‚ءh¸@¢±؛@Xd3@ً²0H`Y¥HTc؟@H@AB›H`‘h‚i€hH‘i€h²nB™HAB°)@HHHg H@Ah¹Hd3@ً—HTc؟ˆHTc؟H‘h€iZ³Hd3@ً‘h€i[¥HTc؟Io@ h™™G™ک“ک“کŒARGLISTکŒCONTEXTکڈŒ &OPTIONALکŒDESTRUCTURINGP‚¹™‚طu™Cp™Gg™D_™&L™G9™C4™GZ™‚ت(کڈŒLAMBDA-LIST-KEYWORDS™‚5‚³کŒ,Can't understand something in the arglist ~Sœ™Hک–R@²N@¸@Hd3@ًکHTc؟H°)AD‘T€BHHHC H»HTc؟K@ABCD h™™™™H™ک“ک“کŒBINDINGSکŒOLD-DECLARATIONSکŒOLD-LEXICAL-VARIABLESکŒCONTEXTکŒSEQUENTIALPJ™CE™H/™D'™&œ™Iک–?@²;@¸A¹@Hd3@ً’H°HIIHoB@ABh™I™ک“ک“کŒBINDINGSکŒWALKED-BINDINGSکŒCONTEXT7™C2™I(™D#™'ک“™‚تœ™Jک–‚…nX@A؟WWhH‎؟h¼Hة½h¾M‘Mپ°4^d3@ًںNHةH‎؟hL¼°NHةH‎؟N L¼M½°تHةHةHةHةLnoH™™™™™™J™ک“ک“کŒFORMکŒCONTEXT™Dzک•Œ \DO.PROGVO™‚ëpک–"gHةQc؟HةoHة™کŒlambda in WALK-COMPILER-LET™‚جک“€™'™‚§ک“™‚قک“™‚تl™‚زک•Œ \PTRHUNK4œ™Kک–‚×@¸h¹h؛H ‍@™B‘hˆC‘h„i‚h€h²@H@AiH‘h€i[‘K…H‘i€hکHgً€h²1H»h¼K‘Kپ°\Uc ؟LCb؟K»°ê@H@ABCH²5H‘h€i\‘L…H‘i€h²"H ’h°HV \؛LY‚h€h²@J@ABCD‘D€@ D‘D€@kA™™™K™ک“ک“کŒBODYکŒFN™‚1کŒDOC-STRING-PکŒDECLARATIONSکŒOLD-BODY ‚ب™K‚؛™C‚¤™‚غ‚ں™‚ـ‚“™gw™Cr™K,™C'™K کڈŒSTRINGPD™rœ™Lک– @Ah™L™ک“ک“کŒFORMکŒCONTEXT™Nœ™Mک– @Ai™M™ک“ک“کŒFORMکŒCONTEXT™Nœ™Nک–{nXAB؟WH‎؟WH‎؟WW@¼@H‎؟@½@¾hH‎ ؟NnoH _؟@LHةHة HةMoHةO ™™™™ ™ ™™N™ک“ک“کŒFORMکŒCONTEXTکŒSEQUENTIALPu™Dm™'_™IL™Keک“™‚ٍ™‚قک“™‚تBک–*HةHةHةHةHة H‎ ؟@oHةکŒlambda in WALK-DO/DO*™‚جک“ک“کŒ REAL-BODY$™'™Hک“™‚قک“™‚ت>™‚زک•Œ \PTRHUNK6œ™O—ک–‚‘nX@A؟VWHةHةHة\gً²HةkoH-½joH-؟M°4Lgً²joH-؟HةkoH-°hoLoHةnoH ™™™™™™O™ک“ک“کŒFORMکŒCONTEXT‚‹™D‚†™Kn™‚èB™z™v|ک–@oHةکŒlambda in WALK-FLET/LABELS™‚جک“ک“کŒ REAL-BODY ™'ک“™‚قک“™‚تiک“™v™zcک“کڈŒCARک’ŒFORM™x™‚زک•Œ \PTRHUNK2™‚†Yک–!@²@@Hة @koH-hکŒWALK-DEFINITIONS™‚جک“ک“کŒDEFINITIONS™C ™P™‚†Kک– HةQ c™کŒUPDATE-ENVIRONMENT™‚جک“€™]™‚†6™‚ژ™‚†-™‚‹™‚‹™‚‹œ™Pک–DnXA؟VW@H‎؟@¼hH‎؟LnoH ½@@HةM™™™™™™P™ک“ک“کŒFORMکŒCONTEXT>™D1™K'ک– HةHة H‎؟@oHةکŒlambda in WALK-LAMBDA™‚جک“ک“کŒ REAL-BODY™'™Gک“™‚قک“™‚ت#™‚ز™‚Qœ™Qک– @Ah™Q™ک“ک“کŒFORMکŒCONTEXT™Sœ™Rک– @Ai™R™ک“ک“کŒFORMکŒCONTEXT™Sœ™Sک–XnXAB؟WH‎؟WH‎؟WW@¼@H‎؟@½hH‎ ؟MnoH ¾@LHة N™™™™™ ™™S™ک“ک“کŒFORMکŒCONTEXTکŒSEQUENTIALPR™DF™K<ک–*HةHةHةHةHة H‎ ؟@oHةکŒlambda in WALK-LET/LET*™‚جک“ک“کŒ REAL-BODY$™'™Hک“™‚قک“™‚ت8™‚ز™‚tœ™T—ک–AnXA؟TU@@@koH-@J ؛@noH ™™™™™™T™ک“ک“کŒFORMکŒCONTEXT;™D6™K™],ک–@oHةکŒlambda in WALK-MACROLET™‚جک“ک“کŒ REAL-BODY ™'ک“™‚قک“™‚ت(™‚ز™‚…™‚½ک–N@‘i€h²F@¹@UVIIIHةiInoH @koH-h™™™™™کŒWALK-DEFINITIONS™‚جک“ک“کŒDEFINITIONSF™C6™D1™K™G'ک–@oHةکŒlambda in WALK-DEFINITIONS™‚جک“ک“کŒ REAL-BODY ™'ک“™‚قک“™‚ت#™‚ز™‚ة?™‚ةœ™Uک–mnXA؟WH‎؟WH‎؟WW@¼@H‎؟@gHة½@¾hH‎؟NnoH _؟@LHةMO ™™™™ ™ ™™U™ک“ک“کŒFORMکŒCONTEXTg™DV™K6™'.™‚تLک–(HةHةHةHةh H‎؟@oHةکŒ"lambda in WALK-MULTIPLE-VALUE-BIND™‚جک“ک“کŒ REAL-BODY"™'™Hک“™‚قک“™‚تH™‚زک•Œ \PTRHUNK5œ™Vک– @Ah™V™ک“ک“کŒFORMکŒCONTEXT™Sœ™Wک– @Ai™W™ک“ک“کŒFORMکŒCONTEXT™Sœ™Xک–@@@A ™X™ک“ک“کŒFORMکŒCONTEXT™C™Yœ™Yک–*@²&@@@d3@ً•g€A @A h™Y™ک“ک“کŒFORMکŒCONTEXT"™C™Y™&™‚َœ™Zک–o@ ؟@™Z™ک“ک“کŒFORMکŒCONTEXTکڈŒWARNکŒCEncountered declare ~S in a place where a declare was not expected.œک’Œexpand-WITH-NEW-CONTOUR™ک–@¸goH™‚ٍ™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™| ک“ک“™€ک“™™ک“™™‌ک–&gg ؟ggoکŒDEFMACRO WITH-NEW-CONTOUR™ک“€ ™ک•ŒSETF-MACRO-FUNCTIONک•ŒARGNAMES™[™‚ٍ™[ک“کڈŒ&BODYکŒBODYœ™]ک–@@Xgً—@A HgًY‘I†Hgً—@A hoHo™]™ک“ک“کŒMACROLET/FLET/LABELS-FORMکŒENVIRONMENT:™‚è(™_ ™^™z™v™~5ک“™~™v™z/ک“™‚‚ک’ŒMACROLET/FLET/LABELS-FORM™œ™^ک–‚ر@X¹Aأ²6A ؛I»h¼K‘Kپ°#¼JLggL ؟K»°غJAأZ‘J„A‘h€i²tA–A „ZZh¼h»I½h¾M‘Mپ°>^_؟L•KO&»…Oh[¼ggN _؟L•KO&»…Oh[¼M½°ہLJة ؟JoA ™^™ک“ک“کŒ MACROLET-FORMکŒENV‚ث™‚ط‚»ک•Œ\NCONC2‚–ک’ŒCRACK-DEFMACROک‘کŒCOMPILER\ک•Œ\MAKE-ENVIRONMENTVک•Œ\COPY-ENVIRONMENT5ک’ŒENV-BIND-FUNCTION™‚0™‚ک’ŒMAKE-CHILD-ENV™‚‚´ک•ŒENVIRONMENT‚ڈکڈŒDEFMACRO‚ٹکگŒMACROc™‚C™‚)™‚$™‚ک’ŒENV™‚‚إکŒ%Not a recognized environment type: ~sœ™_ک–‚غ@X¹Aأ²2A ؛I»h¼K‘Kپ°¼JLggL؟K»°كJAأZ‘J„A‘h€i¢±پA–A „ZZh¼h»I½h¾M‘Mپ°J^_؟L•KO&»…Oh[¼gggNgA_؟L•KO&»…Oh[¼M½°´LJة ؟JoA ™_™ک“ک“کŒLABELS/FLET-FORMکŒENV‚ص™‚ط‚إ™‚‚ ک•ŒMAKE-CLOSUREZ™‚T™‚1™‚™‚ ‚¾™‚‚ڑ™‚آ‚’™{‚چ™‚ˆ™a™‚?™‚)™{$™™‚‚دکŒ%Not a recognized environment type: ~sœک’Œexpand-NOTE-DECLARATION™ک–@X¹gIo™‚%™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTکڈŒPUSHک“™‌ک–&gg ؟ggoکŒDEFMACRO NOTE-DECLARATION™ک“€ ™™‚‏™‚ے™`™‚%™`ک“کŒDECLARATIONœک’Œexpand-NOTE-LEXICAL-BINDING™ک–@X¹gIo™‚2™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™‚*ک“™‌ک–&gg ؟ggoکŒDEFMACRO NOTE-LEXICAL-BINDING™ک“€ ™™‚‏™‚ے™a™‚2™aک“کŒTHING‌ک–‚"ggo؟oRggc؟oSggc؟o ؟g X¦h؟g` ³0g`gggl2gl2 ؟Q¸gQ‘H†gHc؟ggg؟ggg؟ggg؟ggg؟gggک•ŒFILEPKGTYPESک•ŒPRETTYDEFMACROSک•Œ PRETTYTYPELSTکŒ DEF-DEFINE-TYPE WALKER-TEMPLATES™ک“€ ‚™‚™‚ٍ™‚ف™‚ب™‚‌کڈŒPUTHASH‚ککڈŒMAKE-HASH-TABLEnک•ŒGETHASHV™‚K™‚¦>کڈŒADJOIN&™‚Fک•ŒSET-DOCUMENTATION!‚ک•ŒNILL‚ک•ŒFILEPKGCONTENTS‚ ™d‚ک’Œ%DEFINE-TYPE-FILEGETDEF™‚‎ک•Œ FILEGETDEF‚ّ™d‚يک’Œ%DEFINE-TYPE-PUTDEF™‚èک•ŒPUTDEF‚م™d‚طک’Œ%DEFINE-TYPE-DELDEF™‚سک•ŒDELDEF‚خ™d‚أک’Œ%DEFINE-TYPE-GETDEF™‚¾ک•ŒGETDEF‚¹™d‚¯™d‚¥™d‚گکگŒREHASH-SIZE‚‰کگŒSIZE‚„کڈŒEQUAL™‚ٍzک’Œ*DEFINITION-HASH-TABLE*™u™di™‚Ud™d^ک’ŒCHANGEDWALKER-TEMPLATESLST™Q™‚V9™‚T4™‚ٍ!™‚T™‚ٍ™c™dFک“ک’ŒGLOBAL™™‚V.ک“™‚V™dکŒWalker templatesک“™dک’ŒX™ک“™2™ک“ک’Œ%DEFINE-TYPE-FILE-DEFINITIONS™ک“™4™dک“™4™‚[™‚Y‌ک–Gggg؟gggءةg'¸gH‘H†gHکŒ!DEFDEFINER DEFINE-WALKER-TEMPLATE™ک“€A™™ :™f0™f)کگŒ DEFINED-BY ™d™‚e™d™dکگŒDEFINER-FOR™fœک’Œ*definition-expander-DEFINE-WALKER-TEMPLATE™ک–<@X¹H؛gogggIhhgJhhh™‚h™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT*™4™4™hکڈŒSETF ™uک“کڈŒLOAD™‚ë‌ک–Cggg؟ggg؟oPggcک•ŒPRETTYPRINTMACROS™‚c™ک“€;™‚F%™™6™‚T1™‚ٍ کڈŒSECONDکگŒDEFINITION-NAME™f™‚hکگŒDEFINITION-EXPANDER™f+ک”™f’ŒPPRINT-DEFINER™œک’Œexpand-DEFINE-WALKER-TEMPLATE™ک–ggg@Ah™‚x™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENT™f™dک’ŒDEFINER™‌ک–&gg ؟ggo™‚c™ک“€ ™™‚‏™‚ے™f™‚x™fک“کڈŒ&WHOLEکŒ DEFINITIONکڈŒ&ENVIRONMENTکŒENVœ™gک–6@d3@ً›@ءةg'@‘h€iX‘H…@‘i€hک@gً€h•oh™g™ک“ک“کŒX%™{™d.ک“™‚î™‚قک“™‚تœک’Œ#expand-GET-WALKER-TEMPLATE-INTERNAL™ک–@X¹gIo™‚Œ™ک“ک“کŒ$$MACRO-FORMکŒ$$MACRO-ENVIRONMENTکڈŒGETک“ک“™4™d‌ک–&gg ؟ggoکŒ%DEFMACRO GET-WALKER-TEMPLATE-INTERNAL™ک“€ ™™‚‏™‚ے™h™‚Œ™hک“کŒX‌ک–ggoکŒDEFINE-WALKER-TEMPLATE AND™ک“€™™d™mک“€™‚قک“™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE BLOCK™ک“€™™d™nک“€€™‚قک“™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE CATCH™ک“€™™d™oک“€™‚ت™‚قک“™‚ت‌ک–gggکŒ#DEFINE-WALKER-TEMPLATE COMPILER-LET™ک“€™™J™d™p‌ک–ggoکŒDEFINE-WALKER-TEMPLATE COND™ک“€™™d™qک“€™‚قک“ک“™‚ٍ™‚قک“™‚ت‌ک–gggکŒDEFINE-WALKER-TEMPLATE DECLARE™ک“€™™Z™d™r‌ک–gggکŒDEFINE-WALKER-TEMPLATE DO™ک“€™™L™d™s‌ک–gggکŒDEFINE-WALKER-TEMPLATE DO*™ک“€™™M™d™t‌ک–ggoکŒ DEFINE-WALKER-TEMPLATE EVAL-WHEN™ک“€™™d™uک“€™‚َ™‚قک“™‚ت‌ک–gggکŒDEFINE-WALKER-TEMPLATE FLET™ک“€™™O™d™v‌ک–ggoکŒDEFINE-WALKER-TEMPLATE FUNCTION™ک“€™™d™wک“€™‚ف‌ک–ggoکŒDEFINE-WALKER-TEMPLATE GO™ک“€™™d™xک“€™‚َ‌ک–ggoکŒDEFINE-WALKER-TEMPLATE IF™ک“€™™d™yک“€™‚ٍ™‚ً™‚ً‌ک–gggکŒDEFINE-WALKER-TEMPLATE LABELS™ک“€™™O™d™z‌ک–gggکŒDEFINE-WALKER-TEMPLATE LAMBDA™ک“€™™P™d™{‌ک–gggکŒDEFINE-WALKER-TEMPLATE LET™ک“€™™Q™d™|‌ک–gggکŒDEFINE-WALKER-TEMPLATE LET*™ک“€™™R™d™}‌ک–gggکŒDEFINE-WALKER-TEMPLATE MACROLET™ک“€™™T™d™~‌ک–gggکŒ*DEFINE-WALKER-TEMPLATE MULTIPLE-VALUE-BIND™ک“€™™U™d™‌ک–ggoکŒ*DEFINE-WALKER-TEMPLATE MULTIPLE-VALUE-CALL™ک“€™™d™‚€ک“€™‚ت™‚قک“™‚ت‌ک–ggoکŒ+DEFINE-WALKER-TEMPLATE MULTIPLE-VALUE-PROG1™ک“€™™d™‚پک“€™‚ً™‚قک“™‚ت‌ک–ggoکŒ*DEFINE-WALKER-TEMPLATE MULTIPLE-VALUE-SETQ™ک“€™™d™‚‚ک“€ک“™‚قک“™‚ï™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE OR™ک“€™™d™‚ƒک“€™‚قک“™‚ت‌ک–gggکŒDEFINE-WALKER-TEMPLATE PROG™ک“€™™V™d™‚„‌ک–gggکŒDEFINE-WALKER-TEMPLATE PROG*™ک“€™™W™d™‚…‌ک–ggoکŒDEFINE-WALKER-TEMPLATE PROGN™ک“€™™d™‚†ک“€™‚قک“™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE PROGV™ک“€™™d™‚‡ک“€™‚ت™‚ت™‚قک“™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE QUOTE™ک“€™™d™4ک“€™‚َ‌ک–ggoکŒ"DEFINE-WALKER-TEMPLATE RETURN-FROM™ک“€™™d™‚ˆک“€™‚َ™‚قک“™‚ً‌ک–ggoکŒDEFINE-WALKER-TEMPLATE SETQ™ک“€™™d™‚‰ک“€™‚قک“™‚ï™‚ت‌ک–gggکŒDEFINE-WALKER-TEMPLATE TAGBODY™ک“€™™X™d™‚ٹ‌ک–ggoکŒDEFINE-WALKER-TEMPLATE THE™ک“€™™d™‚‹ک“€™‚َ™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE THROW™ک“€™™d™‚Œک“€™‚ت™‚ت‌ک–ggoکŒ%DEFINE-WALKER-TEMPLATE UNWIND-PROTECT™ک“€™™d™‚چک“€™‚ً™‚قک“™‚ت‌ک–ggoکŒ(DEFINE-WALKER-TEMPLATE IL:LOAD-TIME-EVAL™ک“€™™d™‚‘ک“€™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE IL:SETQ™ک“€™™d™‚’ک“€™‚ï™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE IL:RPAQ?™ک“€™™d™‚“ک“€™‚ï™‚ت‌ک–ggoکŒDEFINE-WALKER-TEMPLATE IL:RPAQ™ک“€™™d™‚”ک“€™‚ï™‚ت‌ک–ggoکŒ!DEFINE-WALKER-TEMPLATE IL:XNLSETQ™ک“€™™d™‚•ک“€™‚قک“™‚ت‌ک–ggoکŒ DEFINE-WALKER-TEMPLATE IL:ERSETQ™ک“€™™d™‚–ک“€™‚قک“™‚ت‌ک–ggoکŒ DEFINE-WALKER-TEMPLATE IL:NLSETQ™ک“€™™d™‚—ک“€™‚قک“™‚ت‌ک–gggکŒ#DEFINE-WALKER-TEMPLATE IL:RESETVARS™ک“€™™Q™d™‚ک‌ک–"o ؟o ؟o کŒ3 top-level forms™ک“€ک•ŒPUTPROPS™‚I™‚Iک“™ک•Œ COPYRIGHTک“کŒVenue & Xerox Corporation‚أ‚ؤ‚ئک“™™‚œک“™ کŒXCL™کŒXCLک“™™‚›کگŒCOMPILE-FILEڑ‚Uےے