# New Ticket Created by "Carl Mäsak"
# Please include the string: [perl #69915]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=69915 >
<moritz_> rakudo: sub f1 ($a, $b) { WHAT($a) ~ WHAT($b) }; say f1(a => 42, 23)
<p6eval> rakudo 1ab069: OUTPUT«Str()»
<moritz_> wtf?
<moritz_> rakudo: sub f1 ($a, $b) { $a.WHAT ~ $b.WHAT }; say f1(a => 42, 23)
<p6eval> rakudo 1ab069: OUTPUT«Int()Int()»
<masak> what happened there in the first one?
<moritz_> I have no idea.
<moritz_> masak: care to submit? :-)
* masak submits
* jnthn back
<mathw> jnthn: just as moritz_ finds you another exciting bug
<jnthn> uh, wtf
<p6eval> rakudo 1ab069: OUTPUT«Int()Int()»
<jnthn> Why on earth would it matter that one is a Str and the other not?
<moritz_> and it's only one Str()
<moritz_> rakudo: sub f1 ($a, $b) { $a.WHAT ~ $b.WHAT }; say f1(:a, 23)
<p6eval> rakudo 1ab069: OUTPUT«Int()Int()»
<moritz_> oh.
<jnthn> Yup, should be Bool()Int() there.
<jnthn> rakudo: sub f1 ($a, $b) { WHAT($a) ~ WHAT($b) }; say f1(a => 42, 23)
<p6eval> rakudo 1ab069: OUTPUT«Str()»
<jnthn> rakudo: sub f1 ($a, $b) { WHAT($a) ~ WHAT($b) }; say f1(23, a => 42)
<p6eval> rakudo 1ab069: OUTPUT«Str()»
<moritz_> rakudo: sub f1 ($a, $b) { WHAT($a).perl ~ ' ' ~
WHAT($b).perl }; say f1(23, a => 42)
<p6eval> rakudo 1ab069: OUTPUT«Str()»
<moritz_> parsing bug with WHAT()?
<jnthn> rakudo: my $a = 42; my $b = 23; say WHAT($a) ~ WHAT($b)
<p6eval> rakudo 1ab069: OUTPUT«Str()»
<moritz_> rakudo: sub w($x) { $x.WHAT }; sub f1 ($a, $b) { w($a) ~
w($b) }; say f1(a => 42, 23)
<p6eval> rakudo 1ab069: OUTPUT«Int()Int()»
<moritz_> yep
<jnthn> moritz_: It's nothing to do with calling, it seems.
<moritz_> rakudo: sub w($x) { WHAT($x) }; sub f1 ($a, $b) { w($a) ~
w($b) }; say f1(a => 42, 23)
<p6eval> rakudo 1ab069: OUTPUT«Int()Int()»
<moritz_> jnthn: my bet is parsing issues with WHAT()
