rakudo should complain about re-definition of non-multi method

[p6rt]

Migrated from rt.perl.org#67024 (status was 'resolved')

Searchable as RT67024$

[p6rt]

From amoc.yn@gmail.com

<amoc> rakudo​: class A { method foo() {say 'no argument~'}; method foo($a) {
$a.say }}; my $o = A.new; $o.foo(1); $o.foo();
<p6eval> rakudo 6c43f9​: OUTPUT«1␤too few arguments passed (1) - 3 params
expected␤in method A​::foo (/tmp/llOR59FON7​:2)␤called from Main
(/tmp/llOR59FON7​:2)␤»
<moritz_> amoc​: the error is that rakudo should complain about re-defintion
of non-multi method

[p6rt]

From @kyleha

This is an automatically generated mail to inform you that tests are now available in t/t/spec/S12-methods/multi.t

[p6rt]

The RT System itself - Status changed from 'new' to 'open'

[p6rt]

From @bbkr

Works as expected on NOM.

bbkr​:nom bbkr$ ./perl6 -e 'class A { method foo() {say "no argument~"};
method foo($a) { $a.say }}; my $o = A.new; $o.foo(1); $o.foo();'
===SORRY!===
Package 'A' already has a method 'foo'; did you mean to declare a
multi-method?

[p6rt]

From @bbkr

Test unfudged and working.

[p6rt]

@bbkr - Status changed from 'open' to 'resolved'