[perl #82974] our multi sub infix:<+> in class definition hides core's infix:<+> functions

[via RT]

# New Ticket Created by  Solomon Foster 
# Please include the string:  [perl #82974]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=82974 >


colomon: rakudo: class A { has $.a; method blue($n) { say $.a + $n; };
our multi sub infix:<+>(A $a, A $b) { A.new(:a($a.a + $b.a)); }; };
say A.new(:a(10)).blue(42)
p6eval: rakudo 549d2a: OUTPUT«No applicable candidates found to
dispatch to for 'infix:<+>'. Available candidates are:␤:(A $a, A $b)␤␤
 in 'A::blue' at line 22:/tmp/OvBw3dlA0t␤  in main program body at
line 22:/tmp/OvBw3dlA0t␤»

colomon: rakudo: class A { has $.a; method blue($n) { say $.a + $n; };
multi sub infix:<+>(A $a, A $b) { A.new(:a($a.a + $b.a)); }; }; say
A.new(:a(10)).blue(42)
p6eval: rakudo 549d2a: OUTPUT«52␤Bool::True␤»

I think both versions should work?

-- 
Solomon Foster: colo...@gmail.com
HarmonyWare, Inc: http://www.harmonyware.com