Permalink
Browse files

[t/spec] Fudge value_equivalence.t.

git-svn-id: http://svn.pugscode.org/pugs@29956 c213334d-75ef-0310-aa23-eaa082d1ae64
  • Loading branch information...
1 parent 550aa7a commit 2a90d082cdf61782d5d634004ee2edb3a3a5b812 colomon committed Mar 6, 2010
Showing with 2 additions and 0 deletions.
  1. +2 −0 S03-operators/value_equivalence.t
@@ -53,6 +53,7 @@ plan 52;
my @a = (1,2,3);
my @b = (1,2,3);
+ #?rakudo 2 todo "=== doesn't work on array references yet"
ok (\@a === \@a), "=== on array references (1)";
ok (\@b === \@b), "=== on array references (2)";
ok !(\@a === \@b), "=== on array references (3)";
@@ -90,6 +91,7 @@ plan 52;
ok ($a === $a), "=== on scalar references (2-1)";
ok ($b === $b), "=== on scalar references (2-2)";
+ #?rakudo todo "=== fail"
ok ($a === $b), "=== on scalar references (2-3)";
}

0 comments on commit 2a90d08

Please sign in to comment.