ImagerPDExtras.mesa
Michael Plass, April 10, 1984 10:07:28 am PST
DIRECTORY Imager, ImagerBrick, ImagerPD, PDFileFormat, Rope;
ImagerPDExtras:
CEDAR
DEFINITIONS ~
BEGIN OPEN ImagerPD;
ColorVersatec:
PROC [fileName: Rope.
ROPE]
RETURNS [PDFileDescription];
SetBrick:
PROC [context: Imager.Context, toner: PDFileFormat.Toner, brick: ImagerBrick.Brick];
ColorSeparator: TYPE ~ REF ColorSeparatorRep;
ColorSeparatorRep:
TYPE ~
RECORD [
proc: ColorSeparatorProc,
data: REF
];
ColorSeparatorProc: TYPE ~ PROC [self: ColorSeparator, x, y, Y: REAL] RETURNS [TonerValues];
TonerValues:
TYPE ~
ARRAY PDFileFormat.Toner
OF
REAL;
RegisterColorSeparator:
PROC [context: Imager.Context, colorSeparator: ColorSeparator];
END.