projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 4e4da3a) | patch
fix SEGV with eval("package Foo {")
authorZefram <zefram@fysh.org>
Sat, 1 May 2010 16:30:26 +0000 (17:30 +0100)
committerDavid Golden <dagolden@cpan.org>
Thu, 20 May 2010 22:56:11 +0000 (18:56 -0400)
commitaf5050ac60ae083ebc5a0b2a1b4289c51c622f95
treeb4d5a78625ea9b53923f18ad6a8ceb5756c09bfctree | snapshot
parent4e4da3acc11d96d134ed1dc0effd641e7bedb0cacommit | diff
fix SEGV with eval("package Foo {")

OPs relating to the package name and version were subject to double
freeing during error recovery from an incomplete package block.  Fixed by
using the op_latefree mechanism to shift the op free time.
perly.act diff | blob | history
perly.tab diff | blob | history
perly.y diff | blob | history
t/comp/package_block.t diff | blob | history
Domain: System / Base;