From f0e8ffae8287ac4102cb99d15a26ad8f875b7a96 Mon Sep 17 00:00:00 2001
From: akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Thu, 22 May 2008 08:41:07 +0000
Subject: [PATCH] add a test for [ruby-dev:34802].

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@16529 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/ruby/test_continuation.rb | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/test/ruby/test_continuation.rb b/test/ruby/test_continuation.rb
index f8302abdc..c719db8c3 100644
--- a/test/ruby/test_continuation.rb
+++ b/test/ruby/test_continuation.rb
@@ -63,5 +63,19 @@ class TestContinuation < Test::Unit::TestCase
       $k.call if n < 100
     }, '[ruby-dev:34798]'
   end
+
+  def test_marshal_dump
+    assert_normal_exit %q{
+      require 'continuation'
+      n = 0
+      o = Object.new
+      def o.marshal_dump() callcc {|k| $k = k };  "fofof" end
+      a = [1,2,3,o,4,5,6]
+      Marshal.dump(a).inspect
+      n += 1
+      $k.call if n < 100
+    }, '[ruby-dev:34802]'
+  end
+
 end
 
-- 
2.11.4.GIT