1 files changed, 14 insertions, 0 deletions
diff --git a/top/core-init.scm b/top/core-init.scm
new file mode 100644
index 0000000..7ba9fa1
--- /dev/null
+++ b/top/core-init.scm
@@ -0,0 +1,14 @@
+
+
+(define *core-symbols* '())
+(define *prelude-core-symbols* '())
+
+; expands into lots of (define *core-??* '())
+
+(define-core-variables)
+
+(define (init-core-symbols)
+  (setf *core-symbols* (make-table))
+  (setf *prelude-core-symbols* (make-table))
+  (create-core-globals))
+