hưs8€p€,€ì€LAMBDAF€€2€D€p€,€l�FASD-DATA€D€¬€jim€¬�Orson Welles†€Ù¦(F€~F€PD€p€,�COMPILER,‚NEW-DESTINATIONSp€ì€GLOBALl€T€p€B€ ¬€SITEl‚Gigamos Cambridge€p€B€ ,�PACKAGE€ì‚PHYSICAL-CLUSTER-DATA€p€B€ l�READTABLE€¬‚standard Common-Lisp1€D€C�IN-PACKAGED€ÀQUOTE€B€51€D€B€:D€B€;ÂPHYSICAL-CLUSTER-DATA€1€D€ÀEXPORTD€B€;D€‚%%PCD-WRITE-BITSÂ$$CLUSTER-NO-READ-MAR€Ã‚$$CLUSTER-NO-WRITE-MARƒ‚$$CLUSTER-READ-ONLY€ƒ‚$$CLUSTER-READ-WRITE‚$$STATUS-NORMAL€Ã�$$WRITE-CLEAN€C‚$$WRITE-CLEAN-MAR€ƒ$$WRITE-CLEAN-READ-ONLY€ƒƒ$$WRITE-CLEAN-READ-ONLY-MAR€Ã�$$WRITE-NORMALƒ�$$WRITE-MAR€C‚$$WRITE-READ-ONLY€Ã‚$$WRITE-READ-ONLY-MAR€CƒALLOCATE-PHYSICAL-CLUSTER€C‚ASSOCIATE-CLUSTER€ÃƒASSURE-FREE-PHYSICAL-CLUSTERS€C„CREATE-PHYSICAL-CLUSTER-DATA-TABLEÂFREE-PHYSICAL-CLUSTER€ÃƒFREE-UNUSED-PHYSICAL-CLUSTERS€„INITIALIZE-PHYSICAL-CLUSTER-DATAƒ‚MARK-MODIFIED-IN-PCD�READ-PCD1€D€ƒ�DEFCONSTANT€C‚%%PCD-READ-MAR-BITD€ƒ€BYTEF€F€1€D€B€_B€DD€B€aF€F€1€D€B€_ƒ‚%%PCD-WRITE-MAR-BIT€D€B€aF€F€1€D€B€_ƒ‚%%PCD-READ-ONLY-BIT€D€B€aF€F€ 1€D€B€_‚%%PCD-CLEAN-BIT€D€B€aF€F€ 1€D€B€_ƒƒ%%PCD-VIRTUAL-CLUSTER-NUMBERD€B€aD€C�BYTE-SIZE€pÀ,�VINCULUM,‚%%CLUSTER-NUMBERF€ 1€D€B€_ƒ�%%PCD-STATUSD€B€aF€F€1€D€pÀl€NC,‚DEF-DECLARATION€C�PCD-STATUSÀSUBST€D€B€;D€pÀB€Ž¬�NAMED-LAMBDAB€‘D€pÀl�PRIMITIVESl€Q€D€pÀ,�HARDWARE¬€LDB€B€—B€ˆ€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€—D€pÀB€£,�STOREVARD€p€B€+ì€GENSYMD€pÀB€£,�TEMPVARSB€«D€ÀVALUESB€ÁD€p€B€+¬€LISTB€—D€B€ÆB€»D€ƒ€LET€D€D€ÀVALUE€B€»D€B€—D€p€B€+¬€NTH€€B€ÁD€pÀl€SIl�XR-BQ-LISTD€B€;pÀB€™¬€DPB€B€ÊD€B€;B€ˆB€—D€pÀB€Ò¬�XR-BQ-LIST*€D€B€;B€‘B€ÁD€C€IFD€p€B€+ì€BOUNDPD€B€;B€¥B€¥ƒ€NIL€B€‘1€D€B€�CƒPCD-VIRTUAL-CLUSTER-NUMBERB€’D€B€;D€B€”B€íB€˜D€B€›B€—B€~€1€D€B€¢B€¥D€B€§D€B€;D€B€íB€¨B€˜D€B€©D€D€B€«D€B€­B€µD€B€;D€B€—B€¿D€B€ÁB€«D€B€ÄB€ÁD€B€ÆB€—B€ÈD€B€ÉD€D€B€ÊB€»D€B€—D€B€Í€B€ÁD€B€ÔB€×B€ÊD€B€;B€~B€—D€B€ÜD€B€;B€íB€ÁB€éB€í1€D€B€_‚$$STATUS-INVALID€1€D€B€_Ã�$$STATUS-WIREDF€1€D€B€_B€IF€1€D€B€_Ã�$$STATUS-AGE-1F€1€D€B€_Ã�$$STATUS-AGE-2F€1€D€B€_Ã�$$STATUS-AGE-3F€1€D€B€_C‚$$STATUS-FLUSHABLEF€1€D€B€_C‚$$STATUS-PRE-PAGEDF€1€D€B€_B€N€1€D€B€_B€OF€1€D€B€_B€PF€1€D€B€_B€QF€1€D€B€_B€JF€1€D€B€_B€KF€1€D€B€_B€LF€1€D€B€_B€MF€1€D€B€_C‚$$UNCLEAN-CLUSTER€€1€D€B€_‚$$CLEAN-CLUSTER€F€1€D€B€_B€E€1€D€B€_C‚$$CLUSTER-READ-MARF€1€D€B€_B€F€1€D€B€_ƒ‚$$CLUSTER-WRITE-MAR€F€1€D€B€_B€H€1€D€B€_B€GF€1€D€B€�Ã�CLEAN-CLUSTER?B€’D€B€;D€B€”B€_D€B€—D€pÀB€™¬€32=€D€B€›B€—B€x€B€G1€D€B€�B€ZB€’D€B€;D€B€”B€ZD€ÀINDEX€D€‚SYSTEM-TABLE-REFp€,‚GLOBAL-REGISTERSìƒ*PHYSICAL-CLUSTER-DATA-TABLE*€B€j1€D€B€�C�WRITE-PCD€B€’D€B€;D€B€”B€uD€B€jC�NEW-VALUE€D€C‚SYSTEM-TABLE-STOREB€oB€jB€v1€D€�DEFMACROC�MODIFY-PCDD€B€jÀTHUNK€D€B€ÜD€B€;B€ÉD€B€ÔD€B€ÔD€B€;B€€B€€D€B€ÔD€B€;B€jB€jD€B€;D€D€B€uB€jD€�FUNCALL€B€€D€B€ZB€j1€D€B€_C‚%%INIT-MAP-STATUS€D€B€aF€€1€D€B€_ƒ‚%%INIT-MAP-READ-ONLYD€B€aF€€1€D€B€_‚%%INIT-MAP-WIREDD€B€aF€F€1€D€B€�‚INIT-READ-ONLY?€B€’D€B€;D€B€”B€£B€`D€B€bD€B€›B€—B€—€F€1€D€B€�ƒ�INIT-WIRED?€B€’D€B€;D€B€”B€¬B€`D€B€bD€B€›B€—B€�€F€1€D€B€_C‚$$INIT-MAP-NORMAL€€1€D€B€_ƒ‚$$INIT-MAP-READ-ONLYF€1€D€B€_‚$$INIT-MAP-WIREDF€1€D€B€_Cƒ$$INIT-MAP-WIRED-READ-ONLYF€1€D€B€_ƒƒ$$INIT-MAP-PHYSICAL-CLUSTER€€1€D€B€_Cƒ$$INIT-MAP-VIRTUAL-CLUSTERF€1€D€B€_Cƒ$$INIT-MAP-INITIAL-STATUS€F€1€D€B€_ƒ$$INIT-MAP-CLUSTER-COUNTF€1€D€B€_C‚*CLUSTERS-IN-PCD*€D€�CEILING€pÀB€€ìƒ*PHYSICAL-MEMORY-MAX-CLUSTERS*pÀB€€,‚*QS-IN-CLUSTER*€€€