GraphCarets.mesa, Copyright © 1985 by Xerox Corporation. All rights reserved.
last edited:
Sweetsun Chen, October 21, 1985 6:47:17 pm PDT
DIRECTORY
Graph USING [CaretIndex],
GraphPrivate USING [GraphHandle];
GraphCarets: CEDAR DEFINITIONS = BEGIN OPEN Graph, GraphPrivate;
TurnOn: PROC [handle: GraphHandle, index: CaretIndex ← primary];
TurnOff: PROC [handle: GraphHandle, index: CaretIndex ← primary];
Move: PROC [handle: GraphHandle, x, y: INTEGER ← 0, index: CaretIndex ← primary, ensureOn: BOOLFALSE];
AllOn: PROC [handle: GraphHandle];
AllOff: PROC [handle: GraphHandle];
StartBlinking: PROC [handle: GraphHandle, index: CaretIndex ← primary];
StopBlinking: PROC [handle: GraphHandle, index: CaretIndex ← primary];
GetFocus: PROC [] RETURNS [handle: GraphHandle ← NIL];
SetFocus: PROC [handle: GraphHandle];
Suspend: PROC[];
Resume: PROC [];
END.
CHANGE LOG.
SChen, created at October 9, 1985 5:51:26 pm PDT