Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
merged two tests for RT #116348
  • Loading branch information
usev6 committed Sep 24, 2014
1 parent 2e8d582 commit c7679fa
Showing 1 changed file with 2 additions and 3 deletions.
5 changes: 2 additions & 3 deletions S03-sequence/misc.t
@@ -1,6 +1,6 @@
use v6;
use Test;
plan 23;
plan 22;


# L<S03/List infix precedence/constraints implied by the signature of the function>
Expand Down Expand Up @@ -100,8 +100,7 @@ is (1, { $^n*2 + 1 } ... 31, *+5 ... { $^n**2 < 2000 }, 'a', *~'z' ... { $_.char
is (10, 8 ... 2|3).join(' '), '10 8 6 4 2', 'sequence with RHS junction I';
is (11, 9 ... 2|3).join(' '), '11 9 7 5 3', 'sequence with RHS junction II';
sub postfix:<!!>($x) { [*] $x, $x - 2 ... 2|3 };
is 4!!, 8, 'sequence with RHS junction III';
is 5!!, 15, 'sequence with RHS junction IV';
is (4!!, 5!!).join(' '), "8 15", 'sequence with RHS junction III';
}

# vim: ft=perl6

0 comments on commit c7679fa

Please sign in to comment.