(FILECREATED "11-Sep-84 16:28:24" ("compiled on " {ERIS}SOURCES>BYTECOMPILER.;6) "11-Sep-84 16:11:46" recompiled changes: nothing in "INTERLISP-D 11-Sep-84 ..." dated "11-Sep-84 15:20:11") (FILECREATED "11-Sep-84 16:13:32" {ERIS}SOURCES>BYTECOMPILER.;6 166728 changes to: (VARS BYTECOMPILERCOMS) (PROPS (AREF BOGUSMACRO) (ASET BOGUSMACRO)) previous date: "26-Aug-84 16:02:00" {ERIS}SOURCES>BYTECOMPILER.;5) BYTEBLOCKCOMPILE2A0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 BLKNAME F 1 BLKDEFS F 2 ENTRIES) hPQR h(12Q BLOCKCOMPILE2) (3 BYTECOMPFLG) () BYTEBLOCKCOMPILE2 D1 (P 10Q INTERNALBLKFNS P 7 BLKFLG P 6 X P 1 MACROY P 0 MACROX I 2 ENTRIES I 1 BLKDEFS I 0 BLKNAME F 11Q RESETVARSLST F 12Q RETFNS F 13Q BLKAPPLYFNS)  `gIg`WcWYog HIdWHcW WkI Hi`gh AAJKj0A^B gW>h0L`bhAl`bQ@WDjSBM@Idg_4O2O4h_2_0O._.O4&_2dWDd_.O0 O.h_2O.&_0O2\ gLhM gMh  WNdkdiIWP 1gO6hhW@c@_8og g_ cF@WHcH@(1041Q \APPEND2 1004Q ERROR! 775Q APPLY 745Q COMP.TOPLEVEL.COMPILEA0001 706Q OUTPUT 664Q COMPPRINT 657Q \NCONC2 654Q \NCONC2 335Q OPT.POSTOPT 325Q COMP.UNBIND.VARS 316Q COMP.VALN 304Q COMP.STTAG 232Q COMP.BINDLIST 206Q COMPERROR) (1020Q BYTEASSEMFN 765Q OUTPUT 751Q ERROR 742Q INTERNAL 714Q OUTPUT 645Q nlams: 633Q calls: 520Q FVAR 442Q COMPILEUSERFN 425Q COMPILEUSERFN 406Q uses: 313Q RETURN 266Q TAG 163Q NLAMBDA 152Q LAMBDA 122Q NOBIND 112Q LAMBDANOBIND 77Q COMPILEUSERFN 66Q COMPILEUSERFN 56Q LAMBDA 45Q NLAMBDA) ( 737Q (DUMMY.FOR.ERRORSET) 202Q (not compilable)) COMP.BINDLIST D1 (P 4 VAR I 0 VARS) 'P@d\i L KIHhZH&J(21Q COMP.VARTYPE 14Q COMP.CHECK.VAR) NIL () COMP.CHECK.VAR D1 (I 1 BIND I 0 X) <A$@d o@ @ @o @dldido (71Q COMPERROR 43Q COMPERRM 31Q COMP.GLOBALVARP 24Q COMPERRM 21Q \APPEND2 7 COMP.USERFN) NIL ( 65Q (is not a legal variable name) 37Q (- is global) 15Q (Attempt to bind CONSTANT)) COMP.BIND.VARS D1 (P 11Q VARNAME P 7 DECLS P 6 VAR P 5 X P 4 DECL P 3 NNILS P 2 NVALS P 1 VLN P 0 VLV I 3 DECLARATIONS I 2 TYPE I 1 VALS I 0 ARGS F 16Q CODE F 17Q EXP F 20Q FRAME) @Dd Oi _O OOC ])AAbM NgNMO_NHA+AAb]M W`NId I [H Z`Wo @ W _H _HI _BKO_OOhdOhhhdO` (321Q PUTHASH 252Q OPT.DREV 247Q OPT.DREV 237Q LENGTH 222Q COMPERROR 202Q LENGTH 175Q LENGTH 164Q COMP.EFFECT 150Q COMP.DELPUSH 133Q COMP.VAL 61Q COMP.EXPR 42Q FASSOC 30Q COMP.VARTYPE 20Q COMP.CHECK.VAR) (316Q FRA 206Q MAXBVALS 142Q OPNIL 66Q HVAR) ( 216Q (-- too many variables with values)) COMP.UNBIND.VARS D1 (I 1 TOPFLG I 0 F F 0 COMPILE.CONTEXT F 1 CODE F 2 BCINFO) $APgQ Pg QiR g(36Q PUTHASH 26Q COMP.STUNBIND 15Q OPT.JUMPCHECK) (41Q NOVALUE 22Q EFFECT 6 RETURN) () COMP.VALN D1 (I 1 COMPILE.CONTEXT I 0 L) @ (3 COMP.PROGN) NIL () COMP.PROGN D1 (P 0 FLG I 0 A F 1 CODE F 2 COMPILE.CONTEXT) A@@ `hRg@ HQd`Q @bdʰh(62Q OPT.JUMPCHECK 53Q COMP.DELPOP 34Q COMP.EFFECT 7 COMP.EXP1) (45Q OPPOP 23Q RETURN 13Q OPTIMIZATIONSOFF) () COMP.EXP1 D1 (I 0 E F 0 COMPILE.CONTEXT) @P (4 COMP.EXPR) NIL () COMP.EXPR D1 (P 4 X P 1 V P 0 M I 1 COMPILE.CONTEXT I 0 EXP F 5 CODE F 6 FRAME F 7 PIFN) t VU A ,g@G@dldid dd@ ` X@dkHb@ @Xdl_dgdgdgH@ g%@@jJ K lKL kػJZ@ Xdb^o F` YAgHdW@ (i@I H YH@I @ YH@ AdhbgIggAdgU g IgA gAdggIgA g(556Q COMP.UNBOX 515Q COMP.STJUMP 502Q COMP.PREDP 473Q COMP.STRETURN 467Q OPT.JUMPCHECK 447Q COMP.STPOP 416Q COMP.CALL 405Q COMP.TRYUSERFN 400Q COMP.CALL 367Q COMP.ARGTYPE 361Q COMP.MACRO 346Q COMP.CPI 320Q GETMACROPROP 310Q COMPERROR 270Q COMP.TRYUSERFN 253Q COMP.VAL 242Q COMP.STFN 210Q COMP.LAMBDA 140Q COMP.CONST 116Q FASSOC 110Q TYPENAME 65Q COMP.VAR 57Q COMP.CONST 31Q OPT.COMPILERERROR 16Q COMP.PREDP 11Q OPT.JUMPCHECK) (561Q UNBOXED 547Q UNBOXED 540Q UNBOXED 530Q TYPE 520Q PREDVALUE 507Q PREDVALUE 476Q NOVALUE 460Q RETURN 452Q NOVALUE 442Q NOVALUE 434Q EFFECT 327Q RETURN 315Q COMPILERMACROPROPS 216Q OPCODES 177Q OPENLAMBDA 171Q NLAMBDA 163Q LAMBDA 113Q COMPILETYPELST 25Q PREDVALUE) ( 304Q (- non-atomic CAR of form)) COMP.TRYUSERFN D1 (I 1 M I 0 EXP) `@ bdg@o h(32Q COMPERRM 10Q COMP.USERFN) (16Q INSTRUCTIONS 2 COMPILEUSERFN) ( 26Q (COMPILEUSERFN returned INSTRUCTIONS)) COMP.USERFN D1 (P 4 OTHERVARS P 3 FN I 0 X F 5 COMPVARMACROHASH F 6 TOPFN F 7 ALLVARS) :@lU@U-@V0WdIHhZH&J@@l`NIL (65Q COMPILEUSERFN) () COMP.CONST D1 (I 0 X F 0 COMPILE.CONTEXT) n`ePgg`VP PPdg@3dg@6@ i!dg@hg@h igPP g@ (153Q COMP.STCONST 143Q COMP.STJUMP 126Q SHOULDNT 120Q COMP.STCONST 63Q COMP.STCONST 27Q COMP.PREDP) (146Q PREDVALUE 132Q JUMP 106Q NFJUMP 73Q FJUMP 51Q NTJUMP 37Q TJUMP 21Q OPTIMIZATIONSOFF 15Q NOVALUE 10Q EFFECT 2 OPTIMIZATIONSOFF) () COMP.CALL D1 (P 0 N I 2 TYP I 1 A I 0 F F 1 NLAMS1 F 2 ALAMS1 F 3 FRAME F 4 CODE) jS@g S@Bdl@dQQcA @k k@dQQcB@dRRcABkA A HkظAbABBl@H o HkT`HkX(234Q COMP.DELPUSH 213Q COMPERROR 202Q COMP.STFN 150Q COMP.VAL 142Q COMP.STCONST 73Q COMP.STFN 65Q COMP.STCONST 24Q COMP.CLEANFNOP) (226Q OPNIL 21Q FREEVARS) ( 207Q (- unusual CDR arg list)) COMP.VAR D1 (I 0 VAR F 0 DECL F 1 COMPILE.CONTEXT F 2 ALLDECLS) ,Qgg@i bd @R cgP (51Q COMP.BOX 31Q ASSOC 24Q COMP.STVAR 16Q COMP.LOOKUPVAR) (41Q UNBOXED 10Q NOVALUE 3 EFFECT) () COMP.VAL1 D1 (I 1 COMPILE.CONTEXT I 0 L) @ (3 COMP.PROG1) NIL () COMP.PROG1 D1 (I 0 A F 0 COMPILE.CONTEXT) #@d PgP @d (33Q COMP.EFFECT 24Q COMP.EXPR 7 COMP.EXP1) (15Q EFFECT) () COMP.EFFECT D1 (P 0 LV I 0 E F 1 LEVEL F 2 CODE) QR h@g (21Q COMP.EXPR 7 OPT.JUMPCHECK) (16Q EFFECT) () COMP.VAL D1 (P 0 LV I 0 X F 1 LEVEL F 2 CODE) QR h@ (16Q COMP.EXPR 7 OPT.JUMPCHECK) NIL () COMP.MACRO D1 (P 0 MACEXP I 1 MAC I 0 EXP) Ad$di@@@ g@kAdgA@ dgA@A dgA@ dgdgdgA@ @AA.@ A A @o A@A gA@ bgAdg𲒿@o @@@ (335Q COMP.CALL 332Q COMP.ARGTYPE 320Q COMPERROR 266Q APPLY 253Q COMP.PROGN 250Q SUBPAIR 236Q COMPERRM 222Q LAST 212Q LENGTH 205Q LENGTH 162Q COMP.LAMBDA 131Q COMP.EXP1 112Q APPLY 66Q APPLY 36Q COMP.PUNT 25Q COMP.CALL 22Q COMP.ARGTYPE) (303Q INSTRUCTIONS 273Q IGNOREMACRO 257Q NLAMBDA 152Q OPENLAMBDA 144Q NLAMBDA 136Q LAMBDA 117Q = 73Q APPLY* 53Q APPLY 31Q COMP.PUNT) ( 314Q (returned INSTRUCTIONS) 232Q (- warning: too many args for macro)) COMP.VARTYPE D1 (I 0 VAR) @ gg(3 COMP.ANONP) (13Q AVAR 7 HVAR) () COMP.LOOKUPVAR D1 (P 0 X I 1 FORVALUE I 0 V F 5 FREEVARS F 6 ALLVARS F 7 GLOBALVARFLG) wPVY+hlUh[1hXa@d X>A1ggHhi +Z@J=iI\@LiK@o W@ gg@ XUc H(155Q COMP.CHECK.VAR 141Q COMP.GLOBALVARP 131Q COMPERRM 56Q RETAPPLY 32Q COMP.USERFN) (151Q FVAR 145Q GVAR 47Q COMP.VAL 44Q COMP.VAR) ( 125Q " - is compile time constant, yet is bound or set.") COMP.LOOKUPCONST D1 (I 0 X F 1 CONSTS) .@`Qd@Hhg@bQ@h c(50Q \NCONC2) (35Q CONST 4 OPNIL) () COMP.ST D1 (L (1 DL 0 X) F 0 LEVEL F 1 CODE) PAi@QcAdPAcNIL NIL () COMP.STFN D1 (I 1 N I 0 FN F 0 BLKFLG F 1 INTERNALBLKFNS) gAP@dlQ @kA (34Q COMP.ST 20Q FASSOC) (2 FN) () COMP.STCONST D1 (I 0 X) @ k (7 COMP.ST 3 COMP.LOOKUPCONST) NIL () COMP.STVAR D1 (I 0 VREF) @k (4 COMP.ST) NIL () COMP.STPOP D1 (I 0 N) @kHj`m HkXI(22Q COMP.ST) (15Q OPPOP) () COMP.DELFN D1 (F 0 CODE F 1 LEVEL) QkPcPcNIL NIL () COMP.STRETURN D1 (F 0 FRAME F 1 LEVEL) `i hcc(6 COMP.ST) (2 OPRETURN) () COMP.STTAG D1 (P 1 NF P 0 NLV I 0 TAG F 2 LEVEL F 3 FRAME F 4 CODE) ]@@`HIHRdc$ISdcRS@dR@S` iTgT@Tc@j h(131Q COMP.ST 77Q OPT.COMPILERERROR 71Q PUTHASH) (106Q JUMP 66Q FRA 6 FRA) () COMP.STJUMP D1 (P 2 NV P 1 V P 0 F I 2 JT I 1 TAG I 0 OP F 3 LEVEL F 4 FRAME F 5 CODE) U A@b@b@b@ABj A`AHAT` @dgShcc@g@dgSkc,g@dgSdkcgSkBcjcZIAJh(211Q OPT.COMPILERERROR 71Q PUTHASH 44Q COMP.ST 3 OPT.JUMPCHECK) (170Q ERRORSET 151Q NTJUMP 142Q NFJUMP 125Q TJUMP 116Q FJUMP 77Q JUMP 66Q FRA 50Q FRA) () COMP.STSETQ D1 (I 0 VREF) g@j (10Q COMP.ST) (2 SETQ) () COMP.STCOPY D1 NIL `k (6 COMP.ST) (2 OPCOPY) () COMP.DELPUSH D1 (F 0 LEVEL F 1 CODE) PkcQcNIL NIL () COMP.DELPOP D1 (F 0 LEVEL F 1 CODE) PkcQcNIL NIL () COMP.STBIND D1 (P 0 X I 0 F F 1 FRAME F 2 LEVEL F 3 CODE) @d`Q` @@R@SHdHdgdgdgdgdgig@h Hg ih@igh@j @cjc(207Q COMP.ST 147Q COMP.CLEANFNOP 15Q PUTHASH) (177Q BIND 144Q FREEVARS 122Q FN 111Q CONST 103Q GVAR 75Q AVAR 66Q HVAR 57Q TAG 12Q FRA 4 FRA) () COMP.STUNBIND D1 (I 0 D F 0 FRAME F 1 LEVEL) &@ggQPj P@jkcP`c(20Q COMP.ST) (40Q FRA 10Q UNBIND 4 DUNBIND) () COMP.ARGTYPE D1 (I 0 FN F 0 LAMA F 1 BLKFLG F 2 BLKDEFS F 3 NOFIXFNSLST) a@dl PP@d`j`k@`lQ@R @d`g@g@ @@g@Sl(114Q \DEFINEDP 57Q FASSOC 11Q ARGTYPE) (124Q EXPR 105Q BROKEN 76Q BLKLIBRARYDEF 71Q BLKLIBRARY 42Q NLAMA 32Q NLAML 23Q LAMS) () COMP.CLEANEXPP D1 (P 0 X I 1 TYPE I 0 X) $@h@A @dHA i(31Q COMP.CLEANEXPP 13Q COMP.CLEANFNP) NIL () COMP.CLEANFNP D1 (P 0 X I 1 TYPE I 0 X F 1 CLEANFNTEST) 6@dlkQ'@dgdg@dHA i(53Q COMP.CLEANEXPP) (32Q OPENLAMBDA 24Q LAMBDA) () COMP.CLEANFNOP D1 (I 1 TYPE I 0 FN F 0 CLEANFNTEST) @AlPNIL NIL () COMP.GLOBALVARP D1 (L (0 X)) @g@`NIL (12Q GLOBALVARS 3 GLOBALVAR) () COMP.LINKCALLP D1 (I 0 FN F 0 BLKFLG F 1 BLKDEFS) ;`@`hP@Q $@``@``iP`ii(23Q FASSOC) (63Q LINKFNS 52Q NOLINKFNS 45Q LINKFNS 37Q LINKFNS 31Q BLKLIBRARY 10Q NOLINKFNS 2 NOLINKFNS) () COMP.ANONP D1 (L (0 E) F 0 LOCALVARS F 1 SPECVARS F 2 BLKFLG F 3 LOCALFREEVARS) Pi@PQi @QR@ShNIL NIL () COMP.CPI D1 (P 0 F I 1 ARGS I 0 FN F 1 FRAME F 2 TOPFRAME F 3 LEVEL F 4 ARGVARS F 5 TOPLAB) rQHdR+ATA QRi SjS gU gdgdggH Hhi@Aj H`Xh(156Q OPT.COMPILERERROR 142Q COMP.CALL 114Q FASSOC 56Q COMP.STJUMP 46Q COMP.STPOP 34Q COMP.STUNBIND 23Q COMP.CPI1 20Q COMP.PICOUNT) (147Q FRA 104Q AVAR 75Q LAMBDA 67Q PROG 61Q NOVALUE 52Q JUMP) () COMP.CPI1 D1 (I 2 N I 1 VARS I 0 ARGS) [A@@ @BkbbBj@dldA@ @ABk A ABkbbb(107Q COMP.STPOP 104Q COMP.STSETQ 77Q COMP.CPI1 65Q COMP.VAL 13Q COMP.EFFECT) NIL () COMP.PICOUNT D1 (P 2 VARS P 1 ND P 0 N I 0 ARGS F 3 ARGVARS) 3jdSJ)Hkظ@dlJ@g HJ@bI(42Q COMP.CLEANEXPP) (37Q COMP.PICOUNT) () COMP.EVQA0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 COMPVARMACROHASH F 1 X) hcQ h(10Q COMP.EXP1) NIL () COMP.EVQ D1 (P 1 MACROY P 0 MACROX I 0 X F 2 RESETVARSLST F 3 COMPVARMACROHASH) @gSRcRYog HcIdRHcR RkI H(74Q ERROR! 63Q NLEFT 54Q TAILP 27Q COMP.EVQA0001) (24Q INTERNAL 2 COMPVARMACROHASH) ( 21Q (DUMMY.FOR.ERRORSET)) COMP.BOOL D1 (P 1 P P 0 END I 1 FLAG I 0 A F 2 COMPILE.CONTEXT F 3 LBCNT) @A @ gSkchR 5RYdgdgA@g6dgdgA+g!RgAggAggHh@@I @b@R H (216Q COMP.STTAG 212Q COMP.EXPR 175Q COMP.EXPR 124Q OPT.COMPILERERROR 41Q COMP.PREDP 16Q COMP.EXP1 6 COMP.CONST) (157Q NTJUMP 153Q NFJUMP 145Q TJUMP 141Q FJUMP 132Q EFFECT 116Q TJUMP 105Q NFJUMP 77Q FJUMP 71Q FJUMP 60Q NTJUMP 52Q TJUMP 22Q TAG) () COMP.APPLYFNP D1 (I 0 X F 0 ALAMS1) E@/@dgdg2@h@ @dPPcidjdkdlh(40Q COMP.ARGTYPE) (17Q QUOTE 11Q FUNCTION) () COMP.AC D1 (F 0 EXP F 1 AC) Pc`h(12Q COMP.PUNT) (5 DONOTHING) () COMP.PUNT D1 (P 0 EM F 1 MACEXP F 2 EXP) RoQgQgHH h(34Q COMPERROR) (23Q - 16Q Under) ( 5 (-- can't compile)) COMP.FUNCTION D1 (P 0 FN I 0 A) %@H@gH@k  H (42Q COMP.STCONST 33Q COMP.LAM1 27Q COMP.CALL) (17Q FUNCTION) () COMP.LAM1 D1 (P 0 FN I 0 DEF F 3 ALLVARS F 4 SUBFNFREEVARS) *!H@ SYHZgJdTgI(12Q COMP.TOPLEVEL.COMPILE 2 COMP.GENFN) (42Q AVAR 27Q AVAR) () COMP.GENFN D1 (F 0 COMFN) A` P l ` l n'`jP`k`hlA (76Q GENSYM 32Q ALLOCSTRING 24Q NCHARS 11Q NCHARS 5 NCHARS) (67Q COMP.GENFN.BUF 64Q COMP.GENFN.NUM 57Q COMP.GENFN.NUM 52Q COMP.GENFN.NUM 44Q COMP.GENFN.NUM 35Q COMP.GENFN.BUF 21Q COMP.GENFN.BUF 2 COMP.GENFN.BUF) () COMP.COND D1 (P 4 ENDF P 3 CLAUSE P 2 PRED P 1 NEXT P 0 END I 0 A F 7 COMPILE.CONTEXT F 10Q LBCNT F 11Q CODE) gWkcha@[KnJggWkchYh W (KW hW WgW gH\ `Wh] hZI /^INiM@#JWgggH\h @biJW hW Wgh LH Wgg(311Q COMP.STTAG 302Q COMP.EXPR 266Q COMP.EXPR 256Q COMP.PREDP 236Q COMP.EXPR 157Q COMP.STTAG 133Q COMP.STJUMP 122Q OPT.JUMPCHECK 105Q COMP.VALN 75Q COMP.PREDP 64Q OPT.JUMPCHECK 56Q COMP.EXPR) (325Q NOVALUE 317Q EFFECT 274Q EFFECT 226Q NTJUMP 222Q TJUMP 215Q EFFECT 137Q OPTIMIZATIONSOFF 126Q JUMP 113Q RETURN 36Q TAG 33Q FJUMP 2 TAG) () COMP.SELECTQ D1 (P 7 Y P 6 C P 5 CLAUSE P 4 TEST P 3 NEXT P 2 THISLABEL P 1 VAR P 0 END I 0 A F 10Q COMPILE.CONTEXT F 11Q LBCNT F 12Q CODE) gWkchQ@ @bWd`ZgWd`?Wg3W@d@N@@N@ @biZ@&JI@W hW WgH h@@b]\?I7J@L gl J@@Wg}g{ L`I @ L ggWkchL5dOd'IO gl gJ \̱UgH MWgW H ggWkch[ JJ J@IMWdgdgWh WggH K (730Q COMP.STTAG 723Q COMP.STJUMP 704Q COMP.VALN 652Q COMP.STPOP 637Q COMP.STTAG 630Q COMP.STJUMP 603Q COMP.STTAG 577Q COMP.VALN 557Q COMP.STJUMP 534Q COMP.STVAR 530Q COMP.STJUMP 520Q COMP.STFN 507Q COMP.STCONST 500Q COMP.STCOPY 431Q COMP.STCONST 426Q \APPEND2 421Q COMP.STVAR 415Q COMP.STCOPY 365Q COMP.STVAR 323Q COMP.STFN 312Q COMP.STCONST 305Q COMP.STCOPY 251Q COMP.STTAG 236Q COMP.EXPR 226Q COMP.PREDP 216Q COMP.STPOP 171Q COMP.PROGN 131Q COMP.DELPUSH 103Q COMP.STPOP 50Q COMP.DELPUSH 23Q COMP.VAL) (717Q JUMP 712Q RETURN 671Q RETURN 663Q EFFECT 613Q TAG 610Q FJUMP 567Q EFFECT 553Q NFJUMP 524Q TJUMP 513Q EQ 442Q TAG 435Q FMEMB 402Q SELECTQFMEMB 360Q FJUMP 352Q EFFECT 316Q EQ 243Q RETURN 114Q CONST 73Q SELECTVARTYPES 57Q SETQ 41Q SELECTVARTYPES 2 TAG) () COMP.QUOTE D1 (I 0 A F 0 EXP) @dPo @ (23Q COMP.CONST 15Q COMPERRM) NIL ( 11Q (- probable parenthesis error)) COMP.COMMENT D1 (I 0 A F 0 COMPILE.CONTEXT F 1 EXP) PgQo @ g(23Q COMP.STCONST 16Q COMPERRM) (27Q NOVALUE 3 EFFECT) ( 12Q (- value of comment used?)) COMP.DECLARE D1 (P 0 B I 0 A F 1 SYSLOCALVARS) @dHdgHgg` `dgHggQ KdgDdg)dg"dgdgdgdgdgH gHo |@ (217Q COMP.CONST 200Q COMPERRM 161Q EVAL 65Q COMP.DECLARE1 40Q COMP.DECLARE1) (165Q TYPE 152Q GLOBALVARS 144Q USEDFREE 136Q SETQQ 127Q CONSTANTS 120Q PUTPROPS 111Q DEFLIST 102Q ADDTOVAR 73Q USEDFREE 61Q LOCALVARS 56Q SPECVARS 46Q SPECVARS 35Q SYSSPECVARS 32Q SPECVARS 27Q LOCALVARS 16Q LOCALVARS) ( 174Q (- used in DECLARE)) COMP.DECLARE1 D1 (P 1 VTAG P 0 V I 3 SYSOTHERVAR I 2 OTHERVAR I 1 VAR I 0 VAL F 2 FRAME) LA@d d-bd@A i@ R$iBC idH YHHIh(72Q COMP.VARTYPE 54Q SET 34Q SET 23Q \APPEND2) NIL () COMP.CARCDR D1 (P 0 X I 0 A F 1 COMPILE.CONTEXT F 2 EXP) 6Qg@Q @ RgdHgggk h(55Q COMP.STFN 17Q COMP.VAL1 12Q COMP.VAL1) (51Q CDR 45Q CAR 40Q A 24Q CROPS 3 EFFECT) () COMP.STCROP D1 (I 0 X) @gggk (20Q COMP.STFN) (14Q CDR 10Q CAR 3 A) () COMP.NOT D1 (I 1 TMP I 0 A F 0 COMPILE.CONTEXT) P P b@A @ gk (35Q COMP.STFN 26Q COMP.VAL1 21Q COMP.EXPR 10Q OPT.NOTJUMP 3 COMP.PREDP) (31Q NULL) () COMP.SETQ D1 (P 1 DECL P 0 VAR I 0 A F 2 ALLDECLS)  @ XdR Y@I H h(32Q COMP.STSETQ 26Q COMP.EXPR 15Q ASSOC 7 COMP.LOOKUPVAR) NIL () COMP.SETN D1 (I 0 A) @o @ (15Q COMP.SETQ 11Q COMPERRM) NIL ( 5 (- warning: SETN compiled as SETQ)) COMP.LAMBDA D1 (P 21Q SPECVARS P 20Q LOCALVARS P 17Q ALLDECLS P 16Q ALLVARS P 10Q VAR P 7 SUBNEW P 6 SUBOLD P 5 E P 4 V P 3 F P 2 I P 1 EXPS P 0 VARS I 1 VALS I 0 FN F 22Q CODE F 23Q COMPILE.CONTEXT F 24Q ALLVARS F 25Q ALLDECLS F 26Q LOCALVARS F 27Q SPECVARS) @@j @dgHVAAb W$g7HHNW$_ddidd gOhO_HHL\Ad L>W$dgdgdgdgW$g W$_LNOI O_LLNHXO_LLN`AbLoNOI Y djdkH0 A7d_ddidd gOh_O Oh_O&_ObFdl@ Al l'HhAddidd gAhhb@o HAgI [dW( KW* W,W.K IW&dgdgW&h K (746Q COMP.UNBIND.VARS 741Q COMP.VALN 710Q COMP.STBIND 675Q \APPEND2 663Q \APPEND2 650Q COMP.BIND.VARS 645Q COMP.LOOKFORDECLARE 633Q COMPERROR 547Q COMP.CALL 541Q COMP.LAM1 405Q ARGTYPE 375Q SUBPAIR 325Q COMP.GENFN 301Q COMP.PROGN 276Q SUBPAIR 257Q COMP.STPOP 240Q COMP.DELPUSH 163Q COMP.EFFECT 140Q COMP.DELPUSH 42Q COMP.VAL) (726Q RETURN 720Q EFFECT 641Q LAMBDA 611Q QUOTE 463Q QUOTE 352Q DONOTHING 244Q SETQ 226Q GVAR 220Q FVAR 212Q HVAR 203Q AVAR 122Q QUOTE 52Q CONST 17Q OPENLAMBDA) ( 627Q (- illegal open function) 366Q (DECLARE (LOCALVARS . T))) COMP.PROG D1 (P 23Q FLG P 22Q PROGLEVEL P 21Q TAGS P 20Q PROGCONTEXT P 17Q RETURNLABEL P 16Q SPECVARS P 15Q LOCALVARS P 14Q ALLDECLS P 13Q ALLVARS P 12Q F P 11Q VALS P 10Q VARS P 3 X I 0 A F 24Q COMPILE.CONTEXT F 25Q LBCNT F 26Q CODE F 27Q ALLVARS F 30Q ALLDECLS F 31Q FRAME F 32Q LOCALVARS F 33Q SPECVARS) 0@)dKdldo IHhZH&J@@'d_OdgOMLh^L&N OOg@b _dW. OW0 W4W6gW*kc*W(gjkdO` W(dgdgW(h6O @NdKCKdlo 1O" Ko KgKh[O"_"KW2` KjOO"`hO"hO g_&@dKdl9O"  W(dgW, h W(gO O  O&W,`(632Q COMP.DELPOP 611Q COMP.EFFECT 605Q COMP.UNBIND.VARS 576Q COMP.STTAG 561Q COMP.EXPR 554Q OPT.JUMPCHECK 530Q COMP.STTAG 524Q FASSOC 425Q PUTHASH 372Q COMPERROR 360Q FASSOC 351Q COMPERROR 315Q COMP.STBIND 260Q PUTHASH 216Q \APPEND2 203Q \APPEND2 167Q COMP.BIND.VARS 164Q COMP.LOOKFORDECLARE 35Q COMPERROR) (624Q OPPOP 567Q RETURN 544Q EFFECT 473Q RETURN 454Q OPTIMIZATIONSOFF 422Q FRA 400Q TAG 275Q RETURN 267Q EFFECT 255Q FRA 240Q EFFECT 225Q TAG 155Q PROG 112Q PROG1) ( 366Q (- multiply defined tag) 345Q (- illegal tag) 31Q (- bad PROG variable)) COMP.GO D1 (P 1 ANYPROG P 0 D I 0 A F 2 FRAME F 3 LEVEL F 4 CODE) [ T 'giYg@Ioo i Rdgܿ@R XSjS gH g(125Q COMP.STJUMP 114Q COMP.STPOP 101Q FASSOC 54Q COMP.STUNBIND 47Q COMPERROR 6 OPT.JUMPCHECK) (130Q NOVALUE 120Q JUMP 63Q PROG 23Q LAMBDA 13Q NOVALUE) ( 43Q (- illegal GO) 36Q (- undefined tag)) COMP.RETURN D1 (P 0 PROGFRAME I 0 A F 1 PROGCONTEXT F 2 LEVEL F 3 FRAME F 4 COMFN F 5 RETURNLABEL F 6 CODE) SQgQgRjSgR HdggH`XTo @Q V JQgCSdggQg To QgR Rko gU g(224Q COMP.STJUMP 214Q OPT.COMPILERERROR 200Q COMP.STPOP 165Q COMPERROR 151Q COMP.STUNBIND 112Q OPT.JUMPCHECK 105Q COMP.VAL1 77Q COMPERROR 37Q COMP.STPOP) (227Q NOVALUE 220Q JUMP 172Q EFFECT 145Q EFFECT 137Q LAMBDA 131Q PROG 120Q RETURN 62Q FRA 54Q LAMBDA 46Q PROG 31Q PROG 16Q EFFECT 7 RETURN) ( 211Q (unimplemented RETURN) 161Q (- illegal RETURN) 73Q (- illegal RETURN)) COMP.NUMERIC D1 (P 3 TMP P 2 V P 1 FN P 0 N I 4 COERSIONS I 3 ZERO I 2 TYPE I 1 2FN I 0 A F 5 COMPILE.CONTEXT F 6 CODE F 7 EXP) jW2Ug`@ AIbUdgEUBUD [*@nJHj#jI #kIjI bKbgUD [@HkdjKl @bU Hkظg@bgBgb Hkظ`sB VA HVkظVgNHjGJBgVkLHkٸ*VlIJC HdjkٰJ Hj!jJAgjJ gl J HkXHdkB hkdjAl (572Q COMP.STFN 553Q COMP.STFIX 531Q COMP.STCONST 521Q COMP.STFN 510Q COMP.STCONST 460Q COMP.STCONST 446Q COMP.STPOP 434Q EQUAL 405Q COMP.DELPUSH 334Q COMP.DELFN 317Q OPT.CALLP 310Q COMP.DELFIX 270Q COMP.EXPR 230Q COMP.EXPR 213Q COMP.STFN 164Q FASSOC 126Q EQUAL 110Q COMP.STCONST 61Q FASSOC 24Q COMP.PROGN) (514Q IDIFFERENCE 477Q IPLUS 371Q FIX 344Q CONST 300Q OPTIMIZATIONSOFF 262Q FIX 254Q TYPE 242Q UNBOXED 153Q UNBOXED 42Q TYPE 17Q OPTIMIZATIONSOFF 12Q EFFECT) () COMP.NUMBERCALL D1 (P 1 TMP P 0 N I 2 COERSIONS I 1 TYPE I 0 A F 4 CODE F 5 COMPILE.CONTEXT F 6 EXP F 7 2FN) -j1Udg`@ UdgjUAUB YO@`TgHlTgVTTlK A bIcgUB Y@HkdjIl @bU Hkظg@b `-A Ag!TgAgTkJ Hkظ.VTdjokoA VH (452Q COMP.STFN 443Q COMP.STFIX 436Q COMP.DELPUSH 372Q COMP.STCONST 362Q COMP.DELPUSH 324Q COMP.DELFIX 312Q COMP.VAL 266Q COMP.EXPR 251Q COMP.STFN 222Q FASSOC 171Q COMP.STFIX 164Q COMP.STCONST 160Q COMP.DELPUSH 154Q COMP.DELPUSH 52Q FASSOC 23Q COMP.PROGN) (353Q FIX 342Q CONST 331Q PLUS 316Q OPTIMIZATIONSOFF 300Q UNBOXED 211Q UNBOXED 125Q CONST 101Q CONST 67Q OPTIMIZATIONSOFF 33Q TYPE 16Q OPTIMIZATIONSOFF 10Q EFFECT) ( 431Q (IQUOTIENT) 420Q (IDIFFERENCE LSH RSH LLSH LRSH)) COMP.FIX D1 (I 0 A) @ (6 COMP.STFIX 3 COMP.VAL1) NIL () COMP.STFIX D1 (I 0 TYPE F 0 CODE) G@gbPgPddPk@ @dgP` @k (104Q COMP.STFN 75Q OPT.CALLP 54Q COMP.STCONST 50Q COMP.DELPUSH) (72Q NUMBERFNS 62Q FIX 15Q CONST 4 FIX) () COMP.DELFIX D1 (I 0 TYPE F 0 CODE) *P@g@ogggk h(45Q COMP.DELFN 37Q OPT.CALLP) (33Q PLUS 27Q FLOAT 22Q FLOAT 5 FIX) ( 16Q (IPLUS FIX)) COMP.EQ D1 (P 0 C I 0 A F 2 CODE F 3 EXP F 4 COMPILE.CONTEXT) Tg@  @@b `Rdg@ 9X@ @ RgSHRlI H RgRlgSl (176Q COMP.STFN 142Q COMP.STCONST 135Q COMP.STCONST 131Q COMP.DELPUSH 100Q COMP.VAL1 73Q COMP.DELPUSH 67Q COMP.NOT 62Q COMP.DELPUSH 51Q COMP.VAL1 27Q COMP.VAL 11Q COMP.PROGN) (166Q EQ 151Q CONST 107Q CONST 42Q CONST 32Q OPTIMIZATIONSOFF 3 EFFECT) () COMP.NUMBERTEST D1 (P 2 A P 1 EXIT P 0 TEST I 2 FLG I 1 FORM I 0 X F 3 LBCNT F 4 COMPILE.CONTEXT F 5 CODE) 4o`hA !@ T TdgdgdgHT gUZdgdgdgdgihJg0JHggSkchYh J gT I gHggSkchYh gT I gUZdgdgdgdgihJg$JHggSkchYh J I HggSkchYh I (461Q COMP.STTAG 455Q COMP.STCONST 452Q COMP.STPOP 447Q COMP.EXPR 421Q COMP.STCOPY 415Q COMP.STTAG 411Q COMP.STVAR 405Q COMP.EXPR 275Q COMP.STPOP 272Q COMP.STTAG 266Q COMP.STJUMP 255Q COMP.EXPR 227Q COMP.STCOPY 220Q COMP.STTAG 214Q COMP.STJUMP 203Q COMP.STVAR 177Q COMP.EXPR 62Q COMP.EXPR 27Q COMP.PREDP 23Q COMP.EXPR 14Q SUBPAIR) (430Q TAG 425Q TJUMP 366Q TAG 363Q NFJUMP 351Q SETQ 334Q FVAR 326Q GVAR 320Q HVAR 311Q AVAR 300Q PREDVALUE 260Q JUMP 236Q TAG 233Q FJUMP 223Q PREDVALUE 206Q JUMP 160Q TAG 155Q FJUMP 143Q SETQ 126Q FVAR 120Q GVAR 112Q HVAR 103Q AVAR 66Q NTJUMP 53Q NFJUMP 45Q TJUMP 37Q FJUMP 6 DONOTHING) ( 3 (*)) COMP.MAP D1 (P 16Q NXT P 15Q OUT P 14Q ENDLP P 13Q LP P 12Q LOCALVARS P 11Q SPECVARS P 10Q ALLVARS P 7 VAL P 6 F P 5 BINDVALS P 4 BOUNDVARS P 3 XARG P 2 BYF P 1 DOF P 0 FROMFORM I 5 WHILEF I 4 NEG I 3 PRED I 2 COLLECT I 1 CARFLG I 0 L F 17Q LBCNT F 20Q ALLVARS F 21Q SPECVARS F 22Q LOCALVARS F 23Q FRAME F 24Q LEVEL) @@@oDI AIAIgcgKIAdgdg I koAoo.IHhggXhgKAdgooohJg1 JZg!gKJghhJMgLoEg> Eb g/gKEghhgEohMgLob B!hdddMg_gggL\L M g ^dW W"W$gWkchgWkchgWkchN o H gO kc(Nc&O BCI`hCOh iBdgEgg`h ggIdKghh Bgoao[gJI`hggWkch_h ggg`hh o O I`h J`h O E`h gO C O N gDd O D ggWkch_ O Dh O (1323Q COMP.STTAG 1315Q COMP.VAL 1306Q COMP.STPOP 1302Q COMP.STTAG 1274Q COMP.STJUMP 1247Q COMP.VAL 1241Q COMP.STTAG 1233Q COMP.VAL 1217Q COMP.UNBIND.VARS 1212Q COMP.VAL 1201Q COMP.STJUMP 1170Q COMP.EXPR 1155Q COMP.STTAG 1147Q COMP.EXPR 1134Q COMP.EFFECT 1121Q SHOULDNT 1115Q COMP.STTAG 1107Q COMP.EFFECT 1077Q COMP.EFFECT 1050Q COMP.STCOPY 1044Q COMP.EXPR 755Q COMP.EFFECT 716Q COMP.EFFECT 657Q COMP.EXPR 626Q COMP.STCOPY 622Q COMP.STTAG 604Q COMP.STJUMP 573Q COMP.VAL 566Q COMP.EFFECT 556Q COMP.STBIND 477Q \APPEND2 464Q COMP.BIND.VARS 456Q OPT.DREV 452Q OPT.DREV 310Q COMP.APPLYFNP 220Q COMP.APPLYFNP 76Q NARGS 71Q COMP.CLEANFNP 23Q COMP.APPLYFNP) (1256Q TAG 1253Q JUMP 1223Q TJUMP 1174Q NTJUMP 1162Q DONOTHING 1141Q DONOTHING 1126Q DONOTHING 1065Q DONOTHING 1062Q CAR 1057Q $W 1054Q SETQ 1023Q TAG 1020Q FJUMP 1012Q DONOTHING 1003Q S 762Q J 743Q $X 725Q $W 722Q SETQ 707Q DONOTHING 704Q $X 701Q SETQ 672Q J 643Q DONOTHING 577Q JUMP 536Q TAG 522Q TAG 506Q TAG 461Q MAP 437Q $X 434Q $W 431Q $Z 424Q $V 372Q $F3 353Q OR 337Q $X 332Q LAMBDA 324Q LAMBDA 303Q LISTP 265Q $F2 246Q $X 241Q LAMBDA 233Q LAMBDA 213Q CDR 156Q BOTH 150Q LAMBDA 140Q $L 135Q $F1 66Q NARGS 56Q BOTH 47Q LAMBDA 41Q LAMBDA) ( 1104Q (.DOCOLLECT. $V $Z $W) 776Q (.DOCOLLECT. $V $Z $W) 770Q (.DOJOIN. $V $Z $W) 563Q (DECLARE (LOCALVARS $F1 $F2 $X $V $Z $W $F3)) 401Q (LAMBDA ($X) (APPLY* $F3 $X)) 360Q (QUOTE LISTP) 274Q (LAMBDA ($X) (COND ((NULL $F2) (CDR $X)) (T (APPLY* $F2 $X)))) 200Q (APPLY* $F1 (CAR $X)) 173Q (APPLY* $F1 $X) 165Q (APPLY* $F1 (CAR $X) $X) 121Q ($X) 114Q ((CAR $X)) 105Q ((CAR $X) $X) 14Q ($X)) COMP.MLLISTA0001 D1 (NAME ERRORSET L (2 ERRORSET.W 1 ERRORSET.V 0 ERRORSET.U) F 0 RESETVARSLST F 1 CC F 2 FN F 3 RESETY) cgl hhPcglH hhPcR Qhooog l Qo  Q ci(135Q COMP.MLL 125Q PRINT 121Q FASSOC 107Q SPACES 101Q MAPRINT 47Q PRIN2 31Q LINELENGTH 7 RADIX) (75Q COMP.MLLVAR 24Q LINELENGTH 2 RADIX) ( 116Q ((0 . LAMBDA) (2 . LAMBDA*) (1 . NLAMBDA) (2 . NLAMBDA*) (NIL . ???)) 72Q " " 66Q ")" 62Q "(") COMP.MLLIST D1 (P 2 RESETZ P 1 RESETY P 0 LISPXHIST I 1 CC I 0 FN F 3 LISPXHIST F 4 RESETVARSLST) "S!Tog hgZ JI(35Q ERROR! 30Q RESETRESTORE 16Q COMP.MLLISTA0001) (24Q ERROR 13Q INTERNAL) ( 10Q (DUMMY.FOR.ERRORSET)) COMP.MLL D1 (P 6 V P 5 N P 4 NN P 3 F P 2 P P 1 S P 0 X I 0 LL) ;@+dHdgjH g glJlJٌJl<lk Id IdgH dgH dgH dgH dgH sdgSH!K\K*dMdLojgg MkٽN Mjo gHH HHh II (470Q TERPRI 465Q TERPRI 447Q PRIN1 434Q PRIN1 421Q PRIN1 377Q PRIN1 357Q COMP.MLLVAR 346Q PRIN1 251Q PRIN2 227Q COMP.MLLVAR 210Q COMP.MLLFN 172Q COMP.MLLVAR 154Q PRIN2 134Q PRIN1 123Q SPACES 113Q TERPRI 66Q POSITION 52Q PRIN1 43Q PRIN2 34Q TERPRI 26Q POSITION) (406Q UNBIND 343Q , 337Q ; 257Q BIND 236Q JUMP 217Q VREF 201Q FN 163Q VAR 144Q CONST 62Q MLSYM 47Q : 17Q TAG) ( 374Q ";" 330Q "") COMP.MLLVAR D1 (I 1 N I 0 X) &@b@dgo A gg(30Q PRIN2 23Q PRIN1) (42Q XVAR 34Q XVAR 11Q HVAR) ( 20Q "@") COMP.MLLFN D1 (I 1 FN I 0 X) -@b @bAlA jA @ k @ (52Q PRIN2 46Q SPACES 36Q NARGS 27Q ARGTYPE 7 PRIN2) NIL () OPT.RESOLVEJUMPS D1 (P 2 NEW P 1 Z P 0 CU I 2 FN I 1 PROP I 0 JL) Sj1@4d[KKdAKIHKIIXH@A Zd@B hb(113Q OPT.JFIXPASS 100Q OPT.JLENPASS) NIL () OPT.JLENPASS D1 (P 13Q J P 12Q SMAX P 11Q SMIN P 10Q ML P 7 MIN P 6 DEF P 5 U1 P 4 U P 3 X P 2 CU P 1 DEC P 0 INC I 1 PROP I 0 JL) jdd @d_OOHKJOٹOJO\jK`^O_KNJNOOH_I؁OA _KOA _O_OOHOOظOO]LjMo IMLعOMJMZDIjJj@i(255Q OPT.COMPILERERROR 175Q OPT.JSIZE 163Q OPT.JSIZE) (103Q LBA) ( 252Q (U1 negative)) OPT.JFIXPASS D1 (P 1 J P 0 X I 1 FN I 0 JL) 2 @(dYXIjIH`IlAhNIL (33Q LBA) () OPT.JSIZE D1 (L (2 FN 1 D 0 OP)) @BHHAHHHXNIL NIL () OPT.CALLP D1 (L (2 N 1 FN 0 OP)) (@g B@BAh@A A@ANIL (4 FN) () OPT.JUMPCHECK D1 (L (0 C)) @dgdgiNIL (14Q RETURN 6 JUMP) () OPT.DREV D1 (L (1 Z 0 L)) @XAbHdAbNIL NIL () OPT.CHLEV D1 (L (0 N) F 0 LEVEL) Pd@cNIL NIL () OPT.CHECKTAG D1 (L (1 TAGFLAG 0 TAG) F 0 LEVEL) P@dh@AhciNIL NIL () OPT.NOTJUMP D1 (L (0 X)) @dggggd@NIL (25Q FJUMP 17Q TJUMP 13Q TJUMP 5 FJUMP) () OPT.INITHASH D1 (I 0 X) @- @- @- @ld (34Q SET 31Q HASHARRAY 22Q CLRHASH 14Q HARRAYP 4 HARRAYP) NIL () OPT.COMPINIT D1 (P 0 X) "odHHh gh(22Q SET) (37Q DONOTHING 32Q AC) ( 3 ((OPRETURN . RETURN) (OPPOP . POP) (OPCOPY . COPY) (OPNIL . CONST))) OPT.CFRPTQ D1 (P 1 ST P 0 END I 0 L F 2 LBCNT F 3 COMPILE.CONTEXT) jSg[gRkchgRkch@ I j gl gH @g k gl gI H hg@ (147Q COMP.EXP1 135Q COMP.STTAG 131Q COMP.STJUMP 122Q COMP.STFN 112Q COMP.VAL 106Q COMP.VALN 76Q COMP.STJUMP 67Q COMP.STFN 57Q COMP.VAL 53Q COMP.STCOPY 50Q COMP.STTAG 44Q COMP.VAL) (142Q RPTQ 125Q JUMP 115Q IDIFFERENCE 103Q EFFECT 72Q FJUMP 62Q IGREATERP 24Q TAG 11Q TAG 3 EFFECT) () COMP.AREF D1 (P 0 DECL I 0 A F 1 COMPILE.CONTEXT) [@dl+Hddh @ g@Q @d @ dlglgg@ h(127Q COMP.STFN 124Q LENGTH 73Q LENGTH 62Q COMP.VAL 52Q COMP.EXPR 37Q LENGTH 32Q LENGTH) (120Q ASET 114Q \ASET.2 104Q \ASET.1 44Q \16AREF) () COMP.ASET D1 (P 0 DECL I 0 A F 1 COMPILE.CONTEXT F 2 ALLDECLS) @dlk R XgPHddh @ Ho g@Q Hdgdgihg@Q @d @ dlglgg@ h(230Q COMP.STFN 225Q LENGTH 174Q LENGTH 163Q COMP.VAL 153Q HELP 147Q COMP.EXPR 110Q COMP.EXPR 76Q EQUAL 63Q LENGTH 54Q LENGTH 25Q FASSOC 21Q COMP.LOOKUPVAR) (221Q ASET 215Q \ASET.2 205Q \ASET.1 141Q \LASET 126Q FLONUM 120Q FLOATP 102Q \16ASET 33Q ARRAY) ( 73Q (BYTE 20Q)) COMP.BOX D1 (P 0 BOXER I 0 TYPE F 1 CODE) -@l@gHQHk @ Hk h(51Q COMP.STFN 42Q COMP.STFIX 35Q COMP.DELFN 31Q OPT.CALLP) (12Q BOX) () COMP.LOOKFORDECLARE D1 (P 3 Z P 2 DECLS P 1 Y I 0 EXPS F 4 COMMENTFLG) F@dTg @1H JbYgId[I JHX(67Q COMP.DECLARETYPE) (50Q TYPE 16Q DECLARE) () COMP.DECLARETYPE D1 (L (0 X)) &@g@g@dgo @g@NIL (37Q ARRAY 20Q FLOAT 11Q FLOATP 3 FLOATING) ( 26Q (UNBOXED . FLOAT)) COMP.FLOATBOX D1 (F 0 CODE) Pgk gk (24Q COMP.STFN 14Q COMP.DELFN 10Q OPT.CALLP) (20Q \FLOATBOX 4 \FLOATUNBOX) () COMP.FLOATUNBOX D1 (F 0 CODE) g Pgk gk (32Q COMP.STFN 22Q COMP.DELFN 16Q OPT.CALLP 5 COMP.DELFIX) (26Q \FLOATUNBOX 12Q \FLOATBOX 2 FLOAT) () COMP.PREDP D1 (L (0 CTX)) @ @oNIL NIL ( 11Q (TJUMP FJUMP NTJUMP NFJUMP)) COMP.UBFLOAT2 D1 (P 0 N I 1 OP I 0 A F 1 COMPILE.CONTEXT) JjQg`@ @b Hkظ@HkdjggAhk h(106Q COMP.FLOATBOX 100Q COMP.STFN 41Q COMP.FLOATUNBOX 35Q COMP.VAL 23Q COMP.PROGN) (67Q UBFLOAT2 64Q OPCODES 15Q OPTIMIZATIONSOFF 7 EFFECT) () COMP.UNBOX D1 (P 0 BOXER I 0 TYPE F 1 CODE) -@l@gHQHk @ Hk h(51Q COMP.STFN 42Q COMP.DELFIX 35Q COMP.DELFN 31Q OPT.CALLP) (12Q BOX) () OPT.POSTOPT D1 (P 7 DELETEDBINDS P 6 ANY P 5 LABELS P 4 PASS P 3 FRAMES P 2 FRAME I 0 CODE F 10Q TAGS F 11Q TOPFRAME) `K @Bhc@@bXdgWgHW@@bXWdIHIIWdhhk3h@hh bhLk iN&`ihi `id` @ Lk\(244Q OPT.DREV 236Q OPT.FRAMEOPT 220Q OPT.FRAMEOPT 211Q OPT.XVARSCAN 176Q OPT.RETOPT 172Q OPT.JUMPOPT 166Q OPT.SCANOPT 160Q OPT.FRAMEOPT 147Q OPT.SETUPOPT 140Q \NCONC2) (233Q XVARFLG 225Q MERGEFRAMEFLG 205Q XVARFLG 46Q JUMP 33Q TAG 2 OPTIMIZATIONSOFF) () OPT.SETUPOPT D1 (P 2 B P 1 P P 0 C F 3 LABELS F 4 FRAMES F 5 CODE) U!HddgHS ZHHhScPHKdg#dgdgdgdgdg#HS ZHhHhScHh Hdgdg HT HHhTc5H0dgdg#HT ZHhHhTcHh HHJHI` HJX(341Q PUTHASH 321Q \NCONC2 271Q FASSOC 216Q FASSOC 164Q \NCONC2 134Q FASSOC 27Q FASSOC) (336Q PRA 255Q DUNBIND 247Q UNBIND 202Q BIND 174Q ERRORSET 120Q ERRORSET 112Q NFJUMP 104Q NTJUMP 75Q FJUMP 66Q TJUMP 57Q JUMP 15Q TAG) () OPT.SCANOPT D1 (P 7 X P 5 Y P 4 X P 3 P P 2 B P 1 A P 0 CD F 10Q CODE F 11Q CONSTFNS F 12Q ANY F 13Q COMPILE.DUNBIND.POP.MERGE.FLG F 14Q FRAMES) WaHHYdgKhk ,K\WL`L`HgIkLK I` YaIdKOYO hCH K IdOOJ Zdgdgdgdg/`JgzJH pH J KXQdgIK H 0dgJdg"dgdgdgdgdgJ H Kdg6Jg YJJ H K^j`J Nkٰg,Jo J H Kdg$WJd` HHkkgJdgIgIIk#gJdkg iHJJIHIW  JJX`[icHJX`\HJ \,KL H`LHH Ho`L KXJkHi \,HL \$KL `L HoJH H`JhJd`H H Jd e(1307Q OPT.PRDEL 1277Q OPT.PRDEL 1271Q OPT.EQVALUE 1237Q OPT.EQVALUE 1221Q OPT.PRATTACH 1211Q OPT.DELCOPYFN 1201Q OPT.JUMPCOPYTEST 1171Q OPT.SKIPPUSH 1154Q OPT.PRATTACH 1135Q OPT.PRDEL 1115Q OPT.DELCOPYFN 1105Q OPT.JUMPCOPYTEST 1042Q MEMB 1035Q FASSOC 1002Q COMP.CLEANFNOP 666Q OPT.PRDEL 625Q OPT.PRDEL 620Q OPT.PRDEL 607Q EQUAL 557Q OPT.PRATTACH 535Q OPT.PRDEL 530Q OPT.PRDEL 514Q COMP.CLEANFNOP 465Q OPT.PRDEL 460Q OPT.PRDEL 364Q OPT.PRDEL 354Q OPT.DEADSETQP 327Q OPT.PRDEL 322Q OPT.PRDEL 312Q OPT.EQVALUE 216Q OPT.PRATTACH 172Q OPT.PRDEL 165Q OPT.PRDEL 150Q OPT.CALLP 120Q FASSOC 105Q OPT.PRDEL 34Q OPT.CALLP) (1261Q OPPOP 1244Q OPCOPY 1215Q OPCOPY 1150Q OPCOPY 1122Q PRA 1076Q NEWOPTFLG 1052Q PRA 777Q FREEVARS 751Q FN 732Q DUNBIND 722Q CONST 706Q UNBIND 656Q OPPOP 636Q DUNBIND 570Q SETQ 553Q OPPOP 511Q NOSIDE 476Q FN 451Q CONST 443Q COPY 435Q GVAR 426Q FVAR 417Q HVAR 410Q AVAR 373Q POP 342Q SETQ 277Q POP 265Q NEWOPTFLG 256Q FVAR 250Q GVAR 242Q AVAR 233Q HVAR 115Q CONST.FNS 70Q CONST 61Q CONDITIONALS 53Q VCONDITIONALS 17Q CONST) ( 1227Q (SWAP) 1143Q (SWAP) 604Q (COPY)) OPT.XVARSCAN D1 (P 2 X P 1 A P 0 CD F 3 CODE F 4 FRAMES) }ST"dJgJ hhHYdgIH :dgIYg)IH !dgdgHj IiHXd(147Q OPT.CODELEV 122Q OPT.XVARSCAN1 71Q OPT.XVARSCAN1 37Q FASSOC) (136Q DUNBIND 130Q UNBIND 112Q HVAR 77Q SETQ 61Q HVAR 26Q AVAR) () OPT.XVARSCAN1 D1 (P 0 FR I 1 CD I 0 A F 1 TOPFRAME) <A H@HhHdQH`@HHih(37Q OPT.COMPILERERROR 13Q OPT.COMPILERERROR 3 OPT.CODEFRAME) (44Q FRA) () OPT.JUMPOPT D1 (P 0 X F 1 LABELS F 2 ANY) )Q"dHHH HH ich(33Q OPT.JUMPREV 23Q OPT.JUMPTHRU) NIL () OPT.JUMPTHRU D1 (P 20Q PDN P 17Q N P 16Q B P 15Q PD P 14Q END P 13Q BR P 12Q REF P 11Q Y P 10Q INFO P 7 ANY P 6 ALST P 5 APD P 4 P P 3 LEVEL P 2 FRAME P 1 DEF P 0 DR I 1 OPT.DEFREFS I 0 TAG F 21Q COMFN) Ad@`@I]gI`_]g@M H@ Md`odgotdgogdgoZdgoMdgo@dgo3dgo&dgdgdgdgѿoH_N _OdOW"o HXH_OMNdgO`hdg7dg0dg)dg"dgdgdgdgdgiPdMdgAg :dgBAii'dgdgdgdgdgihAbG(171Q COMP.CLEANFNOP) (254Q ERRORSET 246Q DUNBIND 240Q UNBIND 231Q RETURN 222Q TAG 177Q BIND 166Q FREEVARS 154Q FN 137Q SWAP 131Q STORE 123Q SETQ 114Q NFJUMP 105Q NTJUMP 76Q FJUMP 67Q TJUMP 60Q GVAR 51Q FVAR 42Q HVAR 33Q AVAR 24Q COPY 15Q POP 6 CONST) () OPT.MERGEFRAMEP D1 (I 2 VARS I 1 PARENT I 0 FR F 5 FRAMES F 6 FREEVARS) eA`gB OA@ BAHiU[ V\&HXd@𑿈ZKIJIhL`i(25Q OPT.CLEANFRAME 16Q FASSOC) (140Q MERGEFRAMEFLG 12Q AVAR 4 MERGEFRAMETYPES) () OPT.FRAMELOCAL D1 (P 0 VARS I 0 F) 'g@X @ Hdgi(24Q OPT.CLEANFRAME 16Q FASSOC) (35Q HVAR 5 AVAR) () OPT.CLEANFRAME D1 (P 1 F I 1 AVOIDING I 0 FRAME F 2 FRAMES) 6@h RHiY`@IdAHXA h(60Q OPT.CLEANFRAME) (33Q FRA) () OPT.FRAMEDEL D1 (P 13Q CD P 12Q VR P 6 DOXVAR P 5 TMP P 4 FLV P 3 OP P 2 PARENT P 1 VARS P 0 FRM I 1 TRYXVAR I 0 F F 14Q CODE F 15Q LABELS F 16Q FRAMES) = @ Hd dghHYH\h^@d_gOkhI#gI I@ AHi^H`ZNLHHؼIsd Wed OO-Og#NOgOO 3.O )N'OOOdO ]j`gMhW0d_`H"OJ` OLOOL@ hNhIO`O _Hdj`O kٰHJi@d O[OO _dg5NcKI k]jTgMO _Mdj@`O kٰg*NKHH؂Kdj`O kٰxW/d_`H!OJ` OL OdLi(1040Q PUTHASH 773Q OPT.COMPILERERROR 763Q OPT.PRATTACH 705Q OPT.PRATTACH 664Q OPT.PRATTACH 642Q LENGTH 614Q OPT.PRDEL 534Q OPT.PRATTACH 503Q OPT.PRDEL 417Q PUTHASH 332Q OPT.CODELEV 327Q LENGTH 277Q OPT.PRDEL 270Q OPT.COMPILERERROR 263Q OPT.CODELEV 260Q LENGTH 153Q OPT.COMPILERERROR 116Q OPT.DELETEFRAMECHECK 107Q FASSOC) (1035Q FRA 1021Q FRA 756Q OPPOP 715Q DUNBIND 700Q OPPOP 655Q STORE 624Q UNBIND 526Q OPNIL 475Q PRA 414Q FRA 400Q FRA 345Q COPY 341Q OPCOPY 250Q STORE 235Q SETQ 145Q FRA 103Q AVAR 54Q UNBIND 15Q ERRORSET) () OPT.FRAMEVAR D1 (P 17Q CD P 13Q V P 12Q I P 6 NVALS P 5 NNILS P 4 ANY P 3 VAL P 2 CD P 1 VARS P 0 FR I 0 F F 20Q CODE) Z@qHdL YH]H^jIM O_OOOLH0IgOW ZIOjk_`@ NkپMkٽW OOOdg O_W d_gOOihROjMkٽ`.@[g!Kk`k_Nkپ@@ [JKOJZOhiO_Ok_ dd_O Oh_O&_O HMHNL(506Q OPT.DREV 373Q OPT.PRDEL 232Q OPT.PRDEL 157Q OPT.PRATTACH 21Q REVERSE) (343Q EQCONSTFN 332Q CONST 316Q OPNIL 256Q SETQ 225Q SETQ 150Q OPPOP 115Q AVAR) () OPT.DELETEFRAMECHECK D1 (P 0 CD I 1 F I 0 VARS F 1 CODE) .@Q HdAhQ H@bH`@i(30Q OPT.ONLYMEMB 5 OPT.ONLYMEMB) (45Q PRA) () OPT.ONLYMEMB D1 (L (1 Y 0 X)) @Ab @AhANIL NIL () OPT.SKIPPUSH D1 (I 3 LEVOPFLG I 2 VL I 1 N I 0 CD) ZAkbjAhAj@@dgdgdgdgdg@Akbbdg@h@AkbbdglAh@bdg@Akbbydgdgdgdg#`fCh]@Akbb>dgd@g D`2Bdgdgi"dgdgdg@g h@A@kbbg`Bd@@ABC (527Q OPT.SKIPPUSH 421Q COMP.CLEANFNOP 326Q COMP.CLEANFNOP) (472Q NEWOPTFLG 460Q SETQ 416Q FREEVARS 404Q GVAR 376Q AVAR 370Q FVAR 356Q HVAR 350Q CONST 333Q NEWOPTFLG 323Q NOSIDE 310Q FN 247Q NEWOPTFLG 240Q NTJUMP 232Q NFJUMP 224Q TJUMP 215Q FJUMP 170Q POP 142Q SWAP 106Q COPY 62Q CONST 54Q GVAR 46Q FVAR 37Q HVAR 30Q AVAR) () OPT.DELCODE D1 (P 3 LB P 1 FLG P 0 X I 0 CD F 4 FRAMES F 5 LABELS F 6 ANY)  @XIdgdgdg7HT hUJp[d`H𧿉d JZdgdg@HT 7dg"dgdgdgdgdg@H iYic @`@ bP(260Q OPT.PRDEL 237Q DREMOVE 234Q OPT.DEFREFS 153Q DREMOVE 150Q FASSOC 111Q OPT.PRDEL 46Q FASSOC) (253Q PRA 222Q ERRORSET 214Q NTJUMP 206Q NFJUMP 177Q TJUMP 170Q FJUMP 161Q JUMP 135Q DUNBIND 127Q UNBIND 74Q FRA 33Q ERRORSET 25Q BIND 16Q TAG) () OPT.PRATTACH D1 (L (1 BEFORE 0 ITEM)) )A`hhIH` IAI@AI` HHII(40Q PUTHASH 22Q PUTHASH) (35Q PRA 17Q PRA 3 PRA) () OPT.JUMPCOPYTEST D1 (I 1 CDFROM I 0 VL) 7A@ AA @gAg AAk@i bհ(57Q OPT.SKIPPUSH 40Q COMP.CLEANFNP 14Q OPT.CALLP 4 OPT.EQVALUE) (35Q FREEVARS 24Q HVAR) () OPT.EQOP D1 (I 1 OP2 I 0 OP1) @A@A@dgdgdgdgdg@Adgdgdgidg@A dg8dg1dg*dg#dgdgdgdgdg@A@Ag @A (271Q OPT.EQOP 134Q EQUAL) (257Q SETQ 227Q DUNBIND 221Q UNBIND 213Q ERRORSET 204Q BIND 175Q NFJUMP 166Q FJUMP 157Q NTJUMP 150Q TJUMP 141Q JUMP 124Q FN 114Q SWAP 106Q RETURN 100Q POP 63Q STORE 55Q COPY 47Q CONST 40Q GVAR 31Q FVAR) () OPT.EQVALUE D1 (I 1 V I 0 CD) @dg@@bhdg@A@bdgdgdgdgdg@Adg#dgdgdgdgdg𴝿@kA bͱz(201Q OPT.SKIPPUSH) (166Q SWAP 160Q NTJUMP 152Q NFJUMP 143Q TJUMP 134Q FJUMP 125Q POP 110Q CONST 102Q GVAR 74Q FVAR 65Q AVAR 56Q HVAR 31Q SETQ 6 COPY) () OPT.DELCOPYFN D1 (P 0 Z I 1 X I 0 P) @hk @A` z@g n@HHdAi]@@ `bA`bdgHg 'dgdgdgdgdgihhHXA(137Q COMP.CLEANFNOP 72Q OPT.PRDEL 41Q COMP.CLEANFNOP 25Q OPT.EQOP 6 OPT.CALLP) (177Q SETQ 171Q GVAR 163Q HVAR 154Q AVAR 145Q FVAR 134Q NOSIDE 122Q FN 106Q PRA 76Q PRA 36Q NOSIDE 20Q PRA) () OPT.DEADSETQP D1 (P 1 TAGS P 0 ICNT I 1 CD I 0 VAR) @dgdg l2@A (31Q OPT.DS1) (13Q HVAR 5 AVAR) () OPT.DS1 D1 (P 0 A I 1 CD I 0 VAR F 1 TAGS F 2 ICNT) AXdgH@idg@gHg hdgdg@H}idgA ddgy`idgH bd}dgdgdgdgdg@H  hg HdQQcA`bRdjhH@hkc(326Q OPT.COMPILERERROR 266Q OPT.DS1 262Q OPT.DEFREFS 201Q OPT.DEFREFS 137Q OPT.CODEFRAME 62Q COMP.CLEANFNOP) (317Q PRA 275Q TAG 250Q ERRORSET 242Q NFJUMP 234Q NTJUMP 225Q FJUMP 216Q TJUMP 170Q JUMP 157Q FRA 151Q ERRORSET 126Q RETURN 102Q DUNBIND 74Q UNBIND 57Q FREEVARS 44Q AVAR 33Q FN 12Q SETQ) () OPT.COMPILERERROR D1 (I 1 MESS2 I 0 MESS1) oi @A (14Q HELP 7 LISPXPRIN1) NIL ( 3 "Compiler error ") OPT.OPTCHECK D1 (P 5 Y P 4 Y P 3 X P 2 B P 1 P P 0 CD F 6 FRAMES F 7 CODE F 10Q LABELS F 11Q TOPFRAME) W!HWndKcKdW$o KdLW Lo KdKo KdMK Ko 怿VgdKdW@UgK JdLW oLKh LKoLKh K`V oK idg9HW ZJHHd``V dgdgHV HhbdgdgHdV GAdgdgdgdgdg HW ZHdJ o HHJHd`IHJX>(702Q OPT.COMPILERERROR 654Q OPT.COMPILERERROR 644Q MEMB 635Q OPT.COMPILERERROR 630Q FASSOC 553Q OPT.COMPILERERROR 543Q FASSOC 512Q OPT.COMPILERERROR 501Q FASSOC 450Q OPT.COMPILERERROR 441Q FASSOC 414Q OPT.COMPILERERROR 402Q OPT.COMPILERERROR 374Q FASSOC 343Q OPT.COMPILERERROR 332Q FASSOC 312Q OPT.COMPILERERROR 264Q OPT.COMPILERERROR 246Q TAILP 231Q OPT.COMPILERERROR 161Q OPT.COMPILERERROR 126Q OPT.COMPILERERROR 100Q OPT.COMPILERERROR 67Q TAILP 50Q OPT.COMPILERERROR) (672Q PRA 613Q NFJUMP 605Q NTJUMP 577Q FJUMP 570Q TJUMP 561Q JUMP 526Q DUNBIND 520Q UNBIND 465Q ERRORSET 457Q BIND 434Q FRA 423Q FRA 361Q TAG 325Q FRA 224Q TOPFRAME) ( 651Q (NOT IN JUMP LIST) 337Q (PARENT NOT FRAME) 301Q (WRONG FRAME) 253Q (NOT IN CODE) 156Q (TAG wrong) 123Q (TAG wrong) 75Q (NOT CODE TAIL) 45Q (not in code)) OPT.CCHECK D1 (I 0 X) @(5 OPT.COMPILERERROR) NIL () (PRETTYCOMPRINT BYTECOMPILERCOMS) (RPAQQ BYTECOMPILERCOMS ((* THE BYTE LISP COMPILER) (COMS (FNS BYTEBLOCKCOMPILE2 BYTECOMPILE2 COMP.ATTEMPT.COMPILE COMP.RETFROM.POINT COMPERROR COMPPRINT COMPERRM) (FNS COMP.TOPLEVEL.COMPILE COMP.BINDLIST COMP.CHECK.VAR COMP.BIND.VARS COMP.UNBIND.VARS) (FNS COMP.VALN COMP.PROGN COMP.EXP1 COMP.EXPR COMP.TRYUSERFN COMP.USERFN COMP.CONST COMP.CALL COMP.VAR COMP.VAL1 COMP.PROG1 COMP.EFFECT COMP.VAL COMP.MACRO) (FNS COMP.VARTYPE COMP.LOOKUPVAR COMP.LOOKUPCONST) (FNS COMP.ST COMP.STFN COMP.STCONST COMP.STVAR COMP.STPOP COMP.DELFN COMP.STRETURN COMP.STTAG COMP.STJUMP COMP.STSETQ COMP.STCOPY COMP.DELPUSH COMP.DELPOP COMP.STBIND COMP.STUNBIND) (FNS COMP.ARGTYPE COMP.CLEANEXPP COMP.CLEANFNP COMP.CLEANFNOP COMP.GLOBALVARP COMP.LINKCALLP COMP.ANONP) (FNS COMP.CPI COMP.CPI1 COMP.PICOUNT) (PROP BYTEMACRO EVQ) (FNS COMP.EVQ) (PROP BYTEMACRO AND OR) (FNS COMP.BOOL) (FNS COMP.APPLYFNP) (PROP BYTEMACRO AC ASSEMBLE ASSEM FLOC) (FNS COMP.AC COMP.PUNT) (PROP BYTEMACRO FUNCTION) (FNS COMP.FUNCTION COMP.LAM1 COMP.GENFN) (INITVARS (COMP.GENFN.NUM 0) (COMP.GENFN.BUF ( ALLOCSTRING 100))) (GLOBALVARS COMP.GENFN.NUM COMP.GENFN.BUF) (PROP BYTEMACRO COND SELECTQ) (FNS COMP.COND COMP.SELECTQ) (PROP BYTEMACRO PROGN PROG1) (PROP BYTEMACRO QUOTE *) (FNS COMP.QUOTE COMP.COMMENT) (PROP BYTEMACRO DECLARE) (FNS COMP.DECLARE COMP.DECLARE1) (PROP (BYTEMACRO CROPS) * MCROPS) (FNS COMP.CARCDR COMP.STCROP) (PROP BYTEMACRO NOT NULL) (FNS COMP.NOT) (PROP BYTEMACRO SETQ SETN) (FNS COMP.SETQ COMP.SETN) (FNS COMP.LAMBDA) (PROP BYTEMACRO PROG GO RETURN) (FNS COMP.PROG COMP.GO COMP.RETURN) (VARS NUMBERFNS (GLOBALVARFLG T) (NEWOPTFLG) (COMPVERSION (DATE))) (PROP BYTEMACRO IPLUS ITIMES LOGOR LOGXOR LOGAND IDIFFERENCE IQUOTIENT IREMAINDER IMINUS LSH LLSH RSH LRSH FIX PLUS DIFFERENCE TIMES QUOTIENT FPLUS FDIFFERENCE FTIMES FQUOTIENT) (FNS COMP.NUMERIC COMP.NUMBERCALL COMP.FIX COMP.STFIX COMP.DELFIX) (PROP BYTEMACRO EQ EQUAL EQP) (FNS COMP.EQ) (PROP BYTEMACRO .TEST.) (FNS COMP.NUMBERTEST) (PROP BYTEMACRO * MAPFNS) (PROP BYTEMACRO .DOCOLLECT. .DOJOIN. ) (FNS COMP.MAP) (PROP BYTEMACRO LISPXWATCH) (PROP BYTEMACRO FETCHFIELD REPLACEFIELD FFETCHFIELD FREPLACEFIELD REPLACEFIELDVAL FREPLACEFIELDVAL) (PROP BYTEMACRO GETPROP) (PROP BYTEMACRO BLKAPPLY BLKAPPLY*) (PROP BYTEMACRO ADD1VAR SUB1VAR KWOTE FRPLNODE RPLNODE LISTGET1 FRPLNODE2) (PROP BYTEMACRO JSYS) (PROP BYTEMACRO EQMEMB MKLIST) (COMS (* Pass 1 listing) (FNS COMP.MLLIST COMP.MLL COMP.MLLVAR COMP.MLLFN) (VARS COPS) (IFPROP MLSYM * (PROGN COPS))) (COMS (* ARJ - JUMP LENGTH RESOLVER) (FNS OPT.RESOLVEJUMPS OPT.JLENPASS OPT.JFIXPASS OPT.JSIZE)) (COMS (* utilities used by all files) (FNS OPT.CALLP OPT.JUMPCHECK OPT.DREV OPT.CHLEV OPT.CHECKTAG OPT.NOTJUMP OPT.INITHASH OPT.COMPINIT)) (P ( MOVD? (QUOTE NILL) (QUOTE REFRAME)) (AND (GETD (QUOTE OPT.COMPINIT)) (OPT.COMPINIT))) (PROP BYTEMACRO LOADTIMECONSTANT) (PROP BYTEMACRO FRPTQ) (FNS OPT.CFRPTQ) (DECLARE: EVAL@COMPILE DONTCOPY (SPECVARS AC ALAMS1 ALLVARS ARGS ARGVARS BLKDEFS BLKFLG CODE COMFN COMFNS COMTYPE CONSTS EMFLAG EXP FRAME FREELST FREEVARS LAPFLG LBCNT LEVEL LOCALVARS LOCALVARS LSTFIL MACEXP NLAMS1 PIFN COMPILE.CONTEXT PROGCONTEXT RETURNLABEL SPECVARS SPECVARS SUBFNFREEVARS TAGS TOPFN TOPFRAME TOPLAB VARS INTERNALBLKFNS) (SPECVARS PLVLFILEFLG)) (PROP BYTEMACRO IMAX2 IMIN2) (PROP BOGUSMACRO AREF ASET) (PROP BOX FLOAT) (FNS COMP.AREF COMP.ASET COMP.BOX COMP.LOOKFORDECLARE COMP.DECLARETYPE COMP.FLOATBOX COMP.FLOATUNBOX COMP.PREDP COMP.UBFLOAT2 COMP.UNBOX)) (ADDVARS (COMPILETYPELST)) (COMS (* POST OPTIMIZATION) (FNS OPT.POSTOPT OPT.SETUPOPT OPT.SCANOPT OPT.XVARSCAN OPT.XVARSCAN1 OPT.JUMPOPT OPT.JUMPTHRU OPT.LBMERGE OPT.PRDEL OPT.UBDEL OPT.LBDEL OPT.LABELNTHPR OPT.JUMPREV OPT.COMMONBACK OPT.DELTAGREF OPT.FINDEND OPT.RETOPT OPT.RETFIND OPT.RETPOP OPT.RETOPT1 OPT.RETTEST OPT.RETMERGE OPT.CODELEV OPT.CODEFRAME OPT.DEFREFS OPT.SETDEFREFS) (FNS OPT.FRAMEOPT OPT.FRAMEMERGE OPT.NONILVAR OPT.MERGEFRAMEP OPT.FRAMELOCAL OPT.CLEANFRAME OPT.FRAMEDEL OPT.FRAMEVAR OPT.DELETEFRAMECHECK OPT.ONLYMEMB) (VARS MERGEFRAMETYPES ( OPTIMIZATIONSOFF)) (FNS OPT.SKIPPUSH OPT.DELCODE OPT.PRATTACH OPT.JUMPCOPYTEST OPT.EQOP OPT.EQVALUE OPT.DELCOPYFN) (FNS OPT.DEADSETQP OPT.DS1) (DECLARE: EVAL@COMPILE DONTCOPY (SPECVARS CODE LEVEL) ( SPECVARS LABELS PASS ANY CODE FRAME FRAMES) (GLOBALVARS MERGEFRAMEMAX MERGEFRAMEFLG MERGEFRAMETYPES) ( SPECVARS VARS ANY FRAME) (SPECVARS ICNT TAG) (SPECVARS FRAME LEVEL ANY) (SPECVARS FRAME LEVEL ANY) ( SPECVARS TAGS ANY))) (COMS (* CONSISTENCY CHECKS) (DECLARE: EVAL@COMPILE DONTCOPY (MACROS OPT.CCHECK) (VARS (COMPILECOMPILERCHECKS NIL))) (FNS OPT.COMPILERERROR OPT.OPTCHECK OPT.CCHECK)) (GLOBALVARS ALAMS BLKLIBRARY BYTE.EXT BYTEASSEMFN BYTECOMPFLG COMPILERMACROPROPS CIA CLEANFNLIST COMP.SCRATCH COMPILETYPELST COMPILEUSERFN COMPSTATLST COMPSTATS CONDITIONALS CONST.FNS CONSTOPS DONOTHING FILERDTBL FNA FORSHALLOW FRA GLOBALVARS HEADERBYTES HOKEYDEFPROP LAMBDANOBIND LAMS LBA LEVELARRAY LINKEDFNS LINKFNS LOADTIMECONSTANT MAXBNILS MAXBVALS MCONSTOPS MERGEFRAMEFLG MERGEFRAMEMAX MERGEFRAMETYPES MOPARRAY MOPCODES NLAMA NLAML NODARR NOLINKFNS NOSTATSFLG NUMBERFNS OPCOPY OPNIL OPPOP OPRETURN PRA SELECTQFMEMB SELECTVARTYPES STATAR STATMAX STATN SYSSPECVARS UNIQUE#ARRAY VCA VCONDITIONALS VREFFRA COUTFILE XVARFLG MERGEFRAMEFLG OPTIMIZATIONSOFF NOFREEVARSFNS EQCONSTFN NEWOPTFLG) (DECLARE: DONTCOPY (* for compiling compiler) EVAL@COMPILE (RECORDS CODELST) (PROP MACRO OASSOC) (RECORDS OP JUMP TAG VAR ) (RECORDS FRAME COMINFO COMP JD)) (DECLARE: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS ( ADDVARS (NLAMA) (NLAML OPT.INITHASH) (LAMA))))) (PUTPROPS EVQ BYTEMACRO COMP.EVQ) (PUTPROPS AND BYTEMACRO (APPLY* COMP.BOOL T)) (PUTPROPS OR BYTEMACRO (APPLY* COMP.BOOL NIL)) (PUTPROPS AC BYTEMACRO COMP.AC) (PUTPROPS ASSEMBLE BYTEMACRO COMP.PUNT) (PUTPROPS ASSEM BYTEMACRO COMP.PUNT) (PUTPROPS FLOC BYTEMACRO COMP.PUNT) (PUTPROPS FUNCTION BYTEMACRO COMP.FUNCTION) (RPAQ? COMP.GENFN.NUM 0) (RPAQ? COMP.GENFN.BUF (ALLOCSTRING 100)) (PUTPROPS COND BYTEMACRO COMP.COND) (PUTPROPS SELECTQ BYTEMACRO COMP.SELECTQ) (PUTPROPS PROGN BYTEMACRO COMP.PROGN) (PUTPROPS PROG1 BYTEMACRO COMP.PROG1) (PUTPROPS QUOTE BYTEMACRO COMP.QUOTE) (PUTPROPS * BYTEMACRO COMP.COMMENT) (PUTPROPS DECLARE BYTEMACRO COMP.DECLARE) (RPAQQ MCROPS (CAR CDR CAAR CDAR CADR CDDR CAAAR CDAAR CADAR CDDAR CAADR CDADR CADDR CDDDR CAAAAR CDAAAR CADAAR CDDAAR CAADAR CDADAR CADDAR CDDDAR CAAADR CDAADR CADADR CDDADR CAADDR CDADDR CADDDR CDDDDR)) (PUTPROPS CAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDR BYTEMACRO COMP.CARCDR) (PUTPROPS CAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDAR BYTEMACRO COMP.CARCDR) (PUTPROPS CADR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDR BYTEMACRO COMP.CARCDR) (PUTPROPS CAAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CADAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDAR BYTEMACRO COMP.CARCDR) (PUTPROPS CAADR BYTEMACRO COMP.CARCDR) (PUTPROPS CDADR BYTEMACRO COMP.CARCDR) (PUTPROPS CADDR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDDR BYTEMACRO COMP.CARCDR) (PUTPROPS CAAAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDAAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CADAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDAAR BYTEMACRO COMP.CARCDR) (PUTPROPS CAADAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDADAR BYTEMACRO COMP.CARCDR) (PUTPROPS CADDAR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDDAR BYTEMACRO COMP.CARCDR) (PUTPROPS CAAADR BYTEMACRO COMP.CARCDR) (PUTPROPS CDAADR BYTEMACRO COMP.CARCDR) (PUTPROPS CADADR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDADR BYTEMACRO COMP.CARCDR) (PUTPROPS CAADDR BYTEMACRO COMP.CARCDR) (PUTPROPS CDADDR BYTEMACRO COMP.CARCDR) (PUTPROPS CADDDR BYTEMACRO COMP.CARCDR) (PUTPROPS CDDDDR BYTEMACRO COMP.CARCDR) (PUTPROPS CAR CROPS (A)) (PUTPROPS CDR CROPS (D)) (PUTPROPS CAAR CROPS (A A)) (PUTPROPS CDAR CROPS (A D)) (PUTPROPS CADR CROPS (D A)) (PUTPROPS CDDR CROPS (D D)) (PUTPROPS CAAAR CROPS (A A A)) (PUTPROPS CDAAR CROPS (A A D)) (PUTPROPS CADAR CROPS (A D A)) (PUTPROPS CDDAR CROPS (A D D)) (PUTPROPS CAADR CROPS (D A A)) (PUTPROPS CDADR CROPS (D A D)) (PUTPROPS CADDR CROPS (D D A)) (PUTPROPS CDDDR CROPS (D D D)) (PUTPROPS CAAAAR CROPS (A A A A)) (PUTPROPS CDAAAR CROPS (A A A D)) (PUTPROPS CADAAR CROPS (A A D A)) (PUTPROPS CDDAAR CROPS (A A D D)) (PUTPROPS CAADAR CROPS (A D A A)) (PUTPROPS CDADAR CROPS (A D A D)) (PUTPROPS CADDAR CROPS (A D D A)) (PUTPROPS CDDDAR CROPS (A D D D)) (PUTPROPS CAAADR CROPS (D A A A)) (PUTPROPS CDAADR CROPS (D A A D)) (PUTPROPS CADADR CROPS (D A D A)) (PUTPROPS CDDADR CROPS (D A D D)) (PUTPROPS CAADDR CROPS (D D A A)) (PUTPROPS CDADDR CROPS (D D A D)) (PUTPROPS CADDDR CROPS (D D D A)) (PUTPROPS CDDDDR CROPS (D D D D)) (PUTPROPS NOT BYTEMACRO COMP.NOT) (PUTPROPS NULL BYTEMACRO COMP.NOT) (PUTPROPS SETQ BYTEMACRO COMP.SETQ) (PUTPROPS SETN BYTEMACRO COMP.SETN) (PUTPROPS PROG BYTEMACRO COMP.PROG) (PUTPROPS GO BYTEMACRO COMP.GO) (PUTPROPS RETURN BYTEMACRO COMP.RETURN) (RPAQQ NUMBERFNS (ITIMES2 LOGOR2 LOGXOR2 LOGAND2 LLSH1 LRSH1 LLSH8 LRSH8 IPLUS ITIMES LOGOR LOGXOR LOGAND IDIFFERENCE IQUOTIENT IREMAINDER IMINUS LSH LLSH RSH LRSH FIX)) (RPAQQ GLOBALVARFLG T) (RPAQQ NEWOPTFLG NIL) (RPAQ COMPVERSION (DATE)) (PUTPROPS IPLUS BYTEMACRO (APPLY* COMP.NUMERIC IPLUS)) (PUTPROPS ITIMES BYTEMACRO (APPLY* COMP.NUMERIC ITIMES FIX 0)) (PUTPROPS LOGOR BYTEMACRO (APPLY* COMP.NUMERIC LOGOR FIX -1)) (PUTPROPS LOGXOR BYTEMACRO (APPLY* COMP.NUMERIC LOGXOR)) (PUTPROPS LOGAND BYTEMACRO (APPLY* COMP.NUMERIC LOGAND FIX 0)) (PUTPROPS IDIFFERENCE BYTEMACRO COMP.NUMBERCALL) (PUTPROPS IQUOTIENT BYTEMACRO COMP.NUMBERCALL) (PUTPROPS IREMAINDER BYTEMACRO COMP.NUMBERCALL) (PUTPROPS IMINUS BYTEMACRO ((X) (IDIFFERENCE 0 X))) (PUTPROPS LSH BYTEMACRO COMP.NUMBERCALL) (PUTPROPS LLSH BYTEMACRO COMP.NUMBERCALL) (PUTPROPS RSH BYTEMACRO COMP.NUMBERCALL) (PUTPROPS LRSH BYTEMACRO COMP.NUMBERCALL) (PUTPROPS FIX BYTEMACRO COMP.FIX) (PUTPROPS PLUS BYTEMACRO (APPLY* COMP.NUMERIC PLUS PLUS)) (PUTPROPS DIFFERENCE BYTEMACRO (APPLY* COMP.NUMBERCALL PLUS)) (PUTPROPS TIMES BYTEMACRO (APPLY* COMP.NUMERIC TIMES PLUS 0)) (PUTPROPS QUOTIENT BYTEMACRO (APPLY* COMP.NUMBERCALL PLUS)) (PUTPROPS FPLUS BYTEMACRO (APPLY* COMP.NUMERIC FPLUS FLOAT)) (PUTPROPS FDIFFERENCE BYTEMACRO (APPLY* COMP.NUMBERCALL FLOAT)) (PUTPROPS FTIMES BYTEMACRO (APPLY* COMP.NUMERIC FTIMES FLOAT 0)) (PUTPROPS FQUOTIENT BYTEMACRO (APPLY* COMP.NUMBERCALL FLOAT ((FLOAT FQUOTIENT (OPCODES UBFLOAT2 4))))) (PUTPROPS EQ BYTEMACRO COMP.EQ) (PUTPROPS EQUAL BYTEMACRO COMP.EQ) (PUTPROPS EQP BYTEMACRO COMP.EQ) (PUTPROPS .TEST. BYTEMACRO (APPLY COMP.NUMBERTEST)) (RPAQQ MAPFNS (MAP MAPC MAPLIST MAPCAR MAPCON MAPCONC SUBSET SOME EVERY NOTANY NOTEVERY)) (PUTPROPS MAP BYTEMACRO (APPLY* COMP.MAP)) (PUTPROPS MAPC BYTEMACRO (APPLY* COMP.MAP T)) (PUTPROPS MAPLIST BYTEMACRO (APPLY* COMP.MAP NIL T)) (PUTPROPS MAPCAR BYTEMACRO (APPLY* COMP.MAP T T)) (PUTPROPS MAPCON BYTEMACRO (APPLY* COMP.MAP NIL J)) (PUTPROPS MAPCONC BYTEMACRO (APPLY* COMP.MAP T J)) (PUTPROPS SUBSET BYTEMACRO (APPLY* COMP.MAP T S)) (PUTPROPS SOME BYTEMACRO (APPLY* COMP.MAP BOTH NIL TJUMP)) (PUTPROPS EVERY BYTEMACRO (APPLY* COMP.MAP BOTH NIL FJUMP T)) (PUTPROPS NOTANY BYTEMACRO (APPLY* COMP.MAP BOTH NIL TJUMP T)) (PUTPROPS NOTEVERY BYTEMACRO (APPLY* COMP.MAP BOTH NIL FJUMP NIL)) (PUTPROPS .DOCOLLECT. BYTEMACRO ((VAL TAIL ITEM) (COND ((NOT TAIL) (SETQ TAIL (SETQ VAL (LIST ITEM)))) (T (FRPLACD TAIL (SETQ TAIL (LIST ITEM))))))) (PUTPROPS .DOJOIN. BYTEMACRO ((VAL TAIL ITEM) (AND (LISTP ITEM) (COND (TAIL (FRPLACD (SETQ TAIL (LAST TAIL)) ITEM)) (T (SETQ TAIL (SETQ VAL ITEM))))))) (PUTPROPS LISPXWATCH BYTEMACRO T) (PUTPROPS FETCHFIELD BYTEMACRO T) (PUTPROPS REPLACEFIELD BYTEMACRO T) (PUTPROPS FFETCHFIELD BYTEMACRO (= . FETCHFIELD)) (PUTPROPS FREPLACEFIELD BYTEMACRO (= . REPLACEFIELD)) (PUTPROPS REPLACEFIELDVAL BYTEMACRO T) (PUTPROPS FREPLACEFIELDVAL BYTEMACRO (= . REPLACEFIELDVAL)) (PUTPROPS GETPROP BYTEMACRO (= . GETP)) (PUTPROPS BLKAPPLY BYTEMACRO (= . APPLY)) (PUTPROPS BLKAPPLY* BYTEMACRO (= . APPLY*)) (PUTPROPS ADD1VAR BYTEMACRO ((X) (SETQ X (ADD1 X)))) (PUTPROPS SUB1VAR BYTEMACRO ((X) (SETQ X (SUB1 X)))) (PUTPROPS KWOTE BYTEMACRO (OPENLAMBDA (Q) (COND ((AND Q (NEQ Q T) (NOT (NUMBERP Q))) (LIST (QUOTE QUOTE) Q)) (T Q)))) (PUTPROPS FRPLNODE BYTEMACRO (OPENLAMBDA (X A D) (FRPLACD (FRPLACA X A) D))) (PUTPROPS RPLNODE BYTEMACRO (OPENLAMBDA (X A D) (RPLACD (RPLACA X A) D))) (PUTPROPS LISTGET1 BYTEMACRO (OPENLAMBDA (X Y) (CADR (MEMB Y X)))) (PUTPROPS FRPLNODE2 BYTEMACRO (OPENLAMBDA (X Y) (FRPLACD (FRPLACA X (CAR Y)) (CDR Y)))) (PUTPROPS JSYS BYTEMACRO COMP.PUNT) (PUTPROPS EQMEMB BYTEMACRO (OPENLAMBDA (X Y) (OR (EQ X Y) (AND (LISTP Y) (FMEMB X Y) T)))) (PUTPROPS MKLIST BYTEMACRO (OPENLAMBDA (X) (OR (LISTP X) (AND X (LIST X))))) (RPAQQ COPS (BIND UNBIND DUNBIND ERRORSET JUMP TJUMP FJUMP NTJUMP NFJUMP POP COPY RETURN TAG FN CONST SETQ AVAR HVAR GVAR FVAR STORE)) (PUTPROPS BIND MLSYM ("BIND[" %] . BIND)) (PUTPROPS UNBIND MLSYM ("UNBIND(" %) . UNBIND)) (PUTPROPS DUNBIND MLSYM ("DUNBIND(" %) . UNBIND)) (PUTPROPS ERRORSET MLSYM ("ERRORSET " % . JUMP)) (PUTPROPS JUMP MLSYM ("JUMP " % . JUMP)) (PUTPROPS TJUMP MLSYM ("TJUMP " % . JUMP)) (PUTPROPS FJUMP MLSYM ("FJUMP " % . JUMP)) (PUTPROPS NTJUMP MLSYM ("NTJUMP " % . JUMP)) (PUTPROPS NFJUMP MLSYM ("NFJUMP " % . JUMP)) (PUTPROPS FN MLSYM (%[ %] . FN)) (PUTPROPS CONST MLSYM (' NIL . CONST)) (PUTPROPS SETQ MLSYM ("SETQ<" > . VREF)) (PUTPROPS AVAR MLSYM (< > . VAR)) (PUTPROPS HVAR MLSYM (< > . VAR)) (PUTPROPS GVAR MLSYM (< > . VAR)) (PUTPROPS FVAR MLSYM (< > . VAR)) (MOVD? (QUOTE NILL) (QUOTE REFRAME)) (AND (GETD (QUOTE OPT.COMPINIT)) (OPT.COMPINIT)) (PUTPROPS LOADTIMECONSTANT BYTEMACRO (= . DEFERREDCONSTANT)) (PUTPROPS FRPTQ BYTEMACRO OPT.CFRPTQ) (PUTPROPS IMAX2 BYTEMACRO (OPENLAMBDA (X Y) (COND ((NOT (IGREATERP X Y)) Y) (T X)))) (PUTPROPS IMIN2 BYTEMACRO (OPENLAMBDA (X Y) (COND ((IGREATERP X Y) Y) (T X)))) (PUTPROPS AREF BOGUSMACRO COMP.AREF) (PUTPROPS ASET BOGUSMACRO COMP.ASET) (PUTPROPS FLOAT BOX (\FLOATBOX . \FLOATUNBOX)) (ADDTOVAR COMPILETYPELST) (RPAQQ MERGEFRAMETYPES (PROG LAMBDA MAP)) (RPAQQ OPTIMIZATIONSOFF NIL) (PUTPROPS BYTECOMPILER COPYRIGHT ("Xerox Corporation" 1981 1982 1983 1984)) NIL