This is an automatically generated mail to inform you that tests are now
available in t/spec/S32-num/rat.t
commit 88d63ef3980e2853389442bfc169c0de7490db28
Author: bbkr <b...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Wed Jun 30 13:27:35 2010 +0000
[t/spec] tests for RT #74624 Any + 0.1 is a Num, not a Rat in Rakudo
git-svn-id: http://svn.pugscode.org/p...@31515
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/t/spec/S32-num/rat.t b/t/spec/S32-num/rat.t
index 0f3b398..e822b31 100644
--- a/t/spec/S32-num/rat.t
+++ b/t/spec/S32-num/rat.t
@@ -223,6 +223,12 @@ ok 16/5 eqv 16/5, 'infix:<eqv> works with rats';
# RT #72870
is .88888888888.WHAT, 'Rat()', 'WHAT works on Rat created from 11 digit
decimal fraction';
+# RT #74624
+{
+ my $a += 0.1;
+ isa_ok $a, Rat, 'Any() + 0.1 is a Rat';
+}
+
done_testing;
# vim: ft=perl6
