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 ’GraphCarets.mesa, Copyright c 1985 by Xerox Corporation. All rights reserved. last edited: Sweetsun Chen, November 15, 1985 5:37:24 pm PST Κs– "Mesa" style˜IcodešœΟmœ1™N™ K™/—K˜šΟk ˜ Kšœžœ˜&—K˜Kš Πbl œžœž œžœžœ˜2K˜KšΟnœžœ4˜@K˜Kš œžœ4˜AK˜Kš  œžœžœ-žœžœ˜iK˜Kš œžœ˜"K˜Kš œžœ˜#K˜š  œžœ4˜GK˜—š  œžœ4˜FK˜—Kš œžœžœžœ˜6K˜Kš œžœ˜%K˜Kš œžœ˜K˜Kš œžœ˜K˜Kš œžœ˜K˜Kšžœ˜K˜šžœžœ˜ Kšœ0˜0K˜——…—