[_CD6_]<autolayout>NewPhoenix>OrderedSymbolTableRef.mesa!1

--File: OrderedSymbolTableRef.mesa

Last Edited by: CSChow, February 1, 1985 0:23:15 am PST

Preas, August 2, 1986 4:28:54 pm PDT

--NB: This is only a TEMPORARY patch, should retrieved from ARCHIVE (Cedar5.2)

DIRECTORY

Basics USING [Comparison];

OrderedSymbolTableRef: CEDAR DEFINITIONS = BEGIN

Table: TYPE = REF Rep;

Rep: TYPE; -- opaque

CompareProc: TYPE = PROC[r1, r2: REF ANY] RETURNS [Basics.Comparison];

EachItemAction: TYPE = PROC[Item: REF ANY] RETURNS [quit: BOOL ← FALSE];

CreateTable: PROC [compare: CompareProc] RETURNS [Table];

Insert: PROC[tab: Table, item: REF ANY];

DestroyTable: PROC[tab: Table];

DeleteAllItems: PROC[tab: Table];

LookupSmallest: PROC[tab: Table] RETURNS [REF ANY];

LookupNextLarger: PROC[tab: Table, item: REF ANY] RETURNS [REF ANY];

EnumerateIncreasing: PROC[tab: Table, action: EachItemAction];

Size: PROC [tab: Table] RETURNS [INT];

END.