start implementing mark&sweep

1 files changed, 13 insertions, 1 deletions

diff --git a/lisp.h b/lisp.h
index a747b8d..c857b02 100644
--- a/lisp.h
+++ b/lisp.h
@@ -3,6 +3,7 @@
 
 typedef struct value value;
 typedef struct env env;
+typedef struct reg reg;
 
 // environments, TODO: make this use hashtable
 // symbol->val
@@ -16,7 +17,6 @@ typedef struct env {
 env *env_create(env *parent);
 env *env_define(env *e, const char *sym, value *val);
 value *env_lookup(env *e, const char *sym);
-
 extern env *global_env;
 
 value *eval_pair(env *e, value *val);
@@ -25,4 +25,16 @@ value *apply(value *lambda, value *args);
 
 value *procedure_load_module(env *e, value *args);
 
+typedef struct reg {
+	value *value;
+	reg *next;
+} reg;
+
+reg *reg_add(value *val);
+void free_value(reg *r);
+extern reg *global_reg;
+int mark_env(env *e);
+int mark_val(value *v);
+int sweep();
+
 #endif