diff options
author | Father Chrysostomos <sprout@cpan.org> | 2012-05-18 06:26:58 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-05-21 18:09:24 -0700 |
commit | 08b684c92a9b7318ff7c7222d6f224eeba346f68 (patch) | |
tree | 6e172832760a370c8105e84d29edaec54820e402 /sv.h | |
parent | a1cd65be3e8d2e7a6b4edef2ff5eee74e79cf497 (diff) | |
download | perl-08b684c92a9b7318ff7c7222d6f224eeba346f68.tar.gz |
Don’t check PL_amagic_generation in Gv_AMG
Because version.pm is now part of perl, PL_amagic_generation is always
non-zero, so there’s no point in doing that check.
Diffstat (limited to 'sv.h')
-rw-r--r-- | sv.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -918,7 +918,7 @@ the scalar's value cannot change unless written to. #define SvGAMAGIC(sv) (SvGMAGICAL(sv) || SvAMAGIC(sv)) -#define Gv_AMG(stash) (PL_amagic_generation && Gv_AMupdate(stash, FALSE)) +#define Gv_AMG(stash) Gv_AMupdate(stash, FALSE) #define SvWEAKREF(sv) ((SvFLAGS(sv) & (SVf_ROK|SVprv_WEAKREF)) \ == (SVf_ROK|SVprv_WEAKREF)) |