From 46439007cf417cbd9ac8049bb4122c890097a0fa Mon Sep 17 00:00:00 2001
From: "Charles.Forsyth" <devnull@localhost>
Date: Fri, 22 Dec 2006 20:52:35 +0000
Subject: 20060303-partial

---
 module/brutusext.m | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 module/brutusext.m

(limited to 'module/brutusext.m')

diff --git a/module/brutusext.m b/module/brutusext.m
new file mode 100644
index 00000000..95c2d2ef
--- /dev/null
+++ b/module/brutusext.m
@@ -0,0 +1,24 @@
+Brutusext: module
+{
+	# More tags, needed by Cook
+	SGML, Text, Par, Extension, Float, Special: con Brutus->NTAG + iota;
+
+	# Output formats
+	FLatex, FLatexProc, FLatexBook, FLatexPart, FLatexSlides, FLatexPaper, FHtml: con iota;
+
+	# Cook element
+	Celem: adt
+	{
+		tag: int;
+		s: string;
+		contents: cyclic ref Celem;
+		parent: cyclic ref Celem;
+		next: cyclic ref Celem;
+		prev: cyclic ref Celem;
+	};
+
+
+	init:	fn(sys: Sys, draw: Draw, bufio: Bufio, tk: Tk, tkclient: Tkclient);
+	create:	fn(parent: string, t: ref Tk->Toplevel, name, args: string): string;
+	cook:	fn(parent: string, fmt: int, args: string) : (ref Celem, string);
+};
-- 
cgit v1.2.3