All: fix get. All pass stepA tests.

4 files changed, 4 insertions, 1 deletions

diff --git a/js/core.js b/js/core.js
index b8b0062..7addc49 100644
--- a/js/core.js
+++ b/js/core.js
@@ -51,7 +51,7 @@ function dissoc(src_hm) {
 }
 
 function get(hm, key) {
-    if (key in hm) {
+    if (hm != null && key in hm) {
         return hm[key];
     } else {
         return null;
diff --git a/js/step2_eval.js b/js/step2_eval.js
index f111a58..adcefe5 100644
--- a/js/step2_eval.js
+++ b/js/step2_eval.js
@@ -32,6 +32,7 @@ function eval_ast(ast, env) {
 }
 
 function _EVAL(ast, env) {
+    //printer.println("EVAL:", types._pr_str(ast, true));
     if (!types._list_Q(ast)) {
         return eval_ast(ast, env);
     }
diff --git a/js/step3_env.js b/js/step3_env.js
index 1000437..86981d2 100644
--- a/js/step3_env.js
+++ b/js/step3_env.js
@@ -33,6 +33,7 @@ function eval_ast(ast, env) {
 }
 
 function _EVAL(ast, env) {
+    //printer.println("EVAL:", types._pr_str(ast, true));
     if (!types._list_Q(ast)) {
         return eval_ast(ast, env);
     }
diff --git a/js/step4_if_fn_do.js b/js/step4_if_fn_do.js
index 0bf988d..a80190e 100644
--- a/js/step4_if_fn_do.js
+++ b/js/step4_if_fn_do.js
@@ -34,6 +34,7 @@ function eval_ast(ast, env) {
 }
 
 function _EVAL(ast, env) {
+    //printer.println("EVAL:", types._pr_str(ast, true));
     if (!types._list_Q(ast)) {
         return eval_ast(ast, env);
     }