Skip to content
Browse files

Switch a few tests from is to a more sensible is_approx.

  • Loading branch information...
1 parent c487222 commit 0b697d87cb70d2ea3ded68402c30f43b79a0b606 @colomon colomon committed Jan 15, 2012
Showing with 4 additions and 4 deletions.
  1. +4 −4 S32-num/real-bridge.t
View
8 S32-num/real-bridge.t
@@ -41,10 +41,10 @@ ok $one ~~ Real, "Fixed2 sanity test";
ok $one-and-one-hundredth ~~ Real, "Fixed2 sanity test";
ok $neg-pi ~~ Real, "Fixed2 sanity test";
-is $zero.succ, 1, "0.succ works";
-is $neg-pi.succ, -2.14, "(-3.14).succ works";
-is $zero.pred, -1, "0.pred works";
-is $neg-pi.pred, -4.14, "(-3.14).pred works";
+is_approx $zero.succ, 1, "0.succ works";
+is_approx $neg-pi.succ, -2.14, "(-3.14).succ works";
+is_approx $zero.pred, -1, "0.pred works";
+is_approx $neg-pi.pred, -4.14, "(-3.14).pred works";
{
my $i = $zero.Bool;

0 comments on commit 0b697d8

Please sign in to comment.
Something went wrong with that request. Please try again.