nobu	2008-02-21 02:30:07 +0900 (Thu, 21 Feb 2008)

  New Revision: 15558

  Modified files:
    branches/ruby_1_8/test/ruby/test_beginendblock.rb

  Log:
    * 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


  http://svn.ruby-lang.org/cgi-bin/viewvc.cgi/branches/ruby_1_8/test/ruby/test_beginendblock.rb?r1=15558&r2=15557&diff_format=u

Index: ruby_1_8/test/ruby/test_beginendblock.rb
===================================================================
--- ruby_1_8/test/ruby/test_beginendblock.rb	(revision 15557)
+++ ruby_1_8/test/ruby/test_beginendblock.rb	(revision 15558)
@@ -83,4 +83,16 @@
     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

--
ML: ruby-changes@q...
Info: http://www.atdot.net/~ko1/quickml/