code: purgatorio

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