-- TJaMGraphics.mesa -- Last edit by Paxton, July 13, 1982 2:31 pm -- almost identical to JaMGraphics interface except takes frame arg to tell which viewer -- Last Edited by: Stone, February 1, 1984 11:56:22 am PST DIRECTORY JaM USING [State], ViewerClasses USING [Viewer], Graphics USING [Context]; TJaMGraphics: CEDAR DEFINITIONS = { State: TYPE = JaM.State; Create: PROC [ frame: State, typescript: ViewerClasses.Viewer, iconic: BOOLEAN _ FALSE] RETURNS [viewer: ViewerClasses.Viewer]; ViewerMouse: PROCEDURE[frame: State, click: BOOLEAN] RETURNS[x,y: INTEGER]; RealViewerMouse: PROCEDURE[frame: State, click: BOOLEAN] RETURNS[x,y: REAL]; Painter: PROCEDURE[proc: PROC [Graphics.Context], frame: State]; NotImplemented: SIGNAL; }. Ê™˜Jš;ÏcCœYÏiœ žœÏk œŸœŸœŸœŸœ ŸœÏnœŸœ=ŸœŸœŸœ"  œŸ œŸœŸœŸœ œŸ œŸœŸœŸœ œŸ œŸœ$ œŸœ˜ò—…—ô“