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 |