# New Ticket Created by Jesse Luehrs
# Please include the string: [perl #116268]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=116268 >
< doy> r: proto bar {*}; multi bar ($baz) { "BAZ" }; role Blorg { method
do_stuff { bar "baz" } }; say Blorg.new.do_stuff
<+p6eval> rakudo 13e805: OUTPUT«Too many positional parameters passed; got 1
but expected 0 in sub bar at /tmp/5CaNa5PWz1:1 in method
do_stuff at /tmp/5CaNa5PWz1:1 in block at /tmp/5CaNa5PWz1:1»
< doy> r: proto bar {*}; multi bar ($baz) { "BAZ" }; class Blorg { method
do_stuff { bar "baz" } }; say Blorg.new.do_stuff
<+p6eval> rakudo 13e805: OUTPUT«BAZ»
< doy> multisub dispatch doesn't appear to work properly in roles for some
reason?
