DIRECTORY
ViewerClasses USING [Viewer],
Graphics USING[Context];

GriffinViewer: DEFINITIONS = {

GetViewer: PROC RETURNS [ViewerClasses.Viewer];
PaintProc: TYPE = PROC[dc: Graphics.Context];
ProcRec: TYPE = RECORD[proc: PaintProc];
DoPaint: PROC [proc: PaintProc];


}.