diff options
author | David Mitchell <davem@iabyn.com> | 2010-07-18 18:18:50 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2010-07-18 18:39:18 +0100 |
commit | b3f91e9158d8a5c05627eba1c2848f35528571d2 (patch) | |
tree | 2a616b26bdf8d8d42ebdd6c8d05799853348c1e7 /pad.c | |
parent | c794ca97ff43be078aabf556aa282af208d9c38c (diff) | |
download | perl-b3f91e9158d8a5c05627eba1c2848f35528571d2.tar.gz |
add CvGV_set() macro and make CvGV() rvalue only
Now that CvGV can sometimes be reference counted, stop people from directly
assigning to it (by using CvGV as an lvalue), and instead force them to use
CvGV_set()
Diffstat (limited to 'pad.c')
-rw-r--r-- | pad.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1571,7 +1571,7 @@ Perl_cv_clone(pTHX_ CV *proto) #else CvFILE(cv) = CvFILE(proto); #endif - cvgv_set(cv,CvGV(proto)); + CvGV_set(cv,CvGV(proto)); CvSTASH(cv) = CvSTASH(proto); if (CvSTASH(cv)) Perl_sv_add_backref(aTHX_ MUTABLE_SV(CvSTASH(cv)), MUTABLE_SV(cv)); |