file BcdLiterals.Mesa
last edited by Satterthwaite, November 23, 1982 9:48 am
Last Edited by: Maxwell, August 4, 1983 9:32 am
Last Edited by: Paul Rovner, September 22, 1983 11:40 am
DIRECTORY
Alloc: TYPE USING [Handle],
BcdDefs: TYPE USING [Base, BcdBase, FTIndex, RFIndex, SGIndex, TFIndex],
IO: TYPE USING [STREAM];
BcdLiterals: DEFINITIONS={
input
MapLitLinks: PROC [rfi: BcdDefs.RFIndex];
MapTypeLinks: PROC [tfi: BcdDefs.TFIndex];
LoadLiterals: PROC [
fti: BcdDefs.FTIndex,
bcdBase: BcdDefs.BcdBase,
MapFile: PROC [BcdDefs.FTIndex] RETURNS [BcdDefs.FTIndex],
MapSegment: PROC [BcdDefs.SGIndex] RETURNS [BcdDefs.SGIndex]];
UnloadLiterals: PROC;
output
EnterVersionFiles: PROC [
ftb: BcdDefs.Base, ftLimit: BcdDefs.FTIndex,
MapFile: PROC [BcdDefs.FTIndex] RETURNS [BcdDefs.FTIndex]];
LitSegSize: PROC RETURNS [nWords: CARDINAL];
UpdateSegments: PROC [MapSegment: PROC [BcdDefs.SGIndex] RETURNS [BcdDefs.SGIndex]];
WriteLiterals: PROC [stream: IO.STREAM];
initialization
Initialize: PROC [Alloc.Handle];
SealLiterals: PROC [];
Finalize: PROC [];
}.