DIRECTORY ImagerSample USING [Function, nullFunction, PixelMap, Sample, SampleMap], ImagerTransformation USING [Transformation], Terminal USING [Virtual]; ImagerDeviceColor24Private: CEDAR DEFINITIONS ~ BEGIN bitsPerPixelA: NAT ~ 16; bitsPerPixelB: NAT ~ 8; Case: TYPE ~ {nil, fill, tile, sampledColor}; Data: TYPE ~ REF DataRep; DataRep: TYPE ~ RECORD[ terminal: Terminal.Virtual _ NIL, frameA: ImagerSample.SampleMap, -- frame buffer A (16 bits per sample) frameRG: ImagerSample.SampleMap, -- frame buffer A (8 bits per sample, double width) frameB: ImagerSample.SampleMap, -- frame buffer B (8 bits per sample) case: Case _ nil, -- what type of color function: ImagerSample.Function _ ImagerSample.nullFunction, -- function for all cases valueA, valueB: ImagerSample.Sample _ 0, -- values for case=fill tileA, tileB: ImagerSample.SampleMap _ NIL, -- tiles for case=tile s0, f0: INT _ 0, phase: NAT _ 0, -- origin and phase for case=tile pm: ImagerSample.PixelMap _ NIL, -- source pixels for case=sampledColor pmToDevice: ImagerTransformation.Transformation _ NIL, -- from pm(s,f) to frame(s,f) extras: REF _ NIL ]; END. òImagerDeviceColor24Private.mesa Copyright c 1985, 1986 by Xerox Corporation. All rights reserved. Michael Plass, June 25, 1985 2:01:13 pm PDT Doug Wyatt, March 6, 1986 9:25:23 pm PST Private definitions for ImagerDeviceColor24Impl. Êt˜codešœ™Kšœ Ïmœ7™BK™+K™(K™—Kšœ0™0K™šÏk ˜ Kšœ žœ7˜IKšœžœ˜,Kšœ žœ ˜—K˜KšÐlnœžœž ˜-Kšœž˜K˜Kšœžœ˜Kšœžœ˜K˜Kšœžœ#˜-K˜Kšœžœžœ ˜šœ žœžœ˜Kšœžœ˜!Kšœ Ïc&˜FKšœ! 3˜TKšœ  %˜EKšœ ˜'Kšœ= ˜VKšœ) ˜@Kšœ'žœ ˜BKšœžœ žœ !˜BKšœžœ &˜GKšœ2žœ ˜TKšœžœž˜K˜K˜—K˜Kšžœ˜J˜J˜—…—lÒ