<> <> <> <> <<>> DIRECTORY Imager USING [Context], ImagerSample USING [RasterSampleMap], SF USING [Box, maxBox, Vec]; XlBitmap: CEDAR DEFINITIONS ~ BEGIN <> <> Bitmap: TYPE = REF BitmapRep; <> BitmapRep: TYPE; NarrowBitmap: PROC [x: REF ANY] RETURNS [Bitmap]; IsBitmap: PROC [x: REF ANY] RETURNS [BOOL]; CreateFromSM: PROC [sm: ImagerSample.RasterSampleMap] RETURNS [Bitmap]; <> <> <> <> <> <<(Must meet alignment conditions of X host AND X server)>> Create: PROC [size: SF.Vec, bpp: NAT ¬ 1, sharedMemory: BOOL ¬ TRUE] RETURNS [Bitmap]; <> <> <> SetColormap: PROC [bitmap: Bitmap, colormap: REF]; <> <> <> <<>> GetSM: PROC [Bitmap] RETURNS [ImagerSample.RasterSampleMap]; <> <<>> GetBox: PROC [Bitmap] RETURNS [SF.Box]; <> <> CreateContext: PROC [bitmap: Bitmap, surfaceUnitsPerPixel: NAT ¬ 1] RETURNS [context: Imager.Context]; <> <<>> Refresh: PROC [bitmap: Bitmap, box: SF.Box ¬ SF.maxBox, delayOk: BOOL _ FALSE]; <> <> <> <> BoxDataProc: TYPE = PROC [box: SF.Box, data: REF, delayOk: BOOL]; <> RegisterInterceptionProcs: PROC [bitmap: Bitmap, refresh, preRefresh: BoxDataProc, data: REF]; <> <> <> <> RemoveInterceptionProcs: PROC [bitmap: Bitmap, data: REF]; <> <> <> <> <> <<>> PromiseRepaintLater: PROC [bitmap: Bitmap, box: SF.Box]; <> <> EndPromiseRepaint: PROC [bitmap: Bitmap, box: SF.Box ¬ SF.maxBox, refresh: BOOL ¬ TRUE, delayOk: BOOL _ FALSE]; <> <> <> END.