From 2bd98fbdb2427e16cebaae66c305f72da19a8bb7 Mon Sep 17 00:00:00 2001
From: Jon Rafkind <rafkind@racket-lang.org>
Date: Tue, 21 Apr 2009 23:49:34 +0000
Subject: [PATCH] fix one test, break another

svn: r14581
---
 collects/tests/honu/basic.honu | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/collects/tests/honu/basic.honu b/collects/tests/honu/basic.honu
index 90486092b1..e5a22358cd 100644
--- a/collects/tests/honu/basic.honu
+++ b/collects/tests/honu/basic.honu
@@ -29,12 +29,14 @@ obj test2(){
     obj x(){
       2;
     }
+    x;
   }
-
+ 
   (-> obj) x2(){
     obj x(){
       3;
     }
+    x;
   }
   
   /*
@@ -43,10 +45,12 @@ obj test2(){
   };
   */
 
-  var anonymous_foo = x2();
+  var anonymous_foo = x1();
+  var x2_x = x2();
 
   test("foo() = 1", foo(), 1);
   test("anonymous_foo = 2", anonymous_foo(), 2);
+  test("x2_x = 3", x2_x(), 3);
 }
 
 test1();