diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-07-08 16:56:50 +0200 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-07-08 23:32:22 +0200 |
commit | 242f8760e6ec383f070c854a602d038abeaf355a (patch) | |
tree | 3b84b59911c540c9813ceb3ae12a9f573ee273cf /sv.h | |
parent | e5b34a76788f710069f8da5111b19844263dbf3f (diff) | |
download | perl-242f8760e6ec383f070c854a602d038abeaf355a.tar.gz |
Add a parameter "destructing" to Gv_AMupdate()
This boolean parameter indicates if the function has been called
to update the overload magic table while looking up the DESTROY
method. In this case, it's probably best to avoid croaking if
those tables could not be updated (for example due to a method
that could not be loaded.)
Diffstat (limited to 'sv.h')
-rw-r--r-- | sv.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -915,7 +915,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)) +#define Gv_AMG(stash) (PL_amagic_generation && Gv_AMupdate(stash, FALSE)) #define SvWEAKREF(sv) ((SvFLAGS(sv) & (SVf_ROK|SVprv_WEAKREF)) \ == (SVf_ROK|SVprv_WEAKREF)) |