diff options
| author | Dana Jansens <danakj@orodu.net> | 2003-05-24 07:29:40 +0000 |
|---|---|---|
| committer | Dana Jansens <danakj@orodu.net> | 2003-05-24 07:29:40 +0000 |
| commit | d61b48a2ef2c315818a322ae84385228f4438dd3 (patch) | |
| tree | 3821969a827f1e323500993036e427f361e308ae /obcl/obcl.c | |
| parent | b1fe0dbbc2ef4472ac8893d9b3b20e9cb149af6d (diff) | |
remove obcl. shrimpx may work on this in the future but we are not usnig it now.
Diffstat (limited to 'obcl/obcl.c')
| -rw-r--r-- | obcl/obcl.c | 84 |
1 files changed, 0 insertions, 84 deletions
diff --git a/obcl/obcl.c b/obcl/obcl.c deleted file mode 100644 index 408a67ce..00000000 --- a/obcl/obcl.c +++ /dev/null @@ -1,84 +0,0 @@ -#include "obcl.h" - -void cl_tree_free(GList *tree) -{ - CLNode *tmp; - - if (!tree) return; - - for (; tree; tree = tree->next) { - tmp = (CLNode*)tree->data; - switch(tmp->type) { - case CL_ID: - case CL_STR: - g_free(tmp->u.str); - break; - case CL_LIST: - case CL_BLOCK: - case CL_LISTBLOCK: - g_free(tmp->u.lb.id); - cl_tree_free(tmp->u.lb.list); - cl_tree_free(tmp->u.lb.block); - break; - default: - break; - } - g_free(tmp); - } - g_list_free(tree); -} - -GList *cl_parse(gchar *file) -{ - FILE *fh = fopen(file, "r"); - GList *ret = NULL; - - if (fh) { - ret = cl_parse_fh(fh); - fclose(fh); - } else { - perror(file); - } - - return ret; -} - -void cl_tree_print(GList *tree, int depth) -{ - CLNode *tmp; - int tmpd = depth; - - for (; tree; tree = tree->next) { - tmp = (CLNode*)tree->data; - - while (tmpd-- > 0) - printf(" "); - tmpd = depth; - - switch(tmp->type) { - case CL_ID: - printf("[ID] '%s'\n", tmp->u.str); - break; - case CL_STR: - printf("[STR] '%s'\n", tmp->u.str); - break; - case CL_NUM: - printf("[NUM] %.2f\n", tmp->u.num); - break; - case CL_LIST: - printf("[LIST] '%s'\n", tmp->u.lb.id); - cl_tree_print(tmp->u.lb.list, depth+2); - break; - case CL_BLOCK: - printf("[BLOCK] '%s'\n", tmp->u.lb.id); - cl_tree_print(tmp->u.lb.block, depth+2); - break; - case CL_LISTBLOCK: - printf("[LISTBLOCK] %s\n", tmp->u.lb.id); - cl_tree_print(tmp->u.lb.list, depth+2); - printf("\n"); - cl_tree_print(tmp->u.lb.block, depth+2); - break; - } - } -} |
