ImagerDefault.mesa
Created April 8, 1983
This interface provides the default implementations for the ProcsRec of a Imager.Context.
Last Edit By:
Plass, April 8, 1983 7:18 pm
Last Edited by: Crow, May 11, 1983 6:07 pm
DIRECTORY
ImagerBasic, Imager, ImagerClipper;
ImagerDefault: CEDAR DEFINITIONS
= BEGIN
Context: TYPE = ImagerBasic.Context;
Path: TYPE = ImagerBasic.Path;
PixelArray: TYPE = ImagerBasic.PixelArray;
FixedVec: TYPE = ImagerBasic.FixedVec;
Rectangle: TYPE = ImagerBasic.Rectangle;
Visibility: TYPE = ImagerClipper.Visibility;
SampledSource: TYPE = ImagerBasic.SampledSource;
SampleSequence: TYPE = ImagerBasic.SampleSequence;
Color: TYPE = ImagerBasic.Color;
FIXED: TYPE = ImagerBasic.FIXED;
NotImplemented: ERROR;
MaskStroke: PROC [context: Context, path: Path];
MaskFill: PROC [context: Context, path: Path];
MaskPixel: PROC [context: Context, pixelArray: PixelArray];
MaskThinLine: PROC [context: Context, p0, p1: FixedVec];
MaskThinStroke: PROC [context: Context, path: Path];
MaskRectangle: PROC [context: Context, r: Rectangle];
ClipArea: PROC [context: Context, path: Path, exclude: BOOLEAN];
ClipRectangle: PROC [context: Context, r: Rectangle, exclude: BOOLEAN];
TestRectangle: PROC [context: Context, r: Rectangle] RETURNS [Visibility];
TestPoint: PROC [context: Context, p: FixedVec] RETURNS [BOOLEAN];
MaskChar: PROC [context: Context, char: CHAR];
MaskCharacters: PROC [context: Context, characters: REF, start: INT ← 0, length: INTLAST[INT]];
MaskCharSeq: PROC [context: Context, length: NAT, charPtr: LONG POINTER TO CHAR, charIncrement: NAT, deltaXptr: LONG POINTER TO FIXED, deltaXincrement: NAT, deltaYptr: LONG POINTER TO FIXED, deltaYincrement: NAT];
NewTransformation: PROC [context: Context];
NewSource: PROC [context: Context];
NewFont: PROC [context: Context];
NewPage: PROC [context: Context];
Destroy: PROC [context: Context];
VideoInvertStroke: PROC [context: Context, path: Path];
VideoInvertArea: PROC [context: Context, path: Path];
VideoInvertPixels: PROC [context: Context, pixelArray: PixelArray];
VideoInvertThinLine: PROC [context: Context, p0, p1: FixedVec];
VideoInvertRectangle: PROC [context: Context, r: Rectangle];
GetImage: PROC [context: Context] RETURNS [SampledSource];
GetMutableImage: PROC [context: Context] RETURNS [SampledSource];
MakeCompatibleContext: PROC [context: Context, boundary: Rectangle] RETURNS [Context];
END.