From 929223e720abf8166cc44c1cfd126b6c00aa9eea Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 20 Feb 2008 17:30:07 +0000
Subject: * test/ruby/test_beginendblock.rb (test_begin_and_eval): add test for
  
 http://sourceforge.net/mailarchive/message.php?msg_name=47B2FD16.6040408%40vvvvvv.sakura.ne.jp

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/ruby_1_8@15558 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 test/ruby/test_beginendblock.rb | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'test')

diff --git a/test/ruby/test_beginendblock.rb b/test/ruby/test_beginendblock.rb
index 656dd4f598..b5d898d3b6 100644
--- a/test/ruby/test_beginendblock.rb
+++ b/test/ruby/test_beginendblock.rb
@@ -83,4 +83,16 @@ EOW
     assert_nil $?.exitstatus
     assert_equal Signal.list["INT"], $?.termsig
   end
+
+  def test_begin_and_eval
+    $test_begin_and_eval = :ok
+    begin
+      eval("BEGIN{$test_begin_and_eval = :ng}\n_/a:a")
+    rescue SyntaxError
+      x1 = x2 = $test_begin_and_eval
+      eval("x2 = $test_begin_and_eval")
+    end
+    assert_equal(:ok, x1)
+    assert_equal(:ok, x2)
+  end
 end
-- 
cgit v1.2.3