include "draw.m";
draw := load Draw Draw->PATH;
Screen: adt
{
id: int;
image: ref Image;
fill: ref Image;
display: ref Display;
allocate: fn(image, fill: ref Image, public: int): ref Screen;
newwindow: fn(screen: self ref Screen, r: Rect,
backing:int, rgba: int): ref Image;
top: fn(screen: self ref Screen, wins: array of ref Image);
};
| DRAW-SCREEN(2) | Rev: Wed Aug 21 19:56:39 GMT 2002 |