# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #69798]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=69798 >
<masak> hooray for runnable, concrete examples!
<PerlJam> indeed, moritz_++
<moritz_> don't praise me until you actually tested it :-)
<PerlJam> my rakudo barfs on it, but that's my rakudo's fault
<PerlJam> (perhaps rakudo in general)
<moritz_> yes, I just tested it
<moritz_> and I don't understand why
<moritz_> we have that as a test case even
<PerlJam> with anonymous scalars?
<moritz_> don't think so
* PerlJam bets not
<PerlJam> yeah, if I give the scalars names it works fine
<PerlJam> if I give *one* of the scalars a name, it works fine
* masak submits rakudobug
<moritz_> masak: you are being called to du... d'oh, I'm too slow
<masak> hah!
<masak> here's a minimal example:
<masak> rakudo: class Scissors {}; class Paper {}; multi wins(Scissors
$, Paper $) {}; multi wins($, $) {}; wins(Scissors, Paper)
<p6eval> rakudo d5a2ee: OUTPUT«Parameter type check failed; expected
Scissors, but got Paper for $ in call to wins [...]
<masak> rakudo: class Scissors {}; class Paper {}; multi wins(Scissors
$a, Paper $a) {}; multi wins($, $) {}; wins(Scissors, Paper)
<p6eval> rakudo d5a2ee: OUTPUT«Parameter type check failed; expected
Scissors, but got Paper for $a in call to wins [...]
<masak> std: sub foo($a, $a) {}
<p6eval> std 28796: OUTPUT«Potential difficulties: Useless
redeclaration of variabl [...] ok 00:02 105m»
<masak> so it's a warning, not an error?
<masak> then the binder must know what to do when a call to such a
routine actually happens.
