<> <> <> DIRECTORY Graph USING [CaretIndex, GraphHandle]; GraphCarets: CEDAR DEFINITIONS = BEGIN OPEN Graph; 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: BOOL _ FALSE]; 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 []; Init: PROC []; END. CHANGE LOG. SChen, created at October 9, 1985 5:51:26 pm PDT