ImagerColor24DevicePrivate.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Michael Plass, June 25, 1985 2:01:13 pm PDT
Private interface for the benefit of ImagerOps.
DIRECTORY
ImagerColorDefs USING [SampledColor],
ImagerPixelMap USING [PixelMap],
ImagerSample USING [Sampler, SampleBuffer],
ImagerTransformation USING [Transformation],
PrincOps USING [BitBltFlags],
Terminal USING [FrameBuffer, Virtual]
;
ImagerColor24DevicePrivate: CEDAR DEFINITIONS
~ BEGIN
Case: TYPE ~ {nil, constant, stipple, sampled};
StippleArray: TYPE ~ PACKED ARRAY [0..16) OF WORD;
Channel: TYPE ~ {A, B};
channel A has red and green pixels interleaved.
channel B has blue pixels non-interleaved.
bitsPerPixelA: NAT ~ 16;
bitsPerPixelB: NAT ~ 8;
Data: TYPE ~ REF DataRep;
DataRep: TYPE ~ RECORD[
terminal: Terminal.Virtual ← NIL,
frame: ARRAY Channel OF Terminal.FrameBuffer,
case: Case ← nil, -- what type of color
zerosAreClear: BOOLFALSE, -- special case for sampled black clear.
flags: PrincOps.BitBltFlags ← [], -- bitblt flags
grayWordA: WORD ← 0, -- bitblt gray word [red, green]
grayWordB: WORD ← 0, -- bitblt gray word [blue, blue]
stipple: StippleArray ← ALL[0], -- stipple pattern
sampledColor: ImagerColorDefs.SampledColor ← NIL, -- sampled color
paToDevice: ImagerTransformation.Transformation ← NIL, -- transformation from pa coords to display
buffer: ImagerSample.SampleBuffer ← NIL, -- scan line buffer for samples
sampler: ARRAY Channel OF ImagerSample.Sampler ← ALL[NIL], -- sampler information
extras: REFNIL
];
SampledColorData: TYPE ~ REF SampledColorDataRep;
SampledColorDataRep: TYPE ~ RECORD [
source: ARRAY Channel OF ImagerPixelMap.PixelMap
];
END.