Test that List.uniq has === semantics

Raku · Jan 12, 2013 · 3582496 · 3582496
1 parent 7ec93a8
commit 3582496
Showing 1 changed file with 8 additions and 1 deletion.
diff --git a/S32-list/uniq.t b/S32-list/uniq.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 12;
+plan 13;
 
 =begin description
 
@@ -60,4 +60,11 @@ is uniq('a', 'b', 'b', 'c', 'd', 'e', 'b', 'b', 'b', 'b', 'f', 'b'),
     is @array.uniq.elems, 2, ".uniq does not use naive WHICH (2)";
 }
 
+# RT #111360
+{
+    my class A { method Str { '' } };
+    is (A.new, A.new).uniq.elems, 2, 'uniq has === semantics';
+
+}
+
 # vim: ft=perl6