Permalink
Browse files

[t/spec]: Unfudge a rakudo test in S03-operators/misc.t .

git-svn-id: http://svn.pugscode.org/pugs@24540 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
pmichaud
pmichaud committed Dec 21, 2008
1 parent fd3313e commit 82084697113ce08486b1a4581bcef9e571d6ad84
Showing with 1 addition and 2 deletions.
  1. +1 −2 S03-operators/misc.t
View
@@ -82,11 +82,10 @@ ok(42 > 12 & 20 & 32, "test the all infix operator");
# L<S03/Hyper operators/hyper operator distributes over them as lists>
-#?rakudo skip 'hyper operators'
{
my @rv;
@rv = (1,2,3,4) >>+<< (1,2,3,4);
- is("@rv[]", "2 4 6 8", 'hyper-add');
+ is(~@rv, "2 4 6 8", 'hyper-add');
}
{ # L<S03/Changes to Perl 5 operators/ "?| is a logical OR">

0 comments on commit 8208469

Please sign in to comment.