(FILECREATED "15-Aug-85 16:15:25" ("compiled on " {ERIS}LIBRARY>CMLCOMPILE.;6) "12-Aug-85 19:38:48" recompiled changes: NEWDEFC in "INTERLISP-D 12-Aug-85 ..." dated "12-Aug-85 19:51:40") (FILECREATED "15-Aug-85 16:14:40" {ERIS}LIBRARY>CMLCOMPILE.;6 12547 changes to: (FNS NEWDEFC ) previous date: " 9-Aug-85 18:19:25" {ERIS}LIBRARY>CMLCOMPILE.;5) 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 FILERDTBL F 15Q PROCESS.ENTIRE.FILE F 16Q NLAML F 17Q NLAMA F 20Q MAKESYSDATE F 21Q LAMS F 22Q LAMA F 23Q RESETY F 24Q COMPILER-OUTPUT F 25Q SAVE-EXPRS F 26Q COMPILE.FILE.VALUE F 27Q SYSLOCALVARS F 30Q LAP F 31Q HERALDSTRING F 32Q COUTFILE F 33Q COMPVERSION F 34Q COMPILE.EXT F 35Q COMPILEHEADER) ® ghhhWc¿gd gW ¿Wc¿gd gW ¿Wc¿gd gW" ¿Wc¿gd gW$ ¿Wc¿gd g ¿Wc¿gd gW( ¿Wc¿gd gW*´g ¿Wc¿W.iBgWg ZhhhWc¿W0’W4»J c¿gWµghgW8gW ggo cJW hhhWc¿W²/gW:WW6ogW2gW hWW ¿ JW ^˜Ndgð²B¿W²#O °dO½OWWlMµèJ gW ¿W c,c&iWhdW ¿°¥(651Q COMPILE-FILE-EXPRESSION 630Q CLOSEF 622Q PRINT 611Q CLOSEF 551Q REVERSE 525Q READ 513Q PRINT 445Q DATE 414Q ROOTFILENAME 404Q OPENSTREAM 367Q PACKFILENAME.STRING 333Q FULLNAME 303Q OPENSTREAM 253Q SETTOPVAL 235Q GETTOPVAL 217Q SETTOPVAL 206Q GETTOPVAL 170Q SETTOPVAL 161Q GETTOPVAL 143Q SETTOPVAL 132Q GETTOPVAL 114Q SETTOPVAL 103Q GETTOPVAL 65Q SETTOPVAL 54Q GETTOPVAL 36Q SETTOPVAL 25Q GETTOPVAL) (615Q STOP 534Q STOP 470Q dated 463Q in 442Q FILECREATED 375Q NEW 372Q OUTPUT 361Q BODY 354Q EXTENSION 350Q VERSION 341Q COMPILE.FILE.RESET 300Q INPUT 273Q CLOSEF? 250Q DEFER 241Q SVFLG 231Q SVFLG 212Q COUTFILE 202Q COUTFILE 165Q DFNFLG 155Q DFNFLG 136Q LAMA 126Q LAMA 107Q LAMS 77Q LAMS 60Q NLAMA 50Q NLAMA 31Q NLAML 21Q NLAML 2 RESETUNDO) ( 460Q "COMPILE.FILEd" 401Q ((TYPE BINARY))) COMPILE-FILE D1 (L (0 \CL:LAMBDA.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: ") COMPILE.FILE.EXPRESSION D1 (I 4 DEFER I 3 DONT.COPY I 2 COMPILE.TIME.TOO I 1 COMPILED.FILE I 0 FORM) @ABCD (10Q COMPILE-FILE-EXPRESSION) NIL () COMPILE.FILE.PUTDEF D1 (P 0 FN I 2 RDTBL I 1 LCFIL I 0 FORM) @ Xd@ h(30Q BYTECOMPILE2 25Q COMPILE1A 22Q EVAL 10Q EVAL) NIL () 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.DEFUN D1 (I 2 RDTBL I 1 LCFIL I 0 FORM F 0 DEF) PPP (16Q BYTECOMPILE2 13Q COMPILE1A) NIL () COMPILE.FILE.EXPRESSION D1 (I 4 DEFER I 3 DONT.COPY I 2 COMPILE.TIME.TOO I 1 COMPILED.FILE I 0 FORM) @ABCD (10Q COMPILE-FILE-EXPRESSION) 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 DFNFLG F 1 COMPILE.FILE.AFTER F 2 SVFLG) ‚Rdgð²6¿g@dždiðª3µ g@hAdždiðª3µ gAhihQc°Egð—@Ai °8P”Pið²)@ ²@i ¿P³@oid ¿@ ¿@Ai ‡@gA A(176Q /PUTPROP 165Q /PUTD 156Q SAVEDEF 151Q PRINT 132Q VIRGINFN 123Q \DEFINEDP 106Q SELECTOR.PUTD) (172Q CODE 76Q SELECTOR 53Q QUOTE 31Q QUOTE 13Q NEWDEFC 4 DEFER) ( 143Q (redefined)) (PRETTYCOMPRINT CMLCOMPILECOMS) (RPAQQ CMLCOMPILECOMS ((FNS COMPILE-FILE COMPILE-FILE-EXPRESSION COMPILE.FILE.EXPRESSION COMPILE.FILE.PUTDEF ARGTYPE.STATE COMPILE.CHECK.ARGTYPE COMPILE.FILE.DEFINEQ COMPILE.FILE.DEFUN COMPILE.FILE.EXPRESSION COMPILE.FILE.APPLY COMPILE.FILE.RESET) (VARS ARGTYPE.VARS) (PROP COMPILE.FILE.EXPRESSION DEFINEQ * FNS.PUTDEF) (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) (PUTPROPS FNS.PUTDEF COMPILE.FILE.EXPRESSION COMPILE.FILE.PUTDEF) (ADDTOVAR SYSPROPS COMPILE.FILE.EXPRESSION) (MOVD (QUOTE NEWDEFC) (QUOTE DEFC)) (PUTPROPS CMLCOMPILE COPYRIGHT ("Xerox Corporation" 1985)) NIL