ImagerPDPrivate.mesa
Copyright © 1983, 1984, 1985 by Xerox Corporation. All rights reserved.
Michael Plass, September 16, 1985 10:22:16 am PDT
Doug Wyatt, April 15, 1985 1:59:11 pm PST
DIRECTORY
Imager USING [Context],
ImagerSample USING [Sampler, SampleBuffer],
ImagerPD USING [Toner],
ImagerPixelMap USING [PixelMap, PixelMapRep, Tile],
ImagerTransformation USING [Transformation],
PDFileFormat USING [Toner],
PDFileWriter USING [PDState],
RefTab USING [Ref];
ImagerPDPrivate: CEDAR DEFINITIONS
~ BEGIN
PD: TYPE ~ REF PDRep;
PDRep: PUBLIC TYPE ~ RECORD [
context: Imager.Context,
toners: LIST OF ImagerPD.Toner,
deviceData: DeviceData
];
ColorKind: TYPE ~ {nil, constant, sampled, sampledBlack, tile};
nil: color uninitialized
constant: all color information required has been passed to PDFileWriter (i.e., in the load)
sampled: color that requires halftoning
sampledBlack: sampled black that could not be turned into constant or tile
tile: a tile color that would not fit into the load
DeviceData: TYPE ~ REF DeviceDataRep;
DeviceDataRep: TYPE ~ RECORD [
writer: PDFileWriter.PDState,
sSize, fSize: CARDINAL,
feed, strip, imageStarted: BOOL,
tonerSet: PACKED ARRAY PDFileFormat.Toner OF BOOL,
tonerUniverseSet: PACKED ARRAY PDFileFormat.Toner OF BOOL,
toner: PDFileFormat.Toner,
maskTab: RefTab.Ref,
colorKind: ColorKind,
tileTable: TileTable,
colorTile: ImagerPixelMap.Tile, -- used iff colorKind=tile
colorClear: BOOL, -- used iff colorKind=sampledBlack OR colorKind=tile
sampledSource: ImagerPixelMap.PixelMap, -- used iff colorKind=sampled OR colorKind=sampledBlack
paToDevice: ImagerTransformation.Transformation, -- mutable; used iff colorKind=sampled OR colorKind=sampledBlack
scratchPM: REF ImagerPixelMap.PixelMapRep,
sampler: ImagerSample.Sampler,
bitBuffer: ImagerSample.SampleBuffer,
sampleBuffer: ImagerSample.SampleBuffer,
brickBuffer: ImagerSample.SampleBuffer,
halftoneBrick: ARRAY PDFileFormat.Toner OF REF ImagerPixelMap.Tile
];
TileTable: TYPE ~ REF TileTableRep;
TileTableRep: TYPE ~ RECORD [
SEQUENCE mod: NAT OF LIST OF TileEntry
];
TileEntry: TYPE ~ RECORD [
loadIndex: LONG CARDINAL,
hash: CARDINAL,
tile: ImagerPixelMap.Tile
];
END.