From f9747b7a571556b6b8add7cfd4e324ad316d50b3 Mon Sep 17 00:00:00 2001
From: matz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 19 Jun 1998 09:32:13 +0000
Subject: 1.1b9_27

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/v1_1r@246 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 sample/test.rb | 22 +++++++++++++++++-----
 1 file changed, 17 insertions(+), 5 deletions(-)

(limited to 'sample/test.rb')

diff --git a/sample/test.rb b/sample/test.rb
index eccbf23382..d8926c6c29 100644
--- a/sample/test.rb
+++ b/sample/test.rb
@@ -749,11 +749,23 @@ x = proc{proc{}}.call
 eval "(0..9).each{|i4| $x[i4] = proc{i4*2}}", x
 ok($x[4].call == 8)
 
+x = binding
+eval "i = 1", x
+ok(eval("i", x) == 1)
+x = proc{binding}.call
+eval "i = 22", x
+ok(eval("i", x) == 22)
+$x = []
+x = proc{binding}.call
+eval "(0..9).each{|i4| $x[i4] = proc{i4*2}}", x
+ok($x[4].call == 8)
+
 proc {
-  p = proc{}
-  foo = 1
-  eval "foo = 10", p
-  ok(eval("foo", p) == eval("foo"))
+  p = binding
+  eval "foo11 = 1", p
+  proc{foo11=22}.call
+  ok(eval("foo11", p) == eval("foo11"))
+  ok(eval("foo11") == 1)
 }.call
 
 check "system"
@@ -808,7 +820,7 @@ File.unlink "script_tmp.bak" or `/bin/rm -f "script_tmp.bak"`
 
 $bad = false
 for script in Dir["{lib,sample}/*.rb"]
-  unless `./ruby -c #{script}` == "Syntax OK\n"
+  unless `./ruby -c #{script}`.chomp == "Syntax OK"
     $bad = true
   end
 end
-- 
cgit v1.2.3