code: 9ferno

ref: 44ce0097b612a1fefd754065bdf8d9d2e5ef60c8
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;
	};
};