blob: 7ff66ce8bbee334b93708b9303c9597eef90389d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
Cvsimages: module {
PATH: con "/dis/lib/cvsimages.dis";
init: fn();
Cvsimage: adt {
new: fn(win: ref Tk->Toplevel, w: string): ref Cvsimage;
fix: fn(ci: self ref Cvsimage);
config: fn(ci: self ref Cvsimage): int;
image: ref Draw->Image;
win: ref Tk->Toplevel;
w: string;
r: Draw->Rect;
};
};
|
