IPImager.mesa
Copyright © 1984 Xerox Corporation. All rights reserved.
Doug Wyatt, November 15, 1984 3:17:34 pm PST
DIRECTORY
ImagerColor USING [Color, ColorOperator],
ImagerFont USING [Font],
ImagerPixelArray USING [PixelArray],
ImagerTransformation USING [Transformation],
IO USING [STREAM],
IPInterpreter USING [Integer, Operator, State, Vector],
Rope USING [ROPE];
IPImager: CEDAR DEFINITIONS
~ BEGIN
ROPE: TYPE ~ Rope.ROPE;
STREAM: TYPE ~ IO.STREAM;
Integer: TYPE ~ IPInterpreter.Integer;
Vector: TYPE ~ IPInterpreter.Vector;
Operator: TYPE ~ IPInterpreter.Operator;
State: TYPE ~ IPInterpreter.State;
Font: TYPE ~ ImagerFont.Font;
Transformation: TYPE ~ ImagerTransformation.Transformation;
PixelArray: TYPE ~ ImagerPixelArray.PixelArray;
Color: TYPE ~ ImagerColor.Color;
ColorOperator: TYPE ~ ImagerColor.ColorOperator;
VectorFromFont: PROC[Font] RETURNS[Vector];
FontFromVector: PROC[Vector] RETURNS[Font];
FindFont: PROC[self: State, v: Vector] RETURNS[Vector];
FindFontVec: PROC[self: State, v: Vector] RETURNS[Vector];
ModifyFont: PROC[v: Vector, m: Transformation] RETURNS[Vector];
MakeLargeVector: PROC[stream: STREAM, length: INT, bytesPerElement: NAT]
RETURNS[Vector];
FindDecompressor: PROC[self: State, v: Vector] RETURNS[Operator];
FindColor: PROC[self: State, v: Vector] RETURNS[Color];
FindColorOperator: PROC[self: State, v: Vector] RETURNS[Operator];
FindColorModelOperator: PROC[self: State, v: Vector] RETURNS[Operator];
MakePixelArray: PROC[
xPixels, yPixels: Integer, -- number of pixels in slow and fast directions
samplesPerPixel: Integer, -- number of sample values for each pixel
maxSampleValue: Vector, -- maximum sample value; if NIL, use maxSampleValueI
maxSampleValueI: Integer, -- constant maximum sample value, if maxSampleValue=NIL
samplesInterleaved: BOOL, -- if true, samples for one pixel are contiguous
m: Transformation, -- transformation from pixel coordinates to master coordinates
samples: Vector -- the actual samples
] RETURNS[PixelArray];
ColorOperatorFromOperator: PROC[Operator] RETURNS[ColorOperator];
OperatorFromColorOperator: PROC[ColorOperator] RETURNS[Operator];
END.