summaryrefslogtreecommitdiff
path: root/sample
diff options
context:
space:
mode:
authormatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>1998-06-19 09:32:13 +0000
committermatz <matz@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>1998-06-19 09:32:13 +0000
commitf9747b7a571556b6b8add7cfd4e324ad316d50b3 (patch)
tree3971f82312c9b748dcf763fd24e91489657fb36c /sample
parent992923053cfb51dc04c6a7ee07ca6fff1b61d1a5 (diff)
1.1b9_27
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/v1_1r@246 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'sample')
-rw-r--r--sample/test.rb22
1 files changed, 17 insertions, 5 deletions
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