SymbolTable.mesa
Copyright Ó 1985, 1986, 1987, 1988, 1991 by Xerox Corporation. All rights reserved.
Satterthwaite on May 24, 1982 9:13 am
Russ Atkinson (RRA) March 1, 1988 6:16:39 pm PST
SymbolTable: DEFINITIONS = {
TYPEs
Handle:
TYPE =
RECORD [
space:
REF ¬
NIL,
A datum understood by the exporter
any:
BOOL ¬
FALSE
a flag that causes ForgetSTB to forget all entries associated with the space
];
nullHandle: Handle = [NIL, FALSE];
Base:
TYPE =
REF SymbolTableBaseRep;
SymbolTableBase: TYPE = Base;
SymbolTableBaseRep:
TYPE;
See SymbolTablePrivate for the truth.
ERRORs
STBMissing: ERROR [handle: SymbolTable.Handle];
IllegalSTB: ERROR [base: SymbolTable.Base];
LockedSTB: ERROR [handle: SymbolTable.Handle, nLocks: NAT];
PROCs
AcquireSTB: PROC [handle: SymbolTable.Handle] RETURNS [SymbolTable.Base];
ReleaseSTB: PROC [base: SymbolTable.Base];
ForgetSTB: PROC [handle: SymbolTable.Handle];
STBToHandle: PROC [base: SymbolTable.Base] RETURNS [SymbolTable.Handle];
STBCacheSize: PROC RETURNS [pages: CARDINAL];
SetSTBCacheSize: PROC [pages: CARDINAL];
Cleanup: PROC;
}.