Fudge S04/for and given for niecza

Raku · Feb 16, 2011 · 2c2bce7 · 2c2bce7
1 parent 5d02383
commit 2c2bce7
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/S04-statement-modifiers/for.t b/S04-statement-modifiers/for.t
@@ -39,6 +39,7 @@ plan 18;
     is($a, 3 * 5 * 7 * 9, "post for array");
 }
 
+#?niecza skip 'Int'
 {
     my @a = (5, 7, 9);
     my $i = 5;
@@ -61,19 +62,22 @@ plan 18;
     is $a, "<hello>", 'iterating one variable element works';
 }
 
+#?niecza skip "closure for"
 {
     my $a = 0;
     { $a++ } for 1..3;
     is $a, 3, 'the closure was called';
 }
 
+#?niecza skip "closure for"
 {
     my $a = 0;
     -> $i { $a += $i } for 1..3;
     is $a, 6, 'the closure was called';
 }
 
 # L<S04/The C<for> statement/for and given privately temporize>
+#?niecza skip 'writable $_'
 {
     my $i = 0;
     $_ = 10;
@@ -84,6 +88,7 @@ plan 18;
 
 # L<S04/The C<for> statement/When used as statement modifiers on implicit blocks>
 
+#?niecza skip 'writable $_'
 {
     $_ = 42;
     my @trace;

diff --git a/S04-statement-modifiers/given.t b/S04-statement-modifiers/given.t
@@ -27,6 +27,7 @@ plan 5;
 }
 
 # L<S04/The C<for> statement/for and given privately temporize>
+#?niecza skip 'writable $_'
 {
     my $i = 0;
     $_ = 10;