code: 9ferno

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