[Cyan]<Imaging>Griffin>GriffinViewer.mesa!4

GriffinViewer.mesa

Last Edited by: Stone, July 7, 1985 4:43:29 pm PDT

DIRECTORY

ViewerClasses USING [Viewer],

PointDefs USING [ScrPt],

Imager USING[Context];

GriffinViewer: CEDAR DEFINITIONS = {

GetViewer: PROC RETURNS [ViewerClasses.Viewer];

PaintProc: TYPE = PROC[dc: Imager.Context];

ProcRec: TYPE = RECORD[proc: PaintProc];

DoPaint: PROC [proc: PaintProc];

ClipPointToViewer: PROC[pt: PointDefs.ScrPt] RETURNS[PointDefs.ScrPt];