<> <> <> <> <> DIRECTORY Rope, SVInterfaceTypes, SVSceneTypes, ViewerClasses; SVWindow: CEDAR DEFINITIONS = BEGIN EditToolData: TYPE = SVInterfaceTypes.EditToolData; Scene: TYPE = SVSceneTypes.Scene; SVData: TYPE = SVInterfaceTypes.SVData; Viewer: TYPE = ViewerClasses.Viewer; EditedProc: TYPE = PROC [svData: SVData, clientData: REF ANY]; CreateWindow: PROC [editToolData: EditToolData, scene: Scene, iconic: BOOL, paint: BOOL, workingDirectory: Rope.ROPE] RETURNS [svData: SVData, viewerPicture: Viewer]; ForegroundParts: TYPE = {triggerBag, alignBag, bitMap, none, sceneBag}; RestoreScreenAndInvariants: PROC [paintAction: ATOM, svData: SVData, remake: ForegroundParts _ triggerBag, backgndOK: BOOL _ FALSE, edited: BOOL _ TRUE, okToClearFeedback: BOOL _ TRUE]; RawPaint: PROC [paintProc: SVInterfaceTypes.DisplayContextProc, svData: SVData]; ReloadTipTable: PROC [event: LIST OF REF ANY, svData: SVData]; SaveCaretPos: PROC [svData: SVData]; NewCaretPos: PROC [svData: SVData]; SetCursorLooks: PROC [type: SVInterfaceTypes.GravityType, svData: SVData, on: BOOL _ TRUE]; END.