diff options
author | Joshua Pritikin <joshua.pritikin@db.com> | 1998-07-01 06:09:43 -0400 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-04 05:52:34 +0000 |
commit | d689ffdd6d1d8fd913b48f3cb3a376bd99e0a6cf (patch) | |
tree | 4149cdb70a157cfb0f43ffc2910a0da15c42f486 /sv.h | |
parent | 8fb9a439a71a5e6b7adf7c46052298d23dd9cab7 (diff) | |
download | perl-d689ffdd6d1d8fd913b48f3cb3a376bd99e0a6cf.tar.gz |
fixes for mortalization bug in xsubpp, other efficiency tweaks
Message-Id: <H00000e500086fb3@MHS>
Subject: [PATCH _69] sv_2mortal fix
p4raw-id: //depot/perl@1306
Diffstat (limited to 'sv.h')
-rw-r--r-- | sv.h | 10 |
1 files changed, 0 insertions, 10 deletions
@@ -630,16 +630,6 @@ struct xpvio { #endif /* !CRIPPLED_CC */ #define newRV_inc(sv) newRV(sv) -#ifdef __GNUC__ -# undef newRV_noinc -# define newRV_noinc(sv) ({SV *nsv=newRV((sv)); --SvREFCNT(SvRV(nsv)); nsv;}) -#else -# if defined(CRIPPLED_CC) || defined(USE_THREADS) || defined(PERL_OBJECT) -# else -# undef newRV_noinc -# define newRV_noinc(sv) ((Sv = newRV(sv)), --SvREFCNT(SvRV(Sv)), Sv) -# endif -#endif /* __GNUC__ */ /* the following macros update any magic values this sv is associated with */ |