diff --git a/compiler/compiler.rkt b/compiler/compiler.rkt
index 8504a64..3d7fcac 100644
--- a/compiler/compiler.rkt
+++ b/compiler/compiler.rkt
@@ -771,7 +771,7 @@
 ;; Closures will target their value to the 'val register, and use return linkage.
 (define (compile-lambda-body exp cenv)
   (parameterize ([current-lambda-being-compiled exp])
-    (define all-applications (collect-lam-applications exp cenv))
+    ;; (define all-applications (collect-lam-applications exp cenv))
     
     (let: ([maybe-unsplice-rest-argument : InstructionSequence
                                          (if (Lam-rest? exp)
diff --git a/version.rkt b/version.rkt
index 16e71e3..28b610e 100644
--- a/version.rkt
+++ b/version.rkt
@@ -7,4 +7,4 @@
 (provide version)
 (: version String)
 
-(define version "1.229")
+(define version "1.231")