Carets.mesa; Written by S. McGregor
Edited by McGregor on July 21, 1983 10:49 am
Last Edited by: Maxwell, December 17, 1982 10:05 am
DIRECTORY
ViewerClasses USING [Viewer];
Carets: CEDAR DEFINITIONS = BEGIN
StartCaret: PROC [viewer: ViewerClasses.Viewer, x, y: INTEGER, id: CaretId] ;
StopCaret: PROC [id: CaretId];
SuspendCarets: PROC ;
ResumeCarets: PROC ;
CaretId: TYPE = {primary, secondary} ← primary ;
pCaretViewer, sCaretViewer: ViewerClasses.Viewer;
END.