Home
last modified time | relevance | path

Searched refs:SVt_PV (Results 1 – 25 of 32) sorted by relevance

12

/mirbsd/src/gnu/usr.bin/perl/
Dperl.c2167 (sv = GvSV(gv_fetchpv("\017PEN", TRUE, SVt_PV)))) {
2397 gv = gv_fetchpv(name, create, SVt_PV);
2899 if ((gv = gv_fetchpv(sym,TRUE, SVt_PV)))
3519 PL_hintgv = gv_fetchpv("\010",TRUE, SVt_PV); /* ^H */
3522 PL_errgv = gv_HVadd(gv_fetchpv("@", TRUE, SVt_PV));
3524 PL_replgv = gv_fetchpv("\022", TRUE, SVt_PV); /* ^R */
4431 PL_DBsingle = GvSV((gv_fetchpv("DB::single", GV_ADDMULTI, SVt_PV)));
4433 PL_DBtrace = GvSV((gv_fetchpv("DB::trace", GV_ADDMULTI, SVt_PV)));
4435 PL_DBsignal = GvSV((gv_fetchpv("DB::signal", GV_ADDMULTI, SVt_PV)));
4528 tmpgv = gv_fetchpv("stdin",TRUE, SVt_PV);
[all …]
Dsv.c1336 if (mt != SVt_PV && SvREADONLY(sv) && SvFAKE(sv)) { in Perl_sv_upgrade()
1375 case SVt_PV: in Perl_sv_upgrade()
1440 case SVt_PV: in Perl_sv_upgrade()
1635 if (SvTYPE(sv) < SVt_PV) { in Perl_sv_grow()
1636 sv_upgrade(sv, SVt_PV); in Perl_sv_grow()
1703 case SVt_PV: in Perl_sv_setiv()
1801 case SVt_PV: in Perl_sv_setnv()
3146 case SVt_PV: in Perl_sv_2pv_flags()
3242 if (SvTYPE(sv) < SVt_PV) in Perl_sv_2pv_flags()
3244 sv_upgrade(sv, SVt_PV); in Perl_sv_2pv_flags()
[all …]
Dgv.c808 !(len == 1 && sv_type == SVt_PV && in Perl_gv_fetchpv()
818 else if ((sv_type == SVt_PV && !GvIMPORTED_SV(*gvp)) || in Perl_gv_fetchpv()
845 (sv_type == SVt_PV ? "$" in Perl_gv_fetchpv()
1057 if (sv_type == SVt_PV && ckWARN2(WARN_DEPRECATED, WARN_SYNTAX)) in Perl_gv_fetchpv()
Dsv.h51 SVt_PV, /* 4 */ enumerator
834 STMT_START { assert(SvTYPE(sv) >= SVt_PV); \
850 STMT_START { assert(SvTYPE(sv) >= SVt_PV); \
Dpp.c269 gv = (GV*)gv_fetchpv(sym, FALSE, SVt_PV); in PP()
272 || !(gv = (GV*)gv_fetchpv(sym, TRUE, SVt_PV)))) in PP()
280 gv = (GV*)gv_fetchpv(sym, TRUE, SVt_PV); in PP()
825 if (SvTYPE(sv) >= SVt_PV && SvPVX_const(sv) && SvLEN(sv)) { in PP()
3321 (void)SvUPGRADE(TARG,SVt_PV); in PP()
3548 (void)SvUPGRADE(TARG, SVt_PV); in PP()
3632 (void)SvUPGRADE(TARG, SVt_PV); in PP()
3722 (void)SvUPGRADE(TARG, SVt_PV); in PP()
Ddump.c254 case SVt_PV: in Perl_sv_peek()
1110 case SVt_PV: in Perl_do_sv_dump()
1175 if (type < SVt_PV) { in Perl_do_sv_dump()
Dpp_sort.c1652 PL_firstgv = gv_fetchpv("a", TRUE, SVt_PV); in PP()
1653 PL_secondgv = gv_fetchpv("b", TRUE, SVt_PV); in PP()
Dtoke.c1011 kind == '$' ? SVt_PV : in S_force_ident()
2002 if ((int)strlen(tmpbuf) > 1 && gv_fetchpv(tmpbuf,FALSE, SVt_PV)) in S_intuit_more()
2839 SV * const x = GvSV(gv_fetchpv("\030", TRUE, SVt_PV)); /* $^X */
3078 gv_fetchpv("\024",TRUE, SVt_PV);
5454 gv_fetchpv(ctl_l,TRUE, SVt_PV);
5457 gv_fetchpv("\f",TRUE, SVt_PV); /* Make sure $^L is defined */
5558 ((PL_tokenbuf[0] == '$') ? SVt_PV
5608 ((PL_tokenbuf[0] == '$') ? SVt_PV
9763 SVt_PV);
Dpp_sys.c459 (void)SvUPGRADE(error, SVt_PV); in PP()
496 (void)SvUPGRADE(error, SVt_PV); in PP()
1708 (void)SvUPGRADE(read_target, SVt_PV); in PP()
4017 if ((tmpgv = gv_fetchpv("$", TRUE, SVt_PV))) { in PP()
Dop.c2062 o2 = newSVREF(newGVOP(OP_GV, 0, gv_fetchpv(";", TRUE, SVt_PV))), in Perl_jmaybe()
5226 ? SVt_PV in Perl_ck_rvconst()
5497 (void)SvUPGRADE(namesv, SVt_PV); in Perl_ck_fun()
6070 GvMULTI_on(gv_fetchpv("a", TRUE, SVt_PV)); in S_simplify_sort()
6071 GvMULTI_on(gv_fetchpv("b", TRUE, SVt_PV)); in S_simplify_sort()
Dpp_hot.c1565 (void)SvUPGRADE(sv, SVt_PV); in Perl_do_readline()
3070 else if (SvTYPE(sv) >= SVt_PV) { in Perl_vivify_ref()
Ddoop.c657 (void)SvUPGRADE(sv, SVt_PV); in Perl_do_join()
Dutil.c2230 if ((tmpgv = gv_fetchpv("$",TRUE, SVt_PV))) { in Perl_my_popen()
4053 (void)SvUPGRADE(sv, SVt_PV);
Dpp_ctl.c1017 GV * const gv = gv_fetchpv(".", TRUE, SVt_PV); in PP()
1113 GV * const gv = gv_fetchpv(".", TRUE, SVt_PV); in PP()
/mirbsd/src/gnu/usr.bin/perl/ext/PerlIO/encoding/
Dencoding.xs264 if (SvTYPE(e->dataSV) < SVt_PV) { in PerlIOEncode_fill()
265 sv_upgrade(e->dataSV,SVt_PV); in PerlIOEncode_fill()
464 sv_upgrade(str, SVt_PV); in PerlIOEncode_flush()
/mirbsd/src/gnu/usr.bin/perl/ext/List/Util/
DUtil.xs256 agv = gv_fetchpv("a", TRUE, SVt_PV); in reduce()
257 bgv = gv_fetchpv("b", TRUE, SVt_PV); in reduce()
/mirbsd/src/gnu/usr.bin/perl/ext/Devel/Peek/
DPeek.xs77 else if (SvTYPE(args[j]) >= SVt_PV && SvLEN(args[j])) { in DeadCode()
96 else if (SvTYPE(pad[j]) >= SVt_PV && SvLEN(pad[j])) { in DeadCode()
/mirbsd/src/gnu/usr.bin/perl/ext/Cwd/
DCwd.xs278 (void)SvUPGRADE(sv, SVt_PV); in Perl_getcwd_sv()
/mirbsd/src/gnu/usr.bin/perl/ext/PerlIO/scalar/
Dscalar.xs40 SvUPGRADE(s->var, SVt_PV); in PerlIOScalar_pushed()
/mirbsd/src/gnu/usr.bin/perl/ext/Storable/
DStorable.xs3415 case SVt_PV: in sv_type()
4827 if (SvTYPE(sv) <= SVt_PV) { in retrieve_scalar()
4828 sv_upgrade(sv, SVt_PV); in retrieve_scalar()
6049 SvUPGRADE(in, SVt_PV); in do_retrieve()
6326 gv_fetchpv("Storable::drop_utf8", GV_ADDMULTI, SVt_PV);
6329 gv_fetchpv("Storable::DEBUGME", GV_ADDMULTI, SVt_PV);
6332 gv_fetchpv("Storable::interwork_56_64bit", GV_ADDMULTI, SVt_PV);
/mirbsd/src/gnu/usr.bin/perl/os2/
Dos2.c4044 gv = gv_fetchpv("OS2::is_aout", TRUE, SVt_PV); in Xs_OS2_init()
4049 gv = gv_fetchpv("OS2::is_static", TRUE, SVt_PV); in Xs_OS2_init()
4054 gv = gv_fetchpv("OS2::can_fork", TRUE, SVt_PV); in Xs_OS2_init()
4057 gv = gv_fetchpv("OS2::emx_rev", TRUE, SVt_PV); in Xs_OS2_init()
4062 gv = gv_fetchpv("OS2::emx_env", TRUE, SVt_PV); in Xs_OS2_init()
4065 gv = gv_fetchpv("OS2::os_ver", TRUE, SVt_PV); in Xs_OS2_init()
4068 gv = gv_fetchpv("OS2::nsyserror", TRUE, SVt_PV); in Xs_OS2_init()
/mirbsd/src/gnu/usr.bin/perl/ext/ByteLoader/
Dbytecode.h112 #define BSET_gv_fetchpv(sv, arg) sv = (SV*)gv_fetchpv(arg, TRUE, SVt_PV)
/mirbsd/src/gnu/usr.bin/perl/ext/Devel/PPPort/parts/
Dapidoc.fnc143 AmU||SVt_PV
/mirbsd/src/gnu/usr.bin/perl/ext/Data/Dumper/
DDumper.xs216 assert(SvTYPE(sv) >= SVt_PV); in sv_x()
/mirbsd/src/gnu/usr.bin/perl/win32/
Dperlhost.h1716 if (tmpgv = gv_fetchpv("$", TRUE, SVt_PV)) { in win32_start_child()

12