fixed over-handeling variables

hugodecasta · Feb 20, 2020 · 70041f9 · 70041f9
1 parent 1e54863
commit 70041f9
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 1 deletion.
diff --git a/index.js b/index.js
@@ -133,7 +133,7 @@ function handle(statement) {
         if(!(statement in base)) {
             throw 'Base exception: "'+statement+'" not found'
         }
-        return handle(base[statement])
+        return base[statement]
     } else if (typeof statement === 'object') {
         let meth = statement[0]
         let inner_args = statement.slice(1)

diff --git a/test.js b/test.js
@@ -39,6 +39,10 @@ test('list define', t => {
     t.deepEqual(scheme("(define tot '(+ a b))"), ['+','a','b'])
 })
 
+test('list read', t => {
+    t.deepEqual(scheme("tot"), ['+','a','b'])
+})
+
 test('list eval', t => {
     t.is(scheme("(define a 5)"), 5)
     t.is(scheme("(define b 4)"), 4)