(FILECREATED "20-Feb-84 17:07:44" ("compiled on " {PHYLUM}SOURCES>LLGC.;26) "18-Feb-84 12:57:23" recompiled changes: \HTFIND \GC.ENTER.BIGREFCNT \GC.MODIFY.BIGREFCNT \GC.LOOKUP.BIGREFCNT in WORK dated "18-Feb-84 13:08:48") (FILECREATED "20-Feb-84 17:07:11" {PHYLUM}SOURCES>LLGC.;26 29536 changes to: (FNS \HTFIND \GC.ENTER.BIGREFCNT \GC.MODIFY.BIGREFCNT \GC.LOOKUP.BIGREFCNT) (MACROS .MODENTRY.) (VARS LLGCCOMS) previous date: "18-Feb-84 12:28:43" {PHYLUM}SOURCES>LLGC.;24) \HTFIND D1 (L (1 CASE 0 PTR)) @Q`@@nj@l @@nѸn``HYdj7@wAdjIlhkAlIkIk`kjhhj@IwtI\l?MAdjLl>@I 1ILk(kILkAdlIk`lIj`IlIA@ hIjhIj@`Zj``Jl`dJZ`[j``Kl`dK[KJKIIKkJjJjJ@wAdjJlhkAlJkJk`kjhh`InZw@J]l?MAdjMl>@J 1JMk(kJMkAdlJk`lJj`JlJA@ h`KVIJkJjJ``J`InZjIJJjJ``J{JJjm@J[Zj`J!`Zj``Jl`dJZJjKJJ@wAdjkAlJkJk`kjhh(1021Q \GC.MODIFY.BIGREFCNT 1002Q \GCERROR 721Q \GC.ENTER.BIGREFCNT 355Q \GC.MODIFY.BIGREFCNT 336Q \GCERROR 255Q \GC.ENTER.BIGREFCNT 177Q \GCERROR) (1250Q \HTCOLL 1236Q \HTCOLL 1230Q \HTCOLL 1217Q \HTCOLL 1210Q \HTCOLL 1145Q \HTCOLL 1135Q \HTCOLL 1072Q \HTCOLL 1062Q \HTCOLL 1052Q \HTCOLL 643Q \HTCOLL 505Q \HTCOLL 473Q \HTCOLL 465Q \HTCOLL 454Q \HTCOLL 440Q \HTCOLL 426Q \HTCOLL 420Q \HTCOLL 407Q \HTCOLL 77Q \HTMAIN 63Q \HTCOLL 6 \MDSTypeTable) () \GC.ENTER.BIGREFCNT D1 (L (1 ENTRY 0 PTR)) o`@kj@mbHYdiHl?HjH@Al?hHdlljܿHl I@o@ HdkhHlX(133Q RAID 114Q \NEWPAGE) (2 \HTBIGCOUNT) ( 127Q "PTR already in overflow table") \GC.MODIFY.BIGREFCNT D1 (L (2 PTR 1 CASE 0 ENTRY)) `BkjBmbHYBIB hHlXAdj HnHYIk؉Hdkj&k#Hl?HkYHj@IHiIhjIHdkn(40Q \GC.BIGREFCNT.MISSING) (2 \HTBIGCOUNT) () \GC.LOOKUP.BIGREFCNT D1 (L (0 PTR)) 4`@kj@mbHY@I@ l?HlXHH(40Q \GC.BIGREFCNT.MISSING) (2 \HTBIGCOUNT) () \GC.BIGREFCNT.MISSING D1 (L (0 PTR)) o@ (7 RAID) NIL ( 3 "Big refcnt ptr not in table") \GCMAPTABLE D1 (L (0 ARG) P 0 \INTERRUPTABLE) > @`Y`k"ML@I IhIlа`M^djdMljNddgMN N _j``O `ONl N ZJ" KdlK_Kdk1Klj_Kn_K_OdnO!nOkٰlK [Kl [O_JOdnOOdnjk_OnOkقOJONj Mk](361Q \LISPERROR 350Q \FIXP.FROM.FLOATP 207Q \DORECLAIM 135Q \GCTYPE 37Q \HTFIND) (203Q \RECLAIM.COUNTDOWN 177Q \RECLAIM.COUNTDOWN 171Q \RECLAIM.COUNTDOWN 161Q \RECLAIM.COUNTDOWN 154Q \RECLAIM.COUNTDOWN 125Q **DEALLOC** 56Q \DTDSpaceBase 15Q \MaxTypeNumber 5 \HTOVERFLOW) () \GC.HANDLEOVERFLOW D1 (L (0 ARG) P 0 \INTERRUPTABLE) P`[*`lP\ [n`.`K`KK KhKlаLl L YI"JdlJ_Jdk0Jlj_Jn_J_MdnO!nOkٰlJ ZJl ZOؽINdnOMdnjkؽNnOkقOIMLj @(265Q \LISPERROR 254Q \FIXP.FROM.FLOATP 114Q \DORECLAIM 71Q \HTFIND) (110Q \RECLAIM.COUNTDOWN 60Q \RECLAIM.COUNTDOWN 53Q \RECLAIM.COUNTDOWN 44Q \RECLAIM.COUNTDOWN 37Q \RECLAIM.COUNTDOWN 15Q \DTDSpaceBase 5 \HTOVERFLOW) () \GCMAPSCAN D1 NIL nA`H{dXYjh`In[djxwHѺLgIKkKjK``K`In[jIKKjK``KJzZIdj}nK\[jY`KrIjHIwHѺIjJzZ4JNIL (262Q \HTCOLL 202Q \HTCOLL 172Q \HTCOLL 133Q \HTCOLL 123Q \HTCOLL 113Q \HTCOLL 36Q \HTCOLL 10Q \HTMAIN) () \GCMAPUNSCAN D1 NIL tn!`H|dXYIdj>`InZd`jdkwHl j`JZj`J`jIdkjj`(101Q \HTFIND) (123Q \HTCOLL 36Q \HTCOLL 10Q \HTMAIN) () \GCRECLAIMCELL D1 (L (0 PTR)) @@ZdlB@@I@dl%dj@ b@n@ @ Il@ `JXMJdj+l @.`@`@`@@ l @ hd@KIH@dHI(235Q RELEASINGVMEMPAGE 222Q \RECLAIMARRAYBLOCK 126Q \DECUSECOUNT 111Q \FREELISTCELL 104Q \FREELISTCELL 60Q \FREELISTCELL) (210Q \ArrayFrLst 177Q \ArrayFrLst 166Q \ArrayFrLst 132Q \DTDSpaceBase) () \FREELISTCELL D1 (L (0 X)) P@@n@HH@lHdkYIl!HnH` `HH hNIL (103Q \LISTPDTD 73Q \LISTPDTD) () DISABLEGC D1 NIL 0`n`n djHdnHkиkٰhNIL (55Q \RECLAIM.COUNTDOWN 12Q \MDSTypeTable 2 \HTCOLL) () \GCSCAN1 D1 (L (0 PROBE)) +@jh`@kbXjHjHj@NIL (13Q \HTMAIN) () \GCSCAN2 D1 (L (0 PROBE)) @jh`@kbnj@NIL (10Q \HTMAIN) () \REFCNT D1 (L (0 PTR)) 0`@@njn`k`@Xdjj@Hwl?HZ$@ `HnYw@l?IZJIYj`I(120Q \GC.LOOKUP.BIGREFCNT) (173Q \HTCOLL 124Q \HTCOLL 46Q \HTMAIN 35Q \HTCOLL 5 \MDSTypeTable) () RECLAIM D1 NIL j(2 \DORECLAIM) NIL () \DORECLAIM D1 (P 0 \INTERRUPTABLE) In`> hl` `l~``ll` I`(74Q CLOCK 55Q FLIPCURSOR 41Q FLIPCURSOR 31Q CLOCK) (106Q \RECLAIM.COUNTDOWN 103Q \RECLAIMMIN 71Q \GCTIME2 61Q \MISCSTATS 51Q GCMESS 35Q GCMESS 26Q \GCTIME1 21Q \RECLAIM.COUNTDOWN 5 \HTCOLL) () RECLAIMMIN D1 (L (0 N)) ,`i@#@i@dldlddnnhNIL (50Q \RECLAIM.COUNTDOWN 45Q \RECLAIMMIN 2 \RECLAIMMIN) () GCMESS D1 (L (1 STR 0 NUM)) hNIL NIL () GCGAG D1 (L (0 MESSAGE)) `@NIL (6 GCMESS 2 GCMESS) () GCTRP D1 NIL `doNIL (2 \RECLAIM.COUNTDOWN) ( 16Q 17777777777Q) \GCERROR D1 (L (1 FLG 0 REASON)) !A@n`@o h(35Q DISABLEGC 30Q RAID) (11Q \HTCOLL) ( 25Q "Bad CASE arg to \HTFIND") (PRETTYCOMPRINT LLGCCOMS) (RPAQQ LLGCCOMS ((E (RESETSAVE (RADIX 8))) (COMS (* for MAKEINIT) (FNS INITGC) (DECLARE: DONTCOPY ( ADDVARS (MKI.SUBFNS (ADDREF . PROGN) (\ADDREF . PROGN) (\DELREF . PROGN) (CREATEREF . PROGN) ( \CREATEREF . PROGN) (DELETEREF . PROGN) (.INCREMENT.ALLOCATION.COUNT. . PROGN))) (ADDVARS (INEWCOMS ( FNS INITGC))) EVAL@COMPILE (ADDVARS (DONTCOMPILEFNS INITGC)))) (FNS \HTFIND) (COMS (FNS \GC.ENTER.BIGREFCNT \GC.MODIFY.BIGREFCNT \GC.LOOKUP.BIGREFCNT \GC.BIGREFCNT.MISSING) (GLOBALVARS \HTBIGCOUNT)) (FNS \GCMAPTABLE \GC.HANDLEOVERFLOW \GCMAPSCAN \GCMAPUNSCAN \GCRECLAIMCELL \FREELISTCELL DISABLEGC \GCSCAN1 \GCSCAN2 \REFCNT) (FNS RECLAIM \DORECLAIM RECLAIMMIN GCMESS GCGAG GCTRP) (DECLARE: EVAL@COMPILE DONTCOPY (COMS * GCCOMPILERDEFS)) (DECLARE: DONTEVAL@LOAD DOCOPY (VARS (\RECLAIMMIN 3000 ) (\RECLAIM.COUNTDOWN 3000) (GCMESS) (\GCTIME1 (CREATECELL \FIXP)) (\GCTIME2 (CREATECELL \FIXP)))) ( FNS \GCERROR) (LOCALVARS . T))) (RPAQQ \RECLAIMMIN 3000) (RPAQQ \RECLAIM.COUNTDOWN 3000) (RPAQQ GCMESS NIL) (RPAQ \GCTIME1 (CREATECELL \FIXP)) (RPAQ \GCTIME2 (CREATECELL \FIXP)) (PUTPROPS LLGC COPYRIGHT ("Xerox Corporation" 1981 1982 1983 1984)) NIL