In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/d739d27d3ebeb2deed70d9d0b7cf78959c1375f0?hp=42262fd376c1e577f7a3a11ba0a606c6a3de1567>

- Log -----------------------------------------------------------------
commit d739d27d3ebeb2deed70d9d0b7cf78959c1375f0
Author: Father Chrysostomos <[email protected]>
Date:   Sun Sep 21 12:52:59 2014 -0700

    pp.h: Remove SETsv and SETsvUN
    
    With commit 6f1401dc2a, most of the old overload macros stopped being
    used.  d4f7673c78 removed them.  SETsv and SETsvUN were only used
    by the removed macros, and are now completetly unused in core
    and on CPAN.
-----------------------------------------------------------------------

Summary of changes:
 pp.h | 9 ---------
 1 file changed, 9 deletions(-)

diff --git a/pp.h b/pp.h
index d0691f8..00e9420 100644
--- a/pp.h
+++ b/pp.h
@@ -479,15 +479,6 @@ Does not use C<TARG>.  See also C<XPUSHu>, C<mPUSHu> and 
C<PUSHu>.
 
 
 #define opASSIGN (PL_op->op_flags & OPf_STACKED)
-#define SETsv(sv)      STMT_START {                                    \
-               if (opASSIGN || (SvFLAGS(TARG) & SVs_PADMY))            \
-                  { sv_setsv(TARG, (sv)); SETTARG; }                   \
-               else SETs(sv); } STMT_END
-
-#define SETsvUN(sv)    STMT_START {                                    \
-               if (SvFLAGS(TARG) & SVs_PADMY)          \
-                  { sv_setsv(TARG, (sv)); SETTARG; }                   \
-               else SETs(sv); } STMT_END
 
 /*
 =for apidoc mU||LVRET

--
Perl5 Master Repository

Reply via email to