Ok, I think this is a correct? skeleton, implemented as much as I did yesterday

2021-08-10 22:56:12 -04:00
parent e1fa65deaf
commit 95b37da44e
3 changed files with 79 additions and 41 deletions
--- a/partial_eval_test.kp
+++ b/partial_eval_test.kp
@@ -4,7 +4,9 @@
                    _ (println "Code: " code)
                    partially_evaled (partial_eval code)
                    _ (println "Partially evaled: " partially_evaled)
-                    fully_evaled (eval (val partially_evaled))
+                    stripped (strip partially_evaled)
+                    _ (println "Stripped: " stripped)
+                    fully_evaled (eval stripped)
                    _ (println "Fully evaled: " fully_evaled)
                    _ (println)
              ) fully_evaled))