diff options
author | Nicholas Clark <nick@ccl4.org> | 2010-11-03 16:54:05 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2010-11-03 16:54:05 +0000 |
commit | 8897dcaad14089c32e969309beb16112ec768eaf (patch) | |
tree | 7610d6a83c89377e877de24b35643cecaa1035c9 /pp.h | |
parent | 25a9ffce153b0e67cfefd260754edeb097da5be7 (diff) | |
download | perl-8897dcaad14089c32e969309beb16112ec768eaf.tar.gz |
Inline tryAMAGICunDEREF_var() into its callers and eliminate it.
Nothing outside the core was using this macro.
Diffstat (limited to 'pp.h')
-rw-r--r-- | pp.h | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -449,14 +449,14 @@ Does not use C<TARG>. See also C<XPUSHu>, C<mPUSHu> and C<PUSHu>. } \ } STMT_END -#define tryAMAGICunDEREF_var(meth_enum) \ +/* This is no longer used anywhere in the core. You might wish to consider + calling amagic_deref_call() directly, as it has a cleaner interface. */ +#define tryAMAGICunDEREF(meth) \ STMT_START { \ - sv = amagic_deref_call(aTHX_ *sp, meth_enum); \ + sv = amagic_deref_call(aTHX_ *sp, CAT2(meth,_amg)); \ SPAGAIN; \ } STMT_END -#define tryAMAGICunDEREF(meth) tryAMAGICunDEREF_var(CAT2(meth,_amg)) - #define opASSIGN (PL_op->op_flags & OPf_STACKED) #define SETsv(sv) STMT_START { \ |