<> <> <> <> DIRECTORY Rope USING [ROPE], TEditDocument USING [Selection], TextNode USING [Location], ViewerClasses USING [Viewer]; TEditOps: CEDAR DEFINITIONS = BEGIN ROPE: TYPE ~ Rope.ROPE; Viewer: TYPE ~ ViewerClasses.Viewer; <> GetSelContents: PROC RETURNS [contents: ROPE]; GetSelData: PROC [primary: BOOL _ TRUE] RETURNS [data: TEditDocument.Selection]; CaretLoc: PROC [s: TEditDocument.Selection _ NIL] RETURNS [TextNode.Location]; <> AutoScroll: PROC [tryToGlitch: BOOL _ TRUE]; -- scroll to selection <> GetTextContents: PROC [viewer: Viewer] RETURNS [contents: ROPE]; SetTextContents: PROC [viewer: Viewer, contents: ROPE]; RememberCurrentPosition: PROC [viewer: Viewer]; CopyPositionHistory: PROC [from, to: Viewer]; CopyLoadHistory: PROC [from, to: Viewer]; <> FileNameProc: TYPE ~ PROC [ROPE, Viewer] RETURNS [fileName: ROPE, search: ROPE]; RegisterFileNameProc: PROC [proc: FileNameProc]; ReplaceFileNameProc: PROC[new: FileNameProc] RETURNS[old: FileNameProc]; <<>> WorkingDirectoryFromViewer: PROC[Viewer] RETURNS[ROPE]; <<>> END.