code: 9ferno

ref: 0ee70192a6748cb9adf572ac584ca7dd417cf1ef
dir: /module/cvsimages.m/

View raw version 
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;
	};
};