[Cyan]<PreISLCedar>JaMImager>JaMImager.mesa!1

JaMImager.mesa

Last edit by Stone, January 23, 1984 1:35:07 pm PST

DIRECTORY

JaM USING [State],

ViewerClasses USING [Viewer],

Imager USING [Context];

JaMImager: CEDAR DEFINITIONS = {

State: TYPE = JaM.State;

Create: PROC [state: State, typescript: ViewerClasses.Viewer, iconic: BOOLEAN ← FALSE]

RETURNS [viewer: ViewerClasses.Viewer];

Painter: PROCEDURE[proc: PROC [Imager.Context], state: State];

NotImplemented: SIGNAL;