Permalink
Browse files

[tt389_fix] add exception handlers to one RPA test. When this test th…

…rows an unhndled exception the rest of the test file doesn't run at all. Now we see the one failure, and we also see that all other tests in the file pass

git-svn-id: https://svn.parrot.org/parrot/branches/tt389_fix@44987 d31e2699-5ff4-0310-a27c-f18f2fbe73fe
  • Loading branch information...
1 parent 4b36fc0 commit 3815fa47853b83d3ca5fe6d48e4d9ea71e62af9b @Whiteknight Whiteknight committed Mar 17, 2010
Showing with 9 additions and 3 deletions.
  1. +9 −3 t/pmc/resizablepmcarray.t
View
@@ -332,6 +332,7 @@ done:
.sub sort_subclass
+ push_eh sort_subclass_handler
.local pmc subrpa, arr
subrpa = subclass ['ResizablePMCArray'], 'ssRPA'
arr = new subrpa
@@ -350,6 +351,11 @@ done:
aux = join '-', arr
concat s, aux
is(s, 'ssRPA:z-p-a', "sort works in a pir subclass, TT #218")
+ goto _done
+ sort_subclass_handler:
+ ok(0, "sorting a subclass is broken")
+ _done:
+ .return()
.end
.sub compare_reverse
@@ -979,12 +985,12 @@ end:
push array, 2
push array, 5
push array, 1
-
- .local string unsorted
+
+ .local string unsorted
unsorted = join ' ', array
is(unsorted,"4 5 3 2 5 1", "unsorted array")
- ## sort using a non-tailcall function
+ ## sort using a non-tailcall function
.const 'Sub' cmp_normal = 'cmp_normal_tailcall'
$P1 = clone array
$P1.'sort'(cmp_normal)

0 comments on commit 3815fa4

Please sign in to comment.