(FILECREATED " 3-Aug-85 14:27:14" ("compiled on " {ERIS}LISPUSERS>CMLCOMPILE.;1) " 1-Aug-85 21:24:41" recompiled changes: nothing in "INTERLISP-D 1-Aug-85 ..." dated " 1-Aug-85 21:37:17") (FILECREATED " 3-Aug-85 14:27:02" {ERIS}LISPUSERS>CMLCOMPILE.;1 13421 changes to: (VARS CMLCOMPILECOMS) (PROPS (DEFINEQ COMPILE-FILE-EXPRESSION) (* COMPILE-FILE-EXPRESSION)) previous date: " 8-Jul-85 15:35:33" {ERIS}LIBRARY>CMLCOMPILE.;2) COMPILE-FILEA0001 D1 (NAME ERRORSET P 10Q EXP P 7 DEFERRED.EXPRESSIONS P 6 FILE.EXPRESSION P 4 ROOTNAME P 3 LSTFIL P 2 STREAM P 1 SPECVARS P 0 LOCALVARS F 11Q RESETVARSLST F 12Q OUTPUT-FILE F 13Q FILENAME F 14Q PROCESS.ENTIRE.FILE F 15Q COMPILER-OUTPUT F 16Q SAVE-EXPRS F 17Q COMPILE.FILE.VALUE F 20Q LAP F 21Q COUTFILE F 22Q HERALDSTRING F 23Q MAKESYSDATE F 24Q RESETY) ¹ ghhhWc¿gd g` ¿Wc¿gd g` ¿Wc¿gd g` ¿Wc¿gd g` ¿Wc¿gd g ¿Wc¿gd gW ¿Wc¿gd gW´g ¿Wc¿`iBgWg ZhhhWc¿W ’W"»J c¿gWµghg`gW ggo cJW hhhWc¿W²2g`W`ogW$gW&hW` ¿ J` ^˜Ndgð²C¿W²$O °dO½OW`lMµçJ gW ¿W cc(iWhdW ¿°£(664Q COMPILE-FILE-EXPRESSION 643Q CLOSEF 635Q PRINT 624Q CLOSEF 563Q REVERSE 537Q READ 524Q PRINT 453Q DATE 422Q ROOTFILENAME 412Q OPENSTREAM 375Q PACKFILENAME.STRING 340Q FULLNAME 310Q OPENSTREAM 257Q SETTOPVAL 241Q GETTOPVAL 223Q SETTOPVAL 212Q GETTOPVAL 174Q SETTOPVAL 165Q GETTOPVAL 147Q SETTOPVAL 135Q GETTOPVAL 117Q SETTOPVAL 105Q GETTOPVAL 67Q SETTOPVAL 55Q GETTOPVAL 37Q SETTOPVAL 25Q GETTOPVAL) (630Q STOP 606Q FILERDTBL 546Q STOP 534Q FILERDTBL 521Q FILERDTBL 500Q dated 473Q in 464Q COMPVERSION 456Q COMPILEHEADER 450Q FILECREATED 403Q NEW 400Q OUTPUT 367Q BODY 364Q COMPILE.EXT 361Q EXTENSION 355Q VERSION 346Q COMPILE.FILE.RESET 305Q INPUT 300Q CLOSEF? 271Q SYSLOCALVARS 254Q DEFER 245Q SVFLG 235Q SVFLG 216Q COUTFILE 206Q COUTFILE 171Q DFNFLG 161Q DFNFLG 144Q LAMA 141Q LAMA 131Q LAMA 114Q LAMS 111Q LAMS 101Q LAMS 64Q NLAMA 61Q NLAMA 51Q NLAMA 34Q NLAML 31Q NLAML 21Q NLAML 2 RESETUNDO) ( 470Q "COMPILE.FILEd" 407Q ((TYPE BINARY))) COMPILE-FILE D1 (L (0 \COMPILE-FILE.ARGCNT) P 31Q RESETZ P 30Q RESETY P 27Q LISPXHIST P 26Q COMPILE.FILE.VALUE P 25Q VALUE P 24Q COMPILE.FILE.AFTER P 23Q PROCESS-ENTIRE-FILE P 20Q COMPILER-OUTPUT P 15Q SAVE-EXPRS P 12Q OUTPUT-FILE P 7 REDEFINE P 4 LAP P 1 FILENAME F 32Q LISPXHIST F 33Q RESETVARSLST) Se@ñ0Hl»ºKdJó–¿hd³°agð”KkØ°òKlÔ[°åa¼Hl¾½NdMó–¿hd³°agð”NkØ°òNlÔ^°åa_¿Hl_¿_¿OdOó–¿hd³°agð•OkØ°ñOlÔ_°áa_¿Hl_¿_¿OdOó–¿hµi°agð•OkØ°ñOlÔ_°áa_¿Hl_¿_¿OdOó–¿hµi°agð•OkØ°ñOlÔ_°áa_ ¿Hl_$¿_"¿O$dO"ó–¿hd³°agð•O$kØ°ñO$lÔ_$°áa_&¿0W4!W6og ‘h‚g_2 ¿O2“¿O( †d ¿µøO,(511Q EVAL 503Q REVERSE 474Q ERROR! 465Q RESETRESTORE 452Q COMPILE-FILEA0001) (460Q ERROR 447Q INTERNAL 401Q :PROCESS-ENTIRE-FILE 321Q :COMPILER-OUTPUT 241Q :SAVE-EXPRS 161Q :OUTPUT-FILE 104Q :REDEFINE 37Q :LAP) ( 444Q (COMPILE-FILEA0001)) COMPILE-FILE-EXPRESSION D1 (P 6 PROP P 5 X P 4 COMPTIME P 3 CONDITIONS P 2 FORM P 1 ORIG.DONT.COPY P 0 ORIG.COMPILE.TIME.TOO I 4 DEFER I 3 DONT.COPY I 2 COMPILE.TIME.TOO I 1 COMPILED.FILE I 0 FORM F 7 COUTFILE F 10Q COMPILERMACROPROPS) °@dgð¢±æ¿BC@Jµh’±ÁJdgð–¿ib±¼dgð¥dgð–¿hb±©dgðž¿JZ hðb±”dgð²¿oW ¿JW ¿W °qdgð³jdgð•¿hb°^dgð¥dgð•¿ib°Ldgð›¿JZ b°:dgð”¿J°1dgð³(dgð³!dgð³¿JoW ‰JABCD ¿JZ±ÿ)dgð²J¿@gKµ B´gK¼gK²@ŽdMALCD µïhL´l@…d ¿µøhgð²@ŽdMABCD µïhB”@ ¿Cµ6@gµ@gNµ#@W ^²"@dN bô³@ABCD @BCD g@BCD (655Q COMPILE.FILE.APPLY 641Q COMPILE.FILE.APPLY 630Q COMPILE-FILE-EXPRESSION 612Q MACROEXPANSION 577Q GETLIS 540Q EVAL 523Q COMPILE-FILE-EXPRESSION 466Q EVAL 444Q COMPILE-FILE-EXPRESSION 347Q COMPILE-FILE-EXPRESSION 334Q PRINT 253Q EVAL 166Q TERPRI 160Q PRIN1 147Q PRIN1 117Q EVAL) (645Q PRINT 561Q COMPILE.FILE.EXPRESSION 551Q COMPILE-FILE-EXPRESSION 500Q PROGN 417Q LOAD 411Q EVAL 377Q COMPILE 362Q EVAL.WHEN 314Q EVAL@LOAD 305Q DOEVAL@LOAD 276Q DONTEVAL@LOAD 263Q EVAL@LOADWHEN 241Q EVAL@COMPILEWHEN 225Q EVAL@COMPILE 217Q DOEVAL@COMPILE 203Q DONTEVAL@COMPILE 174Q NOTFIRST 132Q FIRST 105Q COPYWHEN 70Q COPY 62Q DOCOPY 45Q DONTCOPY 6 DECLARE:) ( 326Q (UNRECOGNIZED DECLARE TAG) 142Q "Warning: (DECLARE: -- FIRST -- --) not implemented in COMPILE.FILE: ") ARGTYPE.STATE D1 (P 0 X F 1 ARGTYPE.VARS) +Q°$dHi ¿ki ¿H i ¿i µÝh(42Q TERPRI 35Q PRIN1 31Q EVAL 22Q SPACES 14Q PRIN1) NIL () COMPILE.CHECK.ARGTYPE D1 (P 2 VAL P 1 ATYPEPAIR P 0 BLKFLG I 1 AT I 0 X F 3 COUTFILE F 4 ARGTYPE.VARS) äA@ ð’±ÖT±Ëd@I-AIð²DJ²4oS ¿@S ¿oS ¿IS ¿oS ¿IS ¿I@I °mJ²noS ¿@S ¿oS ¿gATµoghS ¿oS ¿IS ¿oS ¿IS ¿S ¿I@I ¿µ‚±ÿ4h(325Q /SETTOPVAL 322Q REMOVE 317Q GETTOPVAL 304Q TERPRI 277Q PRIN1 267Q PRIN1 256Q PRIN1 245Q PRIN1 234Q PRIN1 201Q PRIN1 170Q PRIN1 162Q PRIN1 144Q GETTOPVAL 131Q PRIN1 120Q PRIN1 107Q PRIN1 77Q PRIN1 66Q PRIN1 60Q PRIN1 7 COMP.ARGTYPE) (224Q function 205Q a) ( 263Q " because it was incorrectly on " 241Q " was a " 221Q "LAMBDA spread" 175Q " " 156Q "Warning: compiler thought " 114Q " but compiler doesn't think its a " 73Q " on " 54Q "Compiler confused: ") COMPILE.FILE.DEFINEQ D1 (P 0 DEF I 2 RDTBL I 1 LCFIL I 0 FORM) )@°!dHH ¿HHH µßh(40Q BYTECOMPILE2 35Q COMPILE1A 22Q COMPILE.CHECK.ARGTYPE 17Q ARGTYPE) NIL () COMPILE.FILE.APPLY D1 (I 4 DEFER I 3 DONT.COPY I 2 COMPILE.TIME.TOO I 1 FORM I 0 PROP F 0 DEFERRED.EXPRESSIONS F 1 COMPILED.FILE) B”A ¿Cµ D—@APcAQ`l@(5 EVAL) (30Q FILERDTBL) () COMPILE.FILE.RESET D1 (I 2 ROOTNAME I 1 SOURCEFILE I 0 COMPILED.FILE F 0 RESETSTATE) 1@µAµP³'gB` g ¿°è ¿P²Þ@ ¿°×h(52Q DELFILE 42Q CLOSEF? 34Q CLOSEF? 25Q /SETATOMVAL 22Q REMOVE) (30Q Removes 17Q NOTCOMPILEDFILES 13Q NOTCOMPILEDFILES) () NEWDEFC D1 (I 1 DF I 0 NM F 0 COMPILE.FILE.AFTER F 1 SVFLG) WQgð²g@AihPc°>`–`ið²+@ ²@i ¿`³@oid ¿@ ¿@Ai ‡@gA A(123Q /PUTPROP 112Q /PUTD 103Q SAVEDEF 76Q PRINT 55Q VIRGINFN 46Q \DEFINEDP) (117Q CODE 61Q DFNFLG 36Q DFNFLG 32Q DFNFLG 11Q NEWDEFC 3 DEFER) ( 70Q (redefined)) (PRETTYCOMPRINT CMLCOMPILECOMS) (RPAQQ CMLCOMPILECOMS ((FNS COMPILE-FILE COMPILE-FILE-EXPRESSION ARGTYPE.STATE COMPILE.CHECK.ARGTYPE COMPILE.FILE.DEFINEQ COMPILE.FILE.APPLY COMPILE.FILE.RESET) (VARS ARGTYPE.VARS) (PROP COMPILE-FILE-EXPRESSION DEFINEQ *) (ADDVARS (SYSPROPS COMPILE-FILE-EXPRESSION)) (FNS NEWDEFC) (P (MOVD (QUOTE NEWDEFC) (QUOTE DEFC))) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS (NLAMA) (NLAML) (LAMA COMPILE-FILE))))) (RPAQQ ARGTYPE.VARS ((1 NLAML "NLAMBDA spread") (2 LAMA "LAMBDA nospread") (0 LAMS "LAMBDA spread") (3 NLAMA "NLAMBDA no-spread"))) (PUTPROPS DEFINEQ COMPILE-FILE-EXPRESSION COMPILE.FILE.DEFINEQ) (PUTPROPS * COMPILE-FILE-EXPRESSION NILL) (ADDTOVAR SYSPROPS COMPILE-FILE-EXPRESSION) (MOVD (QUOTE NEWDEFC) (QUOTE DEFC)) (PUTPROPS CMLCOMPILE COPYRIGHT ("Xerox Corporation" 1985)) NIL