* cont.c: fix bug around Continuation and Fiber.

* test/ruby/test_continuation.rb: add tests for Continuation.



git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@12401 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 31 insertions, 0 deletions

diff --git a/test/ruby/test_continuation.rb b/test/ruby/test_continuation.rb
new file mode 100644
index 0000000000..d5c9c32e4b
--- /dev/null
+++ b/test/ruby/test_continuation.rb
@@ -0,0 +1,31 @@
+require 'test/unit'
+
+class TestContinuation < Test::Unit::TestCase
+  def test_create
+    assert_equal(:ok, callcc{:ok})
+    assert_equal(:ok, callcc{|c| c.call :ok})
+  end
+
+  def test_call
+    assert_equal(:ok, callcc{|c| c.call :ok})
+
+    ary = []
+    ary << callcc{|c|
+      @cont = c
+      :a
+    }
+    @cont.call :b if ary.length < 3
+    assert_equal([:a, :b, :b], ary)
+  end
+
+  def test_error
+    cont = callcc{|c| c}
+    assert_raise(RuntimeError){
+      Thread.new{cont.call}.join
+    }
+    assert_raise(LocalJumpError){
+      callcc
+    }
+  end
+end
+