include "draw.m"; draw:= load Draw Draw->PATH; Context: adt { screen: ref Screen; display: ref Display; cir: chan of int; ckbd: chan of int; cptr: chan of ref Pointer; ctoappl: chan of int; ctomux: chan of int; };
include "draw.m"; Command: module { init: fn(nil: ref Draw->Context; nil: list of string); };Most programs do not create Contexts but rather inherit one from their parent, typically a shell or window system.
screen
|
The Screen adt to which the application is connected; may be nil. See screen.
|
display
|
The Display adt to which the application is connected; may be nil. See display.
|
ir
|
for description of the cir channel.
|