From 8f6d5db797b9d522fdcbcb11203f497b9f45bda9 Mon Sep 17 00:00:00 2001
From: Justin Ethier <justin.ethier@gmail.com>
Date: Mon, 30 Mar 2015 22:19:32 -0400
Subject: [PATCH] Simple example to investigate closure improvements

---
 test.scm | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/test.scm b/test.scm
index 7be9a8a9..f32298f8 100644
--- a/test.scm
+++ b/test.scm
@@ -1,11 +1,15 @@
+((lambda (x)
+  ((lambda ()
+    ((lambda (z)
+      (+ x z)) 2)))) 1)
 ;;; Temporary testing, delete this once it works
 ; Need to rewrite the code to use this, and preserve the global def
-(define (test)
-  (call/cc
-    (lambda (return)
-      (return #t))))
-(write (test))
-
+;(define (test)
+;  (call/cc
+;    (lambda (return)
+;      (return #t))))
+;(write (test))
+;
 ;; (write
 ;;   (with-exception-handler
 ;;     (lambda (con)