This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Calling cv_undef() on the CV created by newCONSTSUB() would leak like
authorNicholas Clark <nick@ccl4.org>
Wed, 19 Apr 2006 08:42:18 +0000 (08:42 +0000)
committerNicholas Clark <nick@ccl4.org>
Wed, 19 Apr 2006 08:42:18 +0000 (08:42 +0000)
commitcbf82dd00c19573e7e274a1d8dda9656bc6e259a
tree85a421e839c6a91506d7a9f972bf553b2cf43845
parent39cd7a593a348b713bd3e45241789bcc2a458c1a
Calling cv_undef() on the CV created by newCONSTSUB() would leak like
a Jumblie's preferred maritime craft. To free CvFILE for this case,
take advantage of the 0 length prototype that will also be there,
and hang it from the prototype. To do this properly means changing
code to actually pay attention to SvCUR() on prototypes. It turns out
that we always know the length of the prototype string, so this may
be faster. Certainly, it's a memory saving (even ignoring the leak).

p4raw-id: //depot/perl@27896
dump.c
embed.fnc
embed.h
global.sym
mathoms.c
op.c
pod/perlapi.pod
proto.h
sv.c
util.c