X-Git-Url: https://git.dogcows.com/gitweb?a=blobdiff_plain;f=obcl%2Fprocess.c;fp=obcl%2Fprocess.c;h=0000000000000000000000000000000000000000;hb=d61b48a2ef2c315818a322ae84385228f4438dd3;hp=eb7cafd2ac3b8480addb1bee8e2c55e99a9ffc83;hpb=b1fe0dbbc2ef4472ac8893d9b3b20e9cb149af6d;p=chaz%2Fopenbox

diff --git a/obcl/process.c b/obcl/process.c
deleted file mode 100644
index eb7cafd2..00000000
--- a/obcl/process.c
+++ /dev/null
@@ -1,115 +0,0 @@
-#include "obcl.h"
-
-static void cl_proc_intern_handler(CLNode *node)
-{
-    CL_ASSERT_NODE(node);
-    g_warning("Unhandled node %s on line %d\n",
-              CL_ID(node), CL_LINE(node));
-}
-
-static CLProcHandler *default_handler(void)
-{
-    static CLProcHandler *ph = 0;
-    if (!ph)
-        ph = cl_proc_handler_new_func(cl_proc_intern_handler);
-    return ph;
-}
-
-CLProcHandler *cl_proc_handler_new_func(CLProcFunc f)
-{
-    CLProcHandler *cph = g_new(CLProcHandler,1);
-    cph->type = CLPROC_FUNC;
-    cph->u.func = f;
-    return cph;
-}
-
-CLProcHandler *cl_proc_handler_new_proc(CLProc *cp)
-{
-    CLProcHandler *cph = g_new(CLProcHandler,1);
-    cph->type = CLPROC_PROC;
-    cph->u.proc = cp;
-    return cph;
-}
-
-CLProc *cl_proc_new(void)
-{
-    CLProc *ret = g_new(CLProc,1);
-    ret->table = g_hash_table_new(g_str_hash,g_str_equal);
-    ret->default_h = default_handler();
-    return ret;
-}
-
-void cl_proc_free(CLProc *proc)
-{
-
-}
-
-void cl_proc_add_handler(CLProc *proc, gchar *str,
-                         CLProcHandler *handler)
-{
-    g_assert(proc != NULL);
-    g_hash_table_replace(proc->table, str, handler);
-}
-
-void cl_proc_add_handler_func(CLProc *proc, gchar *str,
-                              CLProcFunc func)
-{
-    CLProcHandler *ph;
-
-    g_assert(proc != NULL);
-    ph = cl_proc_handler_new_func(func);
-    cl_proc_add_handler(proc, str, ph);
-}
-
-void cl_proc_add_handler_proc(CLProc *proc, gchar *str,
-                              CLProc *hproc)
-{
-    CLProcHandler *ph;
-
-    g_assert(proc != NULL);
-    ph = cl_proc_handler_new_proc(hproc);
-    cl_proc_add_handler(proc, str, ph);
-}
-
-void cl_proc_set_default(CLProc *proc, CLProcHandler *ph)
-{
-    g_assert(proc != NULL);
-    proc->default_h = ph;
-}
-
-void cl_proc_register_keywords(CLProc *proc, ...)
-{
-    va_list args;
-    g_assert(proc != NULL);
-
-    va_start(args,proc);
-    for (;;) {
-        gchar *k = va_arg(args, gchar*);
-        if (k == NULL)
-            break;
-        if (g_hash_table_lookup(proc->table, k) != NULL)
-            g_hash_table_insert(proc->table, k, default_handler());
-    }
-    va_end(args);
-}
-
-void cl_process(GList *tree, CLProc *proc)
-{
-    GList *lst;
-    CLProcHandler *handler;
-
-    g_assert(proc != NULL);
-
-    if (!tree) return;
-
-    for (lst = tree; lst != NULL; lst = lst->next) {
-        CL_ASSERT_NODE(lst->data);
-        handler = g_hash_table_lookup(proc->table, CL_ID(lst->data));
-        if (!handler)
-            handler = default_handler();
-        if (handler->type == CLPROC_FUNC)
-            handler->u.func(CL_NODE(lst->data));
-        else
-            cl_process(CL_BLOCK(lst->data), handler->u.proc);
-    }
-}