-- RTSymbolsPrivate.mesa
-- Last Modified By Paul Rovner On December 21, 1982 2:42 pm

DIRECTORY
BcdDefs USING[VersionStamp],
BcdOps USING[BcdBase],
Rope USING[ROPE],
RTSymbolDefs USING[SymbolTableHandle, nullHandle],
RTTypesBasicPrivate USING[SymbolTableIndex];

RTSymbolsPrivate: DEFINITIONS
= BEGIN OPEN Rope, RTSymbolDefs;

AcquireSTHFromSTX: PROC[stx: RTTypesBasicPrivate.SymbolTableIndex]
RETURNS[sth: SymbolTableHandle ← nullHandle,
  moduleName: ROPENIL];

GetSTHForModule: PROC[stamp: BcdDefs.VersionStamp,
fileName: ROPE, -- maybe NIL
moduleName: ROPE -- maybe NIL
]
RETURNS[sth: SymbolTableHandle ← nullHandle];

AcquireBCDFromVersion: PROC[versionStamp: BcdDefs.VersionStamp,
shortFileNameHint: ROPENIL]
RETURNS[bcd: BcdOps.BcdBase];

ReleaseBCD: PROC[bcd: BcdOps.BcdBase];

END.