From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001 From: "Charles.Forsyth" Date: Fri, 22 Dec 2006 20:52:35 +0000 Subject: 20060303-partial --- module/tabs.m | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 module/tabs.m (limited to 'module/tabs.m') diff --git a/module/tabs.m b/module/tabs.m new file mode 100644 index 00000000..c1b66fe1 --- /dev/null +++ b/module/tabs.m @@ -0,0 +1,16 @@ +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; +}; -- cgit v1.2.3