(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10) (FILECREATED "18-Jul-2023 23:40:13" ("compiled on " {WMEDLEY}FILEPKG.;50) "18-Jul-2023 22:24:39" brecompiled exprs%: GATHEREXPORTS in "FULL 18-Jul-2023 ..." dated "18-Jul-2023 22:24:45") (FILECREATED "18-Jul-2023 23:40:13" {WMEDLEY}FILEPKG.;50 274539 :EDIT-BY rmk :CHANGES-TO (FNS GATHEREXPORTS) :PREVIOUS-DATE "13-Jul-2023 14:56:21" {WMEDLEY}FILEPKG.;48) EDITFROMFILEA0001A0002A0003 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 DEF F 3 NAME F 4 TYPE F 5 SI::NLSETQ-VALUE F 6 FILE F 7 EDITCOMS) %i@STRgRVW hc g(25 EDITDEF) (34 :NORMAL 13 =) () EDITFROMFILEA0001A0002 :D8 (P 5 SI::*NLSETQFLAG* P 4 *PROCEED-CASES* P 3 SI::NLSETQ-VALUE P 2 DEF P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 6 TYPE F 7 NAME F 8 SEEN F 9 FNS F 10 SI::NLSETQ-VALUE F 11 EDITPATTERN F 12 *PROCEED-CASES*) i@WVgo WVgo VgWiJJW W)oi V Vi ki WWcWid oi `WL gKoi i hhcg(204 LISPXTERPRI 197 LISPXPRIN1 174 EDITFROMFILEA0001A0002A0003 153 LISPXPRIN1 141 LISPXPRIN2 123 LISPXSPACES 115 LISPXPRIN1 103 SEARCHPRETTYTYPELST 96 LISPXPRIN1 75 \EDITFROMFILE/LOOKIN 42 GETDEF 22 GETDEF) (216 :NORMAL 180 :NORMAL 162 SI::NLSETQ-PROCEED-CASE 51 FNS 32 SAVED 12 CURRENT) ( 191 "failed" 147 ": " 90 "editing the " 37 (NOCOPY NOERROR) 17 (NOCOPY NOERROR)) EDITFROMFILEA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 13 SI::*NLSETQFLAG* P 12 *PROCEED-CASES* P 11 SI::NLSETQ-VALUE P 10 NAME P 8 FILE P 6 SEEN P 5 TYPE I 0 SI::*CLEANUP-FORMS* F 14 FNS F 15 FILES F 16 EDITCOMS F 17 EDITPATTERN F 18 *PROCEED-CASES* F 19 ONLYTYPES F 20 FILEPKGTYPES) h`dioW gW"hhc W`AHIcW&droyHhHH`Ld `9`goLhhi gLWg hiLJ KhZK&|gdW( Lh]d3@"Mg gWO L\O_hO_O_MgWiWhcOMg  O_N  `W$ O O_(349 EDITFROMFILEA0001A0002 326 MEMBER 306 FILECOMSLST 226 GETPROP 197 REMOVE 160 LOADFROM 140 ASKUSER 104 ROOTFILENAME) (336 SI::NLSETQ-PROCEED-CASE 301 EDIT 279 FNS 231 NILL 221 EDITDEF 189 FNS 155 ALLPROP 145 Y 123 Y 118 DWIMWAIT 109 FILELST 96 EDITLOADFNSFLG 46 FILELST 27 EXAM 19 EDITLOADFNSFLG 4 EDITLOADFNSFLG) ( 128 "load from" 77 (FNS) 14 (T . NO)) EDITFROMFILE :D8 (P 0 SI::*RESETFORMS* I 4 ONLYTYPES I 3 EDITCOMS I 2 EDITPATTERN I 1 FILES I 0 FNS) *g`hg $(35 SI::RESETUNWIND 30 \MVLIST 25 EDITFROMFILEA0001) (20 SI::RESETUNWIND 9 EDITLOADFNSFLG 4 EDITLOADFNSFLG) () \EDITFROMFILE/LOOKIN :D8 (L (1 PAT 0 X)) DAg2AdHd3@gH hih@A @Ai (65 EDITFINDP 56 FINDATS 35 STRPOS) (29  6 *ANY*) () DELFROMCOMS :D8 (L (2 TYPE 1 NAME 0 COMS) P 0 COMSNAME) @d3@@H b@AB B b@I/@AB dg@d gԑi@b@dgdgdg@޿BgA@@d i(152 /RPLNODE2 79 /RPLNODE2 61 \DELFROMCOMS/DELFROMCOM 39 GETFILEPKGTYPE 29 DELFROMCOMS 16 GETTOPVAL) (135 VARS 121 COPYWHEN 113 EVAL@COMPILEWHEN 105 EVAL@LOADWHEN 85 ALL 67 ALL) () \DELFROMCOMS/DELFROMCOM :D8 (L (2 TYPE 1 NAME 0 COM) F 10 COMSNAME)   @g X@ABlHXWg H@dgdg*@dgd3@s@AB dg.@dgd3@@@AB dgdgB@@g>@Yd3@AI XdAH XzIHig iA@XcHAH ZRHJ Wg idgWBg@i dAM AM M[h\AL LAL KdgdgBgf@A@A A@_^OONO@ XHA@A@ddh Wg i@_Oi@A O_hO_O_BOg hdgdgdgBgW@A dgBg<@A dgdgBg@Ai B@ @A (711 \DELFROMCOMS/DELFROMCOM1 696 \DELFROMCOMS/DELFROMCOM1 660 \DELFROMCOMS/DELFROMCOM1 633 \DELFROMCOMS/DELFROMCOM1 584 GETPROP 549 \DELFROMCOMS/DELFROMCOM1 522 MARKASCHANGED 510 /RPLACA 505 REMOVE 474 PRETTYCOM1 441 \DELFROMCOMS/DELFROMCOM1 390 /RPLACD 385 REMOVE 375 MEMB 350 /DREMOVE 342 MEMB 330 INFILECOMTAIL 299 MARKASCHANGED 287 /RPLACD 276 \DELFROMCOMS/REMOVEITEM 253 SAVESET 236 \DELFROMCOMS/REMOVEITEM 218 GETTOPVAL 153 DELFROMCOMS 100 DELFROMCOMS 40 MARKASCHANGED 14 GETPROP) (685 VARS 675 INITVARS 667 VARS 650 EXPRESSIONS 640 P 623 RECORDS 613 SYSRECORDS 605 INITRECORDS 596 RECORDS 579 PROPTYPE 517 VARS 421 PROPS 409 IFPROP 401 PROP 316 FNS 307 BLOCKS 294 VARS 248 NOPRINT 192 * 168 PROPS 160 ALISTS 121 * 107 CL:EVAL-WHEN 71 * 58 COMS 50 DECLARE%: 35 VARS 9 DELFROMPRETTYCOM) () \DELFROMCOMS/DELFROMCOM1 :D8 (L (2 FLG 1 NAME 0 COM) F 2 COMSNAME) _ @dg/Xd3@$H YAIB YHIig ihA@B X@H Rg i(91 MARKASCHANGED 80 /RPLACD 69 \DELFROMCOMS/REMOVEITEM 55 SAVESET 39 \DELFROMCOMS/REMOVEITEM 30 GETTOPVAL) (86 VARS 50 NOPRINT 11 *) () \DELFROMCOMS/REMOVEITEM :D8 (L (2 FLG 1 LST 0 X)) J@A B=Ad@h-@A"d[@BKK@dIHhZH&JA(6 MEMBER) NIL () ADDTOFILES?A0001A0002 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 NAME F 3 TYPE F 4 SI::NLSETQ-VALUE) i@RSi hcg(18 DOBE 12 SHOWDEF) (27 :NORMAL) () ADDTOFILES?A0001A0003A0004A0005 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 LISTNAME F 3 NAME F 4 PLACE F 5 SI::NLSETQ-VALUE F 6 TYPE F 7 FILE) Di@TcSR i ig SV` chc g(56 ERROR! 46 WHEREIS 33 SAVESET 22 MERGEINSERT 15 GETTOPVAL) (65 :NORMAL 41 FILELST 28 NOPRINT) () ADDTOFILES?A0001A0003A0004 :D8 (NAME SI::*UNWIND-PROTECT* P 3 *CONDITION-HANDLER-BINDINGS* P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 0 SI::*CLEANUP-FORMS* F 4 *PROCEED-CASES* F 5 *CONDITION-HANDLER-BINDINGS* F 6 UNDOTEM) 1h`TioUI gHc h(32 ADDTOFILES?A0001A0003A0004A0005) (38 :NORMAL 13 SI::NLSETQ-PROCEED-CASE 5 %#UNDOSAVES) ( 21 (CL:ERROR . SI::NLSETQHANDLER)) ADDTOFILES?A0001A0003 :D8 (P 14 SI::*RESETFORMS* P 13 UNDOTEM P 11 UNDOSIDE0 P 10 LISPXHIST P 8 LISTNAME P 7 PLACE P 6 COMSNAME P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 15 FILE F 16 TYPE F 17 NAME F 18 SI::NLSETQ-VALUE F 19 LISPXHIST F 20 LASTFILE) i@B@ WhW _d3@MOc ^W"W OO NW"W hW W g dW"W WlJ3OgO_`dc W"W OO hgWhid !Ogghid W g dW"W WlKW&1 gO _d__jh_OUgOh_g`hg $Og#Ogg gO OOO h(`dc W"W OO h;oi Wid W g dW"W WlLoi Oid hdooi g cOW"O i ig W W"W OW W g dO dW WlMWW Oc(hdc$g(670 ADDFILE 639 GETTOPVAL 626 GETPROP 613 \ADDTOFILEBLOCK/ADDNEWCOM 598 FILECOMS 590 SAVESET 579 MERGEINSERT 572 GETTOPVAL 556 \ADDTOFILEBLOCK/WHATIS 546 ASKUSER 526 PRIN2 515 PRIN1 481 GETPROP 468 PRINT 458 PRIN1 439 ADDTOCOMS 425 FILECOMS 404 UNDONLSETQ1 388 UNDOSAVE 381 LISTPUT1 367 LISTPUT1 335 SI::RESETUNWIND 330 \MVLIST 325 ADDTOFILES?A0001A0003A0004 261 MEMB 221 GETPROP 208 ERROR! 202 PRINT 175 PRINT 150 ADDTOCOMS 136 FILECOMS 77 GETPROP 64 \ADDTOFILEBLOCK/ADDNEWCOM 49 ADDTOCOMS 34 FILECOMS 17 \ADDTOFILEBLOCK/WHATIS) (686 :NORMAL 621 WHENFILED 585 NOPRINT 551 FILE 476 WHENFILED 414 FILELST 374 SIDE 362 NOSAVE 357 SIDE 347 NOSAVE 320 SI::RESETUNWIND 309 %#UNDOSAVES 304 %#UNDOSAVES 291 SIDE 254 SIDE 216 WHENFILED 191 found 186 not 163 on 125 FILELST 108 Near%: 72 WHENFILED) ( 539 (("" "" EXPLAINSTRING "a file name" KEYLST ())) 534 " on file: " 509 " put list " 452 " value is filed on ") ADDTOFILES?A0001 :D8 (P 18 SI::*NLSETQFLAG* P 17 *PROCEED-CASES* P 16 SI::NLSETQ-VALUE P 15 SI::*NLSETQFLAG* P 14 *PROCEED-CASES* P 13 SI::NLSETQ-VALUE P 12 FILE P 10 NAME P 6 TYPE P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 19 FILEPKGTYPES F 20 *PROCEED-CASES* F 21 NOASKSTR F 22 READBUF F 23 SI::NLSETQ-VALUE F 24 LASTFILE) 2i@2g  hW*i `gogol hgol hgol ohi dgsi Rg)W& dZ  dJh =L!i hiW, \W&1MLL hdc.g^ _QNdgK  _5oi Oi oi i O1 OM]_Oi li hdd`i _ dl[ `W(O dl]h+dl 𒿰Kdl dl=W0_gi O_`W(O" gO aO_H(536 ADDTOFILES?A0001A0003 508 PRINT 458 ADDTOFILES?A0001A0002 430 CHCON1 423 ASKUSER 407 SPACES 398 PRIN2 365 TERPRI 358 PRIN1 346 PRIN1 337 PRIN1 321 GETTOPVAL 315 SEARCHPRETTYTYPELST 291 SEARCHPRETTYTYPELST 272 UPDATEFILES 266 BKBUFS 246 CLBUFS 236 SYSBUF 230 LINBUF 223 READP 203 ADDTOFILE 193 GETTOPVAL 187 SEARCHPRETTYTYPELST 165 PRIN1 149 ASKUSER 131 CONCAT 126 CHARACTER 106 CONCAT 101 CHARACTER 81 CONCAT 76 CHARACTER 43 READP 36 DOBE 20 GETTOPVAL 14 SEARCHPRETTYTYPELST) (542 :NORMAL 523 SI::NLSETQ-PROCEED-CASE 502 Nowhere 445 SI::NLSETQ-PROCEED-CASE 416 ADDTOFILEKEYLST 305 VARS 283 :NORMAL 172 %] 155 N 114 %] 89 N 64 Y 54 N 49 DWIMWAIT 9 VARS) ( 352 ")" 331 "(" 136 (EXPLAINSTRING "] - nowhere, all items will be marked as dummy " NOECHOFLG T) 119 "Nowhere" 94 "o" 69 "es" 59 ("want to say where the above go")) ADDTOFILES? :D8 (P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 0 NOASKSTR F 3 *PROCEED-CASES*) `SI gH(18 ADDTOFILES?A0001) (24 :NORMAL 7 SI::NLSETQ-PROCEED-CASE) () ADDTOFILE :D8 (L (4 LISTNAME 3 NEAR 2 FILE 1 TYPE 0 NAME) P 0 COMSNAME) } Ahi Ad`BAb bBg bd X@ACD H@AhB Ag d@ABlIBdd` B(121 ADDFILE 88 GETPROP 76 \ADDTOFILEBLOCK/ADDNEWCOM 64 ADDTOCOMS 53 FILECOMS 45 \ADDTOFILEBLOCK/WHATIS 32 GETFILEPKGTYPE 10 GETFILEPKGTYPE) (114 FILELST 83 WHENFILED 40 FILE 19 FILELST) () \ADDTOFILEBLOCK/WHATIS :D8 (L (1 ONLY 0 USERINPUT)) @d6A@dgdgg@@gbbAdg4@ Xd`d wHh`i gAg@d SAdg hdoHhhi gHAgQhdo@hhi g4@h(210 ASKUSER 171 ASKUSER 137 GETTOPVAL 120 FIXSPELL 103 GETTOPVAL 98 FILECOMS 80 U-CASE 18 ERROR!) (215 Y 186 FILE 176 Y 148 LIST 128 FILE 114 FILELST 87 FILELST 70 LIST 55 LIST 43 Near%: 35 Near%: 27 @) ( 198 "create new list" 159 "create new file") ADDTOCOMS :D8 (L (4 LISTNAME 3 NEAR 2 TYPE 1 NAME 0 COMS) P 0 COMSNAME) @dGd3@/@H ABC@DhD 7@D2@AB B b@IZhJdABCD $iJdgdgdgJJ(90 \ADDTOFILEBLOCK/ADDTOCOM 60 GETFILEPKGTYPE 53 \ADDTOFILEBLOCK/ADDNEWCOM 37 ADDTOCOMS 19 GETTOPVAL) (118 COPYWHEN 110 EVAL@COMPILEWHEN 102 EVAL@LOADWHEN) () \ADDTOFILEBLOCK/ADDTOCOM :D8 (L (4 LISTNAME 3 NEAR 2 TYPE 1 NAME 0 COM) F 7 COMSNAME)  pCB@g X@DDg@h @ABClHXWg HB@h h@dgBg@ACD dgdgK@gCDpBdgAgW@ACD g @ACD dg-@dgd3@@ABCD dg+DC@dgd3@@dg:DC@dgd3@@ABCD dgdgBdgY@A@ACD A@@@Addh@ddh Wg ig@hI`]Di@ACD IhIIJ``J`^@[LLKLMAN hdgdgQB@@A@dgd3@hD@D @ AhA CD g%BgsAgf@ACD @B @ACD (774 ADDTOCOM1 758 ADDTOCOM1 715 ADDTOCOM1 708 /NCONC1 691 GETTOPVAL 615 GETPROP 538 ADDTOCOM1 489 MARKASCHANGED 477 /RPLACA 472 UNION 424 ADDTOCOM1 373 ADDTOCOMS 258 ADDTOCOMS 206 ADDTOCOM1 188 ADDTOCOM1 116 ADDTOCOM1 78 INFILECOMS? 67 MARKASCHANGED 37 INFILECOMS? 17 GETPROP) (744 SETQ 730 EXPRESSIONS 721 P 660 * 634 ALISTS 626 PROPS 578 MACROPROPS 565 MACROPROPS 557 MACROPROPS 517 MACROPROPS 496 MACROS 484 VARS 401 PROPS 388 IFPROP 380 PROP 338 * 315 CL:EVAL-WHEN 287 * 265 DECLARE%: 226 * 213 COMS 194 VARS 171 SETQ 160 EXPRESSIONS 142 VARS 131 INITVARS 123 VARS 100 FNS 90 FNS 62 VARS 29 FILEVARS 12 ADDTOPRETTYCOM) () ADDTOCOM1 :D8 (L (3 LISTNAME 2 NEAR 1 NAME 0 COM) F 0 COMSNAME) @gTC@C@d3@t@@ bBB@ bA@i ig AB @C9A@ B@ b@A@ Pg iABh(142 MARKASCHANGED 130 /RPLACD 125 MERGEINSERT 112 MEMBER 103 MEMBER 88 /RPLACD 78 SAVESET 67 MERGEINSERT 55 MEMBER 42 GETTOPVAL) (137 VARS 73 NOPRINT 7 *) () \ADDTOFILEBLOCK/ADDNEWCOM :D8 (L (4 FILE 3 LISTNAME 2 TYPE 1 NAME) I 0 COMSNAME) 0ABCD @ Z4@Hhig ggIHJ 7Jd)ZYIdgdgdg𲿿iHh @g h(129 MARKASCHANGED 117 /RPLACD 62 /ATTACH 37 SAVESET 18 GETTOPVAL 11 MAKENEWCOM) (124 VARS 102 BLOCKS 94 SPECVARS 85 LOCALVARS 51 COMPILERVARS 43 DECLARE%: 32 NOPRINT) () INFILECOMS? :D8 (L (2 COMS) P 2 ORIGFLG P 1 LITERALS P 0 VAL I 3 ONFILETYPE I 1 TYPE I 0 NAME) ^0A bCgdghBdd3@ AgAgB B H XCgIHH(77 DREVERSE 71 \INFILECOMS?/INFILECOMS 66 \EVALV1 59 \INFILECOMS?/INFILECOMSVAL 8 GETFILEPKGTYPE) (84 UPDATE 51 FILEVARS 43 VARS 24 FILEVARS 16 EDIT) () \INFILECOMS?/INFILECOMTAILA0001A0002 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 COM F 3 SI::NLSETQ-VALUE) i@R chcg(13 EVAL) (24 :NORMAL) () \INFILECOMS?/INFILECOMTAILA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 3 *CONDITION-HANDLER-BINDINGS* P 2 SI::*NLSETQFLAG* P 1 *PROCEED-CASES* P 0 SI::NLSETQ-VALUE I 0 SI::*CLEANUP-FORMS* F 4 DWIMLOADFNSFLG F 5 *PROCEED-CASES* F 6 *CONDITION-HANDLER-BINDINGS*) (hc`UioVI gh(29 \INFILECOMS?/INFILECOMTAILA0001A0002) (35 :NORMAL 10 SI::NLSETQ-PROCEED-CASE) ( 18 (CL:ERROR . SI::NLSETQHANDLER)) \INFILECOMS?/INFILECOMTAIL :D8 (L (1 FLG) P 0 SI::*RESETFORMS* I 0 COM F 6 COMMENTFLG F 7 DWIMLOADFNSFLG) @dg>d3@@ +gWhg $@bA>dI@IYV0@dZJVdLKh]K&M@(64 SI::RESETUNWIND 59 \MVLIST 54 \INFILECOMS?/INFILECOMTAILA0001 28 \EVALV1) (49 SI::RESETUNWIND 36 DWIMLOADFNSFLG 8 *) () \INFILECOMS?/INFILECOMS :D8 (L (0 COMS)) @d h(8 \INFILECOMS?/INFILECOM) NIL () \INFILECOMS?/INFILECOM :D8 (L (0 COM) P 14 TYPE P 13 ORIGFLG F 15 TYPE F 16 ONFILETYPE F 17 NAME F 18 COMMENTFLG F 19 VAL F 20 ORIGFLG) @Wgs@ W$WW$[@i O@@ Hg Z@W W"d3@W"hW"WW lJHg Z@WW"lJ[ IHgHg6IY2d$iW"iW gi  IgfIdd3@!WdgdgGI <8W g.Wg$IgI W"IW&c&HgHdg@i g@i Hdg&g@h@ Wg gi @i JHgHdgPWdg@i @ g@ @ HWy@i gg@ Hdg6Wdg@i ` g@i gWg @ HdgVWdgdg@i i W Wdg@g g @g gHdgWdg%W hv@i di hgP@i \h]g ^gN&gNMd_MOhi LWHhg;Hg2Hg)Hg HgHgHdgWdg2@i _h_OW$gOi OgWHt@i *d_dOW$OiOHg hg)@i _h_WOO OHdghWHWH@i JJiW W(Hg [d@i K (1236 \INFILECOMS?/INFILECOMS 1231 SUBPAIR 1224 \INFILECOMS?/INFILECOMTAIL 1210 GETTOPVAL 1181 \INFILECOMS?/INFILECOMSVALS 1176 \INFILECOMS?/INFILECOMTAIL 1134 \INFILECOMS?/INFILECOMSVALS 1108 \INFILECOMS?/INFILECOMTAIL 1086 \INFILECOMS?/INFILECOMSVAL 1046 \INFILECOMS?/INFILECOMTAIL 1020 \INFILECOMS?/INFILECOMSVAL 986 \INFILECOMS?/INFILECOMTAIL 883 \INFILECOMS?/INFILECOMSVAL 840 GETPROP 821 \INFILECOMS?/INFILECOMTAIL 799 \INFILECOMS?/INFILECOMSVAL 789 \INFILECOMS?/INFILECOMTAIL 739 \INFILECOMS?/IFCEXPRTYPE 719 \INFILECOMS?/IFCEXPRTYPE 689 \INFILECOMS?/INFILECOMSVALS 683 \INFILECOMS?/INFILECOMTAIL 645 \INFILECOMS?/INFILEPAIRS 640 \INFILECOMS?/INFILECOMTAIL 615 \INFILECOMS?/INFILECOMSVALS 610 \INFILECOMS?/INFILECOMTAIL 594 \INFILECOMS?/IFCPROPSCAN 584 \INFILECOMS?/INFILECOMTAIL 553 \INFILECOMS?/IFCPROPS 536 \INFILECOMS?/INFILECOMSVALS 531 \INFILECOMS?/INFILECOMTAIL 515 \INFILECOMS?/INFILECOMSMACRO 507 \INFILECOMS?/INFILECOMTAIL 491 \INFILECOMS?/IFCPROPSCAN 483 \INFILECOMS?/INFILECOMTAIL 441 \INFILECOMS?/INFILECOMS 436 \INFILECOMS?/INFILECOMTAIL 416 \INFILECOMS?/IFCDECLARE 403 \INFILECOMS?/INFILECOMTAIL 368 \INFILECOMS?/INFILECOMS 363 \INFILECOMS?/INFILECOMTAIL 345 \INFILECOMS?/INFILECOMS 340 \INFILECOMS?/INFILECOMTAIL 301 LAST 254 \INFILECOMS?/INFILECOMSVAL 201 \INFILECOMS?/INFILECOMSVALS 192 RETFROM 113 GETPROP 70 GETPROP 48 \INFILECOMS?/INFILECOMSVAL 23 \INFILECOMS?/INFILECOMSVAL) (1205 PRETTYDEFMACROS 1147 FILES 1098 DEFS 1080 INITVARS 1031 VARS 1011 SETQ 975 EXPRESSIONS 961 ARRAY 952 CONSTANTS 943 HORRIBLEVARS 934 UGLYVARS 925 FILEVARS 916 INITVARS 907 VARS 857 ALIST 846 ALIST 835 VARTYPE 811 ALISTS 768 VARS 754 APPENDVARS 745 ADDVARS 734 SETTEMPLATE 725 TEMPLATES 714 I.S.OPR 705 I.S.OPRS 673 P 665 EXPRESSIONS 653 P 631 ALISTS 621 ALISTS 600 MACROS 589 MACROPROPS 573 PROPS 561 MACROS 545 PROPS 498 MACROS 471 PROPS 459 IFPROP 450 PROP 422 ORIGINAL 410 DECLARE%: 387 COMPILERVARS 378 DECLARE%: 353 CL:EVAL-WHEN 330 EXPORT 321 COMS 290 PROGN 278 VARS 268 UPDATE 242 FILEVARS 234 VARS 212 * 186 INFILECOMS? 150 IFPROP 142 PROP 108 PRETTYTYPE 65 FILEPKGCONTENTS 10 VARS) () \INFILECOMS?/INFILECOMSVAL :D8 (L (1 FLG 0 X) F 2 NAME F 3 VAL F 4 ONFILETYPE F 5 LITERALS F 6 TYPE) TdgR@R lA@Uc @ScgAhTg$Rd3@R@R@;VSHdIIIcRiRd3@R@R@gi R@Sc(118 RETFROM 19 MEMBER) (112 INFILECOMS? 52 TYPESOF 40 EDIT 6 UPDATE) () \INFILECOMS?/INFILECOMSVALS :D8 (L (1 FLG 0 X) F 1 COMMENTFLG) @HhddQA HX(24 \INFILECOMS?/INFILECOMSVAL) NIL () \INFILECOMS?/INFILEPAIRS :D8 (L (0 LST)) A@dAHK hdhKHYIIhIILJh (61 \INFILECOMS?/INFILECOMSVAL) NIL () \INFILECOMS?/INFILECOMSMACRO :D8 (L (1 PROPS 0 ATS) F 4 ONFILETYPE) g@1HddhHTg)I dZ`JAAJAih`d[AAKAhI (98 \INFILECOMS?/INFILECOMSVAL 33 PROPNAMES) (71 MACROPROPS 43 MACROPROPS 24 UPDATE) () \INFILECOMS?/IFCPROPS :D8 (L (0 COM) F 2 TYPE) oRdg@ dg.@ dH hHhHHI g@ dHH h(102 \INFILECOMS?/INFILECOMSMACRO 87 \INFILECOMS?/INFILECOMTAIL 70 \INFILECOMS?/INFILECOMSVAL 35 \INFILECOMS?/INFILECOMTAIL 19 \INFILECOMS?/INFILEPAIRS 14 \INFILECOMS?/INFILECOMTAIL) (78 MACROS 26 PROP 6 PROPS) () \INFILECOMS?/IFCEXPRTYPE :D8 (L (1 FN 0 COM)) 4@ HhYAIdgi HX(44 \INFILECOMS?/INFILECOMSVAL 5 \INFILECOMS?/INFILECOMTAIL) (32 QUOTE) () \INFILECOMS?/IFCPROPSCAN :D8 (L (1 PROPNAMES 0 ATOMS) F 8 NAME F 9 ONFILETYPE) @1HhYd3@bWgWIWWIWFAdg6I1L,_`IO M NhL\N&ZJHXJhJJIK (137 \INFILECOMS?/INFILECOMSPROP 89 \INFILECOMS?/INFILECOMSPROP) (79 SYSPROPS 52 ALL 24 UPDATE) () \INFILECOMS?/IFCDECLARE :D8 (L (1 WANTDECLARE 0 TAIL)) @HLHdgdgdgAHHh HMdgg/g/hA/H %gHd`AH  HX(129 \INFILECOMS?/INFILECOM 122 \INFILECOMS?/INFILECOMSVAL 92 \INFILECOMS?/INFILECOMSVAL 51 \INFILECOMS?/INFILECOMSVAL) (110 DECLARETAGSLST 99 COMPILERVARS 78 LOAD 71 DOFILESLOAD 62 DONTEVAL@LOAD 32 COPYWHEN 24 EVAL@COMPILEWHEN 15 EVAL@LOADWHEN) () \INFILECOMS?/INFILECOMSPROP :D8 (L (1 PROP 0 AT) F 2 NAME F 3 VAL F 4 ONFILETYPE) dTg1RRHhK@AhScY@IAIiHXRiRd@dAgi @AhSch(84 RETFROM) (78 INFILECOMS? 5 UPDATE) () MAKEFILEA0001A0002 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 X F 3 SI::NLSETQ-VALUE) i@R hcg(10 EVAL) (19 :NORMAL) () MAKEFILEA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 3 SI::*NLSETQFLAG* P 2 *PROCEED-CASES* P 1 SI::NLSETQ-VALUE P 0 X I 0 SI::*CLEANUP-FORMS* F 4 SI::*RESETFORMS* F 5 OPTIONS F 6 FILETYPE F 7 FILE F 8 REPRINTFNS F 9 *PROCEED-CASES* F 10 SOURCEFILE F 11 FILEPROP F 12 CHANGES)  gU gd gi%gU #gd gg Tcgd gh TcgU gU gd gi.VggV #gd gg Tc`d`WJ hWWWWWgU c(269 PRETTYDEF 235 MAKEFILEA0001A0002 200 SETTOPVAL 184 GETTOPVAL 171 MEMB 142 GETTOPVAL 129 MEMB 117 MEMB 101 SETTOPVAL 89 GETTOPVAL 72 SETTOPVAL 56 GETTOPVAL 43 MEMB 23 GETTOPVAL 10 MEMB) (259 FORMAT 223 SI::NLSETQ-PROCEED-CASE 211 MAKEFILEFORMS 195 CHANGES 190 CLISPIFYPRETTYFLG 178 CLISPIFYPRETTYFLG 164 CLISP 157 CLISP 148 CLISPIFYPRETTYFLG 136 CLISPIFYPRETTYFLG 123 CLISP 111 CLISPIFY 95 %#UNDOSAVES 83 %#UNDOSAVES 67 BOTH 62 PRETTYTRANFLG 50 PRETTYTRANFLG 37 CLISP% 29 PRETTYTRANFLG 17 PRETTYTRANFLG 4 NOCLISP) () MAKEFILE :D8 (P 15 RESETSTATE P 14 SI::*RESETFORMS* P 13 LISPXHIST P 12 FILEDATES P 11 CHANGES P 10 FILEPROP P 8 FILETYPE P 6 *PRINT-BASE* P 5 PRETTYFLG I 3 SOURCEFILE I 2 REPRINTFNS I 1 OPTIONS I 0 FILE F 16 PRETTYFLG F 17 *PRINT-BASE* F 18 LISPXHIST F 19 LASTFILE) AAH+IbgAddhb hW W"l3l1dhHLi gLhJ KhZK&l @ S ObO_O_O_Og _Og _OOAg&AgA`gA OOi@id Odgo?dgdgdgodgdgoi `go g>Oh hbbCOROi bd O%COb *C "C OOC BOzOO bEoi @id oi hbbgAbOg _z OOOg _ bCOdg gCogohcdg0ggO DgoOoh,dgdggoCohh_`OOo dg[OdgC NdggC Og (dgdgiC g=W$!g $Oc&Oh Odg&gOOd``Og&OgOOd``A!HI@ZdgO` @iI {gO` f@hI ZJdg O` Bg@h 2JJ` !Jh`hA hoJ IYW@oh(1189 ERROR 1174 FIXSPELL 1157 MEMB 1139 APPLY 1124 MEMB 1099 MAKEFILE1 1088 MEMB 1066 MAKEFILE1 1053 MEMB 925 /RPLACD 907 SI::RESETUNWIND 902 \MVLIST 897 MAKEFILEA0001 868 LOADVARS 841 /RPLACD 827 LOADVARS 803 LOADFROM 774 ASKUSER 679 INFILECOMS? 599 FILEPKG.CHANGEDFNS 592 FILEPKG.MERGECHANGES 587 GETPROP 564 FILEDATE 553 GETPROP 524 LISPXPRIN1 512 LISPXPRIN2 503 LISPXPRIN1 488 INFILEP 464 /RPLACD 448 FILEDATE 440 INFILEP 432 CL::SIMPLE-STRING-EQUAL 413 FILEDATE 404 FINDFILE 378 /RPLACD 359 ASKUSER 338 LISPXPRIN1 332 SHOULDNT 250 LISPXPRIN2 218 MEMB 163 GETPROP 147 GETPROP 128 UPDATEFILES 100 ADDFILE 65 FIND-FORMAT 30 MEMB) (1166 MAKEFILEOPTIONS 1152 MAKEFILEOPTIONS 1131 LISTFILES 1119 NOTLISTEDFILES 1108 LIST 1083 NOTCOMPILEDFILES 1073 C 1048 NOTCOMPILEDFILES 1037 RC 1016 NOTCOMPILEDFILES 1010 NOTCOMPILEDFILES 1003 NOTCOMPILEDFILES 990 DON'TCOMPILE 978 DON'TCOMPILE 970 NOTLISTEDFILES 964 NOTLISTEDFILES 957 NOTLISTEDFILES 944 DON'TLIST 934 DON'TLIST 892 SI::RESETUNWIND 877 A 858 compiled 850 loadfns 836 COMPILED 821 DONTCOPY 812 Compiled 794 LOADCOMP 780 Y 758 DWIMWAIT 728 N 719 loadfns 711 compiled 686 Y 670 DECLARE%: 665 DONTCOPY 656 Compiled 637 - 626 N 617 LOADCOMP 582 FILECHANGES 548 FILECHANGES 536 NEW 364 Y 349 Y 344 DWIMWAIT 317 LOADFNS 309 loadfns 293 COMPILED 285 Compiled 277 compiled 261 LOADCOMP 212 REMAKE 203 MAKEFILEREMAKEFLG 194 NEW 183 NEW 158 FILETYPE 142 FILEDATES 72 FORMAT 15 FAST) ( 1202 "-- MAKEFILE not performed." 1183 "Unrecognized MAKEFILE option" 769 ((Y "es ") (N "o ") (A "bort MAKEFILE ")) 739 "loaded via LOADFNS. Load all other expressions from it" 733 "Only some functions from" 698 "was loaded; LOADVARS the (DECLARE .. DONTCOPY ) expressions" 691 "only compiled version of" 642 "LOADFROM it to obtain VARS/COMS" 632 "was loaded with LOADCOMP" 518 ", so it will have to be written anew " 497 "can't find either the previous version or the original version of " 354 "Go ahead and MAKEFILE anyway? " 325 " -- only some of its symbolics have been loaded " 301 " -- only the compiled file has been loaded " 269 "the file was loaded for compilation purposes only") ADDFILE :D8 (L (3 FCLST 2 PRLST 1 LOADTYPE 0 FILE) F 9 FILEPKGTYPES F 10 ADDSPELLFLG)  @ QC HA@ b#Cbd3@C HA@C >AiAdggbggbAgCh[*BI@h AW!NDWH` J\dd3@#IAgL ALL K_d3@0O  _OBO OM M N^(261 /SETTOPVAL 254 SEARCHPRETTYTYPELST 245 INTERSECTION 229 GETTOPVAL 223 SEARCHPRETTYTYPELST 202 \ADDFILE/ADDFILE0 191 ROOTFILENAME 156 ADDSPELL 130 UPDATEFILES 109 SHOULDNT 55 \ADDFILE/ADDFILE0 44 ROOTFILENAME 19 \ADDFILE/ADDFILE0 5 ROOTFILENAME) (180 LOADCOMP 151 USERWORDS 102 LOADCOMP 93 compiled 86 loadfns 77 Compiled 69 LOADFNS) () \ADDFILE/ADDFILE0 :D8 (L (3 DAT 2 FULLNAME 1 LOADTYPE 0 ROOTNAME)) 0@ @g YAZAIoLIA AH n@gHAh YAC@gCBh AiIh H '@g g@g  A?B@IJ `@B@lF`i bBoi hbi%I(214 ERROR 198 MISSPELLED? 159 /SETTOPVAL 153 GETTOPVAL 134 GETTOPVAL 120 GETTOPVAL 113 /RPLACD 101 /PUTPROP 77 /PUTPROP 58 GETTOPVAL 48 /RPLACD 20 GETPROP 8 FILECOMS) (192 FILELST 177 DWIMFLG 148 FILELST 142 FILELST 129 FILELST 91 FILEDATES 67 FILE 15 FILE) ( 208 "not file name." 35 (LOADCOMP loadfns compiled Compiled LOADFNS COMPILED NIL T)) FILEPKGCHANGES :D8 (L (0 N) F 8 FILEPKGTYPES) eHj6WAJK^d3@N YNIL Mh\JZM&kai/W1IJdd3@d K Lh[ZIYL&[Hkzka+kaIhZdWJ J IYka  aI]JM^hMKLh[M_MO̖OiNL&lakaI I (257 /SETTOPVAL 250 SEARCHPRETTYTYPELST 175 GETTOPVAL 169 SEARCHPRETTYTYPELST 156 /SETTOPVAL 148 SEARCHPRETTYTYPELST 90 FILEPKGCHANGES 36 FILEPKGCHANGES) NIL () ALISTS.WHENCHANGED :D8 (L (2 NEWFLG 1 TYPE 0 NAME)) 6@g H#Hgg@HB h(50 RETFROM 45 MARKASCHANGED 11 GETPROP) (33 MARKASCHANGED 25 ALIST 6 VARTYPE) () CHANGECALLERS :D8 (L (4 METHOD 3 FILES 2 AS-TYPES 1 NEW 0 OLD)) B  D `bgGDgD;@hH oi @i oi Ji i o@Aho g@Ahh[DgDdοgD`HhMIgMhMMNgNgNgNdggQgoCNgNdgo*gNgNg,ggNhZhIJgIhWJRDgDgDggdg~Cg hC`! O O \3O_hO_O_OO _d @I Yi L \dg`C`AO ObO_hO_O_@Oi ZLJ O_O Oh__O&_g?C`! OO\5O_hO_O_OO _oD HgHgH@L@L LC@K H_OTIP@Ii Zd>gC 1oi @i oi Ji i hO_hO_O_@OC Qd_AOO ?@OO 3@i oi Ai oi Oi @OC Z-oi @i oi Ai oi Oi oi Ji (1034 PRIN1 1026 PRIN1 1014 PRIN1 1005 PRIN1 993 PRIN1 985 PRIN1 973 PRIN1 965 PRIN1 949 WHEREIS 935 PRIN1 926 PRIN1 914 PRIN1 906 PRIN1 894 PRIN1 885 DELFROMFILES 873 ADDTOFILE 856 WHEREIS 824 TERPRI 817 PRIN1 809 PRIN1 797 PRIN1 789 PRIN1 776 WHEREIS 761 GETRELATION 752 UPDATECHANGED 736 EDITFROMFILE 726 REMOVE 694 ERROR 678 \NCONC2 673 FILEFNSLST 585 \NCONC2 574 EDITCALLERS 507 INTERSECTION 501 GETRELATION 494 PARSERELATION 482 UPDATEFN 470 \NCONC2 465 FILEFNSLST 432 \NCONC2 407 FILEPKGCHANGES 396 UPDATEFILES 115 SUBPAIR 93 TERPRI 86 PRIN1 78 PRIN1 66 PRIN1 58 PRIN1 46 TYPESOF 5 GETFILEPKGTYPE) (770 FNS 712 FNS 701 FNS 630 FILELST 619 SEARCH 529 FILELST 517 EDITCALLERS 417 FILELST 402 FNS 384 MASTERSCOPE 378 SEARCH 372 EDITCALLERS 364 EDITCALLERS 354 EDITCALLERS 334 OR 316 AS 311 USE 303 I.S.OPRS 295 FIELDS 286 RECORDS 271 VARIABLES 262 VARS 247 MACROS 240 CALL 232 OPTIMIZERS 223 SPECIAL-FORMS 214 FUNCTIONS 205 FNS 184 MASTERSCOPE 163 MSDATABASELST 152 MASTERSCOPE 136 MASTERSCOPE 121 R 34 CAREFUL 23 CAREFUL 16 DEFAULTRENAMEMETHOD) ( 1020 " on " 999 " as " 979 " to " 959 "Couldn't change " 920 " on " 900 " changed to " 803 " is referenced in " 783 "Couldn't find where " 688 "UNRECOGNIZED RENAME METHOD" 279 (USE OR BIND) 254 (CALL DIRECTLY) 110 (BIND (LPQ (F OLD N) (MARK %#1) (ORR (1 !0 P) NIL) (MARK %#2) (COMS (SELECTQ (ASKUSER NIL NIL " Replace ? " (QUOTE ((Y "Yes ") (N "No ") (% "") (% "") (% "") (& ""))) NIL NIL (QUOTE (NOECHOFLG T))) (Y (QUOTE (R1 OLD NEW))) (N NIL) (QUOTE TTY%:))) (MARK %#3) (IF (EQ (%## (\ %#3)) (%## (\ %#2))) ((\ %#1)) NIL))) 100 (OLD NEW) 72 " is also defined as " 52 "Warning --") CLEANUP :D8 (L (0 FILES)) 0@ b@@b`J@ gJ h$@d ` X gH gJ Xh"@ `Y` YdH I (142 \APPEND2 137 \APPEND2 130 COMPILEFILES0 120 INTERSECTION 95 MEMB 84 APPLY 70 INTERSECTION 58 LISTFILES 46 MEMB 35 MAKEFILES 8 NLAMBDA.ARGS) (115 NOTCOMPILEDFILES 108 NOTCOMPILEDFILES 89 RC 78 LISTFILES 65 NOTLISTEDFILES 40 LIST 27 CLEANUPOPTIONS) () CLEARCLISPARRAYA0001 :D8 (L (1 FORM 0 TRAN) F 0 NAME) PA Ah` (20 PUTHASH 6 MEMB) (15 CLISPARRAY) () CLEARCLISPARRAYA0002 :D8 (L (1 FORM 0 TRAN) F 0 NAME) )PAAg gAh` (38 PUTHASH 17 GETPROP) (33 CLISPARRAY 23 CHANGETRAN 12 CLISPWORD) () CLEARCLISPARRAY :D8 (I 2 REASON I 1 TYPE I 0 NAME) "`dAggg (31 MAPHASH) (26 CLEARCLISPARRAYA0002 20 CLEARCLISPARRAYA0001 13 I.S.OPRS 4 CLISPARRAY) () COMPARE :D8 (L (4 SOURCE2 3 SOURCE1 2 TYPE 1 NAME2 0 NAME1)) @BCo ABDo HI h@id Coi Cid oi Aid Doi Did oi i HI i(137 COMPARELISTS 130 TERPRI 124 PRIN1 112 PRIN2 103 PRIN1 89 PRIN2 81 PRIN1 69 PRIN2 60 PRIN1 46 PRIN2 35 COMPARELST 25 GETDEF 12 GETDEF) NIL ( 118 " differ:" 97 " from " 75 " and " 54 " from " 20 (NOERROR NOCOPY) 7 (NOERROR NOCOPY)) COMPAREDEFS :D8 (L (2 SOURCES 1 TYPE 0 NAME))  AdBhi BAbAg bB @Ai QB;@A $Hd@AKg  hgHXHA NOXdo_@AOo YAg JdIL hOIJh3oi Oi oi @i i iO_OOh__N^eO&_oJJ @ lN_lg]@id Ooi Oid Olhi oi MMid i OM Og(421 COMPARELISTS 408 TERPRI 401 PRIN2 386 PRIN1 374 TAB 361 PRIN2 349 PRIN1 331 PRIN2 304 NCHARS 298 DREVERSE 242 TERPRI 235 PRIN1 227 PRIN1 215 PRIN1 206 PRIN1 178 COMPARELST 162 GETPROP 150 GETDEF 91 MEMBER 83 GETPROP 62 MEMBER 57 FILEPKGCHANGES 44 WHEREIS 31 GETFILEPKGTYPE 13 GETFILEPKGTYPE) (436 SAME 321 DIFFERENT 157 NULLDEF 103 CURRENT 78 FILE 26 TYPE) ( 380 " and " 343 " from " 285 (only one definition found) 221 " definition found for " 200 "No " 145 (NOERROR NOCOPY) 131 (no definitions found)) COMPILEFILES :D8 (L (0 FILES)) @ bd@  (25 COMPILEFILES0 19 COMPILEFILES0 5 NLAMBDA.ARGS) NIL () COMPILEFILES0 :D8 (L (1 OPTIONS 0 FILES)) T@`i"HAdghAgAAJhlF`hJ JIKJ JZ(76 MAKEFILE1 64 MISSPELLED?) (56 FILELST 35 RC 22 C 7 NOTCOMPILEDFILES) () CONTINUEDITA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 1 STREAM F 2 FILE F 3 SI::*RESETFORMS* F 4 FC F 5 ENV) MgRg chhdScQ cQj Qg Hc HcH(59 \MVLIST 54 \PARSE-FILE-HEADER 43 SETFILEPTR 34 FULLNAME 15 OPENSTREAM) (49 RETURN 10 INPUT 4 CLOSEF) () CONTINUEDIT :D8 (P 7 RESETSTATE P 6 SI::*RESETFORMS* P 5 LISPXHIST P 4 ENV P 3 FC P 0 STREAM I 0 FILE F 8 LISPXHIST) uPW!g $@ Ydg @ IgK IgK@gK ZJh @(113 /PUTPROP 98 MEMB 76 /PUTPROP 71 FILECHANGES 58 LOADFROM 50 GETPROP 38 ROOTFILENAME 27 SI::RESETUNWIND 22 \MVLIST 17 CONTINUEDITA0001) (92 date%: 82 FILEDATES 65 FILECHANGES 45 FILE 12 SI::RESETUNWIND) () COPYDEF :D8 (L (4 OPTIONS 3 SOURCE 2 TYPE 1 NEW 0 OLD)) 0Bg b@BCDghgDddh YBdgdguIkdZdgdgJZJgEJZd3@:@Jkhid X*AJHm XJ i JH;gBg"Ad@@I A@A@A@I ABI A(254 PUTDEF 245 DSUBST 221 DSUBST 178 SAVESET 172 COPY 167 GETTOPVAL 159 PACK* 154 SUBATOM 140 STRPOS 52 GETDEF 47 REMOVE 13 GETFILEPKGTYPE) (202 ALISTS 194 PROPS 113 * 97 IFPROP 89 PROP 71 FILES 60 VARS 34 NOCOPY 24 NOCOPY 8 TYPE) () DEFAULTMAKENEWCOM :D8 (L (3 FILE 2 LISTNAME 1 TYPE 0 NAME) F 0 DEFAULTCOMHASFILEFLG) A`6Ag 'Ag oA Ai PCiB.CA@hA b@B i ig AgBh(111 SAVESET 100 MERGEINSERT 93 GETTOPVAL 84 FILECOMS 59 ERROR 47 SEARCHPRETTYTYPELST 34 GETPROP 19 GETTOPVAL) (119 * 106 NOPRINT 29 GETDEF 14 PRETTYDEFMACROS 5 FILEPKGCOMSPLST) ( 41 "no defined way to dump or obtain the definition of ") DELFROMFILES :D8 (L (2 FILES 1 TYPE 0 NAME))  A bB`AJKJhJJN X@A h@AH =oi @i oi Ni oi i Ag d@ANlINL Mh\rM&l(136 GETPROP 122 TERPRI 115 PRIN1 103 PRIN1 95 PRIN1 83 PRIN1 75 PRIN1 62 INFILECOMS? 52 DELFROMCOMS 44 FILECOMS 8 GETFILEPKGTYPE) (131 WHENUNFILED 18 FILELST) ( 109 ")" 89 " from " 69 "(could not delete ") EDITDEF :D8 (L (4 OPTIONS 3 EDITCOMS 1 TYPE 0 NAME) I 2 SOURCE) XAg bddg Ag @ABCDlH AgB@CD @ABCD @(84 DEFAULT.EDITDEF 72 EDITDEF.FNS 38 GETPROP 24 GETPROP 10 GETFILEPKGTYPE) (60 FNS 33 EDITDEF 19 EDITDEF 5 TYPE) () EXPRESSIONS.WHENCHANGED :D8 (L (0 EXPR)) D@dgdg@g dgdg@d h(59 EXPRESSIONS.WHENCHANGED 31 UNMARKASCHANGED) (46 PROG 38 PROGN 26 VARS 15 SETQQ 7 SETQ) () FILECOMS :D8 (L (1 X 0 FILE)) :@A gAAg@g @ Ag (55 PACK* 42 NAMEFIELD 31 GETPROP) (50 COMS 26 FILE 18 COMS 9 NILCOMS) () FILECOMSLST :D8 (L (2 FLG 1 TYPE 0 FILE)) (BghA@ B A@ B (37 INFILECOMS? 31 FILECOMS 22 INFILECOMS? 16 FILECOMS) (5 UPDATE) () FILEFNSLST :D8 (L (0 FILE)) @o (10 FILECOMSLST) NIL ( 5 (FUNCTIONS FNS)) FILEPKGCOM :D8 (L (0 N)) ,eka1Hdkqo!MDNIg gihIg ZgJh_IO ZNOJh M]lladgIg dgIg dgIg dgdg}Ig XIg YdIdg@g8IIIgIIggI goIohgIg iIg lao HlLdKIg kaLaggJdri+Ig _gIg  EIg gIJg  J J'Ig gIg  Ladg"JIgJ Ig dg"JIgJ Ig dgRJ'IJg gIhh dgIg g =dgdgJIgJ Ig Lao Ll\f(801 ERROR 787 /REMPROP 774 /PUTPROP 740 /SETTOPVAL 735 REMOVE 730 GETTOPVAL 719 GETTOPVAL 701 /PUTASSOC 696 /SETTOPVAL 678 GETTOPVAL 650 /REMPROP 636 /PUTPROP 609 /REMPROP 595 /PUTPROP 568 /SETTOPVAL 562 GETTOPVAL 543 GETTOPVAL 526 /RPLACD 517 /SETTOPVAL 511 GETTOPVAL 490 GETTOPVAL 476 /SETTOPVAL 470 GETTOPVAL 449 GETTOPVAL 413 MARKASCHANGED 390 ERROR 374 GETTOPVAL 359 GETTOPVAL 315 SUBST 242 GETPROP 229 GETPROP 197 GETTOPVAL 176 GETPROP 155 GETPROP 119 \NCONC2 105 FILEPKGCOM 74 GETTOPVAL 46 GETTOPVAL) (782 FILEPKGCONTENTS 768 FILEPKGCONTENTS 756 CONTAIN 748 CONTENTS 725 PRETTYDEFMACROS 714 PRETTYDEFMACROS 708 PRETTYDEFMACROS 686 PRETTYDEFMACROS 673 PRETTYDEFMACROS 659 MACRO 645 DELFROMPRETTYCOM 630 DELFROMPRETTYCOM 618 DELETE 604 ADDTOPRETTYCOM 589 ADDTOPRETTYCOM 577 ADD 557 FILEPKGCOMSPLST 551 FILEPKGCOMSPLST 538 FILEPKGCOMSPLST 506 FILEPKGCOMSPLST 498 FILEPKGCOMSPLST 485 FILEPKGCOMSPLST 465 FILEPKGCOMSPLST 459 FILEPKGCOMSPLST 444 FILEPKGCOMSPLST 425 COM 408 FILEPKGCOMS 369 FILEPKGCOMSPLST 354 FILEPKGCOMSPLST 345 COM 323 LAMBDA 307 PRETTYCOM1 302 INFILECOMTAIL 283 NAME 261 LAMBDA 252 NILL 237 PRETTYTYPE 224 FILEPKGCONTENTS 214 CONTAIN 206 CONTENTS 192 PRETTYDEFMACROS 183 MACRO 171 DELFROMPRETTYCOM 162 DELETE 150 ADDTOPRETTYCOM 141 ADD 88 COM 69 FILEPKGCOMSPLST 53 COM 41 FILEPKGCOMSPLST) ( 796 "not file package command property" 385 "not file package command property" 334 (COM TYPE NAME) 328 (COM TYPE NAME) 20 (MACRO CONTENTS DELETE ADD)) FILEPKGCOMPROPS :D8 (L (0 PROPS)) 9@2dHd` `Hgg h(48 PUT 19 MEMB) (43 FILEPKGCOMS 38 PROPTYPE 31 SYSPROPS 25 SYSPROPS 14 SYSPROPS) () FILEPKGTYPE :D8 (L (0 N) F 8 FILEPKGTYPES) eka1Hdkoo` !M8N3Ig gihIg Z gJh_IO ZNOJh M]l_la`Ila ladgI gIg iIg lao HlLdKIg kaLagEJdiIWgIW IWgIJW hJ `JIWgIW Lda`JILaJ 0ILa &agIJ J Lao Ll\:(419 ERROR 406 /RPLACA 398 SEARCHPRETTYTYPELST 381 /REMPROP 371 /PUTPROP 347 /SETTOPVAL 323 /RPLACD 315 /SETTOPVAL 290 /SETTOPVAL 243 MARKASCHANGED 220 ERROR 204 GETTOPVAL 189 GETTOPVAL 166 SEARCHPRETTYTYPELST 147 GETPROP 117 \NCONC2 103 FILEPKGTYPE 76 GETTOPVAL 52 GETTOPVAL 30 UNION) (389 DESCRIPTION 356 FILEPKGTYPEPROPS 338 FILEPKGTYPES 304 FILEPKGTYPES 281 FILEPKGTYPES 255 TYPE 238 FILEPKGCOMS 199 FILEPKGTYPES 184 FILEPKGTYPES 175 TYPE 157 DESCRIPTION 136 FILEPKGTYPEPROPS 86 TYPE 71 FILEPKGTYPES 59 TYPE 47 FILEPKGTYPES 25 FILEPKGTYPEPROPS) ( 414 "not file package command/type property" 215 "not file package type property" 20 (DESCRIPTION)) FILES? :D8 (F 9 FILEPKGTYPES)  ``Z_Wh\MIoi `!`$o i o i [g X6Ioi iKi oi H!Ni JX_d-Oi _Oi O hi i ki N^Io iL(267 FILES?1 247 LISPXSPACES 239 LISPXPRIN2 231 LISPXTAB 222 FILES?PRINTLST 213 LISPXPRIN2 201 POSITION 177 LISPXTERPRI 161 LISPXPRIN1 149 LISPXPRIN2 139 LISPXPRIN1 121 GETPROP 106 LISPXTERPRI 99 FILES?PRINTLST 86 LISPXTERPRI 79 FILES?PRINTLST 50 ADDTOFILES? 44 LISPXPRIN1 4 UPDATEFILES) (116 FILE 63 NOTLISTEDFILES 56 NOTCOMPILEDFILES 12 FILELST) ( 262 " plus " 155 " ...changes to " 133 "To be dumped: " 94 "To be compiled: " 74 "To be listed: " 38 "...to be dumped. ") FILES?1 :D8 (L (1 FIRST 0 TYPE)) Q @d3@G@ X;@  Y+AAi oi Hi I i i(77 LISPXTERPRI 71 FILES?PRINTLST 65 LISPXPRIN1 58 LISPXPRIN1 46 LISPXPRIN1 33 GETTOPVAL 27 SEARCHPRETTYTYPELST 15 SEARCHPRETTYTYPELST) NIL ( 52 "the ") GETFILEPKGTYPE :D8 (L (3 NAME 2 NOERROR 1 ONLY 0 TYPE) F 4 FILEPKGTYPES) \@d*1HIABC dJ KhZHXK&gCd Adg+@gigTHYhAg@d3@@`Ag@dd3@T1H4h@hAdgTTh@I@I@IIHXYdZ @ ջjKKk@J IdJHXg`T` 0B,Adgogoo@ h(343 ERROR 297 FIXSPELL 292 UNION 253 STRPOS 234 NCHARS 228 NCHARS 60 TYPESOF 22 GETFILEPKGTYPE) (324 COMS 309 TYPE 287 FILEPKGCOMSPLST 280 FILEPKGCOMSPLST 273 COMS 183 TYPE 146 COMS 132 FILEPKGCOMSPLST 117 TYPE 89 VARS 80 FNS 68 COMS 49 ?) ( 337 "unrecognized manager definition-type/command" 331 "unrecognized manager command" 317 "unrecognized manager definition type") HASDEFA0001 :D8 (L (0 X) F 0 TYPE) @Pg (11 HASDEF) (6 CURRENT) () HASDEF :D8 (L (3 SPELLFLG 2 SOURCE 0 NAME) I 1 TYPE F 14 FILEPKGTYPES) IAdg bd!!HI@JB YHXg o"B gbgBdj@A  hAg [@ABlKL@d3@Adg<@+Cq@d3@f@hAdg!`@ g]AgTAgKAgBAg9Ag0Ag'AgAgAgAghAdg%@o o ds kg@ [Adg@` Cg@d`4`&Adg@ @ gg@ Adg.@g ZdgJg g8@d @d @g'\@gB |Adg@ lg@`\AdghOgAgAgAdgh)g@d`WH@AgI h@d3@@ +gWhg $@bA>dI@IYV0@dZJVdLKh]K&M@(64 SI::RESETUNWIND 59 \MVLIST 54 INFILECOMTAILA0001 28 \EVALV1) (49 SI::RESETUNWIND 36 DWIMLOADFNSFLG 8 *) () LOADDEF :D8 (L (2 SOURCE 1 TYPE 0 NAME)) @A@ABo (19 PUTDEF 14 GETDEF) NIL ( 9 (NODWIM NOCOPY)) MAKEALISTCOMS :D8 (L (0 X)) g@@d[AL"MXIHZYJh YHd_h_LOKA OO_N Oh^O&O_hO_O_OO %gOggOhid _O Oh__O&_(171 LISPXPRINT 137 SASSOC 132 GETTOPVAL 47 LAST) (156 on 151 entry 144 no 4 ADDVARS) () MAKEFILE1 :D8 (L (3 OTHERFILES 2 OPTIONS 1 RECOMPFLG 0 FILE)) }@ @ RIgIg#Hd gH` hHg Zh[]hoi J@id Bg BgBgIdgH@gMgMNh \H!Ldg LC LriKzg@gMNgMi yIgIg^Bo Bh JAJ DJ dg5dg,dg#dgId`oi IYB(210 PRINT) (195 LOADOPTIONS 183 NOERROR 174 IMPORT 165 SYMBOLIC 156 SOURCE 147 EXT 138 EXTENSION 129 LOAD 120 COMPILED 101 OF 90 VALUE 80 VALUEOF 66 FROM 55 LOADFROM 44 LOADCOMP 13 FILESLOAD) ( 203 (-- unrecognized FILES option)) MAKELISPXMACROSCOMS :D8 (L (0 X))  g0@d`dKJh\J&LX gHh0@d`dKJh\J&LX gHh X0@d`dKJh\J&LYggIhh0@d`dKJh\J&LYggIhh (223 \NCONC2 106 \NCONC2) (211 HISTORYCOMS 206 ADDVARS 176 HISTORYCOMS 156 LISPXCOMS 151 ADDVARS 121 LISPXCOMS 97 LISPXMACROS 67 LISPXMACROS 50 LISPXHISTORYMACROS 20 LISPXHISTORYMACROS 7 ALISTS) () MAKENEWCOM :D8 (L (3 FILE 2 LISTNAME 1 TYPE 0 NAME)) A b@@ bAg X@ABClHmAdg#BVg@dd@;@h5g1@g@gBC gBgBh@h @ABC (153 DEFAULTMAKENEWCOM 120 MAKENEWCOM 33 GETPROP 19 COPY 5 GETFILEPKGTYPE) (134 * 127 P 113 VARS 104 SETQ 94 EXPRESSIONS 65 PROP 53 PROPS 28 NEWCOM) () MAKEPROPSCOMS :D8 (L (0 X)) 9@@/dgKddKKhIHhZH&JNIL (13 PROP) () MAKEUSERMACROSCOMS :D8 (L (0 X)) + 0@/0`:dY`I`Ioid ܰ dLKh]K&Md bgoAKLoAK`L h_ 1 O OX(3d@_OOh__O_O&_OHM Nh]K[N&_0 O )dZ@JJ@d_O Oh_O&_OXOHM Nh]K[PN&(224 GETTOPVAL 135 GETTOPVAL 123 \NCONC2 82 INTERSECTION 48 LISPXPRINT) (90 ADDVARS 32 EDITMACROS 23 USERMACROS 13 USERMACROS) ( 109 (EDITCOMSA EDITCOMSL COMPACTHISTORYCOMS DONTSAVEHISTORYCOMS) 95 (USERMACROS EDITMACROS) 40 (-- no entry on USERMACROS)) MARKASCHANGED :D8 (L (2 REASON 1 TYPE 0 NAME) F 2 LISPXHIST F 3 FILEPKGFLG F 4 MARKASCHANGEDFNS) SBdgCdg:dg1dg(dg gigoB bAg bdg HT(HhHH@ABlId@ABlHBg1A  HY @A N@Ih IA@A   @A   RgHhR @(274 UNDOSAVE 254 SETTOPVAL 248 GETTOPVAL 242 SEARCHPRETTYTYPELST 234 SEARCHPRETTYTYPELST 228 GETTOPVAL 222 SEARCHPRETTYTYPELST 209 /RPLACA 195 DELFROMFILES 179 GETTOPVAL 173 SEARCHPRETTYTYPELST 107 GETPROP 94 GETFILEPKGTYPE 81 ERROR) (264 /RPLACA 164 DELETED 102 WHENCHANGED 89 TYPE 69 DEFINED 59 CHANGED 49 DELETED 40 DEFINED 31 CHANGED 22 LOAD 13 CLISP) ( 75 "bad REASON in MARKASCHANGED") MOVETOFILE :D8 (L (3 FROMFILE 2 TYPE 1 NAME 0 TOFILE)) JB bdgCABABCo BgAB ABC AB@ (71 ADDTOFILE 63 DELFROMFILES 54 MARKASCHANGED 38 PUTDEF 33 GETDEF 5 GETFILEPKGTYPE) (45 FNS 13 FNS) ( 28 (NOCOPY NODWIM)) POSTEDITPROPS :D8 (L (1 OLDPROPS 0 EDITCHANGES) F 4 FILEPKGFLG) @Th@@[}AZi[nKNJKJh`K` XKHKHKh` hJ@Khgh iKIq@hh(136 MARKASCHANGED 109 PUTHASH 74 GETHASH) (130 PROPS 104 CLISPARRAY 69 CLISPARRAY 59 CLISPARRAY) () PREEDITFN :D8 (L (2 EDITCHANGES 1 TYPE 0 ATM) F 3 SI::*RESETFORMS* F 4 FILEPKGFLG) 6T0Adgn`hhhh `5@+dH H` HdH` gB@h hhdScg@g HgH gHi`hhhh `6@ +dH H` HdH` gB0@ dIHhZH&JhhdSc(273 \EVALV1 252 PUTHASH 234 GETHASH 212 \EVALV1 198 CLISPTRAN 147 GETPROP 111 \APPEND2 88 PUTHASH 70 GETHASH 35 CLISPTRAN) (263 POSTEDITALISTS 247 CLISPARRAY 229 CLISPARRAY 204 CLISPARRAY 185 CLISPARRAY 168 ALIST 156 ALIST 142 VARTYPE 129 VARS 99 POSTEDITPROPS 83 CLISPARRAY 65 CLISPARRAY 41 CLISPARRAY 22 CLISPARRAY 13 PROPLST) () PRETTYDEFMACROS :D8 (L (0 ARGS)) )@@d[gK IHhZH&J(21 FILEPKGCOM) (14 MACRO) () PROPS.WHENCHANGED :D8 (L (2 NEWFLG 1 TYPE 0 NAME)) H@g H"gHg@HB h @g @ h(68 CLEARCLISPARRAY 47 RETFROM 40 MARKASCHANGED 12 GETPROP) (58 CLISPWORD 29 IGNORE 23 MARKASCHANGED 7 PROPTYPE) () PUTDEF :D8 (L (3 REASON 2 DEFINITION 1 TYPE 0 NAME)) }Ag bdg H@ABClHAdg@ABC @g@ABC .Adg@ABC g@ABC B @(121 EVAL 114 FILEPKGCOMS.PUTDEF 96 FILES.PUTDEF 75 VARS.PUTDEF 57 FNS.PUTDEF 23 GETPROP 10 GETFILEPKGTYPE) (103 FILEPKGCOMS 84 FILES 64 VARS 45 FNS 18 PUTDEF 5 TYPE) () RENAME :D8 (L (4 METHOD 3 FILES 2 TYPES 1 NEW 0 OLD)) Bgh@ AHYI@AHCD H[K2AdhIJg@AJhJgg KhKKLg@dg @Ag @L (142 DELDEF 133 COPYDEF 119 HASDEF 84 COPYDEF 32 CHANGECALLERS 12 GETFILEPKGTYPE) (128 FIELDS 114 FIELDS 104 FIELDS 78 NOERROR 70 VARS 57 FIELDS 5 TYPE) () SAVEDEF :D8 (L (2 DEFINITION 1 TYPE 0 NAME)) @)A'0@dg IHhZH&JAg bdgKB@ b@Bd g! gB ggbB sg/B @ bgXB@ N@gbB >B@Ago b&@BA`A@hh` A(250 /PUTASSOC 210 GETDEF 188 /PUT 171 GETTOPVAL 154 GETTOPVAL 135 /PUT 115 CCODEP 101 EXPRP 87 SUBRP 73 GETD 53 GETFILEPKGTYPE 24 SAVEDEF) (244 SAVEDDEFS 238 SAVEDDEFS 222 SAVEDDEFS 200 CURRENT 180 VALUE 161 NOBIND 142 VARS 127 LIST 121 CODE 107 EXPR 94 SUBR 61 FNS 48 TYPE 19 FNS) ( 205 (NOCOPY NOERROR NODWIM)) SAVEPUT :D8 (L (2 VAL 1 PROP 0 ATM) F 4 LISPXHIST F 5 DFNFLG F 6 ADDSPELLFLG) @dd3@l@h @1H)HxIuABhTg@JhT IJyPHdACBn ihHB KfUiNgAgg@hid -YXAB@@JTg@JhT @AhgKh V@j B(218 ADDSPELL 208 MARKASCHANGED 189 UNDOSAVE 144 LISPXPRINT 105 /RPLACA 92 EQUALN 63 UNDOSAVE 18 ERRORX) (200 PROPS 177 /PUT-1 130 for 125 property 119 new 51 /PUT-1) () SEARCHPRETTYTYPELST :D8 (L (1 FLG 0 TYPE) F 2 PRETTYTYPELST) k@d3@RRHKhFACgg@g @hdbg  Ad Ah AY@IiHX(85 /SETTOPVAL 74 GETTOPVAL 66 /SETTOPVAL 60 GETTOPVAL 42 PACK*) (55 PRETTYTYPELST 37 LST 31 CHANGED 26 PRETTYTYPELST) () SHOWDEFA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 5 NEWFILEMAP P 4 PRETTYCOMSLST P 3 FL P 2 FNSLST P 1 ORIGFLG P 0 SOURCEFILENV I 0 SI::*CLEANUP-FORMS* F 6 FILE F 7 SI::*RESETFORMS* F 8 *DEFAULT-MAKEFILE-ENVIRONMENT* F 9 TYPE F 10 NAME) dW QVHV?Vg [gK hhV ghhdWcWW h(96 PRETTYCOM 91 MAKENEWCOM 69 OUTPUT 58 OUTFILE 46 OUTPUT 32 OPENP 18 OUTPUT 6 MAKE-READER-ENVIRONMENT) (64 CLOSEF? 40 OUTPUT 27 OUTPUT) () SHOWDEF :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 FILE I 1 TYPE I 0 NAME F 3 LISPXHIST) S!g $(23 SI::RESETUNWIND 18 \MVLIST 13 SHOWDEFA0001) (8 SI::RESETUNWIND) () SMASHFILECOMS :D8 (L (0 FILE)) ,@g H@dd3@g HX(36 SETTOPVAL 10 FILECOMSLST) (31 NOBIND 5 FILEVARS) () TYPESOFA0001 :D8 (F 1 FOUND F 2 SHADOW-TYPES) (Q!dRdHQHQ ch(24 REMOVE) NIL () TYPESOF :D8 (L (4 FILTER 3 SOURCE 2 IMPOSSIBLETYPES 1 POSSIBLETYPES 0 NAME) P 0 FOUND F 14 FILEPKGTYPES F 15 SHADOW-TYPES)  CgCKh__AWhK@jg`]Og @O H jgKhKKLd3@LBBLBDLkDHhY/h@Lg @d3@-@Lg LHfLJWJWiILO_FOtNg i@ON g _M!! OOO __dO"HOW_OO OO _O_AW_OHO_hO_O_Od3@OBBOBDOkD@OC OH(419 HASDEF 333 REMOVE 323 LDIFFERENCE 289 LDIFFERENCE 262 INFILECOMS? 252 FILECOMS 237 GETPROP 177 HASDEF 156 HASDEF 82 UNION 76 XCL::HASH-FILE-TYPES-OF 67 \DEFINEDP) (257 TYPESOF 232 FILE 172 SAVED 151 CURRENT 89 TYPESOFA0001 62 XCL::HASH-FILE-TYPES-OF 45 FILELST 38 TYPESOFA0001 8 ?) () UNMARKASCHANGED :D8 (L (1 TYPE 0 NAME))  Ag b  @I `AJH@ i@AKg ]^ \!iLN \NLMNM JZ(122 /RPLACD 117 REMOVE 103 REMOVE 89 MEMBER 79 GETPROP 59 /RPLACA 34 MEMBER 26 GETTOPVAL 20 SEARCHPRETTYTYPELST 13 GETFILEPKGTYPE) (74 FILE 41 FILELST 8 TYPE) () UNSAVEDEF :D8 (L (2 DEF 1 TYPE 0 NAME) P 3 DFNFLG F 4 DFNFLG) A%AgAgAgAg/@d#0@dA IHhZH&JA B&@Ag bgj bAoTi@A i@AB @AB A(156 PUTDEF 146 PUTDEF 133 SAVEDEF 110 GETDEF 97 GETFILEPKGTYPE 81 UNSAVED1 57 UNSAVED1) (104 SAVED 92 TYPE 34 LIST 26 SUBR 17 CODE 8 EXPR) ( 119 (not found)) UPDATEFILES :D8 (L (1 FLST 0 PRLST) F 15 FILEPKGTYPES) gWQHhYd  i ZIh h P`I@rJIgg _OO _N JO IM M HX_g AJO J_*Og __OIOg _N^d`O:gOg gOg IO_OIh_ Oh[OOO _\O OL K(352 /NCONC1 343 MEMBER 328 \NCONC2 323 \NCONC2 300 /NCONC1 279 /SETTOPVAL 274 REMOVE 269 GETTOPVAL 251 /SETTOPVAL 246 REMOVE 241 GETTOPVAL 205 INFILECOMS? 181 GETPROP 163 INTERSECTION 150 GETPROP 130 /SETTOPVAL 123 SEARCHPRETTYTYPELST 115 LDIFFERENCE 100 \NCONC2 95 \NCONC2 82 INFILECOMS? 50 /SETTOPVAL 43 SEARCHPRETTYTYPELST 33 FILEPKGCHANGES 24 GETTOPVAL 18 SEARCHPRETTYTYPELST) (264 NOTCOMPILEDFILES 257 NOTCOMPILEDFILES 236 NOTLISTEDFILES 229 NOTLISTEDFILES 200 UPDATE 176 FILE 145 FILEDATES 77 UPDATE 72 NILCOMS 58 FILELST) () DELDEF :D8 (L (1 TYPE 0 NAME)) %PAg bg X@AlHAdgM@d @ @g `g@ddi3 g@hh g@g AdgSodY@I @gh @gh @gh @ -gjg@ g@ @ Z@Jh @ [@Kh g@ g Adg@d@@  g`d@L xAdg@di@ \g?g@` g@` g@ g@ oAohi @Ag @(545 MARKASCHANGED 532 PRIN1 509 \DELDEF/DELFROMLIST 497 \DELDEF/DELFROMLIST 485 \DELDEF/DELFROMLIST 467 \DELDEF/DELFROMLIST 440 /REMPROP 408 /REMPROP 381 \DELDEF/DELFROMLIST 375 GETTOPVAL 343 /SETTOPVAL 338 REMOVE 333 GETTOPVAL 323 SEARCHPRETTYTYPELST 306 FILEPKGTYPE 295 FILEPKGTYPE 283 FILEPKGCOM 272 FILEPKGCOM 265 \DELDEF/DELFROMLIST 253 \DELDEF/DELFROMLIST 231 FLUSHFILEMAPS 224 /PUTPROP 211 /PUTPROP 198 /PUTPROP 181 /SETTOPVAL 176 REMOVE 171 GETTOPVAL 140 /SETTOPVAL 119 MASTERSCOPE 75 REMPROP 63 /PUTD 55 EXPRP 25 GETPROP 13 GETFILEPKGTYPE) (540 DELETED 503 HISTORYCOMS 491 LISPXCOMS 479 LISPXHISTORYMACROS 473 LISPXHISTORYMACROS 461 LISPXMACROS 455 LISPXMACROS 447 LISPXMACROS 422 PROPS 397 MACROPROPS 389 MACROS 353 ALISTS 328 PRETTYTYPELST 317 PRETTYTYPELST 259 FILEPKGTYPES 247 FILEPKGCOMSPLST 239 FILEPKGCOMS 218 FILEDATES 205 FILECHANGES 192 FILE 150 FILES 135 NOBIND 127 VARS 107 QUOTE 90 ERASE 81 MSDATABASELST 70 EXPR 44 FNS 20 DELDEF 8 TYPE) ( 522 "not implemented yet" 516 "Note: deleting" 159 (FILELST NOTCOMPILEDFILES NOTLISTEDFILES)) \DELDEF/DELFROMLIST :D8 (L (1 VAL 0 VAR)) @A@ 6@@@ d[AKKAdIHhZH&J (61 /SETTOPVAL 19 GETTOPVAL 6 GETTOPVAL) NIL () GETDEF :D8 (L (3 OPTIONS 2 SOURCE 1 TYPE 0 NAME) P 1 NOCOPY P 0 EDIT) WCgC gCiCgC gCi"CdjobikobiCigbAg bBdjgigB gbg@AC {BdgPgCddh@AK ZAg J@AK ZAg 3@AgC #g@AC B7@ABC iIJ Ag/Cg&CgCgBJ@B J(339 \GETDEF/DWIMDEF 284 COPY 273 \GETDEF/GETDEFFROMFILE 258 \GETDEF/GETDEFSAVED 240 \GETDEF/GETDEFFROMFILE 224 GETPROP 212 \GETDEF/GETDEFSAVED 201 GETPROP 189 \GETDEF/GETDEFCURRENT 152 \GETDEF/GETDEFCURRENT 103 GETFILEPKGTYPE) (323 = 312 NODWIM 300 NODWIM 291 FNS 248 SAVED 234 FILE 219 NULLDEF 196 NULLDEF 171 NOERROR 162 ? 142 CURRENT 135 ? 126 SAVED 116 CURRENT 98 TYPE 89 SPELL 40 NOCOPY 28 NOCOPY 17 EDIT 5 EDIT) ( 74 (NOERROR NODWIM FAST ARGLIST) 59 (NOERROR NODWIM)) \GETDEF/DWIMDEF :D8 (L (2 SOURCE 1 FN 0 DEF) P 4 LISPXHIST P 3 FILEPKGFLG P 2 DWIMESSGAG P 1 NOSPELLFLG F 5 DWIMIFYCOMPFLG) Uim`id@gWBgBgBgBdgh.d3@BBg HgH gHiid"@AAgh@ (135 DWIMIFY0 82 GETPROP) (128 ? 103 CLISP 91 CLISP 77 FILETYPE 59 ? 50 FILE 41 SAVED 32 CURRENT 23 CLISP%: 9 CLISPIFYPRETTYFLG) () GETDEFCOM :D8 (L (0 X)) (0@d XI HZYJ YH(33 LAST 12 \GETDEF/GETDEFCOM0) NIL () \GETDEF/GETDEFCOM0 :D8 (L (0 COM)) 0@g X70H@ H d [L K]\M \K@dg/0@ d [L K]\M \Kdg*0@ dgILKh]K&Mdg*0@ dgJLKh]K&Mg@ h g (256 RETFROM 245 \APPEND2 239 PRETTYCOM1 196 PRETTYCOM1 147 PRETTYCOM1 123 LAST 102 \GETDEF/GETDEFCOM0 93 PRETTYCOM1 67 LAST 46 \GETDEF/GETDEFCOM0 37 SUBPAIR 30 PRETTYCOM1 14 GETTOPVAL) (251 GETDEFCOM 231 P 206 APPENDTOVAR 183 APPENDVARS 157 ADDTOVAR 134 ADDVARS 80 COMS 9 PRETTYDEFMACROS) () \GETDEF/GETDEFERR :D8 (L (3 MSG 2 OPTIONS 1 TYPE 0 NAME)) @BgBgBAg C7BgBd+gB @AhBgI i XBZJ;@Aoi h@gHAggBddh JhJJK gK (184 RETFROM 171 STRINGP 152 RETFROM 147 GETDEF 110 ERROR 87 HASDEF 77 MEMB 33 GETPROP) (178 GETDEF 133 NOERROR 128 ? 121 GETDEF 71 SPELL 56 SPELL 43 SPELL 28 NULLDEF 19 NOERROR 8 NOERROR) ( 103 (definition not found)) \GETDEF/GETDEFCURRENTA0003 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 8 SI::*RESETFORMS* F 9 FILE F 10 NOCOPY F 11 COMS F 12 DEF) gd gh Wcgd gh Wcggg c hhWcW Wj W !H IcicIJdghudgRJAK_L\dgdgdgOh߿Od`M Nh]ON&dgJgJJh HXh(268 \NCONC2 116 READFILE 109 SETFILEPTR 101 PRETTYDEFCOMS 84 OUTPUT 77 OPENSTREAM 51 SETTOPVAL 39 GETTOPVAL 22 SETTOPVAL 10 GETTOPVAL) (255 PROGN 243 CL:EVAL-WHEN 215 DECLARETAGSLST 196 EVAL@COMPILEWHEN 188 EVAL@LOADWHEN 180 COPYWHEN 154 DECLARE%: 142 * 72 BOTH 67 {NODIRCORE} 62 OUTPUT 45 FONTCHANGEFLG 33 FONTCHANGEFLG 16 PRETTYFLG 4 PRETTYFLG) () \GETDEF/GETDEFCURRENT :D8 (L (2 OPTIONS 1 TYPE 0 NAME) P 15 RESETSTATE P 14 SI::*RESETFORMS* P 13 LISPXHIST P 12 *PRINT-BASE* P 11 *READ-BASE* P 10 *READTABLE* P 9 *PACKAGE* P 8 FILE P 7 COMS P 0 DEF F 16 *OLD-INTERLISP-READ-ENVIRONMENT* F 17 LISPXHIST) @Ag X.AdgH@d3@@ X Hi@ABlHXAg @AB Hg@d3@@ g~AgAdgJ@d3@`Ag@ @ BgBgBH (H$gK@d3@@ XH Hg Hg hAdgQ@d3@@ Xg@ddi3 g@hHddi3 gHhhzgK@d3@g@!L^MXQg@HE`MNNh NAdg@g:@ @d@hXg@@HhAdgO@d3@@ @ Y JgIgJhIgIJgJhg(@d3@@ X@g H[gT@A hO X8W [KKK W"!g $H XAg @AB H(784 \GETDEF/GETDEFERR 774 GETPROP 761 MKPROGN 749 SI::RESETUNWIND 744 \MVLIST 739 \GETDEF/GETDEFCURRENTA0003 699 GETDEFCOM 687 MAKENEWCOM 669 WHEREIS 655 GETTOPVAL 581 FILEPKGTYPE 575 FILEPKGCOM 462 \NCONC2 326 GETTEMPLATE 290 GETPROP 278 GETPROP 266 GETTOPVAL 261 FILECOMS 254 UPDATEFILES 242 GETFILEDEF 210 COPY 183 MKPROGN 178 FIELDLOOK 171 RECLOOK 116 GETTOPVAL 94 \GETDEF/GETDEFERR 84 GETPROP 50 EXPRP 44 VIRGINFN 13 GETPROP) (769 NULLDEF 734 SI::RESETUNWIND 709 READER-ENVIRONMENT 678 NOBIND 664 FILEVARS 639 FILEVARS 627 TYPE 613 COM 600 TYPE 593 COM 554 FILEPKGCOMS 531 PUTPROPS 488 PROPS 475 EXPRESSIONS 446 MACROPROPS 433 PUTPROPS 392 MACROS 376 QUOTE 355 QUOTE 338 SETTEMPLATE 305 TEMPLATES 285 FILEDATES 273 FILE 222 FILES 201 EDIT 190 EDIT 163 RECORDS 142 RECORDS 133 FIELDS 124 NOBIND 101 VARS 79 NULLDEF 23 FNS 8 GETDEF) () \GETDEF/GETDEFFROMFILEA0004 :D8 (NAME SI::*UNWIND-PROTECT* P 0 LOAD-VERBOSE-STREAM I 0 SI::*CLEANUP-FORMS* F 1 NAME F 2 SI::*RESETFORMS* F 3 SOURCE F 4 OPTIONS F 5 TYPE) TghhRchSgQd3@ggQhhi QUgTddh (81 \GETDEF/GETDEFCURRENT 59 LOADFNS 9 RESETUNDO) (67 NOERROR 45 |..| 40 & 28 PROP 4 RESETUNDO) () \GETDEF/GETDEFFROMFILE :D8 (P 9 RESETSTATE P 8 SI::*RESETFORMS* P 7 LISPXHIST P 4 SOURCE I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME F 10 LISPXHIST)  oBdg@Ai RI@ACoLddh IhIIJi \Ag ]@ALCHlM0Adg@ALCH gAdg@ALCH g@ALCH Adg@ALCH g@ALCH Adg@ALCH g@ALCH Ag'[]hLggoggggKhhoh ^dgH/gN$N W! g $[HLgJ`ioL K(440 CL:FORMAT 399 SI::RESETUNWIND 394 \MVLIST 389 \GETDEF/GETDEFFROMFILEA0004 344 LOADFNS 266 FILEGETDEF.LISPXMACROS 245 FILEGETDEF.ALISTS 221 FILEGETDEF.RECORDS 200 FILEGETDEF.PROPS 176 FILEGETDEF.MACROS 155 FILEGETDEF.VARS 124 FILEGETDEF.FNS 88 GETPROP 74 FINDFILE 54 \GETDEF/GETDEFERR 49 \APPEND2 22 WHEREIS) (426 FILELST 417 FILE 384 SI::RESETUNWIND 366 PROGN 353 NOT-FOUND 320 QUOTE 315 FIRST 310 MEMB 305 AND 295 LAMBDA 290 GETDEF 279 DEFINERS 253 LISPXMACROS 231 ALISTS 208 RECORDS 186 PROPS 163 MACROS 141 FILEVARS 132 VARS 110 FNS 83 FILEGETDEF 11 FILE) ( 434 "(from ~A)~%%" 333 ((OR (EQ SECOND NAME) (AND (MEMB SECOND (QUOTE (%( %[))) (PROGN (RATOM) (RATOM) (RATOM) (EQ NAME (RATOM)))))) 300 (FIRST SECOND) 36 (no definition on) 4 "not found") \GETDEF/GETDEFSAVED :D8 (L (2 OPTIONS 1 TYPE 0 NAME)) yAdg@g a@ABo g.@HY@ABo gII@A` @ABo (118 \GETDEF/GETDEFERR 102 SASSOC 71 \GETDEF/GETDEFERR 36 \GETDEF/GETDEFERR 21 GETPROP) (96 SAVEDDEFS 78 VALUE 42 VARS 16 EXPR 6 FNS) ( 113 "no saved definition for " 66 "no saved value for " 31 "no saved definition for") FILECHANGESA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 4 FC P 3 ENV P 2 A0178 P 1 STREAM P 0 OLDPTR I 0 SI::*CLEANUP-FORMS* F 5 FILE F 6 SI::*RESETFORMS*) c Ug YDgUg YhhdVc Ig !JJHIH L Ij (95 SETFILEPTR 87 GETFILEPTR 80 SETFILEPTR 61 \MVLIST 56 \PARSE-FILE-HEADER 32 OPENSTREAM 13 OPENP) (51 RETURN 27 INPUT 21 CLOSEF 8 INPUT) () FILECHANGES :D8 (P 6 FOUND P 5 CHANGES P 4 FNS P 3 FCEXPR P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 TYPE I 0 FILE F 13 LISPXHIST) @d" W!g $1KA0 MdgAMdgdgidgdg𒿰ÿNKMK[dd3@d_O Oh_O&_O\AdgM L3gL0 Mdd_O Oh_O&_OM(172 \NCONC2 31 SI::RESETUNWIND 26 \MVLIST 21 FILECHANGESA0001) (181 FNS 164 FNS 100 :PREVIOUS-DATE 92 previous 79 :CHANGES-TO 71 to%: 56 FNS 16 SI::RESETUNWIND) () FILEPKG.MERGECHANGES :D8 (P 13 X P 8 TEMP P 7 E2 P 6 VAL P 4 E1 I 1 C2 I 0 C1) A@AH I"M$N\dh J KhZYHXK&Z_N_NOh h ^M]OA O O _O O_OOh__O_O&_(116 MEMBER 103 \NCONC2 77 \NCONC2 70 \APPEND2 31 \APPEND2) NIL () FILEPKG.CHANGEDFNS :D8 (I 0 CHANGES) g@NIL (4 FNS) () COMPILE-FILE? :D8 (P 3 X P 1 UNKNOWN P 0 TYPE I 0 FILE F 4 *DEFAULT-CLEANUP-COMPILER*) @ g'1HJIioH TdhJKgKdgggKdgggKgKdgggKdgggyit(37 CL:FORMAT 5 ROOTFILENAME) (153 CLISP 147 CL:COMPILE-FILE 140 :XCL-COMPILE-FILE 131 :COMPILE-FILE 125 FAKE-COMPILE-FILE 118 COMPILE-FILE 109 CL:COMPILE-FILE 100 :FAKE-COMPILE-FILE 94 BCOMPL 87 :BCOMPL 78 BCOMPL 72 TCOMPL 65 :TCOMPL 56 TCOMPL 14 FILETYPE) ( 31 "~2%%**Warning: unknown FILETYPE value ~S~2%%") LISTFILES :D8 (P 6 OPTIONS P 5 FULLNAME P 4 FILE I 0 FILES) @`aH I b\dN ^$ ]!Li oi i i0hMN Mi ` MJ KhZHXK&(108 REMOVE 98 NAMEFIELD 89 LISTFILES1 73 TERPRI 66 PRIN1 54 PRIN1 44 FINDFILE 36 \APPEND2 21 NLAMBDA.ARGS) (113 NOTLISTEDFILES 103 NOTLISTEDFILES 7 NOTLISTEDFILES) ( 60 " not found.") WHEREIS :D8 (P 10 T15 P 9 T14 P 8 FILE-NAME P 7 IN-FILES P 6 TY P 4 FILES P 3 FILE I 3 FN I 2 FILES I 1 TYPE I 0 NAME) @i0B,`%d@AK dIHhZH&JBi g AML  C_OVMhMM@N )dO L OOOOO\ذd@KlChO(153 MKATOM 148 U-CASE 134 XCL::HASH-FILE-WHERE-IS 129 GETFILEPKGTYPE 100 UNION 94 REVERSE 75 CL:FBOUNDP 38 INFILECOMS? 33 FILECOMS) (70 XCL::HASH-FILE-WHERE-IS 18 FILELST) () FILES?PRINTLSTA0001 :D8 (I 0 STR) 9i @id lhi i oi @id (54 LISPXPRIN2 45 LISPXPRIN1 33 LISPXTERPRI 24 LINELENGTH 13 NCHARS 5 POSITION) NIL ( 39 " ") FILES?PRINTLST :D8 (I 1 STR I 0 LST) @iAohogi (27 MAPRINT) (20 FILES?PRINTLSTA0001) ( 15 ", " 9 ": ") MERGEINSERT :D8 (P 6 LST P 5 X P 3 TEM P 2 PLACE P 1 LST1 P 0 N I 2 ONEFLG I 1 LST I 0 NEW) B@A A@A@ jAAY JJWATI@khid [IZI@ [HKIZId\L@M JKM @N MhhA@ bA(133 /NCONC1 114 /ATTACH 106 ALPHORDER 96 ALPHORDER 69 MERGEINSERT1 55 STRPOS 21 /NCONC1 8 MEMBER) NIL () MERGEINSERT1 :D8 (P 2 C2 P 1 C1 P 0 N I 1 Y I 0 X) %k!@H YAH ZIJHkHkظ(19 NTHCHARCODE 10 NTHCHARCODE) NIL () ADDTOFILEKEYLST :D8 NIL :ool ool l h oool gol ooogogiggogggl l hohhgogogiggogl hohhl ogl ho(293 CHARACTER 276 CHARACTER 247 CHARACTER 169 CHARACTER 162 CHARACTER 90 CONCAT 85 CHARACTER 68 CONCAT 63 CHARACTER 39 CONCATCODES 16 CHARACTER) (286 RETURN 240 CONFIRMFLG 230  225 KEYLST 219 NOECHOFLG 209 EXPLAINSTRING 199 @ 155 %] 150 %) 145 CONFIRMFG 135  130 KEYLST 124 NOECHOFLG 114 EXPLAINSTRING 73 EXPLAINSTRING) ( 303 (("" "File name: " EXPLAINSTRING "a file name" KEYLST ())) 281 "" 254 (RETURN ANSWER) 235 "" 214 "@ other-item -- put the item near the other item" 204 "Near: " 179 (RETURN (CDR ANSWER)) 140 "" 119 "(list name)" 109 "List: (" 104 "(" 95 (NOECHOFLG T) 78 "] - nowhere, item is marked as a dummy" 56 "Nowhere" 51 "]" 44 (EXPLAINSTRING "{space} - no action" NOECHOFLG T) 27 " " 21 ("" EXPLAINSTRING "{line-feed} - same as previous response" NOECHOFLG T) 9 (= "" EXPLAINSTRING "= - same as previous response" NOECHOFLG T) 4 ("[" "" EXPLAINSTRING "[ -- prettyprint the item to terminal and then ask again" NOECHOFLG T)) POSTEDITALISTS :D8 (P 5 NEWENTRY P 4 X P 2 FOUNDCHANGE P 1 OV P 0 NEWENTRIES I 1 OLDTOKENS I 0 EDITCHANGES F 6 FILEPKGFLG) @ !Vh@AKHp\H@Lhgh iK[dMF`M` YMdI I$Mh` @Mhgh iJy@hp(135 MARKASCHANGED 116 PUTHASH 88 GETHASH 53 MARKASCHANGED 6 GETTOPVAL) (129 ALISTS 111 CLISPARRAY 83 CLISPARRAY 75 CLISPARRAY 47 ALISTS) () ALISTS.GETDEF :D8 (I 2 OPTIONS I 1 TYPE I 0 NAME) +@'@d3@@@ Hg@Hh(21 GETTOPVAL) (33 ADDTOVAR) () FILEGETDEF.LISPXMACROS :D8 (P 4 X I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME) hBgo AH I \dg@L\eggLh\hFg=@dL gg@h\hL\ggLh\hiLJ KhZHXyK&(91 MEMB 30 MKPROGN 16 LOADFNS) (131 LISPXCOMS 126 ADDTOVAR 104 LISPXCOMS 99 ADDTOVAR 78 LISPXCOMS 63 LISPXMACROS 58 ADDTOVAR 41 LISPXMACROS 6 GETDEF) ( 11 (LAMBDA (FIRST SECOND) (AND (EQ FIRST (QUOTE ADDTOVAR)) (MEMB SECOND (QUOTE (LISPXMACROS LISPXCOMS))) T))) FILEGETDEF.ALISTS :D8 (P 4 X I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME) GhBgo AHI g@I@L\J KhZHXK&(16 LOADFNS) (31 ADDTOVAR 6 GETDEF) ( 11 (LAMBDA (FIRST SECOND) (AND (EQ FIRST (QUOTE ADDTOVAR)) (EQ SECOND (CAR NAME))))) FILEGETDEF.RECORDS :D8 (I 4 NOTFOUND I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME) 0hBgo HdgDdgH(16 LOADFNS) (41 PROGN 28 NOT-FOUND%: 6 GETDEF) ( 11 (LAMBDA (FIRST SECOND) (AND (MEMB FIRST CLISPRECORDTYPES) (OR (EQ SECOND NAME) (AND (MEMB SECOND (QUOTE (%( %[))) (PROGN (RATOM) (RATOM) (RATOM) (EQ NAME (RATOM)))))))) FILEGETDEF.PROPS :D8 (P 5 TAIL P 2 X I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME) \hBgo !HI g@IIJ!K]L HX@LMMh M(84 \NCONC2 58 \NCONC2 16 LOADFNS) (31 PUTPROPS 6 GETDEF) ( 11 (LAMBDA (FIRST SECOND) (AND (EQ FIRST (QUOTE PUTPROPS)) (EQ SECOND (CAR NAME))))) FILEGETDEF.MACROS :D8 (I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME) @hBgo )d[dghAL_$MXIHZYJ  YH`"gKOOh_NOh^OO&(76 LAST 70 MKPROGN 19 LOADFNS) (95 PUTPROPS 87 MACROPROPS 31 DEFMACRO 9 GETDEF) ( 14 (LAMBDA (FIRST SECOND) (AND (FMEMB FIRST (QUOTE (PUTPROPS DEFMACRO))) (EQ SECOND NAME)))) FILEGETDEF.VARS :D8 (P 1 X I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME) ]hBg@ HgYdgdgIdgdgdgI HX(84 EVAL 12 LOADFNS) (72 RPAQ? 64 SETQ 56 RPAQ 42 SETQQ 34 RPAQQ 24 NOBIND 6 GETDEF) () FILEGETDEF.FNS :D8 (P 10 *PRINT-BASE* P 9 *READ-BASE* P 8 *READTABLE* P 7 *PACKAGE* P 6 MAPLOC P 5 PAIR P 1 ENV P 0 MAP I 3 OPTIONS I 2 SOURCE I 1 TYPE I 0 NAME F 11 SI::*RESETFORMS*) @CgCgCB ZJX@dB !Lh@M^B &gBgg bhhdWcBN I[KKK CgC-gC$B B B B B hB L\a(213 READ 203 READ 197 READ 191 RATOM 185 READ 179 RATOM 130 SETFILEPTR 108 OPENSTREAM 85 OPENP 51 LOADEFS 34 \MVLIST 29 GET-ENVIRONMENT-AND-FILEMAP) (169 ARGLIST 158 ARGLIST 137 READER-ENVIRONMENT 103 OLD 98 INPUT 92 CLOSEF? 19 FAST 8 FAST) () FILEPKGCOMS.PUTDEF :D8 (P 3 PROP P 2 I P 1 TYP P 0 COM I 3 REASON I 2 DEFINITION I 1 TYPE I 0 NAME)  BdgBXigBgBgBHKdJg:Jg1Jg(JgJgJdgo @gHg' Hg' od@KHK' I0dJ`JgJdgo o` d@KIK' h(263 FILEPKGTYPE 246 UNION 224 ERROR 174 FILEPKGCOM 152 FILEPKGCOM 118 ERROR) (241 FILEPKGTYPEPROPS 212 TYPE 202 DESCRIPTION 193 FILEPKGTYPEPROPS 146 CONTAIN 137 CONTENTS 131 CONTENTS 106 COM 96 CONTAIN 87 CONTENTS 78 MACRO 69 DELETE 60 ADD 42 TYPE 33 COM 24 TYPE 11 COM) ( 236 (DESCRIPTION TYPE) 219 "not file package type/command property" 157 (ADD DELETE MACRO COM) 113 "not file package command property") FILES.PUTDEF :D8 (I 3 REASON I 2 DEFINITION I 1 TYPE I 0 NAME) [@ gBC @ @g B@g  @g @gB (88 /PUTPROP 71 GETPROP 60 /RPLACD 55 FILEPKG.MERGECHANGES 49 GETPROP 35 GETPROP 24 ADDFILE 18 PUTDEF 5 FILECOMS) (79 FILEDATES 66 FILEDATES 44 FILE 30 FILE 10 VARS) () VARS.PUTDEF :D8 (I 3 REASON I 2 DEFINITION I 1 TYPE I 0 NAME) @Bi (7 /SETTOPVAL) NIL () FILES.WHENCHANGED :D8 (I 2 REASON I 1 TYPE I 0 NAME) @ gB (16 MARKASCHANGED 5 FILECOMS) (10 VARS) () DEFAULT.EDITDEFA0001 :D8 (I 3 EXITFLG I 2 TYPE I 1 DEF I 0 NAME) !A @BA @Bg g(25 MARKASCHANGED 13 PUTDEF 5 FIXEDITDATE) (30 ;; 20 CHANGED) () DEFAULT.EDITDEF :D8 (P 2 DEF P 1 FILE P 0 FILES I 4 OPTIONS I 3 EDITCOMS I 2 SOURCE I 1 TYPE I 0 NAME F 3 RETRY) B@ABo @Ago @Ago }@Ai Hio@A `io@H H o HdoH i Idg @Ago hcJdC@AgD h(206 EDITE 180 GETDEF 162 LOAD 145 ASKUSER 138 MAKEKEYLST 120 CL:Y-OR-N-P 108 CL:ENDP 100 CL:FORMAT 85 CL:FORMAT 67 WHEREIS 57 GETDEF 34 GETDEF 14 GETDEF) (199 DEFAULT.EDITDEFA0001 170 ? 157 PROP 47 SAVED 24 CURRENT) ( 175 (EDIT NOCOPY) 132 "indicate which file to load PROP: " 115 "Shall I load this file PROP? " 93 "~S is contained on~{ ~S~}.~%%" 78 "~S has no ~A definition.~%%" 52 (EDIT NOCOPY NOERROR) 29 (EDIT NOCOPY NOERROR) 9 (EDIT NOCOPY)) EDITDEF.FILES :D8 (I 4 OPTIONS I 3 EDITCOMS I 2 SOURCE I 1 TYPE I 0 NAME) @ gBCD (19 EDITDEF 5 FILECOMS) (10 VARS) () GETFILEDEF :D8 (P 1 FILE I 0 FILENAME) <@`@`Hh@Ikhi Ig @IHX(48 FILENAMEFIELD 36 STRPOS) (43 NAME 14 FILELST 5 FILELST) () FINDCALLERS :D8 (P 0 X I 2 DEPTH I 1 FILES I 0 ATOMS) 1@AiB H HHogHh (46 \NCONC2 18 DREVERSE 8 EDITCALLERS) (36 on) ( 30 "plus other places on") EDITCALLERSA0001A0005 :D8 (P 1 SI::*CATCH-RETURN-FROM* P 0 SI::*DUMMY-FOR-CATCH* F 2 FILESTREAM F 3 MAP F 4 SI::NLSETQ-VALUE) i@hRhg chcg(17 LOADFNS) (28 :NORMAL 12 FILEMAP) () EDITCALLERSA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 37 Z P 35 X P 33 *CONDITION-HANDLER-BINDINGS* P 32 SI::*NLSETQFLAG* P 31 *PROCEED-CASES* P 30 SI::NLSETQ-VALUE P 29 *PACKAGE* P 28 HIT P 27 CODE P 26 PATTERN P 25 SEPRFAT P 24 SEPRSIZE P 23 SEPRBASE P 21 POSTESCAPE P 20 PREESCAPE P 19 ATOM P 9 CASEINSENSITIVE P 8 I P 7 TOP P 6 ENV P 5 PRINTFLG P 4 FILESTREAM P 3 MAP P 2 RDTBL P 1 CA P 0 PATTERNS I 0 SI::*CLEANUP-FORMS* F 38 OTHERSFILES F 39 FNS F 40 FULL F 41 FILE F 42 SI::*RESETFORMS* F 43 SEPRCA F 44 FFILEPOSPATTERNS F 45 COMS F 46 DWIMIFYCOMPFLG F 47 EDITPATTERN F 48 ATOMS F 49 *PROCEED-CASES* F 50 *CONDITION-HANDLER-BINDINGS*) & WR cPWRoid gWPg \hhdWTcTioWP L L _O_O_NyJg _W\J cVJWXXJW`aObO XWXcXHWVWV_OWVk4O,Mi LN y_& l_(O&l _&gO& _*O&kO*k _&O&d3@O& O&iJ _&O&O(O*h_$O"O$h_"_ O_(O$&_"_4LOj_ O4LOhdgO` _8_O4dQLO8 L _6d.dO0O2O.O6O.O6_jO O hLO O4?Li _64O6dO0O2O.O6O.O6_jOQO FMiWPidd oihi Ka`WbioWd!O> gLgggNhh \hhdWTcTKoi i[#OD(hOid WRWLWRWLcLki _FOaOFOXOF%OH hHOFi_JO/OJO&OJdWNid WNcNOJ_OJiOH_HOD_DiO,_,bi WZi+WNWL%Ki WN WPW^WZWLh hcLcNh(929 EDITFROMFILE 913 DREVERSE 887 TERPRI 838 LISPXPRIN2 757 LISPXSPACES 735 LISPXPRIN2 709 LISPXPRIN1 681 OPENSTREAM 647 EDITCALLERSA0001A0005 613 LISPXPRIN1 599 LISPXPRIN2 580 \FZEROP 530 \PEEKCCODE 513 \SETFILEPTR 503 \FZEROP 456 \BACKCCODE 449 SETFILEPTR 423 FFILEPOS 394 SETFILEPTR 332 MKSTRING 320 CL:SYMBOL-PACKAGE 302 SUBSTRING 287 STRPOS 272 SUBSTRING 257 CHCON1 245 \EXTERNALFORMAT 227 LISPXTERPRI 132 SEPRCASE 122 READTABLEPROP 90 \MVLIST 85 \PARSE-FILE-HEADER 77 GET-ENVIRONMENT-AND-FILEMAP 71 CL:FORMAT 45 OPENSTREAM 27 LISPXPRINT 9 FINDFILE) (670 EXTERNALFORMAT 665 OLD 660 INPUT 654 CLOSEF? 625 SI::NLSETQ-PROCEED-CASE 417 UPPERCASEARRAY 408 BOTH 280  235 READER-ENVIRONMENT 198 ARRAYP 181 ARRAYP 172 ARRAYP 117 CASEINSENSITIVE 40 INPUT 33 CLOSEF?) ( 703 " no filemap!" 634 (CL:ERROR . SI::NLSETQHANDLER) 605 ": " 64 "~A: " 19 (not found)) EDITCALLERS :D8 (P 9 RESETSTATE P 8 SI::*RESETFORMS* P 7 LISPXHIST P 6 FULL P 5 FILE P 3 EDITPATTERN P 2 OTHERSFILES P 1 FNS P 0 FFILEPOSPATTERNS I 3 DEPTH I 2 COMS I 1 FILES I 0 ATOMS F 10 LISPXHIST) @g@ddhb [A `6i`` !AoA ACl Ah!L BiJI] W! g $L\(137 SI::RESETUNWIND 132 \MVLIST 127 EDITCALLERSA0001 110 DIRECTORYNAMEP 82 FILDIR 70 STRPOS 53 UNION 23 EDITFPAT) (122 SI::RESETUNWIND 48 FILELST 43 SYSFILES 32 FILELST 7 *ANY*) ( 64 "*") FINDATS :D8 (I 1 L I 0 X) @@AA @b(14 FINDATS) NIL () SEPRCASE :D8 (P 5 X P 4 Y P 0 CA I 1 RDTBL I 0 CLFLG F 6 *PACKAGE*) A `b@``@&@`d\ JIh[I&KA A dHMj Hl'j Hl,j VHAg j AHX@d`H`H(159 SETCASEARRAY 153 READTABLEPROP 138 SETCASEARRAY 129 SETCASEARRAY 115 SETCASEARRAY 101 \NCONC2 96 \NCONC2 91 GETBRK 85 GETSEPR 61 CHCON1 37 CASEARRAY) (192 SEPRCASEARRAYS 186 SEPRCASEARRAYS 178 CLISPCASEARRAYS 172 CLISPCASEARRAYS 148 PACKAGECHAR 51 CLISPCHARS 22 SEPRCASEARRAYS 16 CLISPCASEARRAYS 7 FILERDTBL) () IMPORTFILEA0001 :D8 (NAME SI::*UNWIND-PROTECT* P 1 DFNFLG P 0 FILEPKGFLG I 0 SI::*CLEANUP-FORMS* F 3 FILE F 4 SI::*RESETFORMS* F 5 RETURNFLG) gSg chhdTcgS hhTcUiSU  SU gS Jddi3 gJhogSg hhU (147 \NCONC2 142 IMPORTEVAL 128 GETFILEINFO 82 ROOTFILENAME 70 IMPORTFILESCAN 59 IMPORTFILESCAN 39 INPUT 15 OPENSTREAM) (123 CREATIONDATE 117 IDATE 102 QUOTE 76 PUTPROP 33 INPUT 10 INPUT 4 CLOSEF) ( 112 (QUOTE IMPORTDATE)) IMPORTFILE :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 1 RETURNFLG I 0 FILE F 3 LISPXHIST) S!g $(23 SI::RESETUNWIND 18 \MVLIST 13 IMPORTFILEA0001) (8 SI::RESETUNWIND) () IMPORTEVAL :D8 (P 3 Z I 1 RETURNFLG I 0 FORM) @@dg00@dKA XI HZYJ YHdg10@dKA XI HZYJ YHghAdi@ A@h(141 EVAL 115 LAST 93 IMPORTEVAL 59 LAST 37 IMPORTEVAL) (125 /DECLAREDATATYPE 70 CL:EVAL-WHEN 15 DECLARE%:) () IMPORTFILESCAN :D8 (P 7 *PRINT-BASE* P 6 *READ-BASE* P 5 *READTABLE* P 4 *PACKAGE* I 1 RETURNFLG I 0 FILE) Z@ 1HHHH`@hddi IIh@ Z`KJA K (85 \NCONC2 77 \NCONC2 72 IMPORTEVAL 56 READ 44 FFILEPOS 5 GET-ENVIRONMENT-AND-FILEMAP) (62 ENDEXPORTDEFFORM 33 BEGINEXPORTDEFSTRING 10 READER-ENVIRONMENT) () CHECKIMPORTS :D8 (P 6 DATE P 5 FULLFILENAME P 4 FILE I 1 NOASKFLG I 0 FILES) @aH#IbAlgo0@`dhHLi ]L g ^NMg jLMhJ KhZK&dIHhZH&Jhoi ghi@dL h(180 IMPORTFILE 153 ASKUSER 91 GETFILEINFO 76 GETPROP 66 ROOTFILENAME 57 FINDFILE) (158 N 86 ICREATIONDATE 71 IMPORTDATE 28 Y) ( 146 ((Y "es ") (N "o ")) 33 "load new exports from ") GATHEREXPORTSA0001 :D8 (NAME SI::*UNWIND-PROTECT* I 0 SI::*CLEANUP-FORMS* F 0 TOFILE) hPo (11 PRETTYDEF) NIL ( 6 ((E (MAPC (MKLIST FROMFILES) (FUNCTION (LAMBDA (F) (MAPC (IMPORTFILE F FLG) (FUNCTION PRINT)))))))) GATHEREXPORTS :D8 (P 2 RESETSTATE P 1 SI::*RESETFORMS* P 0 LISPXHIST I 2 FLG I 1 TOFILE I 0 FROMFILES F 3 LISPXHIST) ,BibA bS!g $(37 SI::RESETUNWIND 32 \MVLIST 27 GATHEREXPORTSA0001 11 MKATOM) (22 SI::RESETUNWIND) () \DUMPEXPORTS :D8 (P 0 TAIL I 0 COMS) Mo g `l @dH ` (74 TERPRI 69 PRINT 59 TERPRI 49 PRETTYCOM 36 PRIN1 31 SUBSTRING 19 PRIN2 9 PRIN1) (64 ENDEXPORTDEFFORM 24 BEGINEXPORTDEFSTRING 14 *) ( 4 "(") CLEARFILEPKG :D8 (P 3 FILE I 0 FLG F 4 *FILEMAP-HASH*) @g@dii7gi oi hdoo i @`qd[g !Kid oi i i2Kgh Kgh K `Kh hdIHhZH&Jh@diT h(230 CLRHASH 182 \NCONC2 168 SMASHFILECOMS 161 PUTPROP 148 PUTPROP 132 TERPRI 125 PRIN1 113 PRINT 102 GETPROP 78 UPDATEFILES 68 TERPRI 62 ASKUSER 44 PRIN1 32 TERPRI) (217 LOADEDFILELST 210 FILELST 174 SYSFILES 155 FILECHANGES 142 FILE 97 FILE 87 FILELST 21 Y 5 E) ( 119 " has changes, not wiped." 57 ((Y "es - everything" RETURN T) (N "o - just the filemaps" RETURN NIL) (E "verything" RETURN T) (F "ilemaps only" RETURN NIL)) 52 "are you sure you want to delete EVERYTHING ? " 38 "you can delete just the filemaps - ") (PRETTYCOMPRINT FILEPKGCOMS) (RPAQQ FILEPKGCOMS ((COMS (* ; "standard records for accessing file package type/command parts. Exported for PRETTY") (VARS FILEPKGTYPEPROPS) (EXPORT (DECLARE%: EVAL@COMPILE DONTCOPY (RECORDS * FILEPKGRECORDS))) (FNS SEARCHPRETTYTYPELST PRETTYDEFMACROS FILEPKGCOMPROPS) (INITRECORDS * FILEPKGRECORDS)) (DECLARE%: EVAL@COMPILE DOCOPY (* ;; "Proclaim SPECIAL those variables that are used freely in a lot of code.") ( P (CL:PROCLAIM (QUOTE (CL:SPECIAL PRETTYDEFMACROS PRETTYTYPELST FILEPKGTYPES PRETTYPRINTMACROS *DEFAULT-CLEANUP-COMPILER* MARKASCHANGEDFNS PRETTYFLG FROMEDITOR))) (CL:PROCLAIM (QUOTE (GLOBAL FILELST SYSFILES LOADEDFILELST NOTLISTEDFILES NOTCOMPILEDFILES MAKEFILEFORMS CLEANUPOPTIONS))))) ( INITVARS (MSDATABASELST)) (COMS (* ;; "making, adding, listing, compiling files") (FNS CLEANUP COMPILEFILES COMPILEFILES0 CONTINUEDIT MAKEFILE FILECHANGES FILEPKG.MERGECHANGES FILEPKG.CHANGEDFNS MAKEFILE1 COMPILE-FILE? MAKEFILES ADDFILE ADDFILE0 LISTFILES) (INITVARS (*DEFAULT-CLEANUP-COMPILER* ( QUOTE CL:COMPILE-FILE)) (FILELST) (LOADEDFILELST) (NOTLISTEDFILES) (NOTCOMPILEDFILES) (MAKEFILEFORMS) (NILCOMS)) (ADDVARS (MAKEFILEOPTIONS RC C LIST FAST CLISP CLISPIFY NIL REMAKE NEW NOCLISP CLISP% F ST STF FORMAT (REC . RC) (BREC . RC) (TC . C) (BC . C) (TCOMPL . C) (BCOMPL . C))) (INITVARS ( MAKEFILEREMAKEFLG T) (CLEANUPOPTIONS (QUOTE (RC))))) (COMS (* ;; "scanning file coms") (FNS FILEPKGCHANGES GETFILEPKGTYPE MARKASCHANGED FILECOMS WHEREIS SMASHFILECOMS FILEFNSLST FILECOMSLST UPDATEFILES INFILECOMS? INFILECOMTAIL INFILECOMS INFILECOM INFILECOMSVALS INFILECOMSVAL INFILECOMSPROP IFCPROPS IFCEXPRTYPE IFCPROPSCAN IFCDECLARE INFILEPAIRS INFILECOMSMACRO)) (COMS (* ;; "adding to a file") (FNS FILES? FILES?1 FILES?PRINTLST ADDTOFILES? ADDTOFILE WHATIS ADDTOCOMS ADDTOCOM ADDTOCOM1 ADDNEWCOM MAKENEWCOM DEFAULTMAKENEWCOM) (INITVARS (DEFAULTCOMHASFILEFLG)) (ADDVARS ( MARKASCHANGEDFNS)) (FNS MERGEINSERT MERGEINSERT1) (* ;; "RMK: Changed INITVARS to VARS, so = addition is a synonym for untypable LF, and also suppress appearance of raw CR and LF in the file" ) (FNS ADDTOFILEKEYLST) (INITVARS (ADDTOFILEKEYLST (ADDTOFILEKEYLST)) (LASTFILE))) (COMS (* ;; "deleting an item from a file") (FNS DELFROMFILES DELFROMCOMS DELFROMCOM DELFROMCOM1 REMOVEITEM MOVETOFILE) (P (MOVD? (QUOTE DELFROMFILES) (QUOTE DELFROMFILE) NIL T) (MOVD? (QUOTE MOVETOFILE) (QUOTE MOVEITEM) NIL T)) (ADDVARS (SYSPROPS PROPTYPE VARTYPE))) (COMS (* ; "functions for doing things and marking them changed and auxiliary functions") (FNS SAVEPUT) ( DECLARE%: DONTEVAL@LOAD DOCOPY (P (OR (CHANGENAME (QUOTE PUTPROPS) (QUOTE PUTPROP) (QUOTE SAVEPUT)) ( CHANGENAME (QUOTE PUTPROPS) (QUOTE /PUT) (QUOTE SAVEPUT))))) (FNS UNMARKASCHANGED PREEDITFN POSTEDITPROPS POSTEDITALISTS) (ADDVARS (LISPXFNS (PUT . SAVEPUT) (PUTPROP . SAVEPUT)))) (COMS (* ; "sub-functions for file package commands & types") (FNS ALISTS.GETDEF ALISTS.WHENCHANGED CLEARCLISPARRAY EXPRESSIONS.WHENCHANGED MAKEALISTCOMS MAKEFILESCOMS MAKELISPXMACROSCOMS MAKEPROPSCOMS MAKEUSERMACROSCOMS PROPS.WHENCHANGED FILEGETDEF.LISPXMACROS FILEGETDEF.ALISTS FILEGETDEF.RECORDS FILEGETDEF.PROPS FILEGETDEF.MACROS FILEGETDEF.VARS FILEGETDEF.FNS FILEPKGCOMS.PUTDEF FILES.PUTDEF VARS.PUTDEF FILES.WHENCHANGED) (ADDVARS (MACROPROPS MACRO BYTEMACRO DMACRO) (SYSPROPS PROPTYPE)) (PROP PROPTYPE I.S.OPR SUBR LIST CODE FILEDATES FILE FILEMAP EXPR VALUE COPYRIGHT FILETYPE) (PROP VARTYPE BAKTRACELST BREAKMACROS COMPILETYPELST EDITMACROS ERRORTYPELST FONTDEFS LISPXHISTORYMACROS LISPXMACROS PRETTYDEFMACROS PRETTYEQUIVLST PRETTYPRINTMACROS PRETTYPRINTYPEMACROS USERMACROS)) (COMS (* ; "Define the commands below AFTER the various properties have been established.") (USERMACROS M)) (COMS (* ; "GETDEF methods") (FNS RENAME CHANGECALLERS) (FNS SHOWDEF COPYDEF GETDEF GETDEFCOM GETDEFCOM0 GETDEFCURRENT GETDEFERR GETDEFFROMFILE GETDEFSAVED PUTDEF EDITDEF DEFAULT.EDITDEF EDITDEF.FILES LOADDEF DWIMDEF DELDEF DELFROMLIST HASDEF GETFILEDEF SAVEDEF UNSAVEDEF COMPAREDEFS COMPARE TYPESOF) ( INITVARS (WHEREIS.HASH))) (COMS (* ;; "how to dump FILEPKGCOMS. The SPLST must be initialized to contain FILEPKGCOMS in order to get started." ) (FNS FILEPKGCOM FILEPKGTYPE) (PROP ARGNAMES FILEPKGCOM) (ADDVARS (FILEPKGCOMSPLST FILEPKGCOMS) ( FILEPKGTYPES FILEPKGCOMS)) (FILEPKGCOMS FILEPKGCOMS) (FILEPKGCOMS ALISTS DEFS EDITMACROS EXPRESSIONS FIELDS FILEPKGTYPES FILES FILEVARS FNS INITRECORDS INITVARS LISPXCOMS LISPXMACROS MACROS PRETTYDEFMACROS PROPS RECORDS OLDRECORDS SYSRECORDS USERMACROS VARS * CONSTANTS)) (ADDVARS ( SHADOW-TYPES (FUNCTIONS FNS) (VARIABLES VARS CONSTANTS))) (INITVARS (SAVEDDEFS)) (COMS (* ; "EDITCALLERS") (FNS FINDCALLERS EDITCALLERS EDITFROMFILE FINDATS LOOKIN) (FNS SEPRCASE) (INITVARS ( DEFAULTRENAMEMETHOD (QUOTE (EDITCALLERS CAREFUL)))) (INITVARS (SEPRCASEARRAYS) (CLISPCASEARRAYS)) (P ( MOVD? (QUOTE INFILEP) (QUOTE FINDFILE)) (* ; "or else from SPELLFILE")) (BLOCKS (EDITFROMFILE EDITFROMFILE LOOKIN (GLOBALVARS EDITLOADFNSFLG) (NOLINKFNS LOADFROM))) (GLOBALVARS SYSFILES CLISPCASEARRAYS SEPRCASEARRAYS CLISPCHARS)) (COMS (* ; "EXPORT") (FNS IMPORTFILE IMPORTEVAL IMPORTFILESCAN CHECKIMPORTS GATHEREXPORTS \DUMPEXPORTS) (FILEPKGCOMS EXPORT) (INITVARS ( BEGINEXPORTDEFSTRING "* %"FOLLOWING DEFINITIONS EXPORTED%")") (ENDEXPORTDEFFORM (QUOTE (* "END EXPORTED DEFINITIONS")))) (GLOBALVARS BEGINEXPORTDEFSTRING ENDEXPORTDEFFORM)) (COMS (* ; "for GAINSPACE") (FNS CLEARFILEPKG) (ADDVARS (GAINSPACEFORMS (FILELST "erase filepkg information" ( CLEARFILEPKG RESPONSE) ((Y "es") (N "o") (E . "verything") (F "ilemaps only "))))) (GLOBALVARS SMASHPROPSLST1)) (GLOBALVARS %#UNDOSAVES ADDTOFILEKEYLST CLEANUPOPTIONS CLISPIFYPRETTYFLG COMPILE.EXT DECLARETAGSLST DEFAULTRENAMEMETHOD FILEPKGCOMSPLST FILERDTBL HISTORYCOMS HISTSTR0 I.S.OPRLST LISPXCOMS LISPXHISTORY LISPXHISTORYMACROS LISPXMACROS MACROPROPS MAKEFILEOPTIONS MAKEFILEREMAKEFLG MSDATABASELST PRETTYHEADER PRETTYTRANFLG SAVEDDEFS SYSPROPS USERMACROS USERRECLST USERWORDS FILEPKGTYPEPROPS) (BLOCKS (DELFROMCOMS DELFROMCOMS DELFROMCOM DELFROMCOM1 REMOVEITEM ( NOLINKFNS . T) (SPECVARS COMSNAME)) (ADDTOFILEBLOCK ADDTOFILES? ADDTOFILE WHATIS ADDTOCOMS ADDTOCOM ADDTOCOM1 ADDNEWCOM (NOLINKFNS . T) (SPECVARS COMSNAME) (ENTRIES ADDTOFILE ADDTOCOMS ADDTOFILES? ADDTOCOM1)) (INFILECOMS? INFILECOMS? INFILECOMTAIL INFILECOMS INFILECOM INFILECOMSVAL INFILECOMSVALS INFILEPAIRS INFILECOMSMACRO IFCPROPS IFCEXPRTYPE IFCPROPSCAN IFCDECLARE (LOCALFREEVARS NAME LITERALS VAL TYPE ONFILETYPE ORIGFLG) INFILECOMSPROP) (NIL MAKEFILE (LOCALVARS . T) (SPECVARS FILE OPTIONS REPRINTFNS SOURCEFILE FILETYPE FILEDATES CHANGES)) (ADDFILE ADDFILE ADDFILE0) (FILEPKGCHANGES FILEPKGCHANGES (NOLINKFNS . T)) (NIL ALISTS.WHENCHANGED CHANGECALLERS CLEANUP CLEARCLISPARRAY COMPARE COMPAREDEFS COMPILEFILES COMPILEFILES0 CONTINUEDIT COPYDEF DEFAULTMAKENEWCOM DELFROMFILES EDITDEF EXPRESSIONS.WHENCHANGED FILECOMS FILECOMSLST FILEFNSLST FILEPKGCOM FILEPKGCOMPROPS FILEPKGTYPE FILES? FILES?1 GETFILEPKGTYPE HASDEF INFILECOMTAIL LOADDEF MAKEALISTCOMS MAKEFILE1 MAKEFILES MAKEFILESCOMS MAKELISPXMACROSCOMS MAKENEWCOM MAKEPROPSCOMS MAKEUSERMACROSCOMS MARKASCHANGED MOVETOFILE POSTEDITPROPS PREEDITFN PRETTYDEFMACROS PROPS.WHENCHANGED PUTDEF RENAME SAVEDEF SAVEPUT SEARCHPRETTYTYPELST SHOWDEF SMASHFILECOMS TYPESOF UNMARKASCHANGED UNSAVEDEF UPDATEFILES (GLOBALVARS %#UNDOSAVES SYSFILES MARKASCHANGEDSTATS COMPILE.EXT EDITMACROS EDITLOADFNSFLG LOADOPTIONS) (LOCALVARS . T)) (DELDEF DELDEF DELFROMLIST (NOLINKFNS . T)) (GETDEF GETDEF DWIMDEF GETDEFCOM GETDEFCOM0 GETDEFERR GETDEFCURRENT GETDEFFROMFILE GETDEFSAVED (RETFNS GETDEFCOM) (NOLINKFNS . T) (GLOBALVARS NOT-FOUNDTAG))) (DECLARE%: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA \DUMPEXPORTS MAKEUSERMACROSCOMS MAKEPROPSCOMS MAKELISPXMACROSCOMS MAKEFILESCOMS MAKEALISTCOMS LISTFILES COMPILEFILES CLEANUP FILEPKGCOMPROPS PRETTYDEFMACROS) (NLAML) (LAMA FILEPKGTYPE FILEPKGCOM FILEPKGCHANGES))))) (RPAQQ FILEPKGTYPEPROPS (NEWCOM WHENFILED WHENUNFILED GETDEF NULLDEF DELDEF PUTDEF WHENCHANGED HASDEF EDITDEF CANFILEDEF FILEGETDEF)) (RPAQQ FILEPKGRECORDS (FILEPKGCOM FILEPKGTYPE FILE FILEDATEPAIR FILEPROP)) (FILEPKGCOMPROPS ADDTOPRETTYCOM DELFROMPRETTYCOM PRETTYTYPE FILEPKGCONTENTS) (PROGN (SETQ SYSPROPS (UNION FILEPKGTYPEPROPS SYSPROPS)) (MAPC FILEPKGTYPEPROPS (FUNCTION (LAMBDA (X) (PUT X (QUOTE PROPTYPE) (QUOTE FILEPKGCOMS)))))) (ADDTOVAR PRETTYTYPELST) (CL:PROCLAIM (QUOTE (CL:SPECIAL PRETTYDEFMACROS PRETTYTYPELST FILEPKGTYPES PRETTYPRINTMACROS *DEFAULT-CLEANUP-COMPILER* MARKASCHANGEDFNS PRETTYFLG FROMEDITOR))) (CL:PROCLAIM (QUOTE (GLOBAL FILELST SYSFILES LOADEDFILELST NOTLISTEDFILES NOTCOMPILEDFILES MAKEFILEFORMS CLEANUPOPTIONS))) (RPAQ? MSDATABASELST) (RPAQ? *DEFAULT-CLEANUP-COMPILER* (QUOTE CL:COMPILE-FILE)) (RPAQ? FILELST) (RPAQ? LOADEDFILELST) (RPAQ? NOTLISTEDFILES) (RPAQ? NOTCOMPILEDFILES) (RPAQ? MAKEFILEFORMS) (RPAQ? NILCOMS) (ADDTOVAR MAKEFILEOPTIONS RC C LIST FAST CLISP CLISPIFY NIL REMAKE NEW NOCLISP CLISP% F ST STF FORMAT (REC . RC) (BREC . RC) (TC . C) (BC . C) (TCOMPL . C) (BCOMPL . C)) (RPAQ? MAKEFILEREMAKEFLG T) (RPAQ? CLEANUPOPTIONS (QUOTE (RC))) (RPAQ? DEFAULTCOMHASFILEFLG) (ADDTOVAR MARKASCHANGEDFNS) (RPAQ? ADDTOFILEKEYLST (ADDTOFILEKEYLST)) (RPAQ? LASTFILE) (MOVD? (QUOTE DELFROMFILES) (QUOTE DELFROMFILE) NIL T) (MOVD? (QUOTE MOVETOFILE) (QUOTE MOVEITEM) NIL T) (ADDTOVAR SYSPROPS PROPTYPE VARTYPE) (OR (CHANGENAME (QUOTE PUTPROPS) (QUOTE PUTPROP) (QUOTE SAVEPUT)) (CHANGENAME (QUOTE PUTPROPS) (QUOTE /PUT) (QUOTE SAVEPUT))) (ADDTOVAR LISPXFNS (PUT . SAVEPUT) (PUTPROP . SAVEPUT)) (ADDTOVAR MACROPROPS MACRO BYTEMACRO DMACRO) (ADDTOVAR SYSPROPS PROPTYPE) (PUTPROPS I.S.OPR PROPTYPE I.S.OPRS) (PUTPROPS SUBR PROPTYPE IGNORE) (PUTPROPS LIST PROPTYPE IGNORE) (PUTPROPS CODE PROPTYPE IGNORE) (PUTPROPS FILEDATES PROPTYPE IGNORE) (PUTPROPS FILE PROPTYPE IGNORE) (PUTPROPS FILEMAP PROPTYPE IGNORE) (PUTPROPS EXPR PROPTYPE FNS) (PUTPROPS VALUE PROPTYPE VARS) (PUTPROPS COPYRIGHT PROPTYPE FILES) (PUTPROPS FILETYPE PROPTYPE FILES) (PUTPROPS BAKTRACELST VARTYPE ALIST) (PUTPROPS BREAKMACROS VARTYPE ALIST) (PUTPROPS COMPILETYPELST VARTYPE ALIST) (PUTPROPS EDITMACROS VARTYPE (ALIST USERMACROS)) (PUTPROPS ERRORTYPELST VARTYPE ALIST) (PUTPROPS FONTDEFS VARTYPE ALIST) (PUTPROPS LISPXHISTORYMACROS VARTYPE (ALIST LISPXMACROS)) (PUTPROPS LISPXMACROS VARTYPE (ALIST LISPXMACROS)) (PUTPROPS PRETTYDEFMACROS VARTYPE (ALIST FILEPKGCOMS)) (PUTPROPS PRETTYEQUIVLST VARTYPE ALIST) (PUTPROPS PRETTYPRINTMACROS VARTYPE ALIST) (PUTPROPS PRETTYPRINTYPEMACROS VARTYPE ALIST) (PUTPROPS USERMACROS VARTYPE (ALIST USERMACROS)) (ADDTOVAR USERMACROS (M (X . Y) (E (MARKASCHANGED (COND ((LISTP (QUOTE X)) (CAR (QUOTE X))) (T (QUOTE X))) (QUOTE USERMACROS)) T) (ORIGINAL (M X . Y))) (M NIL (MAKE FILE FILE))) (ADDTOVAR EDITMACROS (M (X . Y) (E (MARKASCHANGED (COND ((LISTP (QUOTE X)) (CAR (QUOTE X))) (T (QUOTE X))) (QUOTE USERMACROS)) T) (ORIGINAL (M X . Y)))) (ADDTOVAR EDITCOMSA M) (ADDTOVAR EDITCOMSL M) (RPAQ? WHEREIS.HASH) (PUTPROPS FILEPKGCOM ARGNAMES (COMMANDNAME (KEYWORDS%: MACRO ADD DELETE CONTENTS))) (ADDTOVAR FILEPKGCOMSPLST FILEPKGCOMS) (ADDTOVAR FILEPKGTYPES FILEPKGCOMS) (PUTDEF (QUOTE FILEPKGCOMS) (QUOTE FILEPKGCOMS) (QUOTE ((COM CONTENTS (LAMBDA (COM NAME TYPE) (* Revert to NILL when no longer coercing PRETTYDEFMACROS to FILEPKGCOMS) (AND (EQ TYPE (QUOTE FILEPKGCOMS)) (INFILECOMTAIL COM)))) (TYPE DESCRIPTION "file package commands/types" GETDEF T PUTDEF FILEPKGCOMS.PUTDEF)))) (PUTDEF (QUOTE ALISTS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS * (MAKEALISTCOMS . X)))) (TYPE DESCRIPTION "alist entries" GETDEF ALISTS.GETDEF WHENCHANGED (ALISTS.WHENCHANGED))))) (PUTDEF (QUOTE DEFS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS . X)))))) (PUTDEF (QUOTE EDITMACROS) (QUOTE FILEPKGCOMS) (QUOTE ((TYPE TYPE USERMACROS)))) (PUTDEF (QUOTE EXPRESSIONS) (QUOTE FILEPKGCOMS) (QUOTE ((TYPE DESCRIPTION "expressions" WHENCHANGED ( EXPRESSIONS.WHENCHANGED) EDITDEF NILL)))) (PUTDEF (QUOTE FIELDS) (QUOTE FILEPKGCOMS) (QUOTE ((TYPE EDITDEF NILL)))) (PUTDEF (QUOTE FILEPKGTYPES) (QUOTE FILEPKGCOMS) (QUOTE ((COM COM FILEPKGCOMS) (TYPE TYPE FILEPKGCOMS) ))) (PUTDEF (QUOTE FILES) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (P * (CONS (MAKEFILESCOMS . X)))) CONTENTS (LAMBDA (COM NAME TYPE) (AND (EQ TYPE (QUOTE FILES)) (SUBSET (INFILECOMTAIL COM) (FUNCTION LITATOM))))) (TYPE PUTDEF FILES.PUTDEF WHENCHANGED (FILES.WHENCHANGED) EDITDEF EDITDEF.FILES)))) (PUTDEF (QUOTE FILEVARS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (VARS . X))) (TYPE NULLDEF NOBIND EDITDEF NILL)))) (PUTDEF (QUOTE FNS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (MAPC (QUOTE X) (FUNCTION (LAMBDA (FN ) (AND (GETPROP FN (QUOTE FUNCTIONS)) (CL:WARN "~A has a FUNCTIONS definition" FN)))))) (ORIGINAL (FNS . X))) CONTENTS NILL) (TYPE DESCRIPTION "functions" PUTDEF FNS.PUTDEF CANFILEDEF T)))) (PUTDEF (QUOTE INITRECORDS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (P * (RECORDALLOCATIONS . X))) CONTENTS (LAMBDA (COM NAME TYPE ONFILETYPE) (AND (NULL ONFILETYPE) (EQ TYPE (QUOTE RECORDS)) ( INFILECOMTAIL COM))))))) (PUTDEF (QUOTE INITVARS) (QUOTE FILEPKGCOMS) (QUOTE ((COM COM T)))) (PUTDEF (QUOTE LISPXCOMS) (QUOTE FILEPKGCOMS) (QUOTE ((TYPE TYPE LISPXMACROS)))) (PUTDEF (QUOTE LISPXMACROS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS * (MAKELISPXMACROSCOMS . X ))) CONTENTS NILL) (TYPE DESCRIPTION "LISPX commands")))) (PUTDEF (QUOTE MACROS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (DECLARE%: EVAL@COMPILE (P * (MAPCAR (QUOTE X) (FUNCTION (LAMBDA (Y) (LET ((FNDEF (GETDEF Y (QUOTE FUNCTIONS) (QUOTE CURRENT) (QUOTE ( NOCOPY NOERROR)))) (MACDEF (GETDEF Y (QUOTE MACROS) (QUOTE CURRENT) (QUOTE (NOCOPY NOERROR))))) (COND ((AND FNDEF (EQ (CAR FNDEF) (QUOTE DEFMACRO))) (CL:WARN "Need to change MACROS to FUNCTIONS for writing out Common Lisp macro ~S." FNDEF) (LIST (QUOTE PROGN) FNDEF MACDEF)) (T (OR MACDEF (CL:CERROR "Go ahead and finish writing out the file." "No MACROS definition for ~A." Y) (GETDEF Y (QUOTE MACROS) (QUOTE CURRENT)))))))))))) CONTENTS NILL) ( TYPE DESCRIPTION "Interlisp macros" GETDEF MACROS.GETDEF WHENCHANGED (CLEARCLISPARRAY))))) (PUTDEF (QUOTE PRETTYDEFMACROS) (QUOTE FILEPKGCOMS) (QUOTE ((COM COM FILEPKGCOMS)))) (PUTDEF (QUOTE PROPS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS * (MAKEPROPSCOMS . X)))) (TYPE DESCRIPTION "property lists" WHENCHANGED (PROPS.WHENCHANGED))))) (PUTDEF (QUOTE RECORDS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (MAPC (QUOTE X) (FUNCTION (LAMBDA (RECORD) (AND (GETPROP RECORD (QUOTE STRUCTURES)) (CL:WARN "~A has a STRUCTURES definition" RECORD))) ))) (E (RECORDECLARATIONS . X)) (INITRECORDS . X)) CONTENTS (LAMBDA (COM NAME TYPE ONFILETYPE) (AND ( EQ TYPE (QUOTE FIELDS)) (NULL ONFILETYPE) (MAPCONC (INFILECOMTAIL COM) (FUNCTION (LAMBDA (X) (APPEND ( RECORDFIELDNAMES X)))))))) (TYPE DESCRIPTION "records" DELDEF (LAMBDA (X) (/SETTOPVAL (QUOTE USERRECLST) (REMOVE (RECLOOK X) USERRECLST))))))) (PUTDEF (QUOTE OLDRECORDS) (QUOTE FILEPKGCOMS) (QUOTE ((COM COM T)))) (PUTDEF (QUOTE SYSRECORDS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (SAVEONSYSRECLST . X))) CONTENTS (LAMBDA (COM NAME TYPE ONFILETYPE) (AND (NULL ONFILETYPE) (EQ TYPE (QUOTE RECORDS)) ( INFILECOMTAIL COM))))))) (PUTDEF (QUOTE USERMACROS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (COMS * (MAKEUSERMACROSCOMS . X)) ) CONTENTS NILL) (TYPE DESCRIPTION "edit macros")))) (PUTDEF (QUOTE VARS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (MAPC (QUOTE X) (FUNCTION (LAMBDA ( VAR) (AND (GETPROP VAR (QUOTE VARIABLES)) (CL:WARN "~A also has a VARIABLES definition" VAR)))))) ( ORIGINAL (VARS . X))) CONTENTS NILL) (TYPE DESCRIPTION "variables" NULLDEF NOBIND PUTDEF VARS.PUTDEF)) )) (PUTDEF (QUOTE *) (QUOTE FILEPKGCOMS) (QUOTE ((COM CONTENTS NILL)))) (PUTDEF (QUOTE CONSTANTS) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (DECLARE%: EVAL@COMPILE (VARS . X) (P (CONSTANTS . X)))))))) (ADDTOVAR SHADOW-TYPES (FUNCTIONS FNS) (VARIABLES VARS CONSTANTS)) (RPAQ? SAVEDDEFS) (RPAQ? DEFAULTRENAMEMETHOD (QUOTE (EDITCALLERS CAREFUL))) (RPAQ? SEPRCASEARRAYS) (RPAQ? CLISPCASEARRAYS) (MOVD? (QUOTE INFILEP) (QUOTE FINDFILE)) (PUTDEF (QUOTE EXPORT) (QUOTE FILEPKGCOMS) (QUOTE ((COM MACRO (X (E (\DUMPEXPORTS . X))))))) (RPAQ? BEGINEXPORTDEFSTRING "* %"FOLLOWING DEFINITIONS EXPORTED%")") (RPAQ? ENDEXPORTDEFFORM (QUOTE (* "END EXPORTED DEFINITIONS"))) (ADDTOVAR GAINSPACEFORMS (FILELST "erase filepkg information" (CLEARFILEPKG RESPONSE) ((Y "es") (N "o" ) (E . "verything") (F "ilemaps only ")))) (PUTPROPS FILEPKG COPYRIGHT ("Venue & Xerox Corporation" 1982 1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1995 2018 2022)) NIL