Mon Mar 22 11:02:39 2010leonerd-cpan [...] leonerd.org.uk - Ticket created
Subject:
kwhile() leaks @_ through klast
$ perl -MCPS=kwhile -E'kwhile( sub { my ( $knext, $klast ) = @_; @_ = 1
.. 3; goto &$klast }, sub { say "\@_ is ", @_ } )'
@_ is 123
Should print
@_ is
--
Paul Evans
Tue Mar 30 18:47:46 2010leonerd-cpan [...] leonerd.org.uk - Correspondence added
Fixed in bzr repo. Will be in next CPAN version
--
Paul Evans
Tue Mar 30 18:47:47 2010leonerd-cpan [...] leonerd.org.uk - Status changed from 'new' to 'patched'