[macruby-changes] [1502] MacRuby/branches/experimental/test_vm/block.rb

source_changes at macosforge.org source_changes at macosforge.org
Tue Apr 28 18:11:30 PDT 2009


Revision: 1502
          http://trac.macosforge.org/projects/ruby/changeset/1502
Author:   vincent.isambart at gmail.com
Date:     2009-04-28 18:11:29 -0700 (Tue, 28 Apr 2009)
Log Message:
-----------
added a few block/proc 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-04-28 22:53:43 UTC (rev 1501)
+++ MacRuby/branches/experimental/test_vm/block.rb	2009-04-29 01:11:29 UTC (rev 1502)
@@ -180,5 +180,53 @@
   f(1, true)
 }
 
+assert "42", %{
+  def f()
+    a = nil
+    1.times do
+      x = 42
+      a = proc { x }
+    end
+    a
+  end
+  p f.call
+}
+
+assert "42", %{
+  def f()
+    x = 42
+    a = nil
+    1.times do
+      a = proc { x }
+    end
+    a
+  end
+  p f.call
+}
+
+assert "42", %{
+  def f()
+    a = nil
+    b = proc do
+      x = 42
+      a = proc { x }
+    end
+    b.call
+  end
+  p f.call
+}
+
+assert "42", %{
+  def f()
+    x = 42
+    a = nil
+    b = proc do
+      a = proc { x }
+    end
+    b.call
+  end
+  p f.call
+}
+
 # Enumerator 
 assert "[\"f\", \"o\", \"o\"]", "p 'foo'.chars.to_a"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macruby-changes/attachments/20090428/70f1fa84/attachment.html>


More information about the macruby-changes mailing list