<<>> <> <> <> <> <<>> DIRECTORY GGCoreTypes, GGInterfaceTypes, Imager; GGRefreshExtras: CEDAR DEFINITIONS = BEGIN PaintInParent: PROC [ggData: GGData, paintAction: ATOM]; <> RegisterPaintProc: PROC [ggData: GGData, paintProc: PaintProc, clientData: REF _ NIL]; <> <<>> RepaintArea: PROC [screen: Imager.Context, ggData: GGData, whatHasChanged: ATOM, bounds: BoundBoxObj _ infiniteRect]; <> infiniteRect: BoundBoxObj = [0,0,0,0,FALSE,TRUE]; nullRect: BoundBoxObj = [0,0,0,0,TRUE,FALSE]; BoundBoxObj: TYPE = GGCoreTypes.BoundBoxObj; GGData: TYPE = GGInterfaceTypes.GGData; PaintProc: TYPE = PROC [ggData: GGData, request: REF _ NIL, bounds: BoundBoxObj _ infiniteRect, clientData: REF _ NIL]; <> <> <> <> <> <> <> <> <> <> <> <<>> END.