(FILECREATED "24-Jan-87 17:02:44" ("compiled on " {PHYLUM}<3-LISP>COURSE>KOTO>LOAD3LISP.;5) "12-Nov-85 14:59:23" bcompl'd in "INTERLISP-D 11-May-86 ..." dated "11-May-86 15:19:08") (FILECREATED "24-Jan-87 15:36:46" {PHYLUM}<3-LISP>COURSE>KOTO>LOAD3LISP.;5 8867 changes to: (VARS LOAD3LISPCOMS) previous date: "24-Jan-87 15:10:44" {PHYLUM}<3-LISP>COURSE>KOTO>LOAD3LISP.;4) 3-LISP-DEBUG D1 (I 0 args... F 0 CLISPHELPFLG F 1 CLISPFLG F 2 NOSPELLFLG F 3 FILERDTBL F 4 DWIMIFYCOMPFLG F 5 SYSPRETTYFLG F 6 3-LISP-SOURCE-DIRECTORY F 7 LOCALVARS F 10Q SPECVARS F 11Q 3-LISP-SOURCE-FILES) Z hcdcicdcdc dchcg g o o ¿h o l'di S V W†d ¿µøh(121Q LOADCOMP 111Q CNDIR 105Q SETSYNTAX 101Q GETSYNTAX 72Q FILESLOAD 63Q TERPRI 56Q PRIN1 47Q FILESLOAD 40Q CLDISABLE 32Q CLDISABLE) (35Q FIRST 27Q -) ( 67Q (EXPORTS.ALL) 53Q "EXPORTS.ALL sometimes is in SOURCES> " 44Q (CMLSPECIALFORMS)) COMPILE-3-LISP D1 (F 0 3-LISP-SOURCE-FILES) P (6 TCOMPL 2 3-LISP-DEBUG) NIL () DEFMACRO D1 (I 0 X) @gg@ (15Q PUTPROP) (7 OPENLAMBDA 4 MACRO) () INITIAL-RESET-EXPRESSION D1 (P 1 RESULT P 0 SSS)  og Xd` YH I(34Q CLOSEF? 27Q DIGEST 24Q READ 14Q OPENSTRINGSTREAM) (21Q NLISP-READ-TABLE 11Q INPUT) ( 6 "'(NORMALIZE (READ-STRUCTURE (OPEN-STREAM %"INIT.3-LISP%")) GLOBAL (LAMBDA [A B C D E F G] (PRINT PRIMARY-STREAM %"FATAL ERROR WHILE BOOTING.%" CR A CR B CR C CR D CR E CR F CR G CR) (EVIL '(RESET))) (LAMBDA [X] (READ-NORMALIZE-PRINT 1 GLOBAL PRIMARY-STREAM)))") LOAD-3-LISP-FILES D1 (P 1 FILE P 0 SOURCEDIR F 2 3-LISP-SOURCE-DIRECTORY F 3 3-LISP-SOURCE-FILES) 7o RH S°!dgHgIgg g µàh(56Q LOAD 50Q PACKFILENAME 16Q CNDIR 6 FILESLOAD) (53Q SYSLOAD 44Q DCOM 41Q EXTENSION 35Q NAME 31Q BODY) ( 3 (LOGOCLOCK)) LOAD3LISP D1 (P 4 I I 1 NOEMACS I 0 VERSION.NUMBER F 5 3-LISP-VERSION-ID F 6 WindowMenuCommands F 7 BackgroundMenuCommands F 10Q LOGOW F 11Q CAT-AND-BOTH-LANDSCAPES-WITH-REFLECTION F 12Q WindowMenu F 13Q BackgroundMenu) â@§o ¿o@ c A³g ¿o ¿¿W gg gUi V1HµTIc hcWAHµ`IchcW gghUgo nVnn‰lµ hdi chdgð¨»Jµ KhZY¿HX°–K&Z°÷\o ©L»Jµ KhZ¹HX°‡K&º°ø(313Q MEMBER 241Q LOGOCLOCK 236Q CREATEW 230Q CREATEREGION 212Q ADVISE 207Q SUBST 165Q CLOSEW 160Q CLOSEALL 155Q OPENP 113Q REBIND-IN-GLOBAL-ENVIRONMENT 103Q REBUILD-3-LISP 100Q ACTIVATE-NLISP-STACK 75Q PUTD 72Q GETD 61Q CHANGEBACKGROUND 53Q EMACS.INIT 47Q FILESLOAD 37Q LOAD 26Q LOAD-3-LISP-FILES 21Q CONCAT 10Q ERROR) (253Q Paint 200Q VERSION.ID 173Q BEFORE 170Q LOGOW 106Q VERSION-ID 67Q 3-LISP 64Q 3-lisp 34Q WINDOW.DCOM) ( 310Q (SaveVM SendMail "AR Edit") 204Q (COND ((NULL STRING) (SETQ STRING (CONCAT " " VERSION.ID)))) 44Q (PRIMIT COMS EMACS-CHANGES) 15Q "3-Lisp " 5 "3-lisp version number not supplied to LOAD3LISP") LOAD.PATCHESA0001A0002 D1 (NAME ERRORSET F 0 NAME) Pi i(4 LOAD) NIL () LOAD.PATCHESA0001 D1 (NAME ERRORSET P 1 NAME P 0 NAME F 2 PATCHFILES) RŽdoi µðhh(21Q LOAD.PATCHESA0001A0002) NIL ( 15Q (LOAD.PATCHESA0001A0002)) LOAD.PATCHES D1 NIL o (6 LOAD.PATCHESA0001) NIL ( 3 (LOAD.PATCHESA0001)) MAKE-LOCAL-SYSOUT D1 (I 1 HOST-PREFIX I 0 FILE F 0 LOGINHOST/DIR F 1 USERNAME) (Ac` i hc@ A i h(44Q 3-LISP 41Q VMEM.PURE.STATE 35Q CNDIR 31Q PRIM-LOGIN 26Q LOAD.PATCHES 23Q SYSOUT 14Q CLEARW 10Q CLEARW) (5 PROMPTWINDOW) () SAVE.3.LISP D1 (P 1 I F 2 CLISPARRAY F 3 3-LISP-VERSION-ID) %R l kIHó©¿IkÔY°õgS (42Q MAKESYS 23Q RECLAIM 6 GAINSPACE 3 CLRHASH) (36Q {DSK}3LISP.SYSOUT) () (PRETTYCOMPRINT LOAD3LISPCOMS) (RPAQQ LOAD3LISPCOMS ((P (CLDISABLE (QUOTE -))) (VARS (3-LISP-SOURCE-FILES (QUOTE (BITMAPS SIMPLEG GAUGE MM GC SUPPORT ENVIRONMENTS SYNTAX COMPILER KERNEL KERNEL-MACROS PRIMITIVES GROTTY-PRIMITIVES IO LOGOUT REIFY PROCESSOR)))) (INITVARS 3-LISP-SOURCE-DIRECTORY) (FNS 3-LISP-DEBUG COMPILE-3-LISP DEFMACRO INITIAL-RESET-EXPRESSION LOAD-3-LISP-FILES LOAD3LISP LOAD.PATCHES MAKE-LOCAL-SYSOUT SAVE.3.LISP) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA DEFMACRO) ( NLAML) (LAMA))))) (CLDISABLE (QUOTE -)) (RPAQQ 3-LISP-SOURCE-FILES (BITMAPS SIMPLEG GAUGE MM GC SUPPORT ENVIRONMENTS SYNTAX COMPILER KERNEL KERNEL-MACROS PRIMITIVES GROTTY-PRIMITIVES IO LOGOUT REIFY PROCESSOR)) (RPAQ? 3-LISP-SOURCE-DIRECTORY NIL) (PUTPROPS LOAD3LISP COPYRIGHT ("The Knights of the Lambda Calculus" 1984 1985 1987)) NIL