Permalink
Browse files

'ne' operator instead of 'leg', [Coke]++

  • Loading branch information...
1 parent 6320c7c commit c5f5026b05b12dd9b64aa5e01f2b1ba9e6354fba @FROGGS FROGGS committed Nov 20, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 S32-list/roll.t
View
@@ -126,7 +126,7 @@ ok ('a' .. 'z').roll ~~ /\w/, 'Str-Range roll';
my $a = qqx{$*EXECUTABLE_NAME -e "print ~(1..10).pick(5)"};
my $b = qqx{$*EXECUTABLE_NAME -e "print ~(1..10).pick(5)"};
my $c = qqx{$*EXECUTABLE_NAME -e "print ~(1..10).pick(5)"};
- ok ($a leg $b || $b leg $c), 'different results due to random random-number seed';
+ ok ($a ne $b || $b ne $c), 'different results due to random random-number seed';
}
# vim: ft=perl6

0 comments on commit c5f5026

Please sign in to comment.