-- GriffinViewer.mesa -- Last Edited by: Stone, February 11, 1983 6:12 pm 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]; }.