[parrot]

Remove the second argument passed to exception handlers. You can get the message by stringifying the exception object. All parrot tests pass. Looks like the languages are all okay too.
fperrad · Sep 21, 2008 · f21df86 · f21df86
1 parent 2e11f4b
commit f21df86
Show file tree

Hide file tree

Showing 5 changed files with 10 additions and 5 deletions.
diff --git a/src/wmlsstdlibs.pir b/src/wmlsstdlibs.pir
@@ -111,7 +111,8 @@ helper for CALL_URL* opcodes.
   _handler_1:
     .local pmc e
     .local string msg
-    .get_results (e, msg)
+    .get_results (e)
+    msg = e
     print msg
     print "\n"
     $S0 = "verification failed (can't translate '"

diff --git a/wmls2pbc.pir b/wmls2pbc.pir
@@ -56,7 +56,8 @@ Francois Perrad.
   _handler:
     .local pmc e
     .local string s
-    .get_results (e, s)
+    .get_results (e)
+    s = e
     print s
     print "\n"
   L1:

diff --git a/wmls2pir.pir b/wmls2pir.pir
@@ -52,7 +52,8 @@ Francois Perrad.
   _handler:
     .local pmc e
     .local string s
-    .get_results (e, s)
+    .get_results (e)
+    s = e
     print s
     print "\n"
   L1:

diff --git a/wmlsd.pir b/wmlsd.pir
@@ -50,7 +50,8 @@ Francois Perrad.
   _handler:
     .local pmc e
     .local string msg
-    .get_results (e, msg)
+    .get_results (e)
+    msg = e
     print msg
     print "\n"
   L1:

diff --git a/wmlsi.pir b/wmlsi.pir
@@ -81,7 +81,8 @@ Francois Perrad.
   _handler:
     .local pmc e
     .local string s
-    .get_results (e, s)
+    .get_results (e)
+    s = e
     print s
     print "\n"
   L1: