-- CGPrivate.mesa
-- Last edited by Doug Wyatt, September 1, 1982 12:00 pm

DIRECTORY
  Graphics USING [Context, Path],
  GraphicsBasic USING [Box, Color, FontRef, ImageRef, Mark, PaintMode, StrokeEnds, YMode];

CGPrivate: CEDAR DEFINITIONS = { OPEN GraphicsBasic;

Context: TYPE = Graphics.Context;
Path: TYPE = Graphics.Path;

GetCP: PROC[self: Context, rounded: BOOLEAN] RETURNS[x,y: REAL];
SetCP: PROC[self: Context, x,y: REAL, rel: BOOLEAN];
DrawTo: PROC[self: Context, x,y: REAL, rel: BOOLEAN];
DrawStroke: PROC[self: Context, path: Path, width: REAL,
  closed: BOOLEAN, ends: GraphicsBasic.StrokeEnds];
DrawArea: PROC[self: Context, path: Path, parityFill: BOOLEAN];
DrawBox: PROC[self: Context, box: Box];
DrawImage: PROC[self: Context, image: ImageRef, raw: BOOLEAN];
Translate: PROC[self: Context, tx,ty: REAL, round: BOOLEAN];
Concat: PROC[self: Context, m11,m12,m21,m22: REAL];
WorldToUser: PROC[self: Context, wx,wy: REAL] RETURNS[x,y: REAL];
UserToWorld: PROC[self: Context, x,y: REAL] RETURNS[wx,wy: REAL];
SetColor: PROC[self: Context, color: Color];
GetColor: PROC[self: Context] RETURNS[Color];
SetPaintMode: PROC[self: Context, mode: PaintMode] RETURNS[PaintMode];
SetFat: PROC[self: Context, fat: BOOLEAN] RETURNS[BOOLEAN];
GetDefaultFont: PROC[self: Context] RETURNS[FontRef];
SetDefaultFont: PROC[self: Context, font: FontRef];
DrawChars: PROC[self: Context, font: FontRef, map: PROC[PROC[CHAR] RETURNS[BOOL]]];
ClipArea: PROC[self: Context, path: Path, parityFill: BOOLEAN, exclude: BOOLEAN];
ClipBox: PROC[self: Context, box: Box, exclude: BOOLEAN];
IsPointVisible: PROC[self: Context, x,y: REAL] RETURNS[BOOLEAN];
IsRectangular: PROC[self: Context] RETURNS[BOOLEAN];
GetBounds: PROC[self: Context] RETURNS[Box];
Visible: PROC[self: Context] RETURNS[BOOLEAN];
Save: PROC[self: Context] RETURNS[Mark];
Restore: PROC[self: Context, mark: Mark];
DrawBits: UNSAFE PROC[self: Context, base: LONG POINTER, raster: CARDINAL,
  bitsPerPixel: [0..16), x, y, w, h: CARDINAL, xorigin, yorigin: INTEGER];
UserToDevice: PROC[self: Context, x, y: REAL, rel: BOOLEAN] RETURNS[tx, ty: REAL];
DeviceToUser: PROC[self: Context, tx, ty: REAL, rel: BOOLEAN] RETURNS[x, y: REAL];
GetYMode: PROC[self: Context] RETURNS[YMode];
SetYMode: PROC[self: Context, mode: YMode];
DrawTexturedBox: PROC[self: Context, box: Box, texture: ARRAY [0..16) OF WORD];
Disable: PROC[self: Context];
MoveDeviceRectangle: PROC[self: Context, width, height, fromX, fromY, toX, toY: NAT];

}.