diff options
author | Karl Williamson <khw@cpan.org> | 2019-09-10 12:37:28 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-09-15 10:39:56 -0600 |
commit | 3f2f854a8971dad2da7193c73a1a3d2bdc3085d4 (patch) | |
tree | aba45bd58b1d9ed705ee073c769f2211e4258ab0 /inline.h | |
parent | 73f0a2ebf04911b86968dd3aef90572662bc36ca (diff) | |
download | perl-3f2f854a8971dad2da7193c73a1a3d2bdc3085d4.tar.gz |
Some SvREFCNT_foo are no longer macros
but are inline functions. They should be listed in embed.fnc.
Diffstat (limited to 'inline.h')
-rw-r--r-- | inline.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -196,6 +196,8 @@ Perl_SvREFCNT_inc(SV *sv) PERL_STATIC_INLINE SV * Perl_SvREFCNT_inc_NN(SV *sv) { + PERL_ARGS_ASSERT_SVREFCNT_INC_NN; + SvREFCNT(sv)++; return sv; } @@ -221,6 +223,9 @@ PERL_STATIC_INLINE void Perl_SvREFCNT_dec_NN(pTHX_ SV *sv) { U32 rc = SvREFCNT(sv); + + PERL_ARGS_ASSERT_SVREFCNT_DEC_NN; + if (LIKELY(rc > 1)) SvREFCNT(sv) = rc - 1; else |