This is an automatically generated mail to inform you that tests are now
available in t/spec/S03-operators/arith.t
commit 601a4ecfaccc39523561f1836bc22d3e5939e9b5
Author: kyle <k...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Mon Oct 26 18:00:42 2009 +0000
[t/spec] Test for RT 69172
git-svn-id: http://svn.pugscode.org/p...@28902
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/t/spec/S03-operators/arith.t b/t/spec/S03-operators/arith.t
index 600646e..5a8d127 100644
--- a/t/spec/S03-operators/arith.t
+++ b/t/spec/S03-operators/arith.t
@@ -1,8 +1,6 @@
use v6;
-
use Test;
-
-plan 192;
+plan *;
my $five = abs(-5);
@@ -421,6 +419,12 @@ dies_ok( { $x := 0; say 3 div $x; }, 'Division by zero
dies and is catchable wit
{
is 6 !% 3, Bool::True, '6 !% 3';
is 6 !% 4, Bool::False, '6 !% 4';
+
+ is (1..10).grep({ $_ !% 3 }), <3 6 9>, '!% works with explicit closure';
+ #?rakudo todo 'RT 69172'
+ is (1..10).grep( * !% 3 ), <3 6 9>, '!% works with whatever *'
}
+done_testing;
+
# vim: ft=perl6
