UNSAFE INTERFACEXPicture ; IMPORT Completion, Ctypes, Picture, Point, Rect, TrestleComm, VBT, X; PROCEDURE MakeImage (st : VBT.ScreenType; width, height : Ctypes.int; xoffset : Ctypes.int := 0; bitmap_pad : Ctypes.int := 0; bytes_per_line: Ctypes.int := 0 ): Picture.ImageStar RAISES {Picture.ScreenTypeNotSupported, Picture.TrestleFail};
implements Picture.MakeImage
PROCEDURE MakeCompletion (picture: T): Completion.T;
used for PictureRep.MakeCompletion
TYPE T <: Public; Public = Picture.T OBJECT METHODS put ( dpy : X.DisplayStar; d : X.Drawable; gc : X.GC; READONLY clip : Rect.T; READONLY delta : Point.T; completion: Completion.T ) RAISES {TrestleComm.Failure}; (* this method is called by XPaint to put the picture on the actual screen. It returns when the it has finished with the image data. The caller is responsible for making sure the image data is protected *) END; PROCEDURE New (): T;
pictures got from this procedure will be returned to the free list when done with
END XPicture.