This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Given that Perl_gp_free() is refcount-dec-and-maybe-free for the glob
authorNicholas Clark <nick@ccl4.org>
Fri, 24 Feb 2006 21:42:33 +0000 (21:42 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 24 Feb 2006 21:42:33 +0000 (21:42 +0000)
commitdd38834bfe79dc631f1823deed588b23c6db62d5
tree5a031a7bf763077367771333987d7b3e18afdc24
parent064cf52948e2ac0b1b809d55fe1b456a0b0fa4c4
Given that Perl_gp_free() is refcount-dec-and-maybe-free for the glob
pointer, it's inconsistent that it only sets this GV's GvGP to 0 if
this GV happened to have the last reference. Why should this GV care if
it had the last reference? So always set it to 0. It's free. Gone.

p4raw-id: //depot/perl@27320
gv.c