Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

[for.t] fix and unfudge test that was failing due to range bug

  • Loading branch information...
commit 1888ab6fa307cfe9afeb0679ae4e84404397cbdb 1 parent 4c37943
@felliott felliott authored
Showing with 3 additions and 9 deletions.
  1. +3 −9 S04-statements/for.t
View
12 S04-statements/for.t
@@ -54,16 +54,10 @@ plan 65;
}
# ... with referential sub
-#?rakudo skip 'class accessing outer lexical'
{
- my $d = '';
- augment class Int {
- method some_meth_1 {
- $d = $d ~ self
- }
- };
- for 0 .. 5 { .some_meth_1 };
- is($d, '012345', 'for 0 .. 5 { .some_sub } works');
+ my $d = "";
+ for -2 .. 2 { $d ~= .sign };
+ is($d, '-1-1011', 'for 0 .. 5 { .some_sub } works');
}
## and now with parens around the range operator
Please sign in to comment.
Something went wrong with that request. Please try again.