Fudge for_with_only_one_item, gather for niecza

Raku · Feb 16, 2011 · 821cdb0 · 821cdb0
1 parent 7bfcd8e
commit 821cdb0
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/S04-statements/for_with_only_one_item.t b/S04-statements/for_with_only_one_item.t
@@ -76,6 +76,7 @@ plan 9;
 }
 
 # RT #73400
+#?niecza skip '\\'
 {
   my $capture = \[1,2,3];
   my $count = 0;

diff --git a/S04-statements/gather.t b/S04-statements/gather.t
@@ -91,6 +91,7 @@ plan 17;
 }
 
 # gather statement prefix
+#?niecza skip "gather for"
 {
     my @out = gather for 1..5 {
         take $_;
@@ -112,6 +113,7 @@ plan 17;
     is($count, 2, "gather is lazy");	
 }
 
+#?niecza skip '%'
 {
     my @list = gather {
         my $v = 1;
@@ -123,6 +125,7 @@ plan 17;
     is ~@list, "2 4 6 8 10", "gather with nested while";
 }
 
+#?niecza skip '%'
 {
     my @list = gather {
         loop (my $v = 1; $v <= 10; $v++)
@@ -141,6 +144,7 @@ plan 17;
         'take with multiple arguments .flat tens out';
 }
 
+#?niecza skip '%'
 {
     my sub grep-div(@a, $n) {
         gather for @a {