newSV_type
#ifndef newSV_type
#if { NEED newSV_type }
SV* newSV_type(pTHX_ svtype const t) { SV* const sv = newSV(0); sv_upgrade(sv, t); return sv; }
#endif
#define NEED_newSV_type
int newSV_type() PREINIT: SV* sv; CODE: RETVAL = 0; sv = newSV_type(SVt_NULL); if (SvTYPE(sv) == SVt_NULL) { RETVAL++; } SvREFCNT_dec(sv);
sv = newSV_type(SVt_PVIV); if (SvTYPE(sv) == SVt_PVIV) { RETVAL++; } SvREFCNT_dec(sv); sv = newSV_type(SVt_PVHV); if (SvTYPE(sv) == SVt_PVHV) { RETVAL++; } SvREFCNT_dec(sv); sv = newSV_type(SVt_PVAV); if (SvTYPE(sv) == SVt_PVAV) { RETVAL++; } SvREFCNT_dec(sv); OUTPUT: RETVAL
ok(Devel::PPPort::newSV_type(), 4);
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.