only test what we're supposed to be testing

TimToady · TimToady · commit 685e54832c9e · 2015-09-24T08:28:33.000-07:00
diff --git a/S04-statements/for.t b/S04-statements/for.t
@@ -383,11 +383,12 @@ eval-dies-ok('for(0..5) { }','keyword needs at least one whitespace after it');
   #diag ">$str<";
 }
 
+# RT #63994
 #?niecza 2 todo 'NYI'
 {
   my $str = '';
   for 1..5 -> $x, $y? {
-    $str ~= " " ~ $x*$y;
+    $str ~= " " ~ $x * ($y//0);
   }
   is $str, " 2 12 0";
 }

Original file line number	Diff line number	Diff line change
`@@ -383,11 +383,12 @@ eval-dies-ok('for(0..5) { }','keyword needs at least one whitespace after it');`
`383`	`383`	`#diag ">$str<";`
`384`	`384`	`}`
`385`	`385`
	`386`	`+# RT #63994`
`386`	`387`	`#?niecza 2 todo 'NYI'`
`387`	`388`	`{`
`388`	`389`	`my $str = '';`
`389`	`390`	`for 1..5 -> $x, $y? {`
`390`		`- $str ~= " " ~ $x*$y;`
	`391`	`+ $str ~= " " ~ $x * ($y//0);`
`391`	`392`	`}`
`392`	`393`	`is $str, " 2 12 0";`
`393`	`394`	`}`