(FILECREATED "23-Jan-85 11:48:40" ("compiled on " {ERIS}LIBRARY>MAKEDATABASE.;20) "20-Dec-84 12:07:22" recompiled changes: \MDB.CONTINUE in "INTERLISP-D 10-Jan-85 ..." dated "10-Jan-85 13:28:55") (FILECREATED "23-Jan-85 11:47:50" {ERIS}LIBRARY>MAKEDATABASE.;20 12998 changes to: (FNS \MDB.CONTINUE) previous date: "21-Jan-85 14:57:23" {ERIS}LIBRARY>MAKEDATABASE.;19) STARTMAKINGDATABASE D1 (L (3 MODE 2 CONSCOUNTLIMIT 1 OUTPUTFILENAME 0 FILESLST) P 1 ALLSYSP P 0 SYSP F 4 SYSFILES F 5 MSHASHFILE F 6 MSHASHFILENAME) @BdobC gbgCgoC @TbiXY'dZJ hi@d[K ihHgggg o AIgbo Cdg5Ag UghgV ghgA o 5g,Agg  o` ` ` @CdgAg`BC h(432Q CONTINUEMAKINGDATABASE 425Q NILL 375Q NILL 371Q CLOSEF 362Q TERPRI 353Q PRIN1 340Q TERPRI 332Q OPENFILE 310Q SETDB 304Q ERROR 273Q PACKFILENAME 260Q PACKFILENAME 237Q SETDB 216Q HELP 174Q HELP 164Q HASDEF 125Q \SYSFILEP 102Q \SYSFILEP 56Q ERROR) (421Q DATABASE.OUTPUT.FILE 414Q TEXT 404Q HASHFILE 366Q DATABASE.OUTPUT.FILE 357Q DATABASE.OUTPUT.FILE 350Q DATABASE.OUTPUT.FILE 335Q DATABASE.OUTPUT.FILE 327Q NEW 324Q OUTPUT 315Q TEXT 267Q BODY 263Q VERSION 254Q BODY 250Q VERSION 244Q DATABASE.OUTPUT.FILE 234Q CREATE 224Q HASHFILE 204Q {ERIS}SOURCES>SYSTEM.DATABASE 161Q MACROS 156Q \MACRO.MX 150Q FILEDATES 145Q ABC 44Q TEXT 36Q HASHFILE 27Q HASHFILE) ( 345Q "STOP " 301Q "MSHASH and MAKEDATABASE don't agree on the outputfilename" 213Q "No name" 171Q "Did you know that ABC must be loaded to do this?" 52Q "Unknown mode for STARTMAKINGDATABASE: " 16Q 750220Q) CONTINUEMAKINGDATABASE D1 (L (3 MODE 2 INCREMENTALCONSCOUNT 1 OUTPUTFILENAME 0 FILESLST) P 0 ASSIGNDATATYPE.ASKUSERWAIT) 7@oAo Bd nBBnbl@ABC h(63Q \MDB.CONTINUE 17Q HELP) NIL ( 14Q "Must have a name for the database output file" 5 "Must specify some files to analyze") \MDB.CONTINUEA0001A0003 D1 (NAME ERRORSET F 0 POS F 1 FILESLST F 2 ROOTFILENAME) PgQh ch(15Q ROOTFILENAME 12Q STKAPPLY) (3 LOADFROM) () \MDB.CONTINUEA0001A0004 D1 (NAME ERRORSET F 0 ROOTFILENAME) Pi h(4 ANALYZEFILES) NIL () \MDB.CONTINUEA0001 D1 (NAME ERRORSET L (0 NIL) P 17Q X P 16Q \INTERRUPTABLE P 15Q KEY2 P 14Q KEY1 P 13Q KEY2 P 12Q HASHFILE P 11Q KEY P 7 TEM P 6 F P 5 I P 4 CRSTR P 3 LOSERLINE P 2 ALLSYSP P 1 SYSP F 20Q FILESLST F 21Q MODE F 22Q RESETVARSLST F 23Q LOSEREASON F 24Q ROOTFILENAME F 25Q ROOTFILES F 26Q OUTPUTFILENAME F 27Q INCREMENTALCONSCOUNT F 30Q MSHASHFILE F 31Q RESETY) L W dHH hW dHH ihooDIgggg o W oW"dgW,g W0gW,gg oW" hW$c$gd gj W$c$W"dg>g/`o`d l _jOOj o oW" W"gg` hhW$c$gc&W  c(o gc&o hc&W c W*W&LKLoW&oW(LKL W( W W.W.W"dgEgW*g` OO OOO`O hOg  ` ` lgco W*dO k o hd h h o h W  hc2i(1104Q CLOSEF 1071Q \MDB.CLEAROUT 1065Q NILL 1060Q SETFILEPTR 1054Q TERPRI 1047Q PRIN1 1037Q TERPRI 1032Q TERPRI 1026Q GETFILEPTR 1020Q TERPRI 1014Q DUMPDATABASE 1010Q TERPRI 1004Q PRIN1 770Q SPACES 763Q PRIN2 743Q PRIN1 733Q TERPRI 727Q TERPRI 711Q FLUSHDB 702Q PUTHASHFILE 674Q \APPEND2 670Q LOOKUPHASHFILE 656Q PACK* 567Q CONSCOUNT 551Q TCONC 543Q CONCAT 473Q \MDB.CONTINUEA0001A0004 453Q \MDB.CONTINUEA0001A0003 441Q ROOTFILENAME 412Q OUTPUT 370Q \MDB.CLEAROUT 364Q ERROR 352Q SETFILEPTR 347Q HELP 336Q FILEPOS 314Q GETEOFPTR 250Q SETTOPVAL 240Q GETTOPVAL 215Q ERROR 203Q OPENFILE 156Q SETDB 122Q HELP 112Q HASDEF 40Q \SYSFILEP 14Q \SYSFILEP) (716Q TEXT 706Q DATABASE.OUTPUT.FILE 677Q DATABASE.OUTPUT.FILE 665Q RETRIEVE 651Q HASHTEXTCHAR 624Q DATABASE.OUTPUT.FILE 621Q ANALYZED.FILES 614Q ANALYZED.FILES 605Q HASHFILE 461Q ANALYZE 430Q LOADFROM 407Q DATABASE.OUTPUT.FILE 404Q OUTPUT 376Q TEXT 310Q DATABASE.OUTPUT.FILE 301Q DATABASE.OUTPUT.FILE 273Q TEXT 265Q HASHFILE 244Q PAGE.WAIT.SECONDS 234Q PAGE.WAIT.SECONDS 220Q DATABASE.OUTPUT.FILE 200Q OLD 175Q BOTH 166Q TEXT 153Q BOTH 143Q HASHFILE 130Q REMAINING.FILES.TO.ANALYZE 107Q MACROS 104Q \MACRO.MX 76Q FILEDATES 73Q ABC) ( 1044Q "STOP " 1001Q " )" 740Q "(* files analyzed: " 532Q "on " 524Q "Failed to " 470Q (\MDB.CONTINUEA0001A0004) 450Q (\MDB.CONTINUEA0001A0003) 357Q "Bad mode in \MDB.CONTINUE: " 344Q "File doesn't have STOP" 305Q "STOP" 210Q "Bad mode in \MDB.CONTINUE: " 135Q (PROGN (SELECTQ MODE (HASHFILE (SETDB)) (TEXT (CLOSEF? OLDVALUE)) (ERROR "Bad mode in \MDB.CONTINUE: " MODE))) 117Q "Did you know that ABC must be loaded to do this?" 62Q " " 56Q "################################################################") \MDB.CONTINUE D1 (P 6 RESETZ P 5 RESETY P 4 LISPXHIST P 3 LOSEREASON P 2 ROOTFILES P 1 ROOTFILENAME P 0 POS I 3 MODE I 2 INCREMENTALCONSCOUNT I 1 OUTPUTFILENAME I 0 FILESLST F 7 LISPXHIST F 10Q RESETVARSLST) 0mg 1W!Wog hg^ Nh(54Q ERROR! 45Q RESETRESTORE 33Q \MDB.CONTINUEA0001 7 STKNTH) (41Q ERROR 30Q INTERNAL 4 \MDB.CONTINUE) ( 25Q (\MDB.CONTINUEA0001)) \MDB.CLEAROUT D1 (F 0 FILESLST F 1 CLISPARRAY F 2 ROOTFILES) (Po Q l dj kٰhcj (45Q CONSCOUNT 30Q RECLAIM 16Q CLRHASH 12Q %.) (3 REMAINING.FILES.TO.ANALYZE) ( 7 (ERASE)) \SYSFILEPA0001 D1 (NAME ERRORSET F 0 LUD F 1 RF) goPo Q h(31Q FINDFILE 24Q SETTOPVAL 21Q \APPEND2 16Q \APPEND2) (2 DIRECTORIES) ( 13Q ({ERIS}LIBRARY>) 6 ({ERIS}SOURCES>)) \SYSFILEP D1 (P 3 MACROY P 2 MACROX P 1 LUD P 0 RF I 0 X F 4 RESETVARSLST F 5 MAKESYSNAME F 6 SYSFILES F 7 LISPUSERSDIRECTORIES) k@ HV]g UdggUg hhYoW1 gd TcZog [gJ JcKh(145Q ERROR! 133Q SETTOPVAL 121Q \SYSFILEPA0001 101Q GETTOPVAL 46Q PACK* 21Q BOUNDP 3 ROOTFILENAME) (125Q DIRECTORIES 116Q INTERNAL 75Q DIRECTORIES 43Q >LIBRARY> 37Q {ERIS} 32Q LISPCORE 16Q MAKESYSNAME) ( 113Q (\SYSFILEPA0001) 61Q ({ERIS}LIBRARY>)) PRINT.DATABASE.BANNERLINESA0001 D1 (NAME ERRORSET P 0 START F 1 DATABASEFILE F 2 RESETVARSLST F 3 OUTPUTFILE F 4 RESETY) sQg gQg cd hhoQg chRckoQHm X)QSHoQHdn dHnkX ci(151Q COPYCHARS 126Q FILEPOS 102Q FFILEPOS 51Q OPENSTREAM 30Q GETFILEPTR 22Q GETSTREAM 6 OPENP) (46Q INPUT 17Q INPUT 13Q SETFILEPTR 3 INPUT) ( 114Q "(READATABASE)" 73Q " (* " 42Q (PROGN (CLOSEF? OLDVALUE))) PRINT.DATABASE.BANNERLINES D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 OUTPUTFILE I 0 DATABASEFILE F 3 LISPXHIST F 4 RESETVARSLST) (AibS!Tog hgZ JI(43Q ERROR! 36Q RESETRESTORE 24Q PRINT.DATABASE.BANNERLINESA0001) (32Q ERROR 21Q INTERNAL) ( 16Q (PRINT.DATABASE.BANNERLINESA0001)) (PRETTYCOMPRINT MAKEDATABASECOMS) (RPAQQ MAKEDATABASECOMS ((FNS STARTMAKINGDATABASE CONTINUEMAKINGDATABASE \MDB.CONTINUE \MDB.CLEAROUT \SYSFILEP) (FNS PRINT.DATABASE.BANNERLINES) (VARS (DATABASE.OUTPUT.FILE) (REMAINING.FILES.TO.ANALYZE)) (GLOBALVARS DATABASE.OUTPUT.FILE REMAINING.FILES.TO.ANALYZE) (FILES (SYSLOAD FROM LISPUSERS) PAGEHOLD ) (CONSTANTS (ANALYZED.FILES.KEY (QUOTE ANALYZED.FILES))))) (RPAQQ DATABASE.OUTPUT.FILE NIL) (RPAQQ REMAINING.FILES.TO.ANALYZE NIL) (FILESLOAD (SYSLOAD FROM LISPUSERS) PAGEHOLD) (RPAQQ ANALYZED.FILES.KEY ANALYZED.FILES) (CONSTANTS (ANALYZED.FILES.KEY (QUOTE ANALYZED.FILES))) (PUTPROPS MAKEDATABASE COPYRIGHT ("Xerox Corporation" 1983 1984 1985)) NIL