-- RTSymbolsPrivate.mesa
-- Last Modified By Paul Rovner On December 16, 1982 5:34 pm

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

RTSymbolsPrivate: DEFINITIONS
= BEGIN OPEN Rope, RTSymbols;

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

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

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

ReleaseBCD: PROC[bcd: BcdOps.BcdBase];

END.