From 955464ca3cf408a14ae98b1e93afe31023219af9 Mon Sep 17 00:00:00 2001
From: KOBAYASHI Shuji <shuujii@gmail.com>
Date: Fri, 12 Feb 2021 19:09:18 +0900
Subject: Add `UncaughtThrowError#{tag,value}` for Ruby compatibility

---
 mrbgems/mruby-catch/mrblib/catch.rb |  8 ++++----
 mrbgems/mruby-catch/test/catch.rb   | 23 +++++++++++++++--------
 2 files changed, 19 insertions(+), 12 deletions(-)

diff --git a/mrbgems/mruby-catch/mrblib/catch.rb b/mrbgems/mruby-catch/mrblib/catch.rb
index 8e5f59023..9a60a67a3 100644
--- a/mrbgems/mruby-catch/mrblib/catch.rb
+++ b/mrbgems/mruby-catch/mrblib/catch.rb
@@ -1,8 +1,8 @@
 class UncaughtThrowError < ArgumentError
-  attr_reader :_tag, :_val
-  def initialize(tag, val)
-    @_tag = tag
-    @_val = val
+  attr_reader :tag, :value
+  def initialize(tag, value)
+    @tag = tag
+    @value = value
     super("uncaught throw #{tag.inspect}")
   end
 end
diff --git a/mrbgems/mruby-catch/test/catch.rb b/mrbgems/mruby-catch/test/catch.rb
index fe5bda096..38a4eb907 100644
--- a/mrbgems/mruby-catch/test/catch.rb
+++ b/mrbgems/mruby-catch/test/catch.rb
@@ -3,10 +3,14 @@ assert "return throw value" do
   result = catch :foo do
     loop do
       loop do
-        throw :foo, val
+        begin
+          throw :foo, val
+        rescue Exception
+          flunk("should not reach here 1")
+        end
         break
       end
-      flunk("should not reach here")
+      flunk("should not reach here 2")
     end
     false
   end
@@ -30,13 +34,16 @@ assert "pass the given tag to block" do
   catch(tag){|t| assert_same(tag, t)}
 end
 
-assert "tag identity" do
-  assert_raise_with_message_pattern(Exception, "uncaught throw *") do
-    catch [:tag] do
-      throw [:tag]
-    end
-    flunk("should not reach here")
+assert "tag identity, uncaught throw" do
+  tag, val = [:tag], [:val]
+  catch [:tag] do
+    throw tag, val
   end
+  flunk("should not reach here")
+rescue Exception => e
+  assert_match("uncaught throw *", e.message)
+  assert_same(tag, e.tag)
+  assert_same(val, e.value)
 end
 
 assert "without catch arguments" do
-- 
cgit v1.2.3