# New Ticket Created by "Brian S. Julin" # Please include the string: [perl #127025] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=127025 >
Regression: (09:51:30 PM) camelia: rakudo-moar e360bd: OUTPUT«1» (09:51:57 PM) skids: m: role A { multi method a ($ where { $_.say; $_ ~~ /a/ } ) { "A".say }; multi method a ($ where { $_.say; $_ ~~ /b/ } ) { "B".say } }; class C does A { }; C.new.a("a"); (09:51:57 PM) camelia: rakudo-moar e360bd: OUTPUT«aaA» (09:52:02 PM) skids: m: role A { multi method a ($ where { $_.say; $_ ~~ /a/ } ) { "A".say }; multi method a ($ where { $_.say; $_ ~~ /b/ } ) { "B".say } }; class C does A { }; C.new.a("b"); (09:52:02 PM) camelia: rakudo-moar e360bd: OUTPUT«bCannot call a(C.new: "b"); none of these signatures match: (C $: $ where { ... }, *%_) in block <unit> at /tmp/10zZDctR_z line 1» (09:52:08 PM) skids: star: role A { multi method a ($ where { $_.say; $_ ~~ /a/ } ) { "A".say }; multi method a ($ where { $_.say; $_ ~~ /b/ } ) { "B".say } }; class C does A { }; C.new.a("b"); (09:52:09 PM) camelia: star-m 2015.09: OUTPUT«bbbB» Classes seem to be OK: (09:55:47 PM) skids: m: class C { multi method a ($ where { $_.say; $_ ~~ /a/ } ) { "A".say }; multi method a ($ where { $_.say; $_ ~~ /b/ } ) { "B".say } }; C.new.a("a"); C.new.a("b"); (09:55:47 PM) camelia: rakudo-moar e360bd: OUTPUT«aaAbbbB»