On Wed, 21 Jun 2017 11:46:46 -0700, c...@zoffix.com wrote:
> The "Died" message should never occur:
>
> m: my $s = Seq.new: class :: does Iterator { has @!stuff = ;
> has $!ded = 1; method pull-one { $!ded or die; @!stuff ?? shift
> @!stuff !! $!ded-- && IterationEnd } }.new; say $s.tail: *-10
> r
On Wed, 21 Jun 2017 11:46:46 -0700, c...@zoffix.com wrote:
> The "Died" message should never occur:
>
> m: my $s = Seq.new: class :: does Iterator { has @!stuff = ;
> has $!ded = 1; method pull-one { $!ded or die; @!stuff ?? shift
> @!stuff !! $!ded-- && IterationEnd } }.new; say $s.tail: *-10
> r
# New Ticket Created by Zoffix Znet
# Please include the string: [perl #131617]
# in the subject line of all future correspondence about this issue.
# https://rt.perl.org/Ticket/Display.html?id=131617 >
The "Died" message should never occur:
m: my $s = Seq.new: class :: does Iterator { h