last edited August 19, 1983 9:54 am by Paul Rovner
DIRECTORY
PrincOps USING[PsbIndex];
StorageAccounting: DEFINITIONS
TYPES
PSBIMap:
TYPE =
RECORD[elements: SEQUENCE maxLength: [0..LAST[PrincOps.PsbIndex]+1] OF CellCount];
CellCount: TYPE = RECORD[total, current: LONG INTEGER];
CONSTANTS
defaultCollectionInterval: LONG CARDINAL = 40000B;
VARIABLES
nWordsRequested: INT;
nWordsAllocated: INT;
SUMnWordsAllocated: INT;
nWordsReclaimed: INT;
nObjectsCreated: INT;
nObjectsReclaimed: INT;
MapPsbiToWordsAllocated: LONG POINTER TO PSBIMap;
CollectionInterval: INT;
SuspensionThreshold: INT;
PROCS
ResetNWordsAllocated: PROC;
ResetTotalNWordsAllocatedOnly: PROC;
ConsiderCollection: PROC[requestedWords, suppliedWords: LONG CARDINAL];
END.