-- GraphicsControl.mesa -- Last changed by Doug Wyatt, September 22, 1980 11:54 AM DIRECTORY Real USING [InitReals], Memory USING [MemoryImpl], Cubic USING [CubicImpl], Mapper USING [MapperImpl], Poly USING [PolyImpl], Boxer USING [BoxerImpl], Pipe USING [PipeImpl], Reducer USING [ReducerImpl], AreaPath USING [AreaPathImpl], Edge USING [EdgeImpl], Patch USING [PatchImpl], Clipper USING [ClipperImpl], Font USING [FontImpl], AltoFont USING [AltoFontImpl], Blt USING [BltImpl], AltoDevice USING [AltoDeviceImpl, AltoScreenImpl], Graphics USING [GraphicsImpl]; GraphicsControl: PROGRAM IMPORTS Real,Memory,Cubic,Mapper,Poly, Boxer,Pipe,Reducer,AreaPath,Edge,Patch,Clipper, Font,AltoFont,Blt,AltoDevice,Graphics EXPORTS Graphics SHARES Graphics = { Real.InitReals[]; START Memory.MemoryImpl; START Cubic.CubicImpl; START Mapper.MapperImpl; START Poly.PolyImpl; START Boxer.BoxerImpl; START Pipe.PipeImpl; START Reducer.ReducerImpl; START AreaPath.AreaPathImpl; START Edge.EdgeImpl; START Patch.PatchImpl; START Clipper.ClipperImpl; START Font.FontImpl; START AltoFont.AltoFontImpl; START Blt.BltImpl; START AltoDevice.AltoScreenImpl; START AltoDevice.AltoDeviceImpl; START Graphics.GraphicsImpl; }.(670)