newRV_inc newRV_noinc
__UNDEFINED__ newRV_inc(sv) newRV(sv) /* Replace */
#ifndef newRV_noinc #if { NEED newRV_noinc } SV * newRV_noinc(SV *sv) { SV *rv = (SV *)newRV(sv); SvREFCNT_dec(sv); return rv; } #endif #endif
#define NEED_newRV_noinc
U32 newRV_inc_REFCNT() PREINIT: SV *sv, *rv; CODE: sv = newSViv(42); rv = newRV_inc(sv); SvREFCNT_dec(sv); RETVAL = SvREFCNT(sv); sv_2mortal(rv); OUTPUT: RETVAL
U32 newRV_noinc_REFCNT() PREINIT: SV *sv, *rv; CODE: sv = newSViv(42); rv = newRV_noinc(sv); RETVAL = SvREFCNT(sv); sv_2mortal(rv); OUTPUT: RETVAL
ok(&Devel::PPPort::newRV_inc_REFCNT, 1); ok(&Devel::PPPort::newRV_noinc_REFCNT, 1);
5 POD Errors
The following errors were encountered while parsing the POD:
Unknown directive: =provides
Unknown directive: =implementation
Unknown directive: =xsinit
Unknown directive: =xsubs
Unknown directive: =tests
To install Devel::PPPort, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Devel::PPPort
CPAN shell
perl -MCPAN -e shell install Devel::PPPort
For more information on module installation, please visit the detailed CPAN module installation guide.