__UNDEFINED__
__UNDEFINED__ GvSVn(gv) GvSV(gv) __UNDEFINED__ isGV_with_GP(gv) isGV(gv) __UNDEFINED__ gv_fetchpvn_flags(name, len, flags, svt) gv_fetchpv(name, flags, svt) __UNDEFINED__ gv_fetchsv(name, flags, svt) gv_fetchpv(SvPV_nolen_const(name), flags, svt)
int GvSVn() PREINIT: GV* gv; CODE: RETVAL = 0; gv = gv_fetchpvs("Devel::PPPort::GvTest", GV_ADDMULTI, SVt_PVGV); if (GvSVn(gv) != NULL) { RETVAL++; } OUTPUT: RETVAL
int isGV_with_GP() PREINIT: GV* gv; CODE: RETVAL = 0; gv = gv_fetchpvs("Devel::PPPort::GvTest", GV_ADDMULTI, SVt_PVGV); if (isGV_with_GP(gv)) { RETVAL++; } if (!isGV(&PL_sv_undef)) { RETVAL++; } OUTPUT: RETVAL
SV* gv_fetchpvn_flags() CODE: RETVAL = newRV_inc((SV*)gv_fetchpvn_flags("Devel::PPPort::VERSION", sizeof("Devel::PPPort::VERSION")-1, 0, SVt_PV)); OUTPUT: RETVAL
SV* gv_fetchsv(name) SV *name CODE: RETVAL = newRV_inc((SV*)gv_fetchsv(name, 0, SVt_PV)); OUTPUT: RETVAL
ok(Devel::PPPort::GvSVn(), 1);
ok(Devel::PPPort::isGV_with_GP(), 2);
ok(Devel::PPPort::gv_fetchpvn_flags(), \*Devel::PPPort::VERSION);
ok(Devel::PPPort::gv_fetchsv("Devel::PPPort::VERSION"), \*Devel::PPPort::VERSION);
4 POD Errors
The following errors were encountered while parsing the POD:
- Around line 18:
Unknown directive: =provides
- Around line 22:
Unknown directive: =implementation
- Around line 29:
Unknown directive: =xsubs
- Around line 79:
Unknown directive: =tests