Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Compare the type, not the stringified type.

  • Loading branch information...
commit ec8593efa4a7d4d8a6311644fb7c8b4745ee22d9 1 parent 506d0a5
@coke coke authored
Showing with 3 additions and 3 deletions.
  1. +3 −3 integration/advent2009-day14.t
View
6 integration/advent2009-day14.t
@@ -5,7 +5,7 @@ use Test;
plan 21;
-is (3/7).WHAT.gist, "Rat()";
+is (3/7).WHAT, Rat;
is_approx (3/7), 0.4285714;
is_approx (3/7).Num + (2/7).Num + (2/7).Num - 1, -1.1102230e-16;
@@ -19,7 +19,7 @@ is (3/7).denominator, 7;
is (3/7).nude.join('|'), "3|7";
my $a = 1/60000 + 1/60000;
-is $a.WHAT.gist, "Rat()";
+is $a.WHAT, Rat;
is_approx $a, 3.3333333e-05;
#?rakudo todo "New Rat.perl"
is $a.perl, "<1/30000>";
@@ -38,7 +38,7 @@ is pi.Rat.perl, "<355/113>";
#?rakudo todo 'nom regression'
is pi.Rat(1e-10).perl, "<312689/99532>";
-is 1.75.WHAT.gist, "Rat()";
+is 1.75.WHAT, Rat;
#?rakudo 2 todo "New Rat.perl"
is 1.75.perl, "<7/4>";
is 1.752.perl, "<219/125>";
Please sign in to comment.
Something went wrong with that request. Please try again.