PseudoCursors.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Michael Plass, November 15, 1983 1:22 pm
Last Edited by: Beach, May 24, 1983 9:12 am
Doug Wyatt, April 14, 1985 11:06:01 pm PST
DIRECTORY
TerminalDefs USING [Cursor],
ViewerClasses USING [Viewer];
PseudoCursors: CEDAR DEFINITIONS
~ BEGIN
PseudoCursor: TYPE ~ ViewerClasses.Viewer;
Create: PROC [parent: ViewerClasses.Viewer, x, y: INTEGER ← 0] RETURNS [PseudoCursor];
Set: PROC [pseudoCursor: PseudoCursor, bits: REF TerminalDefs.Cursor];
END.