Copyright (C) 1994, Digital Equipment Corp.
UNSAFE INTERFACE XPicture;
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.