Now fixed in f351f60:

$ cat x
class A {
    has $.a is rw;
    method add(A $b) { $.a ~ $b.a }
}

multi sub infix:<+>(A $a, A $b) { $a.add($b) };

my A $a .= new(a=>'foo');
my A $b .= new(a=>'bar');

say $a.a ~ $b.a;
say $a + $b;
$ ./perl6 x
foobar
foobar
$ 


Assigning to moritz++ so that we can get a spectest for infix:<+>
overloading.

Thanks!

Pm

Reply via email to