code: purgatorio

ref: 2459e34d77e2e21ef829c0dfaafd99433899494f
dir: /module/tabs.m/

View raw version 
Tabs: module
{
	PATH:	con "/dis/lib/tabs.dis";

	init:	fn();

	mktabs:		fn(t: ref Tk->Toplevel, dot: string,
				tabs: array of (string, string),
				dflt: int): chan of string;

	tabsctl:	fn(t: ref Tk->Toplevel,
				dot: string,
				tabs: array of (string, string),
				id: int,
				s: string): int;
};