This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
add CVf_CVGV_RC flag
authorDavid Mitchell <davem@iabyn.com>
Sun, 18 Jul 2010 14:07:08 +0000 (15:07 +0100)
committerDavid Mitchell <davem@iabyn.com>
Sun, 18 Jul 2010 17:39:18 +0000 (18:39 +0100)
commitcfc1e951d98ba2b9a0e066aba9aadba4cd919eec
tree035e1c687d0f681990220c6e3f4db9317252fd3e
parent00c0cb6d254eaba165c8445a6e68686b8285b5a3
add CVf_CVGV_RC flag

after the recent commit 803f274831f937654d48f8cf0468521cbf8f5dff,
the CvGV field is sometimes reference counted. Since it was intended that
the reference counting would happen only for anonymous CVs, the CVf_ANON
flag was co-opted to indicate whether RC was being used. This is not
entirely robust; for example, sub __ANON__ {} is a non-anon sub which
points to the same GV used by anon subs, which while itself doesn't
directly break things, shows that the potential for breakage is there.

So add a separate flag just to indicate the reference count status of the
CvGV field.
cv.h
dump.c
ext/Devel-Peek/t/Peek.t
gv.c
op.c
sv.c
t/op/stash.t