<> <> DIRECTORY TiogaNode, TiogaTreeOps UndoEvent; EditGroup: CEDAR DEFINITIONS = BEGIN Ref: TYPE = TiogaNode.Ref; RefBranchNode: TYPE = TiogaNode.RefBranchNode; TreeLoc: TYPE = TiogaTreeOps.TreeLoc; TreeSpan: TYPE = TiogaTreeOps.TreeSpan; Event: TYPE = UndoEvent.Ref; <> <<>> <> DeleteGroup: PROC [ root: RefBranchNode, start, end: Ref, saveForPaste: BOOLEAN _ TRUE, event: Event _ NIL]; <<>> ReplaceGroup: PROC [ destRoot, sourceRoot: RefBranchNode, destStart, destEnd: Ref, sourceStart, sourceEnd: Ref, saveForPaste: BOOLEAN _ TRUE, event: Event _ NIL]; <> <> <<>> CopyGroup: PROC [ destRoot, sourceRoot: RefBranchNode, dest: Ref, contents: BOOL, sourceStart, sourceEnd: Ref, event: Event _ NIL]; <> <> MoveGroup: PROC [ destRoot, sourceRoot: RefBranchNode, dest: Ref, contents: BOOL, sourceStart, sourceEnd: Ref, event: Event _ NIL]; <> <> <<>> MoveGroupOnto: PROC [ destRoot, sourceRoot: RefBranchNode, destStart, destEnd: Ref, sourceStart, sourceEnd: Ref, saveForPaste: BOOLEAN _ TRUE, event: Event _ NIL]; <> <> <<>> TransposeGroups: PROC [ alphaRoot, betaRoot: RefBranchNode, alphaStart, alphaEnd: Ref, betaStart, betaEnd: Ref, event: Event _ NIL]; <> <> <<>> END.