# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #63002]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=63002 >


Parrot r36318 (before the merge that broke Rakudo), and Rakudo 21f374.

$ perl6 -e 'my $a = 5; say $a.PARROT; say $a .. 5'
Int
5
$ perl6 -e 'my $a = 5; sub foo($a) { say $a.PARROT; say $a .. 5 }; foo($a)'
ObjectRef->Int
Undefined value shifted from empty range

$

Note that not only is a warning emitted, but the second 'say' outputs
a blank line.

Reply via email to