From 54579d8ad4281ae3adee04bab38e31f048a1b52b Mon Sep 17 00:00:00 2001 From: "Mirar (Pontus Hagland)" <pike@sort.mirar.org> Date: Sat, 6 Dec 1997 23:15:08 +0100 Subject: [PATCH] foo Rev: tutorial/man.pike:1.2(DEAD) --- tutorial/man.pike | 27 --------------------------- 1 file changed, 27 deletions(-) delete mode 100644 tutorial/man.pike diff --git a/tutorial/man.pike b/tutorial/man.pike deleted file mode 100644 index 8e9cc7d20f..0000000000 --- a/tutorial/man.pike +++ /dev/null @@ -1,27 +0,0 @@ -#include "types.h" -inherit Stdio.File : out; - -void make_pages(string base, SGML data, string ind); - -void make_page(string base, TAG tag, string ind, string fbase) -{ - ind=""; - werror(ind+tag->tag+" "+tag->params->name+"\n"); - make_pages(base,tag->data,ind+" "); -} - -void make_pages(string base, SGML data, string ind, string fbase) -{ - if (arrayp(data)) - foreach (data, TAG tag) - if (objectp(tag)) - if ((<"method","function","class","module">)[tag->tag]) - make_page(base,tag,ind); - else - make_pages(base,tag->data,ind+" "); -} - -void output(string base, WMML data) -{ - make_pages(base,data->data,"",""); -} -- GitLab