<> <> <> DIRECTORY Terminal USING [BWCursorBitmap], ViewerClasses USING [Viewer]; PseudoCursors: CEDAR DEFINITIONS = BEGIN PseudoCursor: TYPE = ViewerClasses.Viewer; Create: PROC [parent: ViewerClasses.Viewer, x, y: INTEGER _ 0] RETURNS [pseudoCursor: PseudoCursor]; Set: PROC [pseudoCursor: PseudoCursor, bits: REF Terminal.BWCursorBitmap]; END. Michael Plass, November 2, 1982 10:48 am. CEDARized.