<> <> <> <> <> <<>> <> DIRECTORY Rope USING [ROPE], ViewerClasses USING [Viewer]; TiogaOpsDefs: CEDAR DEFINITIONS = BEGIN Ref: TYPE = REF NodeBody; -- points to a Tioga node NodeBody: TYPE; Offset: TYPE = INT; -- character offset in a node. starts at zero. Location: TYPE = RECORD [node: Ref, where: INT]; Viewer: TYPE = ViewerClasses.Viewer; ROPE: TYPE = Rope.ROPE; WhichNodes: TYPE = { root, selection }; SelectionGrain: TYPE = { point, char, word, node, branch }; Order: TYPE = { before, same, after, disjoint }; WhichSelection: TYPE = { primary, secondary, feedback }; <> END.