[Cyan]<CedarLang>Nucleus>Binder>BcdLiterals.mesa!1

file BcdLiterals.Mesa

last edited by Satterthwaite, November 23, 1982 9:48 am

Last Edited by: Maxwell, August 4, 1983 9:32 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, UNCOUNTED ZONE];

SealLiterals: PROC [];

Finalize: PROC [];