From 283370015d283379cac13043e2cd0714ea028aba Mon Sep 17 00:00:00 2001
From: Danny Yoo <dyoo@cs.wpi.edu>
Date: Mon, 7 Mar 2011 16:56:10 -0500
Subject: [PATCH] need test to make sure we're doing variable capture.

---
 simulator.rkt | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/simulator.rkt b/simulator.rkt
index 2425d85..3d0db9c 100644
--- a/simulator.rkt
+++ b/simulator.rkt
@@ -193,7 +193,9 @@
                     (error 'get-copmiled-procedure-entry)]))]
 
           [(MakeCompiledProcedure? op)
-           m]
+           (target-updater m (make-closure (MakeCompiledProcedure-label op)
+                                           (list)))]
+
           [(ApplyPrimitiveProcedure? op)
            m]
           [(LookupLexicalAddress? op)