[svn:parrot] r40820 - branches/pcc_arg_unify/t/op
allison at svn.parrot.org
allison at svn.parrot.org
Wed Aug 26 22:58:31 UTC 2009
Author: allison
Date: Wed Aug 26 22:58:27 2009
New Revision: 40820
URL: https://trac.parrot.org/parrot/changeset/40820
Log:
[pcc] Pop exception handler when the handler is running, for better
debugging when a second exception is thrown inside the handler.
Modified:
branches/pcc_arg_unify/t/op/annotate.t
Modified: branches/pcc_arg_unify/t/op/annotate.t
==============================================================================
--- branches/pcc_arg_unify/t/op/annotate.t Wed Aug 26 20:39:51 2009 (r40819)
+++ branches/pcc_arg_unify/t/op/annotate.t Wed Aug 26 22:58:27 2009 (r40820)
@@ -36,10 +36,12 @@
failed:
.local pmc exception
+ pop_eh
.get_results (exception)
$P0 = exception.'annotations'()
isa_ok ($P0, 'Hash', 'annotations gives back hash')
$I0 = elements $P0
+end
is ($I0, 0, 'annotations hash empty when none in effect')
$P0 = exception.'annotations'('line')
$I0 = isnull $P0
@@ -58,6 +60,7 @@
failed:
.local pmc exception
+ pop_eh
.get_results (exception)
$P0 = exception.'annotations'('file')
@@ -106,6 +109,7 @@
failed:
.local pmc exception, bt, frame, ann
+ pop_eh
.get_results (exception)
bt = exception.'backtrace'()
$I0 = elements bt
More information about the parrot-commits
mailing list