code: 9ferno

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