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.