<> <> <> <> <<>> DIRECTORY Imager, SVBasicTypes, SVInterfaceTypes, SVRefresh; SVRefreshImpl: CEDAR PROGRAM IMPORTS EXPORTS SVRefresh = BEGIN BoundBox: TYPE = SVBasicTypes.BoundBox; SelectionClass: TYPE = SVInterfaceTypes.SelectionClass; ViewerToolData: TYPE = SVInterfaceTypes.ViewerToolData; ActionAreaPaint: PUBLIC PROC [screen: Imager.Context, whatHasChanged: ATOM, viewerToolData: ViewerToolData] = { }; MoveToOverlay: PUBLIC PROC [entity: REF ANY, viewerToolData: ViewerToolData] = { }; MoveToBackground: PUBLIC PROC [entity: REF ANY, viewerToolData: ViewerToolData] = { }; MoveAllSelectedToOverlay: PUBLIC PROC [viewerToolData: ViewerToolData, selectClass: SelectionClass] = { }; MoveAllSelectedToBackground: PUBLIC PROC [viewerToolData: ViewerToolData] = { }; EmptyOverlay: PUBLIC PROC [viewerToolData: ViewerToolData] RETURNS [BOOL] = { RETURN[TRUE]; }; SplitBackgroundAndOverlay: PUBLIC PROC [viewerToolData: ViewerToolData, restoreBox: BoundBox] = { }; END.