Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
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...
commit 3815fa47853b83d3ca5fe6d48e4d9ea71e62af9b 1 parent 4b36fc0
@Whiteknight Whiteknight authored
Showing with 9 additions and 3 deletions.
  1. +9 −3 t/pmc/resizablepmcarray.t
View
12 t/pmc/resizablepmcarray.t
@@ -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)
Please sign in to comment.
Something went wrong with that request. Please try again.