DIRECTORY GGBasicTypes, GGModelTypes, GGInterfaceTypes, Rope; GGMouseEvent: CEDAR DEFINITIONS = BEGIN GargoyleData: TYPE = GGInterfaceTypes.GargoyleData; Point: TYPE = GGBasicTypes.Point; SelectMode: TYPE = GGModelTypes.SelectMode; FeatureData: TYPE = GGInterfaceTypes.FeatureData; MouseProc: TYPE = PROC [input: LIST OF REF ANY, gargoyleData: GargoyleData, worldPt: Point]; StartProc: TYPE = PROC [input: LIST OF REF ANY, gargoyleData: GargoyleData, worldPt: Point] RETURNS [success: BOOL _ TRUE]; SelectFeedbackProc: TYPE = PROC [feature: FeatureData, caretPt: Point, gargoyleData: GargoyleData]; ResetMouseMachinery: PROC [gargoyleData: GargoyleData]; HandleMouse: PROC [event: LIST OF REF ANY, point: Point, clientData: REF ANY]; HandleMouseless: PROC [event: LIST OF REF ANY, clientData: REF ANY]; StartCaretPos: StartProc; DuringCaretPos: MouseProc; EndCaretPos: MouseProc; StartSelectJoint: StartProc; StartSelectSegment: StartProc; StartSelectTrajectory: StartProc; StartSelectTopLevel: StartProc; DuringSelect: MouseProc; EndSelect: MouseProc; StartDeselectJoint: StartProc; StartDeselectSegment: StartProc; StartDeselectTrajectory: StartProc; StartDeselectTopLevel: StartProc; DuringDeselect: MouseProc; EndDeselect: MouseProc; StartExtendSelectJoint: StartProc; StartExtendSelectSegment: StartProc; StartExtendSelectTraj: StartProc; StartExtendSelectTopLevel: StartProc; StartExtendSelection: StartProc; DuringExtendSelection: MouseProc; EndExtendSelection: MouseProc; CopySelected: StartProc; StartDrag: StartProc; DuringDrag: MouseProc; EndMotion: MouseProc; StartRotate: StartProc; DuringRotate: MouseProc; StartScale: StartProc; DuringScale: MouseProc; StartAdd: StartProc; DuringAdd: MouseProc; EndAdd: MouseProc; StartBox: StartProc; EndBox: MouseProc; StartCircle: StartProc; EndCircle: MouseProc; SelectJointOrCP: SelectFeedbackProc; SelectSegment: SelectFeedbackProc; SelectTraj: SelectFeedbackProc; SelectTopLevel: SelectFeedbackProc; SetCaretAttractorEndpoint: PROC [gargoyleData: GargoyleData, mapPoint: Point, feature: FeatureData]; DescribeSelectionAction: PROC [gargoyleData: GargoyleData, feature: FeatureData, selectMode: SelectMode, action: Rope.ROPE]; END. \GGMouseEvent.mesa Last edited by Bier on January 8, 1987 8:35:21 pm PST Contents: Once an event reaches the front of the slack-process queue, it is dispatched to one of the procedures in this module. Pier, October 24, 1986 10:37:04 am PDT Kurlander July 13, 1986 3:09:20 pm PDT Called as part of Reviving Gargoyle after an ERROR window must be aborted. Restores the GGMouseEvent invariants. In GGMouseEventImplA.StartCaretPos In GGMouseEventImplA.StartDrag Private Procedures for GGMouseEventImpl* communication. In GGMouseEventImplA.SelectJoint In GGMouseEventImplB.SetCaretAttractorEndpoint ΚA˜Icode™K™5™€K™&K™&—K™šΟk ˜ Kšœ3˜3K˜—KšΟn œœ œ˜'K˜Kšœœ!˜3Kšœœ˜!Kšœ œ˜+Kšœ œ ˜1K˜Kš œ œœ œœœœ.˜\Kšœ œœ œœœœ.œ œœ˜{KšœœœD˜cK˜šžœœ˜7K™q—K˜Kšž œœ œœœœœœ˜NKšžœœ œœœœœœ˜DK˜K˜Kšœ"™"K™Kšž œ ˜Kšžœ ˜Kšž œ ˜K˜Kšžœ ˜Kšžœ ˜Kšžœ ˜!Kšžœ ˜Kšž œ ˜Kšž œ ˜K˜Kšžœ ˜Kšžœ ˜ Kšžœ ˜#Kšžœ ˜!Kšžœ ˜Kšž œ ˜K˜Kšž Πbnžœ ˜"Kšž Ÿžœ ˜$Kšž Ÿžœ ˜!Kšž Ÿžœ ˜%KšŸœ ˜ KšžŸœ ˜!KšžŸœ ˜K˜Kšž œ ˜K˜Kšœ™K™Kšž œ ˜Kšž œ ˜Kšž œ ˜K˜Kšž œ ˜Kšž œ ˜K˜Kšž œ ˜Kšž œ ˜K˜Kšžœ ˜Kšž œ ˜Kšžœ ˜K˜Kšžœ ˜Kšžœ ˜K˜Kšž œ ˜Kšž œ ˜K˜™7Kšœ ™ —Kšžœ˜$Kšž œ˜"Kšž œ˜šžœ˜#Kšœ.™.—KšžœœE˜dKšžœœYœ˜|Kšœ˜—…—ž;