ImagerDeviceColor24Private.mesa
Copyright © 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.
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: REFNIL
];
END.