aboutsummaryrefslogtreecommitdiff
path: root/cs/step6_file.cs
diff options
context:
space:
mode:
authorJoel Martin <github@martintribe.org>2014-04-23 21:59:50 -0500
committerJoel Martin <github@martintribe.org>2014-04-23 21:59:50 -0500
commit6301e0b6374cecc5599665be14d6ddc6a31ce1e8 (patch)
treedbf1dc2ff6c682fd87c72a7907e7f6e59c8d4c03 /cs/step6_file.cs
parent89bd4de1e2704c1bc562788b2c5e4fc08b71a538 (diff)
downloadmal-6301e0b6374cecc5599665be14d6ddc6a31ce1e8.tar.gz
mal-6301e0b6374cecc5599665be14d6ddc6a31ce1e8.zip
All: TCO let* and quasiquote.
Diffstat (limited to 'cs/step6_file.cs')
-rw-r--r--cs/step6_file.cs4
1 files changed, 3 insertions, 1 deletions
diff --git a/cs/step6_file.cs b/cs/step6_file.cs
index db1a7b2..7e3bf7e 100644
--- a/cs/step6_file.cs
+++ b/cs/step6_file.cs
@@ -82,7 +82,9 @@ namespace Mal {
val = ((MalList)a1)[i+1];
let_env.set(key.getName(), EVAL(val, let_env));
}
- return EVAL(a2, let_env);
+ orig_ast = a2;
+ env = let_env;
+ break;
case "do":
eval_ast(ast.slice(1, ast.size()-1), env);
orig_ast = ast[ast.size()-1];