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: Thu Feb 15 14:43:27 GMT 2007 |