-- WaterlilyParticularTable.mesa
-- Last edited by:
-- Kolling on October 12, 1983 12:38 pm
DIRECTORY
Basics USING [Comparison],
Rope USING [Compare, ROPE],
WaterlilyDefs USING [SymbolTableEntry, SymbolTableKey];
ParticularTable: CEDAR DEFINITIONS IMPORTS Rope =
BEGIN
Node: TYPE = WaterlilyDefs.SymbolTableKey;
NodeRecord: TYPE = WaterlilyDefs.SymbolTableEntry;
Key: TYPE = Rope.ROPE;
GetKey: PROCEDURE[n: Node] RETURNS [k: Key] = INLINE
BEGIN
RETURN[n.rope];
END;
CompareKeyToNode: PROCEDURE[k: Key, n: Node] RETURNS [Basics.Comparison] = INLINE
BEGIN
RETURN[Rope.Compare[k, n.rope, TRUE]];
END;
END.