On Sun Aug 02 13:58:12 2009, eternal...@gmail.com wrote:
> This code causes Parrot to fail in a rather spectacular manner:
>
> role TreeNode[::T] does Positional {
> has TreeNode[T] @!children handles 'postcircumfix:<[ ]>';
> has T $.data is rw;
> };
> my $tree = TreeNode[Int].new;
> $tree.data = 3;
> $tree[0] = TreeNode[Int].new;
> $tree[1] = TreeNode[Int].new;
> $tree[0].data = 1;
> $tree[1].data = 4;
> .say for $tree.data, $tree[0,1]>>.data;
This now outputs:
3
1
4
Needs tests.
--
Will "Coke" Coleda
