On Tue Feb 03 07:25:43 2009, masak wrote:
> 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.
Was more clone-related fun. I suspect when we've been calling Parrot's
clone directly, we'll usually want to really be calling .clone() on the
object, since it can handle ObjectRef chains. That fixes this issue. (Of
course, in a Perl 6 prelude we'd call the .clone() method too...)
So, resolved in git 1beabec and added a test for this into
S02-builtin-datatypes/range.t. This also made one of the 99-problems
tests that had been failing pass, so un-todo'd that. :-)
Thanks,
Jonathan
