The original test file may introduced a typo for "wins2". Hope the
attached patch can be useful.
I wonder if the patches for test files should go here.

Best regards!
Hongwen Qiu
Index: type-based.t
===================================================================
--- type-based.t        (revision 30576)
+++ type-based.t        (working copy)
@@ -81,9 +81,9 @@
     multi wins2(Scissor $x, Paper   $y) { 1 }
     multi wins2($x, $y where { $x.WHAT eq $y.WHAT }) { 0 }
     multi wins2($x, $y)                { -1 }
-    is wins(Scissor.new, Paper.new),   1,  'Basic sanity 2';
-    is wins(Paper.new,   Paper.new),   0,  'multi dispatch with faked 
generics';
-    is wins(Paper.new,   Scissor.new), -1, 'fallback if there is a faked 
generic';
+    is wins2(Scissor.new, Paper.new),   1,  'Basic sanity 2';
+    is wins2(Paper.new,   Paper.new),   0,  'multi dispatch with faked 
generics';
+    is wins2(Paper.new,   Scissor.new), -1, 'fallback if there is a faked 
generic';
 
     # now try again with anonymous parameters (see RT #69798)
     multi wins_anon(Scissor $, Paper   $) { 1  }

Reply via email to