From 9f1fd82def2103a58936997f0a1cb1b9340b9d32 Mon Sep 17 00:00:00 2001
From: usev6 <use_v6@aglaz.de>
Date: Sat, 31 Mar 2018 22:03:12 +0200
Subject: [PATCH] [JVM] Run tests for my with parens and SSA binding

Fixed with https://github.com/perl6/nqp/commit/29793bb553
---
 S04-declarations/my.t | 7 +------
 S12-subset/subtypes.t | 6 +-----
 2 files changed, 2 insertions(+), 11 deletions(-)

diff --git a/S04-declarations/my.t b/S04-declarations/my.t
index 970e136119..5e276b5ad3 100644
--- a/S04-declarations/my.t
+++ b/S04-declarations/my.t
@@ -337,7 +337,6 @@ eval-lives-ok 'multi f(@a) { }; multi f(*@a) { }; f(my @a = (1, 2, 3))',
 
 # RT #117043
 # RT #126626
-#?rakudo.jvm skip 'RuntimeException: java.lang.ArrayIndexOutOfBoundsException: -1'
 {
     my (\x1) = 1;
     is x1, 1,
@@ -399,17 +398,13 @@ subtest 'dies on conflicting type constraints' => {
 }
 
 # RT #124210
-#?rakudo.jvm skip 'ArrayIndexOutOfBoundsException: -1'
-#?DOES 1
-{
-  subtest 'can assign to sigil-less variables' => {
+subtest 'can assign to sigil-less variables' => {
     plan 3;
     my \a = 1;          is-deeply a, 1,           'simple';
     my (\b, \c) = 1, 2; is-deeply (b, c), (1, 2), 'complex';
     my (\d, (\e, (\f, (\g, \h)))) = 1, (2, (3, (4, 5)));
     #?rakudo skip 'RT131071'
     is-deeply (d, e, f, g, h), (1, 2, 3, 4, 5),   'complexerastic';
-  }
 }
 
 # RT #124210
diff --git a/S12-subset/subtypes.t b/S12-subset/subtypes.t
index d703794dbe..0415b7a2ca 100644
--- a/S12-subset/subtypes.t
+++ b/S12-subset/subtypes.t
@@ -452,10 +452,7 @@ subtest '"any" Junction of types in where' => {
     }
 }
 
-#?rakudo.jvm skip 'ArrayIndexOutOfBoundsException: -1'
-#?DOES 1
-{
-  subtest 'postconstraints on variables in my (...)' => {
+subtest 'postconstraints on variables in my (...)' => {
     plan 6;
 
     my subset Foo where .is-prime;
@@ -487,7 +484,6 @@ subtest '"any" Junction of types in where' => {
             'sigilless where literal';
         throws-like ｢my (\b where "x", "foo") = "x", "bar"｣, XA, 'literal';
     }
-  }
 }
 
 # vim: ft=perl6