TEditSelectionOps.mesa
Copyright Ó 1985, 1986 by Xerox Corporation. All rights reserved.
Russ Atkinson (RRA) June 25, 1985 1:22:34 am PDT
Doug Wyatt, December 16, 1986 5:20:33 pm PST
DIRECTORY
TEditDocument USING [SelectionId],
ViewerClasses USING [Viewer];
TEditSelectionOps:
CEDAR
DEFINITIONS = {
Viewer: TYPE ~ ViewerClasses.Viewer;
ShowGivenPosition:
PROC [viewer: Viewer, pos:
INT, skipCommentNodes:
BOOL ←
TRUE];
scrolls to the given position and uses the feedback selection to point it out. This is the basic stuff used for the Position button and Source feedback from the interpreter.
ShowGivenPositionRange:
PROC [viewer: ViewerClasses.Viewer, selectionId: TEditDocument.SelectionId, posI, posF:
INT, skipCommentNodes, pendingDelete:
BOOL];
A slightly more flexible version of ShowGivenPosition.
}.