hưs8€p€,€ì€LAMBDAF€€2€D€p€,€l�FASD-DATA€D€¬€JIM€ì�Jack Flanders€†€)§W¾F€~F€‘D€p€,�COMPILER,‚NEW-DESTINATIONSp€ì€GLOBALl€T€p€B€ ¬€SITEl‚Gigamos Cambridge€p€B€ ,�PACKAGE€¬€MAP€p€B€ l�READTABLE€¬‚standard Common-Lisp1€D€C�IN-PACKAGED€ÀQUOTE€B€51€D€B€:D€B€;ƒ€MAP€1€D€ÀEXPORTD€B€;D€Â$$MAP-STATUS-READ-MAR€Ã‚$$MAP-STATUS-READ-ONLYCƒ$$MAP-STATUS-READ-MAR-AGEDCƒ$$MAP-STATUS-DIRECT-MAPPEDƒƒ$$MAP-STATUS-READ-ONLY-AGED€ƒ$$MAP-STATUS-SWAPPED-OUTƒ$$MAP-STATUS-NORMAL-AGEDƒ‚$$MAP-STATUS-NORMAL€Ã‚ASSOCIATE-LOCAL-MEMORYÂASSOCIATE-NUBUS-MEMORYC�DIRECT-MAP�DUMP-MAPC‚EXTRACT-MAP-STATUS‚FLUSH-DIRECT-MAPƒ‚FREE-VIRTUAL-CLUSTERÃ�FRESH-CLUSTER?C‚INJECT-MAP-STATUS€Ã‚ILLOP-IF-NOT-LISP-MAP€�LISP-MAPÂMAP-CLUSTER-VOLATILITYC‚MAP-LOCAL-MEMORY?€ƒ‚MAP-ON-BOARD-ADDRESSƒREAD-CLUSTER-VOLATILITY€�READ-MAP‚READ-MAP-STATUS€ƒWRITE-CLUSTER-VOLATILITYC�WRITE-MAP€‚WRITE-MAP-STATUS1€D€pÀl€NC,‚DEF-DECLARATION€Ã�MAP-LISP-MODE?ÀSUBST€D€B€;D€pÀB€d¬�NAMED-LAMBDAB€gD€pÀl�PRIMITIVESl€Q€D€pÀ,�HARDWARE¬€32=€D€pÀB€o¬€LDB€B€mpÀB€o,„%%MEMORY-CONTROL-L-C-MAP-SELECT€€pÀB€o,‚$$LISP-MAP-BITS€1€D€ƒ�DEFCONSTANT€ƒ*NUMBER-OF-MAP-ENTRIES*€D€pÀ,�VINCULUMì�FIELD-MAXIMUM€pÀB€ol‚%%MAPPED-VMA-BYTE€1€D€B€C‚%%MAP-STATUS-BITS€D€ƒ€BYTEF€F€1€D€B€ƒ‚%%MAP-FRESH-CLUSTER€D€B€ŠF€F€ 1€D€B€ƒ‚$$CLUSTER-NOT-FRESH€€1€D€B€‚$$CLUSTER-FRESH€F€1€D€B€fC‚MAP-LISP-TRAP-BITSB€hD€B€;D€B€jB€žD€B€mD€B€sB€mpÀB€o¬‚%%MAP-LISP-TRAP-BITS€1€D€ƒ€SETQpÀ¬€SETF,ƒ*GRODY-SETF-MACRO-TABLE*D€p€B€+¬€CONSD€B€;D€B€žÃ€LAMBDAB€ŸD€ƒ€LET*D€D€pÀB€©,‚SINGLE-TEMPVARS€D€p€B€+ì€MAPCARD€�FUNCTIOND€B€®D€ÀIGNORED€p€B€+,�GENTEMP€D€B€;D€B€mD€pÀB€©,�STOREVARD€p€B€+ì€GENSYMD€pÀB€©,�TEMPVARSB€±D€ÀVALUESB€ÇD€p€B€+¬€LISTB€mD€B€ÌB€ÁD€ƒ€LET€D€D€ÀVALUE€B€ÁD€B€mD€p€B€+¬€NTH€€B€ÇD€pÀl€SIl�XR-BQ-LISTD€B€;pÀB€o¬€DPB€B€ÐD€B€;B€¡B€mD€pÀB€Ø¬�XR-BQ-LIST*€D€B€;B€žB€ÇD€C€IFD€p€B€+ì€BOUNDPD€B€;B€«B€«ƒ€NIL€B€ž1€D€B€fC‚MAP-LISP-VALID-BITB€hD€B€;D€B€jB€óB€ŸD€B€sB€mpÀB€o¬‚%%MAP-LISP-VALID-BIT€1€D€B€¨B€«D€B€­D€B€;D€B€óB€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€õB€mD€B€âD€B€;B€óB€ÇB€ïB€ó1€D€B€fCƒMAP-LISP-WRITE-ENABLE-BIT€B€hD€B€;D€B€jB€B€ŸD€B€sB€mpÀB€o¬ƒ%%MAP-LISP-WRITE-ENABLE-BIT€€1€D€B€¨B€«D€B€­D€B€;D€B€B€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€B€mD€B€âD€B€;B€B€ÇB€ïB€1€D€B€fƒ‚MAP-LOCAL-MEMORY-BITB€hD€B€;D€B€jB€5B€ŸD€B€sB€mpÀB€oì‚%%MAP-LOCAL-MEMORY-BIT€1€D€B€¨B€«D€B€­D€B€;D€B€5B€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€7B€mD€B€âD€B€;B€5B€ÇB€ïB€51€D€B€fB€XB€hD€B€;D€B€jB€XB€nD€B€qD€B€sB€mB€7€pÀB€o¬�$$MAP-LOCAL€1€D€B€fB€YB€hD€B€;D€B€jB€YB€ŸD€B€sB€mpÀB€oì‚%%MAP-ON-BOARD-ADDRESS€1€D€B€¨B€«D€B€­D€B€;D€B€YB€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€`B€mD€B€âD€B€;B€YB€ÇB€ïB€Y1€D€B€fÂMAP-OFF-BOARD-ADDRESS€B€hD€B€;D€B€jB€B€ŸD€B€sB€mpÀB€o,ƒ%%MAP-OFF-BOARD-ADDRESS€€1€D€B€¨B€«D€B€­D€B€;D€B€B€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€�B€mD€B€âD€B€;B€B€ÇB€ïB€1€D€B€fB€WB€hD€B€;D€B€jB€WB€ŸD€B€sB€mpÀB€o,‚%%MAP-VOLATILITY€1€D€B€¨B€«D€B€­D€B€;D€B€WB€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€¡B€mD€B€âD€B€;B€WB€ÇB€ïB€W1€D€B€fƒMAP-CLUSTER-STATUS-BITS€B€hD€B€;D€B€jB€ÀB€ŸD€B€sB€mB€‰€1€D€B€¨B€«D€B€­D€B€;D€B€ÀB€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€‰B€mD€B€âD€B€;B€ÀB€ÇB€ïB€À1€D€B€fÂMAP-CLUSTER-FRESH-BIT€B€hD€B€;D€B€jB€ßB€ŸD€B€sB€mB€�€1€D€B€¨B€«D€B€­D€B€;D€B€ßB€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€�B€mD€B€âD€B€;B€ßB€ÇB€ïB€ß1€D€B€fC‚CLUSTER-IS-FRESH?€B€hD€B€;D€B€jB€þB€nD€B€qD€B€sB€mB€�€B€š1€D€B€Â%%MAP-STATUS-V-WE-BITSD€B€ŠF€€1€D€B€ƒ‚%%MAP-STATUS-S-BITS€D€B€ŠF€F€1€D€B€fÃ�STATUS-S-BITS€B€hD€B€;D€B€jB€B€ŸD€B€sB€mB€ €1€D€B€¨B€«D€B€­D€B€;D€B€B€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€ B€mD€B€âD€B€;B€B€ÇB€ïB€1€D€B€f‚STATUS-V-WE-BITSB€hD€B€;D€B€jB€1B€ŸD€B€sB€mB€€1€D€B€¨B€«D€B€­D€B€;D€B€1B€®B€ŸD€B€¯D€D€B€±D€B€³B€»D€B€;D€B€mB€ÅD€B€ÇB€±D€B€ÊB€ÇD€B€ÌB€mB€ÎD€B€ÏD€D€B€ÐB€ÁD€B€mD€B€Ó€B€ÇD€B€ÚB€ÝB€ÐD€B€;B€B€mD€B€âD€B€;B€1B€ÇB€ïB€11€D€B€B€D€1€D€B€B€FF€1€D€B€B€EF€1€D€B€B€HF€1€D€B€B€IF€1€D€B€B€GF€ 1€D€B€B€JF€1€D€B€B€KF€1€D€B€ƒ‚$$MAP-AGED-TRAP-BITSF€1€D€B€fB€PB€hD€B€;D€B€jB€PD€�MAP-BITSD€B€ÜD€B€ÀB€lB€ D€B€žB€l1€D€B€fB€TB€hD€B€;D€B€jB€TD€B€lÀSTATUSD€pÀB€�¬‚DPB-MULTIPLE-UNBOXEDD€B€B€uB€‰D€B€1B€uB€¡B€l1€D€B€fƒ�ADDRESS-MAP€B€hD€B€;D€B€jB€€D€‚VIRTUAL-CLUSTER€D€pÀB€ol‚WRITE-VMA-UNBOXED€D€‚CLUSTER->ADDRESSB€�D€pÀB€o¬€NOP€D€B€‰D€B€‰B€î1€D€�DEFMACROC�MODIFY-MAPD€B€��MODIFIERD€B€âD€B€;B€ÏD€B€ÚD€B€ÚD€B€;B€�B€�D€B€ÚD€B€;B€“B€“D€B€;D€D€p€¬€TRAPì�WITHOUT-TRAPS€D€B€´D€B€®B€îD€B€€B€�D€B€ÏD€D€C�NEW-VALUE€D€�FUNCALL€B€“D€pÀB€o,�READ-MAPD€pÀB€ol�WRITE-MAP€B€ŸD€B€‰D€B€‰B€î1€D€B€ƒ%%MAP-READ-STATUS-WE-BITD€B€ŠF€€1€D€B€ƒ%%MAP-READ-STATUS-S-BITSD€B€ŠF€F€1€D€B€ƒƒ$$MAP-READ-STATUS-READ-MAR-1€1€D€B€C„$$MAP-READ-STATUS-AGED-TO-READ-MARF€1€D€B€ƒƒ$$MAP-READ-STATUS-READ-MAR-2F€1€D€B€C„$$MAP-READ-STATUS-AGED-TO-READABLEF€1€D€B€„$$MAP-READ-STATUS-SWAPPED-OUT-1€F€1€D€B€ƒ$$MAP-READ-STATUS-UNUSEDF€1€D€B€„$$MAP-READ-STATUS-SWAPPED-OUT-2€F€1€D€B€„$$MAP-READ-STATUS-AGED-TO-NORMALF€1€D€B€fÂPHYSICAL-BLOCK-EXISTS?B€hD€B€;D€B€jB€áD€ÀBLOCK€Ã‚PHYSICAL-MEMORY-LAYOUTD€pÀB€ol�32LOGBITP€B€âB€ã€€