Revision: 1933 http://trac.macosforge.org/projects/ruby/changeset/1933 Author: vincent.isambart@gmail.com Date: 2009-06-26 05:56:34 -0700 (Fri, 26 Jun 2009) Log Message: ----------- added failing tests Modified Paths: -------------- MacRuby/branches/experimental/test_vm/block.rb Modified: MacRuby/branches/experimental/test_vm/block.rb =================================================================== --- MacRuby/branches/experimental/test_vm/block.rb 2009-06-26 12:26:00 UTC (rev 1932) +++ MacRuby/branches/experimental/test_vm/block.rb 2009-06-26 12:56:34 UTC (rev 1933) @@ -537,3 +537,33 @@ b = proc { |x| if x then p x else b.call(42) end } b.call(nil) } + +assert '42', %{ + b = nil + 1.times { + x = 42 + b = proc { p x } + } + x = 1 + b.call +} + +assert "42\n42", %{ + a = b = c = nil + 1.times { + 1.times { + x = 42 + 1.times { + 1.times { + c = proc { + a = proc { p x } + b = proc { p x } + } + } + c.call + } + } + } + b.call + a.call +}