kotovalexarian-likes-github/ruby--ruby
1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00
Code Releases Activity

* lib/optparse.rb (OptionParser#order, #permute, #parse): allow an

Browse source 
array as argument.

* test/ruby/test_*.rb: moved invariants to left side in
  assert_equal, and use assert_nil, assert_raises and so on.


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@4516 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
nobu 2003-09-05 15:15:43 +00:00
parent 01e3a55648
commit 44785befea
32 changed files with 789 additions and 803 deletions
Download patch file Download diff file Expand all files Collapse all files

68
test/ruby/test_eval.rb
View file

@ -13,35 +13,35 @@ class TestEval < Test::Unit::TestCase
end
def test_eval
assert_equal(eval(""), nil)
assert_nil(eval(""))
$bad=false
eval 'while false; $bad = true; print "foo\n" end'
assert(!$bad)
assert(eval('TRUE'))
assert(eval('true'))
assert(!eval('NIL'))
assert(!eval('nil'))
assert(!eval('FALSE'))
assert(!eval('false'))
$foo = 'assert(true)'
begin
eval $foo
rescue
assert(false)
end
assert_equal(eval("$foo"), 'assert(true)')
assert_equal(eval("true"), true)
assert_equal('assert(true)', eval("$foo"))
assert_equal(true, eval("true"))
i = 5
assert(eval("i == 5"))
assert_equal(eval("i"), 5)
assert_equal(5, eval("i"))
assert(eval("defined? i"))
$x = test_ev
assert_equal(eval("local1", $x), "local1") # normal local var
assert_equal(eval("local2", $x), "local2") # nested local var
assert_equal("local1", eval("local1", $x)) # normal local var
assert_equal("local2", eval("local2", $x)) # nested local var
$bad = true
begin
p eval("local1")
@ -49,7 +49,7 @@ class TestEval < Test::Unit::TestCase
$bad = false
end
assert(!$bad)
# !! use class_eval to avoid nested definition
self.class.class_eval %q(
module EvTest
@ -58,8 +58,8 @@ class TestEval < Test::Unit::TestCase
$x = binding
end
)
assert_equal(eval("EVTEST1", $x), 25) # constant in module
assert_equal(eval("evtest2", $x), 125) # local var in module
assert_equal(25, eval("EVTEST1", $x)) # constant in module
assert_equal(125, eval("evtest2", $x)) # local var in module
$bad = true
begin
eval("EVTEST1")
@ -67,58 +67,58 @@ class TestEval < Test::Unit::TestCase
$bad = false
end
assert(!$bad)
x = proc{}
eval "i4 = 1", x
assert_equal(eval("i4", x), 1)
assert_equal(1, eval("i4", x))
x = proc{proc{}}.call
eval "i4 = 22", x
assert_equal(eval("i4", x), 22)
assert_equal(22, eval("i4", x))
$x = []
x = proc{proc{}}.call
eval "(0..9).each{|i5| $x[i5] = proc{i5*2}}", x
assert_equal($x[4].call, 8)
assert_equal(8, $x[4].call)
x = binding
eval "i = 1", x
assert_equal(eval("i", x), 1)
assert_equal(1, eval("i", x))
x = proc{binding}.call
eval "i = 22", x
assert_equal(eval("i", x), 22)
assert_equal(22, eval("i", x))
$x = []
x = proc{binding}.call
eval "(0..9).each{|i5| $x[i5] = proc{i5*2}}", x
assert_equal($x[4].call, 8)
assert_equal(8, $x[4].call)
x = proc{binding}.call
eval "for i6 in 1..1; j6=i6; end", x
assert(eval("defined? i6", x))
assert(eval("defined? j6", x))
proc {
p = binding
eval "foo11 = 1", p
foo22 = 5
proc{foo11=22}.call
proc{foo22=55}.call
assert_equal(eval("foo11", p), eval("foo11"))
assert_equal(eval("foo11"), 1)
assert_equal(eval("foo22", p), eval("foo22"))
assert_equal(eval("foo22"), 55)
assert_equal(eval("foo11"), eval("foo11", p))
assert_equal(1, eval("foo11"))
assert_equal(eval("foo22"), eval("foo22", p))
assert_equal(55, eval("foo22"))
}.call
p1 = proc{i7 = 0; proc{i7}}.call
assert_equal(p1.call, 0)
assert_equal(0, p1.call)
eval "i7=5", p1
assert_equal(p1.call, 5)
assert_equal(5, p1.call)
assert(!defined?(i7))
p1 = proc{i7 = 0; proc{i7}}.call
i7 = nil
assert_equal(p1.call, 0)
assert_equal(0, p1.call)
eval "i7=1", p1
assert_equal(p1.call, 1)
assert_equal(1, p1.call)
eval "i7=5", p1
assert_equal(p1.call, 5)
assert_equal(i7, nil)
assert_equal(5, p1.call)
assert_nil(i7)
end
end