code: 9ferno

ref: 8eca9474c47d3898aa44e8e1879eda8a77fa6194
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;
	};
};