‘XCL Compiler output for source file {DSK}larry>medley>sources>DEBUGGER.;2 Source file created 12-Sep-2021 15:59:37 FASL file created Sunday, 12 September 2021, 15:59:38 ÿ˜–#ogg o ˜•ŒFILECREATEDLOC˜Œ*STANDARD-INPUT*˜Œ1 top-level form˜ŒFUNCTION˜“€˜•ŒDEFINE-FILE-INFO˜ŒOPEN ˜ŒOUTPUT˜Œ DIRECTION˜“˜ŒPACKAGE˜“˜’Œ DEFPACKAGE˜‘˜ŒXEROX-COMMON-LISP˜ŒDEBUGGER˜“˜Œ PREFIX-NAME˜ŒDBG˜“˜Œ NICKNAMES˜ŒDBG˜Œ READTABLE˜ŒXCL˜ŒBASE ˜Œ{Null}˜–!ggo ¿o˜Œ2 top-level forms™˜“€˜•ŒPUTPROP˜•Œ DEBUGGERCOMS˜•Œ FILEDATES˜’ŒDEBUGGER™ ˜“ ˜“˜•ŒCOMS˜“˜•Œ VARIABLES˜•Œ*DEBUGGER-MENU*˜“˜•ŒADDVARS˜“˜•Œ CACHEDMENUS™#˜“˜•ŒFONTVARS˜“˜•Œ BACKTRACEFONT˜•ŒTINYFONT˜“™!˜“™"˜’Œ*DEBUGGER-PROMPT*™ ˜’Œ*IN-THE-DEBUGGER*˜‘˜ŒDEBUGGER˜’Œ*DEBUGGER-ENTRY-POINTS*™ ˜“™"˜•ŒBRKEXP˜•ŒBRKTYPE˜•ŒBRKCOND˜•ŒBRKPOS˜“˜•Œ FUNCTIONS˜’ŒENTER-DEBUGGER-P™ ˜“™:™ ˜’ŒEMERGENCY-PANIC-LOOP™1˜•ŒFIND-DEBUGGER-ENTRY-FRAME˜’ŒPRINT-ENTRY-MESSAGE™1˜’ŒSIMPLE-REPORT-CONDITION™1˜’ŒINTERESTING-FRAME-P™ ˜“™!˜“˜•ŒINITVARS˜“˜•ŒWBREAK˜“™"˜’Œ*DEBUGGER-MENU-ITEMS*™ ˜’Œ*DEBUGGER-TERMINAL-TABLE*™1˜•ŒBREAKREGIONSPEC˜“˜•ŒFNS™E˜“™%˜“˜•ŒWINDOWUSERFORMS˜“™E˜“˜•ŒENDOFWINDOWUSERFORMS˜“™E€˜“™:˜’ŒREUSE-CURRENT-WINDOW™1˜’ŒCREATE-DEBUGGER-WINDOW™1˜’ŒSET-UP-DEBUGGER-WINDOW™1˜’ŒCLOSE-DEBUGGER-WINDOW™1˜’ŒRELEASE-DEBUGGER-WINDOW™1˜’ŒNEAR-BY-REGION™1˜“™:˜’ŒDEBUGGER-BUTTON-EVENT™1˜’ŒDEBUGGER-MENU-HELP™1˜“™!˜“™"˜•ŒLASTPOS˜“˜•ŒCOMMANDS˜Œ@˜ŒREVERT˜Œ?=˜ŒEVAL˜ŒVALUE˜ŒUB˜“™:˜’Œ DEBUGGER-EVAL™1˜“™:˜’ŒFIND-DEBUGGER-STACK-FRAME™1˜’ŒFIND-NAMED-STACK-POSITION™1˜“™:˜’Œ!FIND-ORIGINAL-NAME-AND-DEFINITION™1˜’Œ STKPTR-CCODE™1˜“ ™!˜“™D˜“˜•ŒAUTOBACKTRACEFLG˜“˜•ŒVARS˜•Œ BAKTRACELST˜“˜•ŒDECLARE:˜•ŒDOCOPY˜•Œ DONTEVAL@LOAD˜“™D˜“™s€˜“™)˜“™y˜•ŒDOEVAL@COMPILE˜•ŒDONTCOPY˜“˜•ŒRECORDS˜•Œ BKMENUITEM˜“™"˜•Œ*SHORT-BACKTRACE-FILTER*˜•ŒMaxBkMenuWidth˜“™L˜•ŒBAKTRACE˜•Œ BAKTRACE1˜“™b˜ŒBT˜ŒBT!˜ŒBTV˜ŒBTV!˜ŒDBT˜ŒDBT!˜“ ™:˜’ŒATTACH-BACKTRACE-MENU™1˜’ŒREGION-NEXT-TO™1˜’ŒBACKTRACE-MENU-BUTTONEVENTFN™1˜’ŒBACKTRACE-ITEM-SELECTED™1˜’ŒSTACK-FRAME-PROPERTIES™1˜’ŒSTACK-FRAME-FETCHFN™1˜’ŒSTACK-FRAME-STOREFN™1˜’ŒSTACK-FRAME-VALUE-COMMAND™1˜’ŒSTACK-FRAME-PROPERTY™1˜’ŒMAKE-FRAME-INSPECT-WINDOW™1˜’Œ%RELEASE-STACK-DATUM™1˜’ŒPRINT-BACKTRACE™1˜“™!˜“™b˜ŒSTOP˜Œ^˜ŒRETURN˜ŒPR˜ŒPR!˜ŒPROCEED˜ŒOK˜“™:˜’Œ EXIT-DEBUGGER™1˜“™:˜’ŒINVOKE-ESCAPE-FROM-MENU™1˜’ŒESCAPE-FROM-DEBUGGER™1˜’ŒMENU-FROM-ESCAPE-LIST™1˜’ŒKEYLIST-FROM-ESCAPE-LIST™1˜’ŒCOLLECT-ACTIVE-ESCAPES™1˜“™!˜“™:˜•ŒFIND-LEXICAL-ENVIRONMENT˜“™L˜•ŒFIND-STACK-FRAME˜“˜•ŒPROP˜“˜•ŒMAKEFILE-ENVIRONMENT˜•ŒFILETYPE™ ˜“™y™{™‚€™‚˜•Œ COMPILERVARS˜“™%˜“˜•ŒNLAMA˜“˜•ŒNLAML˜“˜•ŒLAMA™E ˜“˜”˜Œ12-Sep-2021 15:59:37•Œ+{DSK}larry>medley>sources>DEBUGGER.;2˜–1o ¿g X£hc¿ggo ™#˜ŒDEFVAR IL:*DEBUGGER-MENU*™˜“€+˜•ŒSET-DOCUMENTATION˜ŒBOUNDP˜ŒPROCLAIM!˜ŒVARIABLE™# ™#&˜ŒMenu for debugger windows˜“˜ŒSPECIAL™#˜–o ¿o ˜Œ2 top-level forms™˜“€˜•ŒADDTOVAR™‚Ö ˜“™(˜“™)™*˜“™&™#˜–5o ¿g X§oc¿ggo ™/˜ŒDEFVAR XCL:*DEBUGGER-PROMPT*™˜“€/™‚Ì™‚Í™‚Î%™‚Ï ™/ ™/*˜ŒPrompt used by debugger˜Œ(debug)˜“™‚Ñ™/˜–o ¿g X‘Hhc™2˜ŒDEFVAR *IN-THE-DEBUGGER*™˜“€™‚Í™‚Î ™2˜“™‚Ñ™2˜–o ¿oc™3˜Œ(DEFPARAMETER XCL:*DEBUGGER-ENTRY-POINTS*™˜“€™‚Î ˜“ ˜•Œ\interpret-BREAK1˜ŒERROR˜ŒCERROR˜’ŒDEBUG™ ˜’ŒINVOKE-DEBUGGER˜‘˜Œ CONDITIONS˜ŒBREAK˜•ŒERRORX˜•Œ*CATCH*˜•ŒCHECK-TYPE-FAIL˜’Œ*UNWIND-PROTECT*˜‘˜ŒSYSTEM˜•Œ \LISPERROR˜“™‚Ñ™3˜– o ˜ŒDEFVAR IL:BRKEXP™˜“€™‚Θ“™‚Ñ™5˜– o ˜ŒDEFVAR IL:BRKTYPE™˜“€™‚Θ“™‚Ñ™6˜– o ˜ŒDEFVAR IL:BRKCOND™˜“€™‚Θ“™‚Ñ™7˜– o ˜ŒDEFVAR IL:BRKPOS™˜“€™‚Θ“™‚Ñ™8œ™;˜–‚ØBÑiR¢±ÊRgð‘imÿA ¸H£h±„@–@kÕYb¿H gð²_H lýñ‘h‡lH Y²6Igð³>Igðhc¿H ¿h°5ic¿H ¿@”@jýó€h° V‘h€ic¿H ¿hŒmÿHH ¸±ÿ|X‘HRgðY’I°T3 ²U3 ›l TÙUñ‚h€h‘ihh˜•ŒHELPFLAG˜•ŒPRINTMSG˜•Œ HELPCLOCK˜•ŒHELPTIME˜•Œ NLSETQGAG™;™˜“˜“˜ŒN˜ŒPOS˜Œ CONDITION ‚Ę•ŒCLOCK‚ ˜•ŒSTKNTH‚”˜•ŒRELSTK{™‚m™‚O˜•ŒSTKARG@˜•ŒSTKNARGS2˜•ŒSTKNAME™‚‚®˜•ŒBREAK!a˜•ŒNOBREAKX˜•ŒINTERNAL7˜•ŒERRORSET™‚˜’ŒSTORAGE-CONDITION™ œ™ ˜–#‚6n¸gµh¹a¹gµmÿ ºaºgµh»a»gµh¼a¼gµ h½hHý¿‡a½iHý¿W6¾iW8W:WW@jWBWDihHý¿WF[Nið•¿i ¿i ¿WH ¿WJ!nokoH-¿O(_4²qO4ið–O($O4gð•O4gð²O(gO(hi O4gð²O(O(O(i hoO4o $˜’Œ *RESETFORMS*™‚󘕌 RESETSTATE˜•Œ LISPXHIST˜•Œ \INBQUOTE™`˜•Œ BRKVALUES˜Œ *EVALHOOK*˜Œ *APPLYHOOK*˜•Œ!VALUE˜•Œ\INTERRUPTABLE˜•Œ \PRIMTERMSA˜•Œ\PRIMTERMTABLE ˜•Œ\CURRENTDISPLAYLINE ˜•Œ\#DISPLAYLINES ˜Œ*STANDARD-OUTPUT* ™ ˜•Œ \TERM.OFD˜•Œ \LINEBUF.OFD™2˜•ŒBRKFN™8™7˜•ŒBRKENV™5™2™‚.™‚-™™‚, ™‚+!™‚)"™‚(#˜•Œ*NOT-YET-EVALUATED*$™I%™‚!™  ‚ÿÿÿÿ™˜“˜“˜Œ&KEY˜ŒFORM˜Œ ENVIRONMENT˜Œ CONDITION˜ŒSTACK-POSITION˜ŒAT ‚,˜•Œ ECASE-FAIL‚˜•ŒRETAPPLY‚ù™‚;‚ؘ•ŒERROR!‚œ˜•Œ SETTERMTABLE‚”˜•ŒINPUT‚˜•ŒOUTPUT‚†™=$™‚²™‚ ‚˜ŒREVERT‚혌 VALUES-LIST‚à˜ŒRETURN‚Ñ™‚™‚‚{™‚t˜ŒPROMPT‚m™‚4‚e˜•Œ*EXEC-COMMAND-TABLE*‚`˜•Œ*DEBUGGER-COMMAND-TABLE*‚[˜ŒCOMMAND-TABLES‚U˜ŒTITLE‚M˜ŒREAD‚C˜’Œ DEBUGGER-EXIT™1‚'™‚肘•ŒALWAYS‚˜•ŒALWAYS!‚÷˜’Œ BREAKPOINT™‚ó‚ð™‚[‚Θ’ŒREVERT™‚ó‚¿™‚\‚­™‚\‚Ÿ™‚è‚€™YV˜’ŒCRITICAL-STORAGE-CONDITION™ 5™‚!™‚‚„˜– @A ™2˜Œlambda in *UNWIND-PROTECT*™‚I˜“˜“˜ŒINPUT˜ŒENV˜•Œ EVAL-INPUT‚3˜“˜•ŒBT!™‚Z‚à˜ŒIn ~S:~&‚€˜•ŒCOMPILED-CLOSURE‚«˜–˜ŒClean-up forms™‚I˜“€˜’Œ RESETUNWIND™‚󂧙‚h˜•Œ \PTRHUNK2œ™=˜–8oi ¿i ¿ oi ¿ii i ¿°á™‚F™2™=™˜“€0˜•ŒPRINT*˜•ŒEVAL%˜•ŒREAD˜•ŒPRIN1˜•ŒTERPRI™‚t˜Œeval:˜ŒECall to debugger while in the debugger, entering read-eval-print-loopœ™>˜–‚Žemÿó”eló˜jl ¿edjð¬ka¸kÙjðªla¹‡g¸h¹hºh»IšmÿHhH ˆmÿHH X ZU’h°5J ’h°+K‘h€i\‘LŠJo‘h€i²Jg ð[‘h‚i€h°¨H™3™>‚ÿÿÿÿ™˜“˜“˜Œ &OPTIONAL˜ŒPOS˜Œ SKIP-FAKE?{˜ŒSPECIAL-FORM-PV˜•ŒGENSYM?I™‚C™‚9˜•Œ REALSTKNTH˜’ŒARGUMENT-ERROR™‚óv˜•ŒBREAK1&™ i˜“˜ŒEVAL˜•Œ EVAL-PROGNœ™?˜– ‚£hº`WioWK¹n¾W hºg‚h¹gð‘J€hZ‘Jo ¿W ¿o ¿lWÒ ¿o ¿WÓ ¿o ¿¿o ˜Œ *PRINT-BASE*™‚G˜•Œ*CONDITION-HANDLER-BINDINGS*˜’Œ *NLSETQFLAG*™‚󘕌*PROCEED-CASES*™‚H™7 ™‚Š ™‚ˆ™?™˜“€ ‚˜ŒPRINC‚’˜ŒTERPRI‚Œ™‚Œ‚€˜ŒPRIN1w™‚Œl™‚Ž^™‚ŒS™‚ŽN˜ŒTYPE-OFF™‚Œ™‚Œ3˜ŒNORMAL'™‚˜’ŒNLSETQ-PROCEED-CASE™‚󂘘Œ(problems trying to report it!)‚‡˜Œ>r˜Œ,Y˜Œ @ A˜Œ ™‚ƒ2™‚*™‚™‚*™>‚¨˜•Œ DEBUGGER-LOOPt™ -˜Œ=˜•Œ@‚ ˜Œ not foundœ™m˜–‚ nX¿h¹@AB Y˜B ¿I`²IVið’h°C@o Z[Hý¿K\Hý¿L]Hý¿noHB Y€h²!gi ¿Ii ¿B ¿IB ¿@oi ˜•Œ NOSPELLFLG™m™˜“˜“˜ŒFN˜ŒN˜ŒLSTPOS ‚š™‚Ü‚™‚‚ƒ™‚|™‚qs™‚tc˜•Œ SEARCHPDL5˜•ŒEDITFPAT0˜•ŒCONCAT™‚ ™‚êm™‚ߘ•ŒDWIMFLG‚”˜Œ not foundX˜–@HÉHÉHÉ ˜Œ#lambda in FIND-NAMED-STACK-POSITION™‚I˜“˜“˜ŒFN ˜•ŒSKOR0+˜ŒT™‚h˜•Œ \PTRHUNK4œ™o˜–v@ Xd3@ðšH@ $H‘h€iY‘I‹Ho‘h€išh@ $HYZ‘J†I“Ih€h¹IYIÁÉg'Z‘JIÁÉg'[‘K€I $™o™˜“˜“˜ŒSTKPTRm˜•ŒGETD1™p™p™‚b˜•ŒBROKENS˜•ŒADVISED$˜“˜ŒBROKEN˜ŒADVISED˜ŒTRACEDœ™p˜–k@ ÑÉ ™p™˜“˜“˜ŒSTKPTR ˜•ŒMAKE-COMPILED-CLOSURE˜•Œ \STACKARGPTR˜–G`gð–h¿o¿`gð–h¿`gð–hh˜Œ4 top-level forms™˜“€ ?™)7™‚¬2™),™s$™‚¬™s™w™s™‚¬™s˜“˜“™‚¦˜“˜•Œ **BREAK**˜•ŒLISPX™‚˜•ŒBREAK1A™‚™‚‚˜“˜•Œ**TOP**™‚ ™‚˜•ŒEVALQT˜“˜•Œ **EDITOR**™‚ ™‚™‚™‚˜•ŒEDITL1˜•ŒEDITL0™‚˜“˜“™‚™‚™‚™‚™‚™‚˜Œ-˜•ŒEDITL™‚™‚˜•ŒEDITE˜“˜“˜•ŒEDITF˜“˜•ŒEDITV˜“˜•ŒEDITP™‚˜“˜•Œ **USEREXEC**™‚ ™‚™‚˜•ŒUSEREXEC˜“™‚r˜“™‚ ™‚ ™‚™‚ ™‚™‚‚˜“™‚™‚ ™‚™‚˜“™‚˜“˜“˜•ŒMAPCAR™‚¦˜“™‚™‚ ™‚™‚™‚™‚™‚™‚˜“˜“™‚™‚™‚™‚™‚™‚™‚™‚™‚™‚™‚˜“˜“™‚˜“™‚˜“™‚™‚˜“™‚!™‚™‚ ™‚™‚™‚"˜“˜ŒPROGN™‚ ™‚r˜“˜“™‚™‚ ™‚™‚‚˜“™‚‚˜“˜•ŒBLKAPPLY™‚ ™‚4™‚r™‚™‚ ™‚™‚‚˜“˜•Œ *PROG*LAM˜“€˜•ŒEVALA™‚¨˜“€˜•Œ CLISPBREAK1˜–5o ¿g X§gc¿ggo ™‚†˜Œ"DEFVAR IL:*SHORT-BACKTRACE-FILTER*™˜“€/™‚Ì™‚Í™‚Î%™‚Ï ™‚†™A ™‚†*˜Œ;Used to determine what BT sees, applied to each stack frame˜“™‚Ñ™‚†˜–o ¿l}c™‚‡˜Œ DEFPARAMETER IL:|MaxBkMenuWidth|™˜“€™‚Θ“™‚Ñ™‚‡œ™‚‰˜–‚Åll j@ jiED£ib¿`ið¬J`¿J _¿B²noB €h O³FCjð³K@J ZJCläDg ¿Ogð—kJ ODi ¿WD ¿KkÙ[@J Z›JA ‘h‚i€h’±ÿzJ ¿D ¿h ˜’ŒT3™1™‚¹˜•ŒX˜•ŒY˜•ŒZ˜•Œ PLVLFILEFLG˜•ŒN™‚`™‚x™‚w˜•ŒFILE˜•ŒFLAGS˜•ŒSKIPFNS˜•ŒEPOS˜•ŒIPOS ˜•ŒBREAKDELIMITER™‚‰ ™˜“˜“™‚y™‚V™‚U™‚T™‚S™‚R˜Œ INTERLISP ‚½™‚u‚¶™‚‚¦™‚Ý‚™‚‚™‚t‚‡˜•ŒPRIN2}™‚l˜•Œ BACKTRACEZ™‚D˜•Œ %SOME-SINGLE-™‚™‚t™‚ƒf˜•Œ SHOWPRINT&˜•Œ CLEARSTKLST ™‚_™‚_<˜–Pk@™‚¹˜Œlambda in BAKTRACE™‚I˜“˜“˜ŒSKIPFN8™‚hœ™‚Š˜–k@²[AkÙBC b²L@XC ð—AkÙb¿°˜•Œ SETSTKARG*˜•ŒLISTPUT™‚ ˜“˜”™‚8™‚3˜”™‚9™‚4˜”™‚:™‚5˜”™‚;™‚6œ™‚š˜–RA‘h€iX‘H…A‘i€h–A‘h‚i€h²/@d3@ð˜@BC @‘i€h—@d3@ð€hš@BC h@ABC ™‚š™˜“˜“˜ŒVALUE˜ŒPROP˜ŒDATUM˜ŒWINDOWL˜•ŒDEFAULT.INSPECTW.VALUECOMMANDFN@™‚ë$™‚뜙‚›˜–!@‘i€h–@‘h‚i€h‘hA‘i€h“@@™‚›™˜“˜“˜ŒPROP˜ŒDATUMœ™‚œ˜–‚¡h¸h¹@ ºh»J\‘L°[g  ˆK ¿K…Jº°ÞhY[³j@ Xhl–g o Ygi ¿Igo ¿Ig@ É. ¿Ignoi ¿I™‚œ™˜“˜“˜Œ TTYWINDOW ‚™™‚ð‚™‚Õz™‚çm™‚Õ\™‚ÕP™‚äF™‚”8˜•Œ WINDOWREGION%™‚™‚™‚Ï‚ˆ™‚õt™‚c˜•ŒMAXSIZEV˜’Œ FRAME-INSPECT™1A™‚䙂i‚‘˜–@ ¿@gh ˜Œ#lambda in MAKE-FRAME-INSPECT-WINDOW™‚I˜“˜“˜ŒW™‚Õ™‚ ˜•ŒSELECTABLEITEMSh˜”‚,‚–K˜ŒBack Trace Frame Window‚™‚hœ™‚˜–?@g X–H H‘h€iY‘I…H‘i€h²H¹HºJ¡IJ ¿Jº°ñh™‚™˜“˜“˜ŒW2™‚™‚™‚˜’ŒDATUM™1œ™‚ž˜–‚¿n¸gµ g¹a¹gµhºaºgµ hHý¿…aHý¿gµh»a»gµh¼a¼gµh½a½gµ g¾a¾ll IJHɲnoHh€hK‘k€jL’l €jÔlÔNgð’l€jÔM ™‚x™‚w™‚ž ‚ÿÿÿÿ™˜“˜“™‚2™‚x˜ŒTO™‚w™‚‘™‚ž™˜ŒLINK‚¹™‚‰ ‚«˜ŒALINKo™‚|f™‚yX™J™‚ž<™‚‘&™‚w™‚x˜’ŒPRINT-BACKTRACE™ ™‚x‚˜– @kHÉ‘hi˜Œlambda in PRINT-BACKTRACE™‚I˜“˜“˜ŒX‚‰™‚h™‚nœ˜•Œ break-STOP˜–oc¿gh ™‚#™‚„™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV™‚W ™‚X˜“™‚<˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "STOP"™˜“€%™‚F™‚Ì ™‚T™b˜“€™‚„™‚«˜ŒSTOP ˜ŒExit this debugger level™‚Žœ˜•Œbreak-^˜–oc¿gh ™‚#™‚‘™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV™‚W ™‚X˜“™‚<˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "^"™˜“€%™‚F™‚Ì ™‚T™b˜“€™‚‘™‚«˜Œ^ ˜ŒAbort out of debugger™‚›œ˜•Œ break-RETURN˜–‚Œ@Z’J€h»A¼o½h¾M¹n¦_¿MWgKL jW hc¿ghh h¹_gð”N$OògOÉ$OM ™‚ˆ™‚G™‚H ™‚ˆ ™8 ™‚#™‚ž ™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV‚†™‚ñM˜’ŒINTERNAL-THROW-VALUES™‚ó9™‚1™‚~,™jv™‚”o™‚•h™‚”Z™‚E™‚X%™‚B ˜›˜“™‚˜“™‚™‚”˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "RETURN"™˜“€%™‚F™‚Ì ™‚T™b˜“˜“™‚y™‚œ™‚I™‚J™‚ž™‚L˜ŒRETURN ˜ŒReturn value from debugger™‚¬œ˜•Œbreak-PR˜–@X’H€h¹iI ¿$™‚¯™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV ™‚¬˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "PR"™˜“€%™‚F™‚Ì ™‚T™b˜“˜“™‚y˜•ŒNAME-OR-NUMBER™‚¯™‚L˜ŒPR ˜Œ!Select and invoke a proceed case.™‚ºœ˜•Œ break-PR!˜–@X’H€h¹hI ¿$™‚½™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV ™‚¬˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "PR!"™˜“€%™‚F™‚Ì ™‚T™b˜“˜“™‚y™‚·™‚½™‚L˜ŒPR! ˜Œ!Select and invoke a proceed case.™‚Çœ˜•Œ break-PROCEED˜–@X’H€h¹iI ¿$™‚Ê™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV ™‚¬˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "PROCEED"™˜“€%™‚F™‚Ì ™‚T™b˜“˜“™‚y™‚·™‚Ê™‚L˜ŒPROCEED ˜Œ!Select and invoke a proceed case.™‚Ôœ˜•Œbreak-OK˜–‚“oºh»J¹nÁ¼JWWò'W³iWW c¿ghh ¿ »g‚h¹^gð”K$NògNÉ$NJ ™‚ˆ™‚G™‚H™‚#™‚ˆ ™7 ™5 ™‚0™‚×™˜“˜“˜Œ $$MACRO-FORM˜Œ $$MACRO-ENV‚™‚ñQ™‚~L™‚¬F˜’ŒCONTINUE™‚ì@™‚£/™‚~*™j~™‚”x™‚•q™‚”d™‚W™‚8™‚X™‚[˜›˜“™‚˜“™‚™‚”˜–+ogo ¿oo` ˜ŒXCL:DEFCOMMAND "OK"™˜“€%™‚F™‚Ì ™‚T™b˜“€™‚×™‚«˜ŒOK ˜ŒExit/proceed from debugger™‚䜙‚©˜–oc¿gh ™‚#™‚©™˜“€™‚W ™‚X˜“™‚<œ™‚«˜–,R X²H Y–I hSo ™7™‚R™‚«™˜“€&™‚N˜’ŒINVOKE-RESTART-INTERACTIVELY™‚왂+™‚­™‚¯!˜Œ~&No restarts enabled.~%œ™‚¬˜–‚ÎU@‘h€i X ¹H¢±­AºA²A3 ‘i€h”jAýó€h²!AkÕH [–K ToA Aò4AHgggg [–K ToA hgJoh Ihho ¿hhoIi [–K hTo ™‚R™7™‚¬™˜“˜“˜ŒSHADOW?™‚y˜ŒNAME-OR-NUMBER ‚È™‚N‚º™‚낲˜•ŒASKUSER‚¢˜•ŒASKUSEREXPLAIN‚”™‚ñ‚€™‚Ns™‚ëk˜ŒFINDF™‚N9™‚ë1˜ŒNTH ™‚®™‚¯‚‡˜’ŒNAME-OR-NUMBER™1e˜ŒEQ`™‚w[˜’Œ RESTART-NAME™‚ìV˜ŒKEYM˜•ŒLITATOM‚ØŒ~&No restarts enabled.~%‚ª˜Œ Proceed how? ‚˜Œ ‚˜“˜ŒOR˜ŒNULL˜“˜ŒINTEGER˜“˜ŒSYMBOLz˜Œ~&No restart named ~S~%@˜Œ~&No such restart number: ~D~%œ™‚­˜–}@²y`X¹Ho¿I¸@¹hºh»h¼I¢J° I] Mh¼J”KL&»„Lh[ºI¹°ß¹HºHI¿JY¸Ig ¿HY¸Ig¿H¹jjnÿnÿh¸IºIH ¿Jh™‚­™˜“˜“˜ŒESCAPES'˜ŒPRINC-TO-STRINGZ™‚ÙN™‚-™‚. ˜ŒWays to proceed...œ™‚®˜–‚Ÿ@¢±š@¸h¹hºh»h¼k½h¾H_’O°p\ ¾MNgighoMLÉN giggogLhhh»J”JK&º„KhZ¹H¸MkÔ½°ŠI^ ]o¿Nh™‚®™˜“˜“˜ŒESCAPES‚Ž™‚&D™‚N ™‚ ^™‚T™‚4O™‚BI˜•Œ CONFIRMFLG;˜’ŒRESTART™‚ì.˜•Œ EXPLAINSTRING(˜•Œ NOECHOFLG‚”˜“˜“ ˜ŒN˜ŒNo - don't proceed ™‚™‚˜•ŒAUTOCONFIRMFLG™‚B˜“™‚uY˜“™‚u4˜Œ~D~:[~; (~:*~S)~] - ~Aœ™‚¯˜–ZQggg@hhhohmÿg hi ¸A‘HHgigno ™‚¿™‚¯™˜“˜“˜Œ CONDITION™‚y˜ŒALLT˜ŒDELETE-DUPLICATES2™‚Å*™‚C™‚w=˜ŒFROM-END%™ ™‚™7™‚aL˜–@ɲ@ÉAÉðh˜Œ lambda in COLLECT-ACTIVE-ESCAPES™‚I˜“˜“˜ŒESCAPE-1˜ŒESCAPE-2™‚ ™‚™‚˜“˜“˜’ŒCOMPUTE-RESTARTS™‚ìH™‚hœ™‚²˜–?emÿó“ekó—jk ¿ejð£ka¸S¸ghH Y²lI ºI ¿Jh™`™‚²‚ÿÿÿÿ™˜“˜“™‚y˜ŒSTACKPOS5™‚.™‚#™‚ê ™‚™‚ƒœ™‚´˜–‚›i @¡°{TºTc¿JYKo ™jUH °TKo ²jTºTc¿J °1I3™IHH °#IhmÿHH H Z‘J‹Ioi ¸°…jHU c ºH ¿J˜•ŒA0168˜•ŒTOKEN™‚`˜•Œ FRAME-SPEC˜•Œ FRAMESPEC™`™‚´™˜“˜“™‚y™‚4™‚Y ‚“™‚‚Š™‚~™‚Ün™‚êh™‚[™‚M™‚H™‚ƒ7™‚**™‚!™‚*™>x˜Œ not found2˜Œ=˜Œ@˜–"o ¿o ¿o ˜Œ3 top-level forms™˜“€˜•ŒPUTPROPS™‚>™‚>˜“™ ˜•Œ COPYRIGHT˜“˜ŒVenue & Xerox Corporation‚‚ÂÄ‚Æ‚Ç‚å ˜“™ ™‚¹˜Œ COMPILE-FILE˜“™ ™‚¸˜“™˜ŒXCL™ ˜“™ ˜ŒDEBUGGER˜“™˜ŒDBG˜“™˜ŒDBGš‚Oÿÿ