<> <> <> <> DIRECTORY Basics USING [Comparison], Rope USING [Compare, ROPE], WaterlilyDefs USING [SymbolTableEntry, SymbolTableKey]; WaterlilyParticularTable: 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.