1 files changed, 0 insertions, 58 deletions
diff --git a/src/variable.c b/src/variable.c
deleted file mode 100644
index b764c28..0000000
--- a/src/variable.c
+++ /dev/null
@@ -1,58 +0,0 @@
-#include "3cl.h"
-#include "variable.h"
-
-#include <stdbool.h>
-#include <stdlib.h>
-
-
-struct CCLVariable *ccl_variable_get(struct CCLVariable *vars, char name)
-{
-    for (struct CCLVariable *var = vars;;var = var->next)
-        if (var->name == name)
-            return var;
-        else if (var->name == '_' || var->next == NULL)
-            return NULL;
-}
-
-struct CCLVariable *ccl_variable_getany(struct CCL *ccl, struct CCLFrame *frame, char name)
-{
-    bool root = false;
-    struct CCLFrame *curframe;
-    struct CCLVariable *found;
-
-    for (curframe = frame; curframe->type != CCL_PROC && curframe->type != CCL_ROOT; curframe = curframe->prev);
-    if (curframe->type == CCL_ROOT)
-        root = true;
-
-    found = ccl_variable_get(&curframe->vars, name);
-    if (!found && !root)
-        return ccl_variable_get(&ccl->rootframe.vars, name);
-
-    return NULL;
-}
-
-struct CCLVariable *ccl_variable_set(struct CCLVariable *vars, char name, CCLNum value)
-{
-    struct CCLVariable *toset;
-    struct CCLVariable var = (struct CCLVariable)
-    {
-        .next = NULL,
-        .name = name,
-        .value = value,
-    };
-
-    if (vars->name == '_')
-    {
-        toset = vars;
-        var.prev = NULL;
-    } else
-    {
-        for (toset = vars; toset->next != NULL; toset = toset->next);
-        toset->next = (struct CCLVariable *)malloc(sizeof(*toset->next));
-        var.prev = toset;
-        toset = toset->next;
-    }
-
-    *toset = var;
-    return toset;
-}