This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix CvFILE() leak in Perl_newATTRSUB_x()
authorDavid Mitchell <davem@iabyn.com>
Thu, 7 Mar 2019 10:23:04 +0000 (10:23 +0000)
committerDavid Mitchell <davem@iabyn.com>
Thu, 7 Mar 2019 11:21:26 +0000 (11:21 +0000)
commitb37d10f658c300104241001e3f5de1f31d62b22f
tree1271f2cd863462e28fcb33aeb52e2bc7e51d5238
parentf60d17f54c2572c253cccc4479a32236201866b2
fix CvFILE() leak in Perl_newATTRSUB_x()

When overwriting cv with the contents of PL_compcv, it was checking the
CvDYNFILE(cv) flag (to see if CvFILE(cv) needed freeing) *after*
overwriting cv's flags with PL_compcv's flag.
op.c