Permalink
Browse files

[t/spec] Refudge for Rakudo, and change Mu to Any in descriptions acc…

…ording to latest spec change.

git-svn-id: http://svn.pugscode.org/pugs@29901 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 7f8dea3 commit 2563151a6e91cd9ddb62901e6e1aa6d5933b8408 colomon committed Mar 1, 2010
Showing with 8 additions and 6 deletions.
  1. +8 −6 S03-operators/equality.t
View
@@ -21,12 +21,13 @@ ok("\0" eq "\0", "eq on strings with null chars");
# string context on undefined values
my $foo;
-ok($foo eq "", "Undef eq ''");
-ok($foo ne "f", "Undef ne 'f'");
+#?rakudo todo "+Any() doesn't work yet"
+ok($foo eq "", "Any eq ''");
+ok($foo ne "f", "Any ne 'f'");
my @foo;
-ok(@foo[0] eq "", "Array Mu eq ''");
-ok(@foo[0] ne "f", "Array Mu ne 'f'");
+ok(@foo[0] eq "", "Array Any eq ''");
+ok(@foo[0] ne "f", "Array Any ne 'f'");
# numeric equality & inequality
ok(2 == 2, "== true");
@@ -35,8 +36,9 @@ ok(2 != 3, "!= true");
ok(!(2 != 2), "!= false");
# numeric context on undefined values
-ok($foo == 0, "Mu == 0");
-ok(@foo[0] == 0, "Array Mu == 0");
+#?rakudo skip "+Any doesn't work yet"
+ok($foo == 0, "Any == 0");
+ok(@foo[0] == 0, "Array Any == 0");
# XXX: need tests for coercion string and numeric coercions

0 comments on commit 2563151

Please sign in to comment.