(FILECREATED " 9-Sep-86 13:49:35" ("compiled on " {ERIS}NEWERR>BREAK.;5) "29-Aug-86 22:21:56" recompiled changes: BREAK1 BREAK1A BREAKLOOP INTERLISP-BREAKLOOP BREAKCOM PROCEED-FROM-BREAK PROCEED-WITH-DEFAULTS CREATE-PROCEED-KEYLIST in "Xerox Lisp 29-Aug-86 ..." dated "29-Aug-86 22:55:03") (FILECREATED " 9-Sep-86 13:44:42" {ERIS}NEWERR>BREAK.;5 114634 changes to: (VARS BREAKCOMS) (FNS PROCEED-WITH-DEFAULTS PROCEED-FROM-BREAK CREATE-PROCEED-KEYLIST BREAK1 BREAK1A BREAKLOOP INTERLISP-BREAKLOOP BREAKCOM) (STRUCTURES OLD-BREAK1) previous date: " 8-Sep-86 14:12:09" {ERIS}NEWERR>BREAK.;4) BREAK1A0001 D1 (NAME ERRORSET F 0 NBREAKS F 1 CONDITION F 2 RESETY) PkQ ci(6 BREAK1A) NIL () BREAK1A0002 D1 (NAME ERRORSET F 0 NBREAKS F 1 CONDITION F 2 RESETY) jPkQ ci(13Q \MVLIST 10Q BREAK1A) NIL () BREAK1 D1 (P 4 \USEBREAKRESETFORMS P 3 NBREAKS P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 5 CONDITION I 4 BRKTYPE I 3 BRKCOMS I 2 BRKFN I 1 BRKWHEN I 0 BRKEXP F 5 LISPXHIST F 6 RESETVARSLST F 7 NBREAKS) EAg !@g g ggE b jWVD @g g#U!Vog hgZ JIjB oi Bi oi hU!Vog hgZ JI (251Q VALUES-LIST 243Q ERROR! 235Q RESETRESTORE 223Q BREAK1A0002 202Q HELP 177Q PRIN1 167Q PRINT 162Q PRIN1 152Q UNBREAK0 137Q ERROR! 132Q RESETRESTORE 120Q BREAK1A0001 72Q \SAFEEVAL 45Q MAKE-CONDITION 31Q FAKE-TYPEP-FOR-CONDITIONS 22Q \SAFEEVAL 11Q \SAFEEVAL) (231Q ERROR 220Q INTERNAL 126Q ERROR 115Q INTERNAL 76Q INTERRUPT 67Q BREAK-EXP 41Q :LIST 36Q OLD-BREAK1 26Q CONDITION 17Q BREAK-EXP 6 BREAK-EXP) ( 215Q (BREAK1A0002) 173Q " unbroken." 156Q "Break within a break on " 112Q (BREAK1A0001)) BREAK1A D1 (I 1 CONDITION I 0 NBREAKS F 0 WBREAK) P@A @A (14Q BREAKLOOP 6 \WINDOWBREAKLOOP) NIL () BREAKLOOP D1 (I 1 CONDITION I 0 NBREAKS F 0 *CURRENT-EXECUTIVE-TYPE*) g Pg@A @A (27Q INTERLISP-BREAKLOOP 21Q COMMONLISP-BREAKLOOP 5 BOUNDP) (12Q COMMON-LISP 2 *CURRENT-EXECUTIVE-TYPE*) () INTERLISP-BREAKLOOPA0001 D1 (NAME ERRORSET F 0 BRKCOMS) P i(4 BREAKCOM) NIL () INTERLISP-BREAKLOOPA0002 D1 (NAME ERRORSET) gi` i(11Q PROMPTCHAR) (6 LISPXHISTORY 2 :) () INTERLISP-BREAKLOOPA0003 D1 (NAME ERRORSET P 2 BRKCOM P 1 BRKLISPXHIST P 0 LISPXID) g!id Zi i(17Q BREAKCOM 12Q LISPXREAD) (2 :) () INTERLISP-BREAKLOOP D1 (P 16Q A3494 P 15Q !VALUES P 14Q BRKLINE P 13Q BRKLISPXHIST P 12Q BRKORIGFLG P 11Q \BREAKRESETEXPR P 10Q BREAKRESETVALS P 7 BRKBUFS P 6 BRKRDBUF P 5 LASTPOS P 4 BRKVALUES P 3 BRKID P 2 HELPFLAG P 1 BRKFIL P 0 TYPE-IN I 1 CONDITION I 0 NBREAKS F 17Q BRKCOMS F 20Q BRKFN F 21Q BRKTYPE F 22Q READBUF F 23Q LISPXBUFS) WhWh`` W W"oW W o W ghg W"dgM ZW lRMW IHW$W"g _hc$W"g-AOg iOg A lmM ]`!`iM`W"W"`Wg3Ig I I W Ii gIi Wc2AW"goi W id i I KIi h_Woi Wco oi W&c&hc$cig Kid i (605Q TERPRI 600Q PRIN2 571Q BREAKRESETFN 544Q CLBUFS 537Q INTERLISP-BREAKLOOPA0003 526Q INTERLISP-BREAKLOOPA0002 506Q INTERLISP-BREAKLOOPA0001 465Q PRINT 456Q BREAK2 452Q TERPRI 445Q REPORT-CONDITION 440Q PRINT 430Q PRIN1 375Q PRINT 364Q PRIN2 354Q BREAK2 350Q TERPRI 343Q OUTPUT 340Q OUTFILE 333Q OPENP 245Q STKNTH 232Q OLD-INTERLISP-ERROR-NUMBER 224Q FAKE-TYPEP-FOR-CONDITIONS 210Q FAKE-TYPEP-FOR-CONDITIONS 155Q CLBUFS 135Q SETSTKNAME 114Q STKNAME 75Q BREAKRESETFN 55Q \APPEND2) (566Q REENTERING 415Q INTERRUPT 370Q : 330Q OUTPUT 321Q TRACE 312Q CLEARSTKLST 306Q CLEARSTKLST 273Q CLEARSTKLST 267Q CLEARSTKLST 257Q CLEARSTKLST 252Q LISPXHISTORY 221Q OLD-INTERLISP-ERROR 205Q STACK-OVERFLOW 171Q ERRORX 151Q INTERRUPT 104Q REVERT 72Q ENTERING 63Q broken 17Q BREAKHELPFLAG 14Q BRKFILE) ( 533Q (INTERLISP-BREAKLOOPA0003) 523Q (INTERLISP-BREAKLOOPA0002) 502Q (INTERLISP-BREAKLOOPA0001) 424Q "interrupted below " 52Q (broken) 36Q (broken)) BRKLASTPOS D1 (P 0 POS I 0 FLG) 8mgi H dgdgmHhH @mH gH(56Q STKNTHNAME 44Q REALSTKNTH 17Q STKNAME 10Q REALSTKNTH) (61Q EVALA 31Q CLISPBREAK1 23Q EVALA 4 BREAK1) () BREAKCOMA0001 D1 (NAME ERRORSET F 0 LASTPOS F 1 MACROY) P id ci(10Q PRINT 3 STKNAME) NIL () BREAKCOM D1 (P 12Q LISPXHIST P 11Q NBREAKS P 10Q BRKVALUES P 7 RESETSTATE P 6 MACROY P 4 OLDVALUE P 3 BRKORIGFLG P 2 BRKZ P 1 BRKFIL P 0 *LAST-CONDITION* I 1 TYPE-IN I 0 BRKCOM F 13Q BRKLINE F 14Q BRKEXP F 15Q BRKFN F 16Q !VALUES F 17Q RESETVARSLST F 20Q BRKVALUES F 21Q LASTPOS F 22Q IT F 23Q NBREAKS F 24Q *LAST-CONDITION* F 25Q BRKORIGFLG F 26Q BRKTYPE F 27Q LISPXHIST F 30Q BRKLISPXHIST) 8 W(Ai`A@i@hi cbWcW**@dl#`Zhdihi Jd m@gig d M@dgg ZhdgJ +ghdi@g Z J  @dg$hdi@g Z J Z id gpg hdi@Ji JTo 1gLhhWcog g_McgM Og W" u @dgJA:W6W1W,,ggWJh hd@Jh id +gid g7`&ggWhgW.hhhd@W gid AW@ @g@g@dggWhW @dgWW d i g@dgPW g Wc$AidWid @goi W >oi 2g W ogi W Wc$@dgW" id gEhdi W W`g JJ AiWid oi @dghdi g g ghdi g g p@dgo id Ugi id D@g'ggWdhh AJid A$W&  W0 @g h @g `=@dl6d`/AW@ @ @o @lF`Ahi Z@W W&  @g hdhcJb(2043Q LISPX 2031Q MINUS 2023Q LISPXUNREAD 2010Q FIXSPELL 1770Q GETLIS 1756Q FGETD 1751Q BOUNDP 1710Q \SAFEEVAL 1674Q \SAFEEVAL 1656Q MINUS 1642Q PRINT 1631Q BREAKCOM1 1567Q PRINT 1562Q HELPFIX 1546Q PRINT 1541Q BREAKCOM1 1513Q BREAKCOM 1504Q BREAKCOM 1475Q BREAKCOM1 1455Q BREAKCOM 1446Q BREAKCOM 1437Q BREAKCOM1 1414Q PRIN1 1403Q PRIN2 1373Q BREAK2 1356Q REBREAK0 1347Q BREAKCOM 1331Q UNBREAK0 1323Q BREAKCOM1 1303Q PRINT 1276Q VARIABLES 1247Q BREAKPRINTVALUES 1241Q ERROR 1211Q PRIN1 1175Q BREAKPRINTVALUES 1167Q PRIN1 1147Q PRIN2 1137Q BREAK2 1114Q BREAKRESETFN 1105Q BREAKCOM1 1056Q BREAKEXIT 1051Q BREAKCOM1 1024Q BREAKEXIT 1020Q BREAKCOM1 777Q \BREAKSTOP 744Q \DEFINEDP 727Q PRINT 713Q BREAKCOM1 634Q PRINT 620Q BREAKRETFROM 615Q SHOWPRINT 610Q BREAKCOM1 576Q LISPX/ 555Q BREAKREAD 515Q STKPOZ 506Q BREAKREVERT 500Q BREAKRESETFN 470Q ERROR! 461Q APPLY 433Q BREAKCOMA0001 377Q PRINTLEVEL 364Q BREAKCOM1 350Q BREAKREAD 330Q PRINT 323Q STKNAME 317Q STKPOZ 312Q BREAKCOM1 305Q BREAKREAD 256Q BREAK?= 251Q BREAKCOM1 244Q BREAKREAD 220Q BREAKEXIT 214Q BREAKCOM1 201Q BREAKREAD 151Q BREAKCOM 143Q BREAKREAD 112Q BREAKCOM 102Q BREAKCOM1 32Q READLINE) (2040Q : 2000Q BREAKCOMSLST 1734Q LISPXCOMS 1716Q DWIMFLG 1705Q BREAK 1671Q BREAK 1612Q QUOTE 1607Q UNBREAK0 1576Q UB 1554Q IN? 1523Q EDIT 1510Q GO 1501Q !EVAL 1464Q !GO 1452Q OK 1443Q !EVAL 1425Q !OK 1344Q EVAL 1337Q BRKINFOLST 1312Q !EVAL 1266Q ARGS 1235Q  1220Q VALUE 1154Q EVALVALUE 1111Q REENTERING 1074Q EVALVALUE 1065Q EVAL 1035Q OK 1006Q GO 771Q STOP 762Q ~ 754Q ^ 722Q ? 671Q QUOTE 661Q QUOTE 656Q HELPFIX1 651Q DWIMFLG 643Q -> 627Q ? 564Q SETQ 561Q BREAK1A 525Q = 475Q REVERTING 452Q PRINTLEVEL 437Q ERROR 430Q INTERNAL 405Q PRINTLEVEL 345Q LINE 337Q REVERT 302Q LINE 267Q @ 241Q LINE 227Q ?= 207Q RETURN 176Q LINE 167Q RETURN 140Q LINE 126Q ORIGINAL 65Q BREAKMACROS 10Q BRKFILE) ( 1765Q (EXPR FILEDEF) 1536Q (HELPFIX) 1410Q " evaluated " 1232Q "not evaluated yet." 1205Q " evaluated " 1163Q " = " 425Q (BREAKCOMA0001) 374Q (2 . 3)) BREAKPRINTVALUES D1 (P 3 NOTFIRST P 2 X P 1 POS I 0 VALS) )@hi "HhKIi i[Jid HX(41Q SHOWPRINT 27Q DSPXPOSITION 5 DSPXPOSITION) NIL () BREAKCOM1 D1 (P 2 LISPXHIST P 1 NBREAKS P 0 HELPCLOCK I 4 NOPROPSFLG I 3 BRKZ I 2 NOEVALFLG I 1 NOSAVEFLG I 0 BRKX F 3 BRKLISPXHIST F 4 !VALUES F 5 TYPE-IN F 6 NBREAKS F 7 BRKEXP F 10Q BRKVALUES F 11Q BRKCOM F 12Q BRKFN) AU`GBl jVS@Wg C@g@Wg CB@gXghCUdiWhCDhggWgVhh cg@d@g @g $g@d@g @g chcSSTT W(336Q LISPXSTOREVALUE 316Q \MVLIST 313Q \SAFEEVAL 301Q \SAFEAPPLY 251Q \MVLIST 246Q \SAFEEVAL 234Q \SAFEAPPLY 202Q HISTORYSAVE 141Q SHOULDNT 103Q BREAKRESETFN 46Q BREAKRESETFN 22Q CLOCK) (310Q : 276Q : 260Q RETURN 243Q : 231Q : 213Q RETURN 166Q 'BREAK' 157Q BREAK3 154Q *PRINT* 120Q : 113Q BREAK-EXP 100Q EVALUATING 62Q BREAK-EXP 43Q EVALUATING 6 LISPXHISTORY) () BREAKRESETFN D1 (P 0 X I 0 BREAKSTATE F 1 BREAKRESETVALS F 2 LASTPOS F 3 \BREAKRESETEXPR F 4 RESETVARSLST F 5 \USEBREAKRESETFORMS) @g@dgQU`^@gR cdHdlgHd h'ggHH hH HH hQcSgQhchhTcQ@g@g@g@g4Q&@ghg R dHH Shc(345Q SHOULDNT 325Q \SAFEAPPLY 310Q RELSTK 302Q BOUNDP 154Q EVAL 144Q EVAL 134Q \EVALV1 104Q \EVALV1 54Q BRKLASTPOS 43Q RELSTKP) (277Q LASTPOS 267Q REVERTING 255Q REVERTING 247Q RESTORE 241Q EVALUATING 232Q LEAVING 176Q \BREAKRESETRESTORE 123Q SET 115Q SETQ 77Q SET 35Q ENTERING 27Q BREAKRESETFORMS 12Q REENTERING 3 ENTERING) () \BREAKRESETRESTORE D1 (P 1 X P 0 BREAKSTATE I 0 BREAKRESETVALS) @g@dYI h(23Q \SAFEAPPLY) (5 LEAVING) () BREAKRETFROM D1 (I 2 FLG I 1 VAL I 0 POS) g @AB (13Q RETFROM 5 BREAKRESETFN) (2 LEAVING) () BREAKRETEVAL D1 (I 2 FLG I 1 FORM I 0 POS) g @AB (13Q RETEVAL 5 BREAKRESETFN) (2 LEAVING) () BREAKEXIT D1 (I 0 NOPRINTFLG F 0 BRKFIL F 1 BRKFN F 2 !VALUES F 3 BRKRDBUF F 4 READBUF F 5 LASTPOS F 6 BRKBUFS) XU g @QPi #QgPi oP R `P g V STS cggRh (125Q RETAPPLY 106Q \APPEND2 77Q BKBUFS 73Q BREAKRESETFN 64Q PRIN1 54Q BREAKPRINTVALUES 47Q PRIN1 36Q PRIN2 21Q PRINT 11Q BREAKRESETFN 3 RELSTK) (117Q VALUES-LIST 114Q BREAK1A 70Q LEAVING 60Q BREAKDELIMITER 31Q 'BREAK' 6 ENTERING) ( 43Q " = ") \BREAKSTOP D1 (F 0 BRKTYPE F 1 LASTPOS) Q PP g go (34Q RETEVAL 22Q BREAKRESETFN 13Q RELSTK 3 RELSTK) (25Q BREAK1A 17Q LEAVING) ( 31Q (ERROR!)) BREAK2 D1 (I 0 N F 0 NBREAKS F 1 BRKFIL) `@ jPjPـPklQ (30Q SPACES) (2 BREAKI) () BREAK?= D1 (L (0 LINE) P 1 *PRINT-LENGTH* P 0 *PRINT-LEVEL* F 4 LASTPOS F 5 BRKLISPXHIST F 6 BRKFIL) l d"UgU @T i T ij _3@T @T A@d1Tgo@ hJddi3 gJhhhg @@T JK @bV jV h(222Q TERPRI 213Q POSITION 200Q BREAK= 173Q EVALV 160Q STKEVAL 120Q LISPX/ 72Q STKARG 64Q BREAK?=1 47Q PRINT-ARGLIST 42Q STKARGS 36Q SMARTARGLIST 32Q STKNAME 20Q MEMB) (155Q : 142Q QUOTE 107Q LAMBDA 14Q *PRINT*) ( 113Q (LISPXHIST)) BREAK?=1 D1 (P 1 TEM P 0 ARGS I 1 POS I 0 N) Y @A Yll 1gHhhTcYog gIcgI KJ(71Q ERROR! 64Q APPLY 41Q BAKTRACEA0001 6 PRINTLEVEL) (55Q PRINTLEVEL 45Q ERROR 36Q INTERNAL 14Q PRINTLEVEL) ( 33Q (BAKTRACEA0001)) BAKTRACE1 D1 (P 1 X P 0 TEM I 3 POS I 2 IPOS I 1 N I 0 LST) p@AAkBC b@XC AkbGC AkbHdgAkb*HdIdgiABC dbh@b(133Q BAKTRACE1 47Q DUMMYFRAMEP 31Q STKNAME 16Q STKNTH) (120Q - 65Q &) () BREAK3A0001A0002 D1 (NAME ERRORSET P 7 BRKCOMS P 6 PLVLFILEFLG P 5 N P 4 BRKFN P 3 TYPE-IN P 2 X P 1 VAL P 0 BRKFIL F 10Q Y F 11Q EVENT) Wi`kWWWiWWiWcIg!M gH LHi oH JdgdgM LodgdgdgM LI UdgdgM LHi oH 1g%M WI WcIYlhH IHi hh(336Q PRINT 325Q TAB 302Q BREAK= 271Q BREAK2 255Q PRIN1 244Q PRIN2 235Q BREAK2 211Q BREAK= 203Q BREAK2 150Q BREAK2 122Q PRIN1 111Q PRIN2 102Q PRIN1 72Q BREAK2) (262Q ?= 225Q !EVAL 217Q EVAL 174Q RETURN 166Q !GO 160Q GO 141Q !OK 133Q OK 76Q { 63Q  15Q BREAKI 10Q BREAKI) ( 251Q " evaluated " 116Q " not finished} ") BREAK3A0001 D1 (NAME ERRORSET L (0 NIL) F 2 RESETVARSLST F 3 MACROY) Gg`RcRog HIdRHcR RkI Hci(77Q ERROR! 66Q NLEFT 57Q TAILP 31Q BREAK3A0001A0002) (37Q BREAKI 26Q INTERNAL 5 BREAKI 2 BREAKI) ( 23Q (BREAK3A0001A0002)) BREAK3 D1 (P 3 RESETSTATE P 2 MACROY P 0 OLDVALUE I 0 Y F 4 RESETVARSLST) =l d 1gHhhTcYog gIcgI KJ(70Q ERROR! 63Q APPLY 40Q BREAK3A0001 5 PRINTLEVEL) (54Q PRINTLEVEL 44Q ERROR 35Q INTERNAL 13Q PRINTLEVEL) ( 32Q (BREAK3A0001)) BREAK D1 (P 4 TEM P 3 L I 0 X) K0@ 6dK\ddgihdLLLK XI HZYJ YH(104Q LAST 60Q BREAK0 6 NLAMBDA.ARGS) (30Q IN) () BREAK0 D1 (P 7 Y P 6 X P 2 VAL P 1 Y P 0 X I 4 TAIL I 3 BRKFN I 2 COMS I 1 WHEN I 0 FN) * 0C`b@Z@dg.0@dNABC [L K]\M \KX9@YHI 0IdHO [L K]\M \K@Y+0HdNI [L K]\M \K0H;d0 IdNO _O)O__O[L K]\M \K _O@ X?@g @id oi @g @ihdD X @ob H`HHYC IYA IBh g@g YbHHH@gH @HHCgHA@Bhh @d`g@` @ggABh JhABh g@d`  @h@o @ggh(1031Q UNSAFE.TO.MODIFY 1014Q /SETATOMVAL 1010Q /DREMOVE 774Q /RPLACD 757Q /ADDPROP 736Q /SETATOMVAL 712Q /PUTD 653Q SAVED 620Q GETPROP 605Q /RPLACD 574Q /RPLACA 563Q /RPLACA 521Q EXPRP 475Q FNCHECK 461Q UNSAVEDEF 451Q PRIN1 440Q PRIN2 430Q GETPROP 416Q GETD 403Q LAST 373Q LAST 320Q BREAK0A 257Q LAST 233Q BREAK0A 176Q LAST 152Q BREAK0A 130Q BREAK0A 102Q LAST 56Q BREAK0) (1042Q broken 1037Q not 1005Q BROKENFNS 1000Q BROKENFNS 746Q BREAK0 743Q BRKINFO 732Q BROKENFNS 726Q BROKENFNS 720Q BROKENFNS 666Q PROGN 647Q BROKEN 615Q BRKINFO 611Q BREAK0 535Q BREAKFN 456Q EXPR 425Q EXPR 30Q IN 7 BREAKFN) ( 1026Q "break" 505Q (not a function) 445Q " unsaved. ") BREAK0A D1 (P 0 Z I 1 Y I 0 X F 1 WHEN F 2 COMS F 3 BRKFN) A@ XdQRS h(21Q BREAK0 7 CHNGNM) NIL () UNBREAK D1 (P 3 L I 0 X) S@ b#` `` bg g 0@dKK XI HZYJ YH(114Q LAST 70Q UNBREAK0 47Q /SETATOMVAL 40Q /SETATOMVAL 27Q REVERSE 3 NLAMBDA.ARGS) (44Q BRKINFOLST 35Q BROKENFNS 24Q BROKENFNS 17Q BRKINFOLST 12Q BROKENFNS) () UNBREAK0 D1 (P 6 VAL P 5 BRKINFO P 4 ALIAS P 3 FN I 1 TAIL I 0 FN F 7 EDITFX) 0@ dKg Kg Ki`=`9K`2K ,Kg #KlF`hA KlF`hAg KA8g 0WK)Ki oi gKh` Koi`KgK` Kg Kg K Kg KMgKLM` Kg LKg LLi NIHhZH&J(403Q CHNGNM 372Q GETPROP 356Q /REMPROP 346Q /SETATOMVAL 321Q /REMPROP 311Q UNBREAKIN 304Q GETPROP 274Q RESTORE 264Q /SETATOMVAL 261Q /DREMOVE 225Q /SETATOMVAL 222Q UNION 205Q PRIN1 174Q PRIN1 156Q BOUNDP 141Q FIXSPELL 120Q FIXSPELL 102Q GETPROP 71Q \DEFINEDP 34Q GETPROP 25Q GETPROP 6 PACK-IN-) (367Q ADVISED 353Q BRKINFO 342Q BRKINFOLST 332Q BRKINFOLST 316Q BROKEN-IN 301Q BROKEN-IN 271Q BROKEN 256Q BROKENFNS 252Q BROKENFNS 246Q LASTWORD 241Q DWIMFLG 217Q BROKENFNS 211Q BROKENFNS 153Q EDITFX 135Q GETD 130Q USERWORDS 112Q BROKENFNS 77Q EXPR 62Q BROKENFNS 54Q DWIMFLG 46Q BROKENFNS 31Q BRKINFO 22Q ALIAS) ( 233Q (not unbroken) 201Q " is currently being edited. ") REBREAK D1 (P 11Q Y P 10Q FN P 4 FN P 0 SPLST I 0 X)  @)0` d YJ I[ZK ZI bi` 0`dJIh[I&KX0@d0L bd `4O`_iO #OlKH OlK`hdg O_O=O`_3Ooh]N0M_^OYJI[Z|K ZI ^M(372Q LAST 362Q LAST 355Q REBREAK0 244Q FIXSPELL 222Q FIXSPELL 210Q \DEFINEDP 155Q PACK-IN- 74Q REBREAK0 57Q NLAMBDA.ARGS 47Q LAST 24Q REBREAK0 16Q REVERSE) (264Q BRKINFOLST 240Q GETD 233Q USERWORDS 176Q BRKINFOLST 167Q DWIMFLG 103Q BRKINFOLST 70Q BRKINFOLST 13Q BRKINFOLST) ( 277Q (- NO BREAK INFORMATION SAVED)) REBREAK0 D1 (P 5 X P 1 ALIAS P 0 FN I 0 INFO) e@@0@;d`HMggHM hgI"HM ZK J\[L [JgIhh(120Q LAST 74Q APPLY 54Q APPLY) (131Q IN 62Q BREAK0 46Q BREAKIN 41Q BREAK0 33Q LASTWORD 26Q DWIMFLG) () TRACE D1 (P 4 Y P 3 Z I 0 X) d0@ `` EdKKgoggKoghKKiL XI HZYJ YH(135Q LAST 111Q BREAK0 20Q NLAMBDA.ARGS) (72Q GO 57Q ?= 54Q TRACE 40Q IN 15Q LASTWORD 10Q DWIMFLG) ( 67Q (NIL) 46Q (TRACE ?= NIL GO)) BREAKINA0001A0002 D1 (NAME ERRORSET F 0 X F 1 WHERE F 2 BRK) PgQ` Roh i(30Q EDITE 13Q \APPEND2) (10Q NOBREAKIN 3 LC) ( 21Q (E (PROGN (/PUT FN (QUOTE BROKEN-IN) T) (/ADDPROP FN (QUOTE BRKINFO) (LIST WHERE WHEN BRKCOMS))) T)) BREAKINA0001 D1 (NAME ERRORSET P 3 TEM P 2 X P 1 BRK P 0 W F 4 WHERE F 5 FN F 6 EDITEMBEDTOKEN F 7 WHEN F 10Q BRKCOMS) i@U c g U Z Uoi U`gU` Toi gghcTTc{hTghbWiUT WhTdgg`V`hIhTggi o oid i ji HUhcHTdgdgdgtiq(313Q TERPRI 304Q POSITION 277Q PRINT 265Q BREAKINA0001A0002 255Q PRIN1 172Q BREAKINCOMMENT 105Q PRIN1 71Q /SETATOMVAL 47Q ERROR 35Q EXPRP 31Q GETD 23Q GETPROP 13Q FNCHECK) (355Q BEFORE 347Q AROUND 341Q AFTER 251Q searching... 244Q TTY: 226Q BREAKFN 220Q BREAKFN 215Q MBD 207Q AROUND 153Q ? 114Q TTY: 111Q BEFORE 65Q BROKENFNS 61Q BROKENFNS 54Q BROKENFNS 20Q BROKEN 3 UPFINDFLG) ( 272Q (not found) 262Q (BREAKINA0001A0002) 101Q (BEFORE) 43Q "not an expr.") BREAKIN D1 (P 1 MACROY P 0 MACROX I 3 BRKCOMS I 2 WHEN I 1 WHERE I 0 FN F 2 RESETVARSLST) Cg`RcRYog HIdRHcR RkI H(77Q ERROR! 66Q NLEFT 57Q TAILP 31Q BREAKINA0001) (37Q UPFINDFLG 26Q INTERNAL 5 UPFINDFLG 2 UPFINDFLG) ( 23Q (BREAKINA0001)) BREAKINCOMMENT D1 (I 1 WHERE I 0 FN) 0@dAdg`dg`g`A(51Q SHOULDNT) (45Q BREAKAFTER 40Q AFTER 34Q BREAKBEFORE 26Q BEFORE 20Q BREAKAROUND 12Q AROUND) () UNBREAKINA0001 D1 (NAME ERRORSET P 0 DEF F 1 FN) iQ H Ho Qh(30Q EDITE 17Q EXPRP 10Q CGETD) (3 UPFINDFLG) ( 25Q ((BIND (LPQ (I F BREAKFN T) (COMS (COND ((EQ (SETQ #1 (CAR (NLSETQ (## 4 2)))) BREAKAROUND) (QUOTE (XTR 2))) ((OR (EQ #1 BREAKBEFORE) (EQ #1 BREAKAFTER)) (QUOTE (ORR (BK UP (2)) DELETE))) (T (QUOTE ((ORR (NX) (!NX))))))))))) UNBREAKIN D1 (P 1 MACROY P 0 MACROX I 0 FN F 2 RESETVARSLST) Cg`RcRYog HIdRHcR RkI H(77Q ERROR! 66Q NLEFT 57Q TAILP 31Q UNBREAKINA0001) (37Q UPFINDFLG 26Q INTERNAL 5 UPFINDFLG 2 UPFINDFLG) ( 23Q (UNBREAKINA0001)) SAVED D1 (P 2 TEM P 1 TYP P 0 ARGS I 3 GS I 2 DF I 1 WHERE I 0 FN) 0C@g bB BdgdgihA@AC BB/A@AC BIgIgIgIdgg5 @ ICH bgIgIgIggHBh(230Q SHOULDNT 164Q SAVED1 155Q SMARTARGLIST 150Q FNTYP 100Q /PUT 63Q /PUT 25Q /PUTD 17Q PACK* 14Q GENSYM) (224Q NLAMBDA 217Q CFEXPR* 211Q CFEXPR 203Q FEXPR* 174Q FEXPR 143Q LAMBDA 134Q EXPR* 125Q EXPR 117Q CEXPR* 110Q CEXPR 43Q NLAMBDA 35Q LAMBDA 11Q B) () BREAKREVERT D1 (P 5 X P 4 I P 2 DEF P 1 ARGNAMES P 0 FN I 0 POS) @ !@ dgdgdgdggk@ iHh@did gm@d bHdl ZH djdk5H Y@ IkKi)]L@ hLkԼK[lH Yk@ JdgdgihggJogH djdHI\dkggHhgIo>dlggHhgIholggHhIoiHh@did H H dkdlggIgH djHIedkggHhgIoGdlggHhgIho&lggHhIIgIoiHoh@ m@d bdid (1002Q ENVAPPLY 771Q STKNTH 762Q STKARGS 740Q SHOULDNT 563Q ARGTYPE 531Q ARGTYPE 524Q SMARTARGLIST 517Q ENVEVAL 500Q SHOULDNT 332Q ARGTYPE 255Q STKARGNAME 247Q SMARTARGLIST 216Q STKARGNAME 166Q EQLENGTH 163Q STKNARGS 156Q SMARTARGLIST 140Q ARGTYPE 127Q GETD 111Q STKNTH 74Q ENVEVAL 55Q STKARG 12Q STKNAME 3 STKNAME) (723Q LIST 707Q QUOTE 704Q \SAFEAPPLY 657Q BREAKNARGS 650Q QUOTE 645Q \SAFEAPPLY 620Q LIST 611Q QUOTE 606Q \SAFEAPPLY 557Q BREAK1 553Q LAMBDA 546Q NLAMBDA 460Q QUOTE 455Q \SAFEAPPLY 430Q BREAKNARGS 421Q QUOTE 416Q \SAFEAPPLY 371Q LIST 362Q QUOTE 357Q \SAFEAPPLY 326Q BREAK1 315Q PROGN 312Q BREAK1 277Q NLAMBDA 271Q LAMBDA 100Q PROG 50Q BREAK1 41Q \SAFEEVAL 33Q \EVALFORM 25Q \EVAL 16Q EVAL) ( 746Q (NIL REVERT) 731Q ((QUOTE INTERNAL)) 667Q ((QUOTE INTERNAL)) 626Q ((QUOTE INTERNAL)) 471Q ((QUOTE INTERNAL)) 440Q ((QUOTE INTERNAL)) 377Q ((QUOTE INTERNAL))) SAVED1 D1 (I 2 ARGS I 1 FN I 0 TYP) @g@g@g@dgABg@g@g@dgggAhgBohg@g@g@dgggAhgBhohg@g@g@g ggAhBBgBoh(302Q HELP) (263Q LIST 247Q QUOTE 244Q \SAFEAPPLY 236Q SFEXPR* 230Q FSUBR* 222Q CFEXPR* 213Q FEXPR* 172Q BREAKNARGS 163Q QUOTE 160Q \SAFEAPPLY 151Q SEXPR* 142Q SUBR* 134Q CEXPR* 125Q EXPR* 106Q LIST 77Q QUOTE 74Q \SAFEAPPLY 65Q SFEXPR 56Q FSUBR 50Q CFEXPR 41Q FEXPR 27Q SEXPR 20Q SUBR 12Q CEXPR 3 EXPR) ( 271Q (QUOTE INTERNAL) 202Q (QUOTE INTERNAL) 114Q (QUOTE INTERNAL)) SMARTARGLISTA0001 D1 (NAME ERRORSET F 0 FN F 1 TEM) Pg ci(6 HELPSYS) (3 ARGS) () SMARTARGLIST D1 (P 1 DEF P 0 TEM I 2 TAIL I 1 EXPLAINFLG I 0 FN F 2 COMPILERMACROPROPS F 3 MSHASHFILENAME F 4 MSARGTABLE)  @dlA@ddg{ Xdd˿AH@g'YT@g'Y@ @o YA@R XS@T Xl@ihiB X)@ dgdgdgihI @Hbo XUA@g'Y@ S@ UihpHdgdgdgH I RAJI dldl8i6dgdgidgdgIIhI hI g o HHhI H I @gI HHI  HdgHhbb5hHH HgH h H(756Q \APPEND2 747Q LAST 732Q LAST 670Q /PUT 663Q ARGLIST 652Q SUBRP 641Q ARGLIST 633Q LENGTH 627Q NARGS 605Q SMARTARGLISTA0001 572Q \DEFINEDP 563Q ARGLIST 553Q \SIMPLIFY.CL.ARGLIST 453Q ARGTYPE 442Q CCODEP 435Q EXPRP 364Q GETD 354Q EXPRP 316Q GETLIS 277Q \SIMPLIFY.CL.ARGLIST 235Q ARGLIST 226Q FNCHECK 212Q GETTABLE 172Q GETMACROPROP 152Q GETLIS 140Q GETD 46Q \SIMPLIFY.CL.ARGLIST) (742Q ... 676Q = 646Q ARGNAMES 567Q HELPSYS 525Q DEFCOMMAND 517Q DEFDEFINER 505Q DEFUN 477Q DEFMACRO 420Q OPENLAMBDA 412Q NLAMBDA 404Q LAMBDA 340Q ARGUMENT-LIST 260Q NLAMBDA 252Q LAMBDA 244Q CL:LAMBDA 124Q FUNCTIONS 110Q EXPR 36Q CL:LAMBDA) ( 602Q (SMARTARGLISTA0001) 313Q (ARGNAMES) 147Q (EXPR CODE)) \SIMPLIFY.CL.ARGLIST D1 (L (0 LST)) 3@AHI\ddgLJ KhZHXK&NIL (32Q &AUX) () RESTORENAMESA0001 D1 (NAME ERRORSET F 0 NOLINKMESS F 1 DEF F 2 FN F 3 NEW F 4 XXX) icQSTR h(12Q CHANGENAME1) NIL () RESTORENAMES D1 (P 13Q MACROY P 12Q MACROX P 11Q Z P 10Q NEW P 7 DEF P 6 FN P 5 MACROY P 4 MACROX P 3 XXX I 0 FN F 14Q RESETVARSLST F 15Q NOLINKMESS)  0@g d1Ng Ng N KgN  O O`gO` KNg _NgO Ng Og O5gWWc W_og OcOdWOco,W WkO OOoNh KIHhZH&J@g (376Q /REMPROP 334Q \APPEND2 315Q ERROR! 303Q NLEFT 272Q TAILP 230Q RESTORENAMESA0001 166Q /REMPROP 155Q /REMPROP 145Q /PUTPROP 131Q REMOVE 126Q GETPROP 115Q /SETATOMVAL 112Q REMOVE 67Q /PUTD 57Q PACK* 47Q GETD 41Q GETP 30Q GETP 11Q GETPROP) (373Q NAMESCHANGED 225Q INTERNAL 176Q NOLINKMESS 163Q ALIAS 152Q NAMESCHANGED 140Q NAMESCHANGED 123Q NAMESCHANGED 107Q BROKENFNS 102Q BROKENFNS 75Q BROKENFNS 53Q -IN- 36Q BROKEN 25Q ADVISED 6 NAMESCHANGED) ( 326Q (not found in) 262Q (not defined) 222Q (RESTORENAMESA0001)) VIRGINFN D1 (P 6 X P 5 D P 4 X5 P 3 X4 P 2 X3 P 1 X2 P 0 X1 I 1 FLG I 0 FN) @g @g @g @g @g A`HK@id oi @ I@id oi g@h J@id oi @ @ ] YLVLI@g H@ ]ddL8MKM ibJ$AM JdNdg@ M ]M(322Q /DSUBST 316Q PACK* 274Q COPY 256Q UNBREAKIN 253Q COPY 230Q GETD 217Q GETPROP 177Q EXPRP 173Q GETD 166Q RESTORENAMES 161Q PRIN1 150Q PRIN2 136Q APPLY 124Q PRIN1 113Q PRIN2 101Q UNBREAK0 74Q PRIN1 63Q PRIN2 42Q GETPROP 33Q GETPROP 24Q GETPROP 15Q GETPROP 6 GETPROP) (312Q -IN- 214Q ADVISED 130Q UNADVISE 37Q EXPR 30Q BROKEN-IN 21Q NAMESCHANGED 12Q ADVISED 3 BROKEN) ( 155Q " names restored. " 120Q " unadvised. " 70Q " unbroken. ") RESTORE D1 (P 0 Y I 1 X I 0 FN) 2@A X@H @ H @A @@gAh(44Q /REMPROP 36Q /PUTD 31Q RELSTK 26Q STKPOS 22Q /PUTD 17Q GETD 7 GETPROP) (52Q NOT) () PACK-IN- D1 (P 5 Y P 1 TEM2 P 0 TEM1 I 0 X) @dh@@go@i H20HdMgIh ZK J\[L [JI20IdHgMh ZK J\[L [JHgI h(220Q PACK* 203Q LAST 157Q PACK-IN- 117Q LAST 73Q PACK-IN- 37Q ERROR) (214Q -IN- 147Q IN 63Q IN 24Q IN) ( 32Q "not of form (fn1 IN fn2)") BREAKNARGS D1 (P 1 BRKY P 0 BRKN I 0 BRKX) "@ HjIg@Hh IHkX(27Q \SAFEAPPLY 3 EVAL) (17Q ARG) () PROCEED-FROM-BREAK D1 (P 1 CASE P 0 KEYS F 2 *LAST-CONDITION* F 3 *DEBUG-IO*) 5R H So hdo hdoHi IdR (62Q PROCEED-WITH-DEFAULTS 50Q ASKUSER 33Q ASKUSEREXPLAIN 21Q FORMAT 3 CREATE-PROCEED-KEYLIST) NIL ( 42Q "Proceed how? " 30Q " " 16Q "~&No proceed cases enabled.~%%") PROCEED-WITH-DEFAULTS D1 (P 3 CNT P 2 FN P 1 ARGS P 0 NAME I 1 CONDITION I 0 CASE) U@ Hd" gHgAhhHoh !gl@AIdKk[nhl4 KJ(114Q \LISPERROR 52Q EVAL 15Q FBOUNDP 3 PROCEED-CASE-NAME) (60Q INVOKE-PROCEED-CASE 26Q QUOTE 22Q PROCEED-CASE) ( 42Q ((IGNORE &REST ARGS) :TEST TRUE ARGS)) CREATE-PROCEED-KEYLIST D1 (P 12Q KEYLIST P 11Q MESSAGE P 10Q CASE P 4 I P 0 CASES I 0 CONDITION) @ !HdkR KM O oJIO_hoO _LOgigLoO giggogOhhh_NOh^KLkԼO&(115Q CONCAT 66Q FORMAT 34Q LAST 3 COMPUTE-PROCEED-CASES) (136Q QUOTE 127Q PROGN 124Q RETURN 120Q CONFIRMFLG 103Q EXPLAINSTRING 77Q NOECHOFLG) ( 133Q (TERPRI T) 110Q " - " 61Q "~A " 41Q (("N" "No - don't proceed " NOECHOFLG T CONFIRMFLG T AUTOCONFIRMFLG T RETURN (TERPRI T)))) (PRETTYCOMPRINT BREAKCOMS) (RPAQQ BREAKCOMS ((FNS BREAK1 BREAK1A BREAKLOOP INTERLISP-BREAKLOOP BRKLASTPOS BREAKCOM BREAKPRINTVALUES BREAKCOM1 BREAKRESETFN \BREAKRESETRESTORE BREAKRETFROM BREAKRETEVAL BREAKEXIT \BREAKSTOP BREAK2 BREAK?= BREAK?=1 BREAK= STKPOZ STKPOZ1 STKPOZ2 BREAKREAD BAKTRACE BAKTRACE1 BREAK3 BREAK BREAK0 BREAK0A UNBREAK UNBREAK0 REBREAK REBREAK0 TRACE BREAKIN BREAKINCOMMENT UNBREAKIN SAVED BREAKREVERT SAVED1 SMARTARGLIST \SIMPLIFY.CL.ARGLIST RESTORENAMES VIRGINFN RESTORE PACK-IN- BREAKNARGS ) (FNS PROCEED-FROM-BREAK PROCEED-WITH-DEFAULTS CREATE-PROCEED-KEYLIST) (P (MOVD (QUOTE UNBREAK) ( QUOTE UNTRACE))) (INITVARS (MSARGTABLE) (MSHASHFILENAME) (COMPILERMACROPROPS (QUOTE (DMACRO ALTOMACRO BYTEMACRO MACRO))) (WBREAK)) (VARS BREAKAROUND BREAKBEFORE BREAKAFTER) (VARS (BREAKFN (QUOTE BREAK1)) BREAKI (NBREAKS 0) NOBREAKIN (BREAKDELIMITER (QUOTE " ")) (BRKFILE T) (BROKENFNS) (BRKINFOLST) BAKTRACELST (\USEBREAKRESETFORMS T) (BREAKHELPFLAG T)) ( INITVARS (BREAKTTBL (GETTERMTABLE))) (ADDVARS (LISPXFNS (RETFROM . BREAKRETFROM) (RETEVAL . BREAKRETEVAL)) (BREAKMACROS (BT (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 0 T)) (BTV (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 1 T)) (BTVPP (PROG ((SYSPRETTYFLG T)) (BAKTRACE LASTPOS NIL ( BREAKREAD (QUOTE LINE)) 1 T))) (BTV* (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 7 T)) (BTV+ ( BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 5 T)) (BTV! (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE )) 39 T)) (PR (PROCEED-FROM-BREAK))) (NOBREAKS GO QUOTE *) (BREAKCOMSLST BT VALUE ?= @ EVAL OK GO RETURN BTV BTV* BTV! ARGS !EVAL !OK !GO EDIT UB = -> IN? ^ ~ %) (BREAKRESETFORMS (INTERRUPTABLE T) ( SETTERMTABLE BREAKTTBL))) (P (MOVD? (QUOTE EVAL) (QUOTE \SAFEEVAL)) (MOVD? (QUOTE APPLY) (QUOTE \SAFEAPPLY)) (MOVD? (QUOTE APPLY*) (QUOTE \SAFEAPPLY*))) (GLOBALVARS NOBREAKIN BAKTRACELST BREAKDELIMITER BRKFILE CLEARSTKLST BREAKCOMSLST BRKFILE BREAKMACROS LISPXCOMS LISPXHISTORY BREAKRESETFORMS NOSPELLFLG BREAKI BREAKHELPFLAG UPFINDFLG CLISPARRAY BRKINFOLST LASTWORD DWIMFLG USERWORDS GLOBALVARS BREAKFN BROKENFNS BREAKAROUND BREAKBEFORE BREAKAFTER) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA TRACE REBREAK UNBREAK BREAK BREAK3) (NLAML BREAKNARGS BREAKIN BREAK1) (LAMA))))) (MOVD (QUOTE UNBREAK) (QUOTE UNTRACE)) (RPAQ? MSARGTABLE) (RPAQ? MSHASHFILENAME) (RPAQ? COMPILERMACROPROPS (QUOTE (DMACRO ALTOMACRO BYTEMACRO MACRO))) (RPAQ? WBREAK) (RPAQQ BREAKAROUND broken-around) (RPAQQ BREAKBEFORE broken-before) (RPAQQ BREAKAFTER broken-after) (RPAQQ BREAKFN BREAK1) (RPAQQ BREAKI 3) (RPAQQ NBREAKS 0) (RPAQQ NOBREAKIN ((COMS (COND ((SOME (CDR L) (FUNCTION (LAMBDA (X) (MEMB (CAR X) NOBREAKS)))) (ERROR!) ) ((CAR (NLSETQ (SELECTQ (## 1 !0 BK) ((LAMBDA NLAMBDA) T) NIL))) (ERROR!)) (T (SELECTQ (## !0 1) ( COND 1) (SELECTQ (AND (NEQ (##) (## !0 2)) (NEQ (##) (## !0 -1)) 1)) NIL)))) (IF (NEQ (CAR WHERE) ( QUOTE AROUND)) (MARK (>*) (IF (AND (NEQ (##) (## _)) (LISTP (##))) ((E (PROGN (PRIN1 (QUOTE "break inserted ") T) (PRIN1 (CAR WHERE) T) (SPACES 1 T) (## P)) T)) NIL)) NIL))) (RPAQQ BREAKDELIMITER " ") (RPAQQ BRKFILE T) (RPAQQ BROKENFNS NIL) (RPAQQ BRKINFOLST NIL) (RPAQQ BAKTRACELST ((APPLY (**BREAK** LISPX ERRORSET BREAK1A ERRORSET BREAK1) (**TOP** LISPX ERRORSET EVALQT T) (**EDITOR** LISPX ERRORSET ERRORSET ERRORSET EDITL1 EDITL0 ERRORSET ((ERRORSET ERRORSET ERRORSET EDITL1 EDITL0 ERRORSET) -) EDITL ERRORSET ERRORSET EDITE ((EDITF) (EDITV) (EDITP) -)) ( **USEREXEC** LISPX ERRORSET ERRORSET USEREXEC)) (EVAL (**BREAK** LISPX ERRORSET BREAK1A ERRORSET BREAK1) (**TOP** LISPX ERRORSET EVALQT T) (**EDITOR** ((MAPCAR APPLY) (ERRORSET LISPX)) ERRORSET ERRORSET ERRORSET EDITL1 EDITL0 ERRORSET ((ERRORSET ERRORSET ERRORSET EDITL1 EDITL0 ERRORSET) -) EDITL ERRORSET ERRORSET EDITE ((EDITF) (EDITV) (EDITP) -)) (**USEREXEC** ERRORSET LISPX ERRORSET ERRORSET USEREXEC)) (PROGN **BREAK** EVAL ((ERRORSET BREAK1A ERRORSET BREAK1) (BREAK1))) (BLKAPPLY **BREAK** PROGN EVAL ERRORSET BREAK1A ERRORSET BREAK1) (*PROG*LAM (NIL EVALA *ENV*) (NIL CLISPBREAK1)))) (RPAQQ \USEBREAKRESETFORMS T) (RPAQQ BREAKHELPFLAG T) (RPAQ? BREAKTTBL (GETTERMTABLE)) (ADDTOVAR LISPXFNS (RETFROM . BREAKRETFROM) (RETEVAL . BREAKRETEVAL)) (ADDTOVAR BREAKMACROS (BT (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 0 T)) (BTV (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 1 T)) (BTVPP (PROG ((SYSPRETTYFLG T)) (BAKTRACE LASTPOS NIL (BREAKREAD ( QUOTE LINE)) 1 T))) (BTV* (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 7 T)) (BTV+ (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 5 T)) (BTV! (BAKTRACE LASTPOS NIL (BREAKREAD (QUOTE LINE)) 39 T)) (PR ( PROCEED-FROM-BREAK))) (ADDTOVAR NOBREAKS GO QUOTE *) (ADDTOVAR BREAKCOMSLST BT VALUE ?= @ EVAL OK GO RETURN BTV BTV* BTV! ARGS !EVAL !OK !GO EDIT UB = -> IN? ^ ~ %) (ADDTOVAR BREAKRESETFORMS (INTERRUPTABLE T) (SETTERMTABLE BREAKTTBL)) (MOVD? (QUOTE EVAL) (QUOTE \SAFEEVAL)) (MOVD? (QUOTE APPLY) (QUOTE \SAFEAPPLY)) (MOVD? (QUOTE APPLY*) (QUOTE \SAFEAPPLY*)) (PUTPROPS BREAK COPYRIGHT ("Xerox Corporation" T 1982 1983 1984 1985 1986)) NIL