(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "25-Jan-98 13:09:41" ("compiled on " {DSK}sources>EDIT.;1) "30-Mar-95 20:33:04" bcompl'd in "Medley 14-Aug-95 ..." dated "14-Aug-95 15:27:48") (FILECREATED "16-May-90 16:23:16" {DSK}local>lde>lispcore>sources>EDIT.;2 138537 changes to%: ( VARS EDITCOMS) previous date%: "23-Nov-87 15:31:02" {DSK}local>lde>lispcore>sources>EDIT.;1) TTY/EDITLA0001 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 L F 3 COMS F 4 MESS F 5 SI::NLSETQ-VALUE) i@RSTi chc g(13 EDITL0) (24 :NORMAL) () TTY/EDITL :D8 (P 17 *CONDITION-HANDLER-BINDINGS* P 16 SI::*NLSETQFLAG* P 15 *PROCEED-CASES* P 14 SI::NLSETQ-VALUE P 12 EDITLISPFLG P 10 EDITHIST0 P 7 LASTP2 P 6 LASTP1 P 5 UNFIND P 4 UNDOLST1 P 2 UNDOLST P 1 MARKLST P 0 LASTAIL I 4 EDITCHANGES I 3 MESS I 2 ATM I 1 COMS I 0 L F 18 LISPXHIST F 19 READBUF F 20 *PROCEED-CASES* F 21 *CONDITION-HANDLER-BINDINGS*) K@@ AgAc&hbB$A!`i_` j _@ _dgg _ IBOBg _ -`d_OgO_ h%@ObOOZdhJZO`W(ioW*O gOLi@LJZJKW$g@JKhW$ Og`j O @h(327 ERROR! 318 SETTOPVAL 309 CLOCK 288 UNDOSAVE 236 TTY/EDITLA0001 161 LAST 124 LAST 116 GETPROP 96 LAST 88 GETPROP 69 LAST 60 CLOCK 53 LISPXWATCH) (303 EDITIME 298 EDITIME 273 UNDOEDITL 242 :NORMAL 214 SI::NLSETQ-PROCEED-CASE 148 EDIT 133 LISPXHISTORY 111 EDIT-SAVE 83 LASTVALUE 78 EDIT 48 EDITCALLS 37 EDITHISTORY 15 START) ( 223 (CL:ERROR . SI::NLSETQHANDLER)) EDITL0 :D8 (L (2 MESS) P 9 ORIGFLG P 8 COPYFLG P 7 COM P 6 COM0 P 5 L0 P 4 EDITHIST P 3 TOFLG P 2 LCFLG P 1 FINDFLAG P 0 LISPXID I 3 EDITLFLG I 1 COMS I 0 L) Q g Ai_A @i ji Boid i `(65 CLBUFS 58 EDITL1 52 PRIN1 36 TERPRI 27 POSITION 19 \EDITBLOCK/EDITCOMS) (77 LISPXBUFS 72 LISPXBUFS 4 *) ( 45 "edit ") EDITL1A0002A0003A0004 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 COM F 3 SI::NLSETQ-VALUE) i@Ri hcg(11 \EDITBLOCK/EDITCOM) (20 :NORMAL) () EDITL1A0002A0003 :D8 (P 5 *CONDITION-HANDLER-BINDINGS* P 4 SI::*NLSETQFLAG* P 3 *PROCEED-CASES* P 2 SI::NLSETQ-VALUE P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 6 *PROCEED-CASES* F 7 *CONDITION-HANDLER-BINDINGS*) *i@`VioWK gJ(29 EDITL1A0002A0003A0004) (35 :NORMAL 9 SI::NLSETQ-PROCEED-CASE) ( 17 (CL:ERROR . SI::NLSETQHANDLER)) EDITL1A0002 :D8 (P 2 USERHANDLE P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 3 EDITHIST F 4 UNDOLST1 F 5 COM F 6 EDITHIST0 F 7 L0 F 8 COM0 F 9 UNDOLST F 10 FINDFLAG F 11 L F 12 ATM)  i@gZhchcci gh` i` c WcUdc`U g TWWTcWcS)TVggWihhS hc i `UdTdgid oi S-gUhS (239 LISPXPUT 218 PRIN1 206 PRIN2 168 CLBUFS 162 TERPRI 149 LISPXPUT 95 EDITL1A0002A0003 84 \EDITBLOCK/EDITSAVE 56 LISPXREAD 44 PROMPTCHAR 27 FRESHLINE) (231 *ERROR* 195 ERROR%: 180 LISPXBUFS 175 LISPXBUFS 135 EDITL2 130 *FIRSTPRINT* 90 EDITSTOP 77 EDITHISTORY 51 EDITRDTBL 39 EDITHISTORY 33 * 9 EDITL1) ( 212 " ? ") EDITL1 :D8 (P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 1 EDITHIST I 0 UNDOLST1 F 3 *PROCEED-CASES*) `SI gH(18 EDITL1A0002) (24 :NORMAL 7 SI::NLSETQ-PROCEED-CASE) () UNDOEDITL :D8 (L (2 ULST0 1 ULST) P 2 EDITCHANGES P 1 COM P 0 UNDOLST1 I 0 L F 5 LISPXHIST) SPAd[K \BLhHoid ABB Ug@i@HhhU h(79 UNDOSAVE 53 \EDITBLOCK/EDITSMASH 42 PRINT 16 \EDITBLOCK/UNDOEDITCOM) (61 UNDOEDITL) ( 35 "UNDOEDITL Bug -- Show Development") \EDITBLOCK/EDITCOM :D8 (I 1 TYPEIN I 0 C F 0 L F 1 FINDFLAG F 2 COM) @c`dtdgdg\oi @ikl oi Pikl P `gghi@h i @ Q@d3+P cEghc@ /c@ $@3@Ah @dAh P(209 \EDITBLOCK/EDITDEFAULT 203 \EDITBLOCK/EDITCOML 189 \EDITBLOCK/EDITCOMA 173 EDITQF 162 EDITBF 140 \EDITBLOCK/EDIT1F 124 EDITRACEFN 116 TERPRI 109 APPLY 78 BPNT0 62 PRIN1 50 BPNT0 39 PRIN1) (149 BF 97 BREAK1 89 BREAK 84 EDITRACEFN 24 BREAK 16 TRACE 7 EDITRACEFN) ( 56 "C-EXP = " 33 "COM = ") \EDITBLOCK/EDITCOMAA0005 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 L F 3 SI::NLSETQ-VALUE) i@Rhgd hcg(17 EDITL0) (26 :NORMAL 11 tty%:) () \EDITBLOCK/EDITCOMA :D8 (P 12 L P 11 *READTABLE* P 10 PRETTYFLG P 9 *CONDITION-HANDLER-BINDINGS* P 8 SI::*NLSETQFLAG* P 7 *PROCEED-CASES* P 6 SI::NLSETQ-VALUE P 5 UNDOLST P 4 UNDOLST1 P 3 COPYFLG I 1 COPYFLG I 0 C F 14 L F 15 LASTP1 F 16 MARKLST F 17 UNDOLST F 18 UNFIND F 19 UNDOLST1 F 20 ATM F 21 EDITLFLG F 22 LASTP2 F 23 TYPEIN F 24 EDITHIST F 25 COM0 F 26 EDITCHANGES F 27 ORIGFLG F 28 L0 F 29 FINDFLAG F 30 COMS F 31 EDITESTATS F 32 LCFLG F 33 LISPXHIST F 34 EDITLISPFLG F 35 COM F 36 *PROCEED-CASES* F 37 *CONDITION-HANDLER-BINDINGS*) Z0W6)@` X@` XiH @dg@g@dg{W&W2W8W&c&W"c"W0W4@dgѿW*W*i[W(d3@W(g ggW W W"WX WB0W0W(ggW(hhW0 gWi gHh oW*W*idW"ZJdW4hQW&Bdgdgdih-Jggoi @gSW*iooi ,W()ggW(gWW W"W$ gWi g}W2cF0`WHioWJ O gNMYgIW&c&H&gg X Hoi cH gh @dg4W."W> icDdd ghdi W@@ g$WWWc,WcWiklW @dg%WWWc,WcWilddW g@dg9WWWc,Wci` Wh@ghhdi i gWdc$ c@dg&WdWcW gWW c @dg%W.`@ W. gid @dghW"c"g hW"Xoi hdH @dgW DWWc$W cgW$)WbW$c@,@c$@dg%WW,WW,cWWcgW WWc$W cW c @g@dgDW.4i` Xd @dgH gH WJ@`i Z@`i Z+JY@IJ 3I@Ji @dgJH HgHgHgggHW.@ hh dgHW. dgW.c4Hi c.dgHIi dgHIk dgdgHI@gki dgHi Z@did Jdgnic@W6WD Hd3HHi gW6(0@d ONh_N&_O@ghh bhbdg2W.dW.@@A@ @ dgW0W.W0cFW.c0@ dgHI dg@dc2 hdggHI dg@g@Hg dgHI dg-W.dd`ddH ZJW.c.dgK `W8ioW: O gOI @@ dg@@W. dg@W. dg@W. dg@W. dg@@W. dg@W. dgnHd*` `Hh Hh@+@h`i Z#`Hh H@`@J@hdgH dgjH dg@ dgh@ dgh@ dgdghH@ dg#dgdgdgdg@h@ dgh@@ dgdg@@g dg@ dg@ dgW.dH Odd`_Id3IOZIdg0 `W8ioW: O gO!gIdgIOO Oc4OO_sHc2hc.dgHI dg@@ dg0@ dg@di c2 hdg@ dgi@ hg WB!g $@ (1779 \EDITBLOCK/EDITDEFAULT 1768 SI::RESETUNWIND 1763 \MVLIST 1758 \EDITBLOCK/EDITCOMLA0008 1733 \EDITBLOCK/EDITCOMS 1712 \EDITBLOCK/EDITCOMS 1689 \EDITBLOCK/EDITCOM 1682 \EDITBLOCK/EDITCOM1 1661 \EDITBLOCK/EDITCOMS 1642 EDITSW 1620 \EDITBLOCK/EDITBELOW 1599 ERROR! 1569 EDIT4E 1523 \EDITBLOCK/EDITCOMLA0007 1443 EDITFPAT 1418 EDLOCL 1401 \EDITBLOCK/EDLOC 1384 \EDITBLOCK/EDRPT 1350 EDITMV 1328 EDIT%: 1274 \EDITBLOCK/EDITTO 1248 EDITXTR 1230 EDITMBD 1212 \EDITBLOCK/EDOR 1195 \EDITBLOCK/EDIT* 1177 \EDITBLOCK/EDIT* 1129 \NCONC2 1112 \EDITBLOCK/EDITMAC 1085 \NCONC2 1070 \EDITBLOCK/EDITMAC 1044 \EDITBLOCK/EDIT.BO 1023 \EDITBLOCK/EDIT.BI 997 \EDITBLOCK/EDIT.LO 976 \EDITBLOCK/EDIT.LI 955 \EDITBLOCK/EDIT.RO 934 \EDITBLOCK/EDIT.RI 908 ERROR! 902 \EDITBLOCK/EDITCOMS 886 \EDITBLOCK/EDITCOMS 866 \EDITBLOCK/EDITCOMLA0006 814 \EDITBLOCK/EDITNTH 774 EDITBF 757 EDIT4F 721 EDIT4F 692 EDITQF 670 EDIT4F 653 \EDITBLOCK/BPNT 619 \EDITBLOCK/EDITNCONC 614 \EDITBLOCK/EDITAPPEND 606 COPY 585 ERROR! 551 \EDITBLOCK/EDITCOM1 508 LISPX/ 485 \EDITBLOCK/EDITCOM1 469 LISPXWATCH 444 PRINT 430 \EDITBLOCK/EDITCOM1 412 EDIT4F 374 EDIT4F 356 EDIT4F 336 \EDITBLOCK/EDITCOM1 315 SET 297 \EDITBLOCK/EDITCOM1 285 \EDITBLOCK/EDLOC 235 ERROR! 213 SUBPAIR 197 \EDITBLOCK/EDITCOMS 192 SUBST 171 \EDITBLOCK/EDITMAC 156 \EDITBLOCK/EDITMAC 137 EDITCONT 111 \EDITBLOCK/EDIT2F 95 \EDITBLOCK/EDITTO) (1753 SI::RESETUNWIND 1740 RESETVAR 1719 ORIGINAL 1702 COMSQ 1668 COMS 1649 BIND 1627 SW 1611 BELOW 1554  1544  1529 :NORMAL 1501 SI::NLSETQ-PROCEED-CASE 1489 IF 1458 CLISPTRANFLG 1425 _ 1408 LCL 1391 LC 1378 LPQ 1365 LPQ 1357 LP 1335 MV 1315 BEFORE 1307 AFTER 1299 %: 1290 B 1281 A 1263 TO 1255 THRU 1237 XTR 1219 MBD 1202 ORR 1184 BK 1168 NX 1147 USERMACROS 1141 USERMACROS 1120 EDITCOMSL 1106 USERMACROS 1077 EDITCOMSA 1065 USERMACROS 1051 M 1030 BO 1004 BI 983 LO 962 LI 941 RO 915 RI 872 :NORMAL 844 SI::NLSETQ-PROCEED-CASE 833 IF 799 CLISPTRANFLG 781 NTH 764 BF 752 N 742 *ANY* 728 ORF 713 == 705 F= 677 FS 660 F 626 P 569 N 540 EVAL 490 MAPCAR 452 I 419 E 402 RC 389 RC1 381 RC 363 R1 345 R 322 \ 304 MARK 271 SAVESET 265 SET 258 %#3 250 %#2 242 %#1 223 S 165 EDITMACROS 150 USERMACROS 132 N 119 |..| 85 THRU 68 through 60 thru 51 to 42 THROUGH 33 THRU 24 TO) ( 1510 (CL:ERROR . SI::NLSETQHANDLER) 853 (CL:ERROR . SI::NLSETQHANDLER)) \EDITBLOCK/EDITMAC :D8 (L (2 FLG 1 LST 0 C)) $ Ah@AXHBIIhIAbNIL NIL () \EDITBLOCK/EDITCOMS :D8 (I 0 COMS F 0 L) @@@ P@ @b(21 \EDITBLOCK/EDITCOM 10 \EDITBLOCK/EDITCOM) NIL () \EDITBLOCK/EDIT!UNDO :D8 (L (1 !UNDOFLG 0 PRINTFLG) F 2 UNDOLST) s`` RHHdI8hd+dg"dggAH@ AiYHXHoid oi h(111 PRIN1 99 PRIN1 72 \EDITBLOCK/UNDOEDITCOM 15 LISPXWATCH) (60 UNDO 52 UNBLOCK 43 !UNDO 10 P.A.STATS 4 EDITHISTORY) ( 105 "nothing saved. " 92 "blocked ") \EDITBLOCK/UNDOEDITCOM :D8 (L (1 FLG 0 X) P 1 L P 0 C F 2 L F 3 COM) @0XgHR @ oi hc@c@ @h@@ A*Ho3HHoid oi i(132 PRIN1 120 PRIN1 88 \EDITBLOCK/EDITSMASH 75 \EDITBLOCK/UNDOEDITCOM1 59 ERROR! 49 PRIN1 34 FLAST 25 FLAST) (16 ALREADY) ( 126 " undone. " 112 "(--)" 100 "already" 43 "different expression. ") \EDITBLOCK/UNDOEDITCOM1 :D8 (L (0 X)) T@KdHdgd ,gH HHH ` h(74 LISPXWATCH 63 \EDITBLOCK/EDITSMASH 48 \EDITBLOCK/EDITCOM1 26 \EDITBLOCK/UNDOEDITCOM1) (69 EDITUNDOSTATS 39 LISPXHIST 16 GROUPED) () \EDITBLOCK/EDITCOM1 :D8 (L (1 FLG 0 LST) P 0 LISPXHIST F 3 UNDOLST1 F 4 LISPXHIST F 5 EDITLISPFLG F 6 TYPEIN) pgjhT!Aic V@ @ -@'dZIJJJ JJ gH XgHScI(92 MEMB 76 APPLY 66 /RPLNODE 35 EVAL 28 LISPX/) (102 LISPXHIST 86 SIDE 4 SIDE) () \EDITBLOCK/EDITSMASH :D8 (L (2 D 1 A 0 OLD) P 0 L F 2 L F 3 EDITCHANGES F 4 UNDOLST1) @`@Rl`SSi@d@Tc`` @A@BRH@UH`(HYHII 5HH I #`Hd` h` HX(162 /PUTHASH 149 GETHASH 127 /RPLACA 121 MEMB 109 /RPLNODE 60 LISPXWATCH 7 ERROR!) (157 CLISPARRAY 144 CLISPARRAY 134 CLISPARRAY 88 CLISPTRANFLG 55 EDITUNDOSAVES 49 EDITHISTORY 23 EDITSMASHUSERFN 13 EDITSMASHUSERFN) () \EDITBLOCK/EDITSMASH1 :D8 (L (0 X) F 1 L F 2 UNDOLST1 F 3 ATM) t`mQH@-QbQ@QHdd` >X@bgg@d` `hhRc@S` h(112 PUTHASH 82 GETHASH 50 GETHASH) (107 CHANGESARRAY 87 CHANGESARRAY 77 CHANGESARRAY 70 /PUTHASH 65 LISPXHIST 45 CHANGESARRAY 4 CHANGESARRAY) () \EDITBLOCK/EDITNCONC :D8 (L (1 Y 0 X)) 3@Ad dA `Ad (43 \EDITBLOCK/EDITSMASH1 27 \EDITBLOCK/EDITSMASH 19 LAST 12 ERROR!) (33 CHANGESARRAY) () \EDITBLOCK/EDITAPPEND :D8 (L (0 X)) @d@ (12 \EDITBLOCK/EDITAPPEND) NIL () \EDITBLOCK/EDIT1F :D8 (I 1 L I 0 C F 1 LASTAIL F 2 COM) m@jAAocAd`AAX@jH@ cAHj@ cA(100 ERROR! 93 NLEFT 77 ERROR! 69 NTH 37 ERROR! 25 ERROR!) (46 CLISPTRANFLG) ( 18 (ERROR%: . "can't - at top. ")) \EDITBLOCK/EDIT2F :D8 (L (1 X 0 N) F 2 L F 3 COPYFLG F 4 COM) ?Rdd`HSA Ah b@dj#kH@k YI@cAjAHj@ Y @k_HdHdHP@mIXHAHH A AK`Ad HdAH "IdI HdR R h@kIXHAH A A`Ad HdAH (314 \EDITBLOCK/EDITSMASH 309 \NCONC2 292 \EDITBLOCK/EDITSMASH1 272 \EDITBLOCK/EDITSMASH1 264 \EDITBLOCK/EDITSMASH 244 \EDITBLOCK/EDITSMASH1 234 TAILP 223 \EDITBLOCK/EDITSMASH 209 \EDITBLOCK/EDITSMASH 204 \NCONC2 187 \EDITBLOCK/EDITSMASH1 167 \EDITBLOCK/EDITSMASH1 159 \EDITBLOCK/EDITSMASH 130 ERROR! 113 ERROR! 104 NTH 70 NTH 48 \APPEND2 40 COPY 30 ERROR!) (282 CHANGESARRAY 177 CHANGESARRAY 12 CLISPTRANFLG) () \EDITBLOCK/EDITNTH :D8 (L (1 N 0 X) F 0 COM) z@`@bAd3%@ TA@h b@ AA@ jAjA@jA  @A Ac(119 ERROR! 109 NTH 101 ERROR! 94 \FZEROP 87 NLEFT 63 TAILP 54 MEMB 46 \EDITBLOCK/EDITELT 35 MEMB 8 ERROR!) (15 CLISPTRANFLG) () \EDITBLOCK/BPNT :D8 (L (0 X) F 4 L) `@@[j"KT@ @dk) TTY3jIIk؂IkYHiI@lJ (93 BPNT0 61 ERROR! 39 \FZEROP 23 \EDITBLOCK/EDITNTH) NIL () BPNT0A0010 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 X F 3 FILE F 4 CARLVL F 5 SI::NLSETQ-VALUE F 6 CDRLVL F 7 TAIL) i@RSTVW hc g(16 LVLPRINT) (25 :NORMAL) () BPNT0 :D8 (P 3 *CONDITION-HANDLER-BINDINGS* P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 4 TAIL I 3 CDRLVL I 2 CARLVL I 1 FILE I 0 X F 4 *PROCEED-CASES* F 5 *CONDITION-HANDLER-BINDINGS* F 6 COM) 3`TioUI gHhc h(46 ERROR! 26 BPNT0A0010) (32 :NORMAL 7 SI::NLSETQ-PROCEED-CASE) ( 15 (CL:ERROR . SI::NLSETQHANDLER)) \EDITBLOCK/EDIT.RI :D8 (L (2 X 1 N 0 M) P 2 L F 3 L) X B@ XdA YHdHSId H HdIH Id h(84 \EDITBLOCK/EDITSMASH 75 \EDITBLOCK/EDITSMASH 70 \EDITBLOCK/EDITNCONC 57 \EDITBLOCK/EDITSMASH1 45 \EDITBLOCK/EDITSMASH1 28 ERROR! 18 \EDITBLOCK/EDITNTH 9 \EDITBLOCK/EDITNTH) NIL () \EDITBLOCK/EDIT.RO :D8 (L (1 X 0 N)) 8A@ bdddA dA Ad A (53 \EDITBLOCK/EDITSMASH1 46 \EDITBLOCK/EDITSMASH 38 \EDITBLOCK/EDITSMASH 29 LAST 21 ERROR! 6 \EDITBLOCK/EDITNTH) NIL () \EDITBLOCK/EDIT.LI :D8 (L (1 X 0 N)) -A@ bd AdA A A (42 \EDITBLOCK/EDITSMASH1 35 \EDITBLOCK/EDITSMASH1 28 \EDITBLOCK/EDITSMASH 16 ERROR! 6 \EDITBLOCK/EDITNTH) NIL () \EDITBLOCK/EDIT.LO :D8 (L (1 X 0 N)) 4A@ bdddAdA Ad h(43 \EDITBLOCK/EDITSMASH1 34 \EDITBLOCK/EDITSMASH 21 ERROR! 6 \EDITBLOCK/EDITNTH) NIL () \EDITBLOCK/EDIT.BI :D8 (L (2 X 1 N 0 M)) N A@bBA XYB@ bH hB Hd BdBI B (74 \EDITBLOCK/EDITSMASH1 66 \EDITBLOCK/EDITSMASH 53 \EDITBLOCK/EDITSMASH 43 TAILP 35 ERROR! 25 \EDITBLOCK/EDITNTH 15 \EDITBLOCK/EDITNTH) NIL () \EDITBLOCK/EDIT.BO :D8 (L (1 X 0 N)) 1A@ bddAdAA A (46 \EDITBLOCK/EDITSMASH1 39 \EDITBLOCK/EDITSMASH 34 \EDITBLOCK/EDITNCONC 19 ERROR! 6 \EDITBLOCK/EDITNTH) NIL () \EDITBLOCK/EDITDEFAULT :D8 (L (0 EDITX) P 2 LISPXHIST F 4 TYPEIN F 5 COMS F 6 COM F 7 READBUF F 8 EDITHIST F 9 LCFLG) ;@@3W"@``@T=@`4@ di@ `X@H @hT `@ X@d @ Xd`D@`sHcT-``@k @ko X H `H h bW"`@`HbT`@h @UUdU Ub@gT@i Ty`r@ j`@hi Xdddd`H`W chi'g@ W`Hg h`T@U@dm lP@ X }H XgSHgJHgAHg8Hg/Hg&HgHgHgHdgi3Hg Hg@lF`Thi XT}`@h u#TH`WcUHHU HTUHU Hc W.T+`$`d``kV VT @UUXd&@i=`@lF`Thi Y Hi HIIHHIH TUdU UHbi `@d``@ Xh@fg@do @kL@g@o @l-`!@[K3@lF`Thi X`g h@HH@ @H@ @c T (1080 \EDITBLOCK/EDITCOM 1069 \EDITBLOCK/EDITSMASH 1058 \EDITBLOCK/EDITSMASH 1027 ERROR! 1019 FIXSPELL 977 \EDITBLOCK/EDITDEFAULT1 947 \EDITBLOCK/EDITDEFAULT1 909 EDITUSERFN 874 \EDITBLOCK/EDITSAVE1 861 \EDITBLOCK/EDITSMASH 846 \EDITBLOCK/EDITSMASH 822 \EDITBLOCK/EDITSAVE1 812 FIXSPELL 767 \EDITBLOCK/EDITCOM 759 \EDITBLOCK/EDITSAVE 707 \EDITBLOCK/EDITSMASH 692 \EDITBLOCK/EDITSMASH 658 READLINE 639 FIXSPELL 611 \EDITBLOCK/EDITDEFAULT1 504 MKATOM 496 GLC 490 MKSTRING 476 NTHCHARCODE 446 \EDITBLOCK/EDITH 422 \EDITBLOCK/EDITDEFAULT1 403 \APPEND2 358 READLINE 342 FNTYP 323 \EDITBLOCK/EDITSAVE1 310 ERROR! 289 \EDITBLOCK/EDITSMASH 270 READLINE 220 READLINE 213 MKATOM 201 GNC 194 \EDITBLOCK/EDITDEFAULT1 188 RPLSTRING 171 NTHCHAR 120 U-CASE 111 U-CASEP 97 EDITUSERFN 84 \EDITBLOCK/EDITCOM 73 \EDITBLOCK/EDITRAN 54 EDITQF 41 \EDITBLOCK/EDITH) (1038 ABORT 1033 REREADFLG 1009 EDITCOMSL 989 DWIMFLG 960 %# 928 ! 902 EDITUSERFN 891 HISTORYCOMS 882 EDITHISTORY 802 EDITCOMSL 792 DWIMFLG 747 EDITHISTORY 741 EDITHISTORY 731 EDITHISTORY 724 REREADFLG 672 HISTSTR0 650 EDITRDTBL 629 EDITCOMSA 618 P 606 P 591 DW 582 CL 573 REDO 564 UNDO 555 !NX 546 BK 537 NX 528 UP 519 _ 510 ^ 453 DWIMFLG 441 !E 431 EDITHISTORY 416 E 395 HISTSTR0 385 EDITCOMSL 349 EDITRDTBL 334 REREADFLG 303 %: 262 EDITRDTBL 247 EDITCOMSL 234 EDITHISTORY 207 EDITRDTBL 164 LPARKEY 155 REREADFLG 139 EDITCOMSL 127 EDITCOMSA 90 EDITUSERFN 61 EDITOPS 32 HISTORYCOMS 21 EDITHISTORY) ( 972 (3) 942 (1) 183 "(") \EDITBLOCK/EDITDEFAULT1 :D8 (L (1 Y 0 X)) Joi @d @i id Aki Aid i ` (71 LISPXWATCH 61 TERPRI 54 PRIN2 45 SPACES 34 PRIN2 26 PRIN1 17 STRINGP 10 PRIN1) (66 SPELLSTATS1) ( 4 "=") %## :D8 (P 4 UNDOLST1 P 3 UNFIND P 2 MARKLST P 1 LASTAIL P 0 L I 0 COMS F 5 L F 6 LASTAIL F 7 MARKLST F 8 UNFIND) UVWW@HH@ (19 EDITL0) NIL () \EDITBLOCK/EDUP :D8 (F 3 L F 4 LASTAIL F 5 COM) 0SXSYoc IHdI edTTI TZ3HI Z!HJ Hid oi JII`JdIIJIch(95 ERROR! 89 PRIN1 77 PRIN2 67 MEMB 56 MEMB 43 TAILP 27 TAILP) (110 CLISPTRANFLG) ( 83 " - location uncertain. " 14 (ERROR%: . "can't - at top. ")) \EDITBLOCK/EDIT* :D8 (L (0 N) P 2 COM P 0 L F 4 L F 5 LASTAIL) NTdH"g Hj@Kj@I [I@ [Kc Hhc(69 ERROR! 53 NTH 44 NLEFT 26 \EDITBLOCK/EDITCOM 9 \EDITBLOCK/EDUP) (21 !0) () \EDITBLOCK/EDORA0012 :D8 (P 2 L P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 3 L F 4 COMS F 5 SI::NLSETQ-VALUE) i@ST Jchc g(15 \EDITBLOCK/EDITCOMS) (29 :NORMAL) () \EDITBLOCK/EDOR :D8 (P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 0 COMS F 3 *PROCEED-CASES* F 4 L) 2@@b`SI gHT(32 \EDITBLOCK/EDORA0012 6 ERROR!) (38 :NORMAL 21 SI::NLSETQ-PROCEED-CASE) () \EDITBLOCK/EDRPTA0013A0014 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 EDRX) `P h(10 \EDITBLOCK/EDITCOMS) (4 MAXLOOP) () \EDITBLOCK/EDRPTA0013 :D8 (P 2 SI::*RESETFORMS* P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 3 SI::NLSETQ-VALUE) 6i@g`hg $hcg(38 SI::RESETUNWIND 33 \MVLIST 28 \EDITBLOCK/EDRPTA0013A0014) (51 :NORMAL 23 SI::RESETUNWIND 14 MAXLOOP 9 MAXLOOP) () \EDITBLOCK/EDRPT :D8 (L (1 QUIET) P 6 *CONDITION-HANDLER-BINDINGS* P 5 SI::*NLSETQFLAG* P 4 *PROCEED-CASES* P 3 SI::NLSETQ-VALUE P 2 COPYFLG I 0 EDRX F 7 L F 8 *PROCEED-CASES* F 9 *CONDITION-HANDLER-BINDINGS*) kWji`I`oD`WioWL gKWIkعAIi oi Hch(99 PRIN1 87 PRIN1 56 \EDITBLOCK/EDRPTA0013) (62 :NORMAL 35 SI::NLSETQ-PROCEED-CASE 18 MAXLOOP 11 MAXLOOP) ( 93 " occurrences. " 44 (CL:ERROR . SI::NLSETQHANDLER) 25 "maxloop exceeded. ") \EDITBLOCK/EDLOCA0015 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 EDX F 3 SI::NLSETQ-VALUE) i@R hcg(10 \EDITBLOCK/EDITCOMS) (19 :NORMAL) () \EDITBLOCK/EDLOC :D8 (L (1 FLG) P 9 *CONDITION-HANDLER-BINDINGS* P 8 SI::*NLSETQFLAG* P 7 *PROCEED-CASES* P 6 SI::NLSETQ-VALUE P 5 COMS P 4 FINDFLAG P 2 LCFLG I 0 EDX F 10 L F 11 UNFIND F 12 *PROCEED-CASES* F 13 *CONDITION-HANDLER-BINDINGS*) p WWi3@d,@'@ HcWAKWHcIcW`WioW O gNHcW(89 \EDITBLOCK/EDLOCA0015 55 ERROR! 26 \EDITBLOCK/EDITCOM) (95 :NORMAL 67 SI::NLSETQ-PROCEED-CASE) ( 76 (CL:ERROR . SI::NLSETQHANDLER)) EDLOCL :D8 (P 0 L I 0 COMS F 1 L) Qh@i HQ c(23 \NCONC2 13 \EDITBLOCK/EDLOC) NIL () EDIT%: :D8 (L (2 X 1 LC 0 TYPE) P 7 UNDOLST1 P 6 LCFLG P 5 L P 0 TOFLG F 8 L F 9 COPYFLG)  0B1dYdgWiI KJh\J&LbA%@g@dg&mB dgAbi g@dg"WmB _gBW Og@g:BWdkB -W khd o W(250 ERROR! 244 \EDITBLOCK/EDITCOMS 233 \EDITBLOCK/EDIT2F 223 \EDITBLOCK/EDUP 217 MEMB 205 \EDITBLOCK/EDIT2F 171 \EDITBLOCK/EDITCOML 155 \EDITBLOCK/EDIT2F 121 \EDITBLOCK/EDLOC 97 \EDITBLOCK/EDIT2F 70 \EDITBLOCK/EDUP 41 COPY 36 \EDITBLOCK/EDITCOMS) (186 FOR 178 %: 162 N 138 AFTER 129 A 108 HERE 85 BEFORE 76 B 19 %##) ( 239 (0 (NTH -2) (2))) EDITMBD :D8 (L (1 X 0 LC) P 1 TOFLG F 2 L F 3 EDITEMBEDTOKEN) U @@i IRRhXkAS AH hHSA RRR RRc(74 TAILP 61 \EDITBLOCK/EDIT2F 56 LSUBST 45 \APPEND2 37 FEDITFINDP 17 \EDITBLOCK/EDUP 11 \EDITBLOCK/EDLOC) NIL () EDITXTR :D8 (L (1 X 0 LC) P 2 UNFIND P 1 L P 0 TOFLG F 3 L) @SS Sg@i ShAi II IIbkHAh Ah HSdSS SScS(121 TAILP 99 \EDITBLOCK/EDIT2F 90 \APPEND2 80 \EDITBLOCK/EDUP 66 TAILP 55 \EDITBLOCK/EDLOC 38 \EDITBLOCK/EDLOC 16 TAILP) (28 HERE) () \EDITBLOCK/EDITELT :D8 (L (0 LC) I 1 L) @ AXdH(8 \EDITBLOCK/EDLOC) NIL () EDITCONTA0016 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 LC2 F 3 SI::NLSETQ-VALUE) i@R hcg(10 EDLOCL) (19 :NORMAL) () EDITCONT :D8 (L (2 FLG 0 LC1) P 4 *CONDITION-HANDLER-BINDINGS* P 3 SI::*NLSETQFLAG* P 2 *PROCEED-CASES* P 1 SI::NLSETQ-VALUE P 0 L I 1 LC2 F 5 L F 6 *PROCEED-CASES* F 7 *CONDITION-HANDLER-BINDINGS*) zU@ b@B +`VioWJ gIHX@dHg@H@H Hc (113 EDIT4E 78 ERROR! 56 EDITCONTA0016 25 ERROR! 19 EDIT4F 9 EDITFPAT) (98  62 :NORMAL 36 SI::NLSETQ-PROCEED-CASE) ( 44 (CL:ERROR . SI::NLSETQHANDLER)) EDITSW :D8 (L (1 N 0 M) F 3 L) 9S@ SA HZHIH I IJI J h(53 \EDITBLOCK/EDITSMASH1 47 \EDITBLOCK/EDITSMASH 38 \EDITBLOCK/EDITSMASH1 31 \EDITBLOCK/EDITSMASH 15 \EDITBLOCK/EDITNTH 7 \EDITBLOCK/EDITNTH) NIL () EDITMV :D8 (L (2 X 1 OP 0 LC) P 6 LASTAIL P 5 L P 4 TOFLG P 1 COM0 P 0 L0 F 7 L F 8 COM F 9 LASTAIL F 10 UNFIND) WW2Ag@Bbhbgb*Bg@BbhbBb@ghbBBgBi HW@@i MM[BgBi AcKW oi IcLAKh AKh JKg @BWKddK dK cW(252 TAILP 241 MEMB 217 \EDITBLOCK/EDITCOMA 201 \EDITBLOCK/EDITCOML 188 \APPEND2 175 ERROR! 165 PRIN1 152 MEMB 138 \EDITBLOCK/EDLOC 118 \EDITBLOCK/EDUP 110 \EDITBLOCK/EDLOC 94 \EDITBLOCK/EDLOC) (212 DELETE 129 TTY%: 85 TTY%: 69 HERE 42 HERE 30 %: 12 HERE) ( 159 "destination is inside expression being moved. ") \EDITBLOCK/EDITTO :D8 (L (2 FLG 1 LC2 0 LC1) P 1 COM P 0 L F 2 L F 3 COM F 4 TOFLG) `R@@ Ack@3Ad3d@j@k؀AH BgHkmH k Hcic(85 \EDITBLOCK/EDITCOM 78 \EDITBLOCK/EDIT.RI 54 \EDITBLOCK/EDIT.BI 17 \EDITBLOCK/EDUP 11 \EDITBLOCK/EDLOC) (61 TO) () \EDITBLOCK/EDITBELOW :D8 (L (1 DEPTH 0 PLACE) P 2 L0 P 1 LCFLG P 0 L F 4 L F 5 COM F 6 C F 7 UNFIND) Tg@ HAVc kjA c UbT JKZAj#AJJ AkbJ JhTcK c(122 DREVERSE 106 \FZEROP 90 TAILP 68 ERROR! 56 REVERSE 45 ERROR! 36 EVAL 14 \EDITBLOCK/EDITCOM) (5 _) () \EDITBLOCK/EDITRAN :D8 (L (1 DEF) P 10 %#3 P 9 %#2 P 8 %#1 P 1 L0 P 0 L I 0 C F 14 L F 15 TYPEIN) WdbA@`b Z7@dJh[(@d^NlFJWhM \h[#Ab@K KK 0 AZLK d_dd3,OgO#OdgOgOO _O Oh_O&_O \IddI I LIWc(241 TAILP 231 MEMB 213 APPLY 180 EVAL 120 \EDITBLOCK/EDITSMASH 98 LDIFF 84 ERROR! 69 FIXSPELL 26 ERROR!) (167 %#3 155 %#2 141 %#1 15 EDITOPS) () \EDITBLOCK/EDITSAVE :D8 (I 0 COM F 1 EDITLISPFLG F 2 EDITHIST) {@`n@3@d`.`X3H``HH@h H@`,@`gh@ cQhc`h(98 HISTORYSAVE 66 \NCONC2) (116 HISTORYCOMS 91 * 86 EDITHISTORY 74 HISTORYCOMS 54 HISTSTR0 46 COMPACTHISTORYCOMS 31 EDITHISTORY 22 COMPACTHISTORYCOMS 8 DONTSAVEHISTORYCOMS) () \EDITBLOCK/EDITSAVE1 :D8 (L (1 REPLACEFLG 0 X) F 1 EDITHIST) bQ_`X`g``XA`@)`AH @H @h h(94 \NCONC2 84 LAST 72 LAST) (60 EDITHISTORY 49 EDITHISTORY 34 REREADFLG 29 HISTSTR3 24 *GROUP* 17 REREADFLG 7 EDITHISTORY) () \EDITBLOCK/EDITHA0017A0018 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 COM F 1 C) `hcQg (23 LISPX) (18 * 9 LISPXHISTORY 4 EDITHISTORY) () \EDITBLOCK/EDITHA0017 :D8 (NAME SI::*UNWIND-PROTECT* P 0 SI::*RESETFORMS* I 0 SI::*CLEANUP-FORMS* F 1 SI::*RESETFORMS*) Lgi ih`i hQcg`hg $(69 SI::RESETUNWIND 64 \MVLIST 59 \EDITBLOCK/EDITHA0017A0018 26 SETREADTABLE 10 GETREADTABLE) (54 SI::RESETUNWIND 43 LISPXHISTORY 38 LISPXHISTORY 20 EDITRDTBL 4 SETREADTABLE) () \EDITBLOCK/EDITH :D8 (P 8 EDITHIST P 7 RESETSTATE P 6 SI::*RESETFORMS* P 5 LISPXHIST P 1 COMS I 0 C F 9 COM F 10 READBUF F 11 LISPXHIST F 12 EDITHIST)  P@dgdgdgdgdgg3gg%@gg` Z`hg `I[HdggHI'@cIK IHIHIhh`ghdIg@Jh Ic` gc`` Z hc`Jgi d\iXLi Hoi ` h@g@ hW!g $W`cW ci` c`W Wi (458 \EDITBLOCK/EDITCOM 449 \EDITBLOCK/EDITSAVE 433 LISPXREAD 418 LISPXREADBUF 388 SI::RESETUNWIND 383 \MVLIST 378 \EDITBLOCK/EDITHA0017 361 LISPX 345 LISPXWATCH 334 PRIN1 316 \EDITBLOCK/UNDOEDITCOM 296 LISPXFIND 274 \NCONC2 268 READLINE 238 LISPXWATCH 223 HISTORYSAVE 175 LDIFF 165 ERROR! 122 LISPXFIND 103 ERROR! 95 READLINE) (441 EDITHISTORY 428 EDITRDTBL 401 EDITHISTORY 373 SI::RESETUNWIND 353 BUFS 340 P.A.STATS 290 ENTRIES 284 EDITHISTORY 263 EDITRDTBL 255 EDITHISTORY 247 UNDO 233 P.A.STATS 211 *HISTORY* 203 * 198 EDITHISTORY 147 F 140 E 128 HISTSTR0 117 INPUT 111 EDITHISTORY 90 EDITRDTBL 83 N 76 !N 68 F 61 !F 54 E 46 !E 35 !N 27 !F 18 !E 9 DO) ( 328 "nothing saved. ") EDIT4EA0001 :D8 (P 4 LASTAIL P 3 UNFIND P 2 L P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 5 X F 6 PAT F 7 SI::NLSETQ-VALUE) i@Uh!V hdcg(18 EDLOCL) (29 :NORMAL) () EDIT4E :D8 (P 3 *CONDITION-HANDLER-BINDINGS* P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 2 CHANGEFLG I 1 X I 0 PAT F 5 *PROCEED-CASES* F 6 *CONDITION-HANDLER-BINDINGS*) @dAU;@g[@d3A J@ >@A 1i@dg@bdA ig)Ad3@A @A` AB @dgKAd3@A A@@@ `igi Aid ig@bhy@A ZAhb@dgAg7@A @`UioVI gHi@g@AkLA@Ad`b @Ahbbbg(394 EDIT4E 332 EDIT4EA0001 303 EDIT4E 255 EDIT4E 229 PRINT 220 PRIN1 194 SKOR0 171 STRINGP 146 EDIT4E1 139 DUNPACK 120 STRINGP 95 EDIT4E 59 STREQUAL 46 STRINGP 34 EQP) (382 CLISPTRANFLG 354 @ 338 :NORMAL 313 SI::NLSETQ-PROCEED-CASE 291 |..| 277 == 237 -- 214 = 205 EDITQUIETFLG 155  134 CHCONLST2 105  75 *ANY* 16 &) ( 321 (CL:ERROR . SI::NLSETQHANDLER)) EDIT4E1 :D8 (L (2 X 1 LST 0 PAT) I 3 CHANGEFLG) @@5AH!Cx`iBid JIK IdvbhHb?gCJIJIK@XbhAAh@AIA@bHbI Abbh`igi Bid i(160 PRINT 151 PRIN1 40 DREVERSE 29 PRIN2) (145 = 136 EDITQUIETFLG 62  18 EDITQUIETFLG) () EDITQF :D8 (L (0 PAT) F 1 L F 2 LASTAIL) >QX)@Hd` X`HHcQc@g h(58 EDIT4F 27 MEMB) (53 N 35 UPFINDFLG 17 CLISPTRANFLG) () EDIT4F :D8 (L (3 CHARFLG 0 PAT) P 7 NEWFLG P 6 N P 1 TOPLVL P 0 FF I 2 CHANGEFLG I 1 C3 F 8 L F 9 LASTAIL F 10 UNFIND F 11 COM) hhAh@S@dg@A i bWBAdgkWd`G3mhA bCl@hAdgd@ gh bFgdA gh b'`WW\WL`ɾN3kKK @gA@@K 4B$@gW#oid Nk^j5N)K@L`M ,WWcHHKK KcK cI=Bi(O4iLdWWK WLK ]KK[OiJch(423 ERROR! 395 MEMB 383 TAILP 348 \NCONC2 336 \FZEROP 308 \EDITFINDBLOCK/EDIT4F1 277 ERROR! 271 PRIN1 240 EDIT4E 217 TAILP 157 \NCONC2 145 UNPACK 127 \NCONC2 115 UNPACK 89 \EDITFINDBLOCK/EDITFPAT1 39 EDITFPAT 32 EDITCONT) (302 MAXLEVEL 251 & 226 |...| 196 UPFINDFLG 171 CLISPTRANFLG 150  138  120  108  55 N 20 |..|) ( 264 "can't ") EDITFPAT :D8 (L (0 PAT) I 1 FLG) 0@d1dgdgwdgm @ gg@ @o@m ;@ Xdl hgH jhHddJIkعIHgA@` @ (172 UNPACK 165 DUNPACK 118 LENGTH 105 NLEFT 96 CHCON 88 STRPOS 72 STRPOS 52 EDITFPAT 45 EDITFPAT) (160 CHCONLST1 152  112  66  59  36  26  14 ==) ( 80 "") \EDITFINDBLOCK/EDITFPAT1 :D8 (L (0 X) P 0 N) @d3@@d fg@ Vgk@ @dH lgHo@H jkX JHmHkXIJ @@ @ (131 \EDITFINDBLOCK/EDITFPAT1 124 \EDITFINDBLOCK/EDITFPAT1 109 DREVERSE 87 SUBSTRING 76 STRPOS 51 NTHCHARCODE 40 NCHARS 26 STRPOS 12 STRINGP) (61  33  20 ) ( 69 "") \EDITFINDBLOCK/EDIT4F1 :D8 (L (3 TAIL 2 LVL 1 X 0 PAT) P 0 L F 3 N F 4 CHANGEFLG F 5 FF F 6 C3 F 7 L F 8 LASTAIL F 9 TOPLVL) W!TAdHHACA`AZbAb@@gAB^Al@AT YTAIV Skcj%STAbbBBkb `AAcjoi yCw@AT YlTCIVi bSkcjSNS FCA@AT Y5TCIVi bSkcj]STh KAOhAWBAd;@ABdk (SjSS AbJAJJbUAAUUA Ui(392 TCONC 353 \FZEROP 331 \EDITFINDBLOCK/EDIT4F1 285 \FZEROP 259 \EDITFINDBLOCK/EDIT4F2 245 EDIT4E 228 \FZEROP 203 \EDITFINDBLOCK/EDIT4F2 189 EDIT4E 175 PRIN1 139 \FZEROP 96 \EDITFINDBLOCK/EDIT4F2 81 EDIT4E) (146 UPFINDFLG 53 |...| 29 CLISPTRANFLG) ( 169 "maxlevel exceeded. ") \EDITFINDBLOCK/EDIT4F2 :D8 (L (3 CDRFLG 2 FORMAT 1 MATCH 0 NODE) P 1 FLG F 2 NEWFLG) aC@@icBAH b`i'AiI Hid oi Bid C@dB@B@ B B(93 \EDITFINDBLOCK/EDITSMASH1 86 \EDITFINDBLOCK/EDITSMASH 69 PRINT 60 PRIN1 48 PRIN2 21 \EDITFINDBLOCK/EDIT4F3) (29 EDITQUIETFLG) ( 54 "->") \EDITFINDBLOCK/EDIT4F3 :D8 (L (2 X 1 MATCH 0 FORMAT) F 1 FLG) @d#dgic@b6AiHHAB @AB B H H g$HAdiBhA Ab H@h (134 \NCONC2 121 \NCONC2 111 LDIFF 80 PACK 73 CONCATLIST 66 STRINGP 58 \EDITFINDBLOCK/EDIT4F3 49 \EDITFINDBLOCK/EDIT4F3) (87  14 ) () \EDITFINDBLOCK/EDITSMASH :D8 (L (2 D 1 A 0 OLD) P 0 L F 2 EDITSMASHUSERFN F 3 L F 4 EDITCHANGES F 5 UNDOLST1) @R@SlRTTi@d@Uc `` @A@BSH@UH`(HYHII 5HH I #`Hd` h` HX(154 /PUTHASH 141 GETHASH 119 /RPLACA 113 MEMB 101 /RPLNODE 52 LISPXWATCH 7 ERROR!) (149 CLISPARRAY 136 CLISPARRAY 126 CLISPARRAY 80 CLISPTRANFLG 47 EDITUNDOSAVES 41 EDITHISTORY) () \EDITFINDBLOCK/EDITSMASH1 :D8 (L (0 X) F 1 L F 2 UNDOLST1 F 3 ATM) t`mQH@-QbQ@QHdd` >X@bgg@d` `hhRc@S` h(112 PUTHASH 82 GETHASH 50 GETHASH) (107 CHANGESARRAY 87 CHANGESARRAY 77 CHANGESARRAY 70 /PUTHASH 65 LISPXHIST 45 CHANGESARRAY 4 CHANGESARRAY) () EDITFINDP :D8 (L (1 PAT 0 X) P 4 FF P 3 TOPLVL P 2 LASTAIL P 1 CHANGEFLG P 0 N I 2 FLG) 'kABAi bA@ A@` (36 \EDITFINDBLOCK/EDIT4F1 22 EDIT4E 12 EDITFPAT) (31 MAXLEVEL) () EDITBF :D8 (L (0 PAT) P 1 FF I 1 N F 4 L F 5 COM F 6 UNFIND) qThh"@c bHd4AHd,@H`K Tc IHdI cHHXJH [JH [ݰ(106 TAILP 95 MEMB 84 ERROR! 68 \NCONC2 46 \EDITFINDBLOCK/EDITBF1 14 EDITFPAT) (40 MAXLEVEL) () \EDITFINDBLOCK/EDITBF1 :D8 (L (3 TAIL 2 LVL 1 X 0 PAT) F 2 FF F 3 LASTAIL) @ @gAA`AYAbBCA'H"@A RA joi hAdCdb@CC@C C(H@C CC5@CBdk &CbICdIIbCCRRC RH@C `CCcBHBkb>(204 EDIT4E 191 TCONC 155 \EDITFINDBLOCK/EDITBF1 132 EDIT4E 116 EDIT4E 79 PRIN1 63 TCONC 54 EDIT4E) (210 UPFINDFLG 25 CLISPTRANFLG 10 |...|) ( 73 "maxlevel exceeded. ") ESUBSTA0003 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 OLD F 3 NEW F 4 CHARFLG F 5 SI::NLSETQ-VALUE) i@RSiT hc g(13 EDIT4F) (22 :NORMAL) () ESUBST :D8 (L (3 ERRORFLG 2 EXPR) P 10 *CONDITION-HANDLER-BINDINGS* P 9 SI::*NLSETQFLAG* P 8 *PROCEED-CASES* P 7 SI::NLSETQ-VALUE P 6 EDITCHANGES P 5 UNDOLST1 P 4 LASTAIL P 3 UNFIND P 2 COM P 1 ATM P 0 L I 4 CHARFLG I 1 OLD I 0 NEW F 11 LISPXHIST F 12 *PROCEED-CASES* F 13 *CONDITION-HANDLER-BINDINGS*) e Bhbha`WioW O gOWgMhW BCAoi h(97 ERROR! 91 ERROR 73 UNDOSAVE 39 ESUBSTA0003) (62 ESUBST1 45 :NORMAL 17 SI::NLSETQ-PROCEED-CASE) ( 85 " ?" 26 (CL:ERROR . SI::NLSETQHANDLER)) EDITFA :D8 (I 1 DEF I 0 TYPE) \oi @goi ki @id A oA ooi i (89 TERPRI 83 PRIN1 65 SUBRP 51 EXPRP 45 PRIN2 37 SPACES 29 PRIN1 10 PRIN1) (16 ADVISED) ( 77 " compiled function!" 71 " subr!" 57 " definition." 23 "n" 4 "Note: you are editing a") TTY/EDITEA0001A0002 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 EXPR F 3 COMS F 4 ATM F 5 SI::NLSETQ-VALUE F 6 EDITCHANGES F 7 TEM) 5i@RhSThV  co chc g(36 HELP 22 LAST 17 EDITL) (47 :NORMAL) ( 31 "EDITL returned NIL") TTY/EDITEA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 5 SI::*NLSETQFLAG* P 4 *PROCEED-CASES* P 3 SI::NLSETQ-VALUE P 2 TEM P 1 EDITCHANGES P 0 ECHOFILE I 0 SI::*CLEANUP-FORMS* F 6 ATM F 7 TYPE F 8 EXPR F 9 SI::*RESETFORMS* F 10 ADDSPELLFLG F 11 IFCHANGEDFN F 12 *PROCEED-CASES*) "!WWoi V"gVhWWWhYhdWcVWI `WL ImJWdgVgJg fdgoo KdgVJhg 3g,VJ "JWdgoHi W1V.W*VWdgdghdgij J(286 ADDSPELL 234 PRIN1 209 ERROR! 200 /SETPROPLIST 183 SAVESET 159 HELP 132 PUTDEF 102 ERROR! 88 TTY/EDITEA0001A0002 68 PREEDITFN 24 ERROR 4 TTYINFOSTREAM) (274 VARS 263 PROP 255 FNS 219 PROP 190 PROPLST 178 NOSAVE 167 VARS 140 PROP 127 CHANGED 121 FNS 111 FNS 76 SI::NLSETQ-PROCEED-CASE 33 EDITF2) ( 227 "not changed, so not unsaved " 154 "Where did this come from?" 149 "PROP edit type is no longer supported." 18 "not editable.") TTY/EDITE :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 4 IFCHANGEDFN I 3 TYPE I 2 ATM I 1 COMS I 0 EXPR F 3 LISPXHIST) S!g $(23 SI::RESETUNWIND 18 \MVLIST 13 TTY/EDITEA0001) (8 SI::RESETUNWIND) () ESUBST1 :D8 (P 0 X I 0 X) ;@4dHdHH dg H h(50 APPLY 41 ESUBST1 24 /RPLNODE) (33 LISPXHIST) () EDITFERROR :D8 (I 1 FLG I 0 FN F 0 EDITCOMS F 1 DUMMY-EDIT-FUNCTION-BODY) @g Jh8dKg Kg K KHHKh hHdCiooo `ghdi gHd h(189 LOADDEF 172 ASKUSER 152 MAPRINT 109 \NCONC2 95 EXPRP 87 GETPROP 74 GETPROP 25 FILECOMSLST) (177 Y 163 N 158 DWIMWAIT 82 ADVISED 69 BROKEN 47 ENTRIES 20 BLOCKS 7 FILELST) ( 146 ", " 141 " ? " 136 "unsave/load the definitions of the (other) entries: ") EDITF1 :D8 (I 4 IFCHANGEDFN I 3 TYPE I 2 ATM I 1 COMS I 0 EXPR) oi @ABCD (21 EDITE 10 PRIN1) NIL ( 4 "EDITF1 has been replaced by EDITE") EDITF2 :D8 (P 0 LISPXHIST I 4 EXPR I 3 IFCHANGEDFN I 2 TYPE I 1 CHANGES I 0 ATM F 1 RESETSTATE F 2 LISPXHIST) gAdBaQdgdghRBgBgD C@DBQhlC!Bdgg@g@B h(99 MARKASCHANGED 52 FIXEDITDATE) (91 FNS 83 PROP 75 PROPLST 44 FNS 36 PROP 20 HARDRESET 12 RESET) () EDITL2 :D8 (I 2 FLG I 1 ATM I 0 FILE) 'Boo@ A@ o@ (36 LISPXPRIN1 25 LISPXPRIN2 18 LISPXPRIN1) NIL ( 30 "} " 12 "{finished " 6 "{started ") FEDITFINDP :D8 (I 1 AT I 0 LST) A@@@A @b(16 FEDITFINDP) NIL () (PRETTYCOMPRINT EDITCOMS) (RPAQQ EDITCOMS ((* ;; "the teletype editor") (FNS TTY/EDITE TTY/EDITL %## EDIT* EDIT%: EDITDEFAULT EDITDEFAULT1 EDITH EDITRAN EDITTO EDITXTR EDLOC EDLOCL EDOR EDRPT EDUP ESUBST ESUBST1 EDITFERROR EDITFA EDITELT UNSAVEBLOCK? EDITF1 EDITF2 EDITL0 EDITL1 EDITL2 UNDOEDITL EDITCOM EDITCOMA EDITCOML EDITCONT EDITMAC EDITMBD EDITMV EDITCOMS EDIT!UNDO UNDOEDITCOM UNDOEDITCOM1 EDITCOM1 EDITSAVE EDITSAVE1 EDITSMASH EDITSMASH1 EDITSW EDITNCONC EDITAPPEND EDIT1F EDIT2F EDIT4E EDIT4E1 EDITQF EDIT4F EDIT4F1 EDIT4F2 EDIT4F3 EDITFPAT EDITFPAT1 EDITFINDP FEDITFINDP EDITBELOW EDITBF EDITBF1 EDITNTH BPNT BPNT0 EDIT.RI EDIT.RO EDIT.LI EDIT.LO EDIT.BI EDIT.BO) (INITVARS (EDITRDTBL (COPYREADTABLE "OLD-INTERLISP-T"))) (USERMACROS ED) (BLOCKS (EDITBLOCK TTY/EDITL EDITL0 EDITL1 UNDOEDITL EDITCOM EDITCOMA EDITCOML EDITMAC EDITCOMS EDIT!UNDO UNDOEDITCOM UNDOEDITCOM1 EDITCOM1 EDITSMASH EDITSMASH1 EDITNCONC EDITAPPEND EDIT1F EDIT2F EDITNTH BPNT BPNT0 EDIT.RI EDIT.RO EDIT.LI EDIT.LO EDIT.BI EDIT.BO EDITDEFAULT EDITDEFAULT1 %## EDUP EDIT* EDOR EDRPT EDLOC EDLOCL EDIT%: EDITMBD EDITXTR EDITELT EDITCONT EDITSW EDITMV EDITTO EDITBELOW EDITRAN EDITSAVE EDITSAVE1 EDITH (ENTRIES TTY/EDITL EDITL0 %## UNDOEDITL BPNT0 EDITCONT EDLOCL) (SPECVARS L ATM COM LCFLG %#1 %#2 %#3 UNDOLST UNDOLST1 LASTAIL MARKLST UNFIND LASTP1 LASTP2 COMS EDITCHANGES EDITHIST0 LISPXID USERHANDLE) (RETFNS EDITL0 EDITL1) ( BLKAPPLYFNS EDIT%: EDITMBD EDITMV EDITXTR EDITSW) (BLKLIBRARY NTH LAST MEMB NLEFT) (NOLINKFNS PRINTDEF EDITRACEFN EDITUSERFN) (LOCALFREEVARS FINDFLAG EDITHIST UNDOLST1 COM L L0 COM0 UNDOLST EDITLFLG ATM MARKLST EDITHIST0 UNFIND TYPEIN LCFLG LASTP1 LASTP2 LASTAIL COPYFLG ORIGFLG COMS TOFLG C LVL EDITCHANGES EDITLISPFLG) (GLOBALVARS EDITCALLS P.A.STATS EDITUNDOSTATS EDITUNDOSAVES SPELLSTATS1 P.A.STATS EDITUSERFN EDITIME DONTSAVEHISTORYCOMS COMPACTHISTORYCOMS EDITEVALSTATS MAXLOOP EDITCOMSL EDITCOMSA DWIMFLG CLISPTRANFLG EDITOPS HISTORYCOMS REREADFLG HISTSTR3 EDITRDTBL EDITHISTORY HISTSTR0 LISPXHISTORY LISPXBUFS EDITRACEFN EDITMACROS USERMACROS CLISPARRAY CHANGESARRAY COMMENTFLG **COMMENT**FLG EDITSMASHUSERFN)) (EDITFINDBLOCK EDIT4E EDIT4E1 EDITQF EDIT4F EDITFPAT EDITFPAT1 EDIT4F1 EDIT4F2 EDIT4F3 EDITSMASH EDITSMASH1 EDITFINDP EDITBF EDITBF1 ESUBST (ENTRIES EDIT4E EDIT4E1 EDITQF EDIT4F EDITFPAT EDITFINDP EDITBF ESUBST) (LOCALFREEVARS C3 CHANGEFLG N TOPLVL FF NEWFLG FLG) ( GLOBALVARS EDITUNDOSAVES CHCONLST2 EDITQUIETFLG CHCONLST1 MAXLEVEL UPFINDFLG CLISPTRANFLG CHANGESARRAY CLISPARRAY EDITHISTORY) (SPECVARS ATM L COM UNFIND LASTAIL UNDOLST1 EDITCHANGES)) (NIL EDITFA TTY/EDITE (SPECVARS EDITCHANGES EDITFN))) (GLOBALVARS FILELST DWIMFLG DWIMWAIT DWIMLOADFNSFLG) ( DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA %##) (NLAML EDITF2) (LAMA ))))) (RPAQ? EDITRDTBL (COPYREADTABLE "OLD-INTERLISP-T")) (ADDTOVAR USERMACROS (ED NIL (E (ED (COND ((LISTP (%##)) (CAR (%##))) (T (%##))))))) (ADDTOVAR EDITCOMSA ED) (PUTPROPS EDIT COPYRIGHT ("Venue & Xerox Corporation" T 1983 1984 1985 1986 1987 1990)) NIL