<> <> <> <> <<>> <> <<>> DIRECTORY ImagerSample USING [Function, nullFunction, PixelBuffer, PixelMap, Sample, SampleMap], ImagerTransformation USING [Transformation]; ImagerDeviceBitmapPrivate: CEDAR DEFINITIONS ~ BEGIN Case: TYPE ~ {nil, fill, tile, sampledBlack, sampledColor}; Data: TYPE ~ REF DataRep; DataRep: TYPE ~ RECORD[ frame: ImagerSample.SampleMap, -- the target bitmap case: Case _ nil, -- what type of color value: ImagerSample.Sample _ 0, -- value for fill function: ImagerSample.Function _ ImagerSample.nullFunction, -- for fill, tile, sampledBlack tile: ImagerSample.SampleMap _ NIL, -- for tile, sampledBlack s0, f0: INT _ 0, phase: NAT _ 0, -- origin and phase for tile pixelMap: ImagerSample.PixelMap _ NIL, -- for sampledColor paToDevice: ImagerTransformation.Transformation _ NIL, -- from pixel [s, f] to frame [s, f] brick: ImagerSample.PixelBuffer _ NIL, -- halftone brick extras: REF _ NIL ]; END.