diff options
author | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-06-06 18:30:14 +0000 |
---|---|---|
committer | ko1 <ko1@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2007-06-06 18:30:14 +0000 |
commit | 6d2dee14f3d5d4224effd0ec2d8fbc07dc54cbac (patch) | |
tree | 878aeb1d2747c235977b20e13ebb79bcf94991f0 | |
parent | d80e7373cfb0ca1558bdeb79643c53db5f9ce4d8 (diff) | |
download | ruby-6d2dee14f3d5d4224effd0ec2d8fbc07dc54cbac.tar.gz |
* test_fiber.rb: add a test (Continuation and Fiber).
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12455 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 4 | ||||
-rw-r--r-- | test/ruby/test_fiber.rb | 16 |
2 files changed, 20 insertions, 0 deletions
@@ -1,3 +1,7 @@ +Thu Jun 7 03:29:18 2007 Koichi Sasada <ko1@atdot.net> + + * test_fiber.rb: add a test (Continuation and Fiber). + Thu Jun 7 03:17:24 2007 Koichi Sasada <ko1@atdot.net> * cont.c (cont_new): add debug message. diff --git a/test/ruby/test_fiber.rb b/test/ruby/test_fiber.rb index 44caba4520..c99e302b19 100644 --- a/test/ruby/test_fiber.rb +++ b/test/ruby/test_fiber.rb @@ -102,5 +102,21 @@ class TestFiber < Test::Unit::TestCase end.yield } end + + def test_with_callcc + c = nil + f1 = f2 = nil + f1 = Fiber.new do + callcc do |c2| + c = c2 + f2.yield + end + :ok + end + f2 = Fiber.new do + c.call + end + assert_equal(f1.yield, :ok) + end end |