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. πImagerDeviceBitmapPrivate.mesa Copyright c 1985, 1986 by Xerox Corporation. All rights reserved. Michael Plass, June 26, 1985 9:45:19 am PDT Doug Wyatt, March 4, 1986 10:47:26 am PST Private definitions for ImagerDeviceBitmapImpl. Κ;˜codešœ™Kšœ Οmœ7™BK™+K™)K™—šœ/™/K™—šΟk ˜ Kšœ žœD˜VKšœžœ˜,—K˜KšΠlnœžœž ˜,Kšœž˜K˜Kšœžœ1˜;K˜Kšœžœžœ ˜šœ žœžœ˜KšœΟc˜3Kšœ ˜'Kšœ  ˜1Kšœ= ˜\Kšœžœ ˜=Kšœžœ žœ ˜=Kšœ"žœ ˜:Kšœ2žœ $˜[Kšœ"žœ ˜8Kšœžœž˜K˜K˜—K˜Kšžœ˜—…—ˆ³