Permalink
Browse files

fudge S32-num/stringify.t for rakudo

  • Loading branch information...
1 parent 25075dc commit 9e48a8dd3475ad9fa4d26797b5d48413ded50874 @moritz moritz committed Jan 16, 2012
Showing with 2 additions and 0 deletions.
  1. +2 −0 S32-num/stringify.t
View
@@ -9,6 +9,7 @@ sub Complex_str_test($value, $str_nucleus) {
is ~$value, $str_nucleus, "~<$str_nucleus>";
is $value.Str, $str_nucleus, "<$str_nucleus>.Str";
is $value.gist, $str_nucleus, "<$str_nucleus>.gist";
+ #?rakudo todo 'Complex.perl'
is $value.perl, "<$str_nucleus>", "<$str_nucleus>.perl";
}
@@ -47,6 +48,7 @@ sub Rat_str_test($value, $str_nucleus) {
is ~$value, ~$value.Num, "~<$str_nucleus>";
is $value.Str, ~$value.Num, "<$str_nucleus>.Str";
is $value.gist, ~$value.Num, "<$str_nucleus>.gist";
+ #?rakudo todo 'Rat.perl'
is $value.perl, "<$str_nucleus>", "<$str_nucleus>.perl";
}

0 comments on commit 9e48a8d

Please sign in to comment.