Home
last modified time | relevance | path

Searched refs:newSVpvn_flags (Results 1 – 25 of 50) sorted by relevance

12

/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/inc/
H A DnewSVpv15 newSVpvn_flags
33 #ifndef newSVpvn_flags
35 # define newSVpvn_flags(s, len, flags) \
68 newSVpvn_flags()
70 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP));
71 XPUSHs(newSVpvn_flags("test", 2, SVs_TEMP));
72 XPUSHs(newSVpvn_flags("test", 0, SVs_TEMP));
73 XPUSHs(newSVpvn_flags(NULL, 2, SVs_TEMP));
74 XPUSHs(newSVpvn_flags(NULL, 0, SVs_TEMP));
80 XPUSHs(newSVpvn_flags("test", 4, SVs_TEMP|SVf_UTF8));
[all …]
H A Dpvs26 __UNDEFINED__ newSVpvs_flags(str, flags) newSVpvn_flags(str "", sizeof(str) - 1, flags)
/openbsd/gnu/usr.bin/perl/ext/mro/
H A Dmro.xs371 ST(0) = newSVpvn_flags(meta->name, meta->length,
375 ST(0) = newSVpvn_flags("dfs", 3, SVs_TEMP);
581 SVfARG(newSVpvn_flags(subname, subname_len,
594 stashname = newSVpvn_flags(fq_subname, stashname_len,
662 SVfARG(newSVpvn_flags(subname, subname_len,
/openbsd/gnu/usr.bin/perl/ext/Opcode/
H A DOpcode.xs381 XPUSHs(newSVpvn_flags(names[myopcode], strlen(names[myopcode]),
468 args = (SV**)SvPVX(newSVpvn_flags((char*)&ST(0), items*sizeof(SV*), SVs_TEMP));
476 XPUSHs(newSVpvn_flags(op_desc[myopcode], strlen(op_desc[myopcode]),
488 XPUSHs(newSVpvn_flags(op_desc[myopcode],
/openbsd/gnu/usr.bin/perl/ext/File-Glob/
H A DGlob.xs56 tmp = newSVpvn_flags(pglob.gl_pathv[i], strlen(pglob.gl_pathv[i]), in doglob()
105 SV *newpatsv = newSVpvn_flags(pat, len, SVs_TEMP); in iterate()
205 word = newSVpvn_flags( in csh_glob()
/openbsd/gnu/usr.bin/perl/
H A Duniversal.c355 return sv_does_sv(sv, newSVpvn_flags(name, strlen(name), SVs_TEMP), 0); in Perl_sv_does()
371 return sv_does_sv(sv, newSVpvn_flags(name, strlen(name), SVs_TEMP | flags), flags); in Perl_sv_does_pv()
387 return sv_does_sv(sv, newSVpvn_flags(name, len, flags | SVs_TEMP), flags); in Perl_sv_does_pvn()
887 ? newSVpvn_flags(SvPVX_const(*argsvp), in XS()
1110 pattern = newSVpvn_flags(RX_PRECOMP(re),RX_PRELEN(re), in XS()
1115 PUSHs(newSVpvn_flags(reflags, left, SVs_TEMP)); in XS()
H A Dpp.c430 ret = newSVpvn_flags( in PP()
3879 big = newSVpvn_flags(big_p, biglen, in PP()
3892 little = newSVpvn_flags(little_p, llen, in PP()
6731 dstr = newSVpvn_flags(s, m-s, flags);
6775 dstr = newSVpvn_flags(s, m-s, flags);
6819 dstr = newSVpvn_flags(m, s-m, flags);
6824 dstr = newSVpvn_flags(s, 1, flags);
6853 dstr = newSVpvn_flags(s, m-s, flags);
6878 dstr = newSVpvn_flags(s, m-s, flags);
6914 dstr = newSVpvn_flags(s, m-s, flags);
[all …]
H A Dpad.h340 newSVpvn_flags(PadnamePV(pn), PadnameLEN(pn), SVs_TEMP|SVf_UTF8)
H A Dtoke.c923 : newSVpvn_flags(s, len, SvUTF8(line)); in Perl_lex_start()
2310 OP* const o = newSVOP(OP_CONST, 0, newSVpvn_flags(s, len, in S_force_ident()
2481 pv = newSVpvn_flags(SvPVX_const(pv), SvCUR(sv), in S_tokeq()
2546 SV * const nsv = newSVpvn_flags(p, len, SvUTF8(sv)); in S_sublex_start()
2876 char_name = newSVpvn_flags(s, e - s, (is_utf8) ? SVf_UTF8 : 0); in Perl_get_and_check_backslash_N_name()
6174 sv = newSVpvn_flags(s, len, UTF ? SVf_UTF8 : 0); in yyl_colon()
7061 c = sv_uni_display(dsv, newSVpvn_flags(s, in yyl_croak_unrecognised()
10249 pv = newSVpvn_flags(s, len, SVs_TEMP); in S_new_constant()
10251 typesv = newSVpvn_flags(type, typelen, SVs_TEMP); in S_new_constant()
10658 SV *tmp = newSVpvn_flags( dest, d - dest, in S_scan_ident()
[all …]
H A DXSUB.h319 #define XST_mPVN(i,v,n) (ST(i) = newSVpvn_flags(v,n, SVs_TEMP))
H A Dperl.c2090 PUSHs(newSVpvn_flags(PL_bincompat_options, strlen(PL_bincompat_options), in S_Internals_V()
2117 PUSHs(newSVpvn_flags(PL_localpatches[i], in S_Internals_V()
2423 popt_copy = SvPVX(newSVpvn_flags(d, strlen(d), SVs_TEMP)); in S_parse_body()
3096 : newSVpvn_flags(methname, len, SVs_TEMP); in Perl_call_method()
5038 prefix_sv = newSVpvn_flags(SvPVX(caret_X), SvCUR(caret_X), in S_mayberelocate()
H A Ddoio.c579 namesv = newSVpvn_flags(oname, len, SVs_TEMP); in Perl_do_open_raw()
855 SV *namesv = newSVpvn_flags(type, tend - type, SVs_TEMP); in Perl_do_open6()
890 SV *namesv = newSVpvn_flags(type, tend - type, SVs_TEMP); in Perl_do_open6()
972 SV *namesv = newSVpvn_flags(type, tend - type, SVs_TEMP); in Perl_do_open6()
H A Dhv.h446 newSVpvn_flags(HeKEY(he), \
H A Dpp.h570 #define mPUSHp(p,l) PUSHs(newSVpvn_flags((p), (l), SVs_TEMP))
H A Dbuiltin.c727 import_sym(newSVpvn_flags(builtins[i].name, strlen(builtins[i].name), SVs_TEMP)); in Perl_import_builtin_bundle()
H A Dmg.c2162 arg1 = newSVpvn_flags(mg->mg_ptr, mg->mg_len, SVs_TEMP); in S_magic_methcall1()
3129 tmp = out ? newSVpvn_flags(out + 1, start + len - out - 1, in Perl_magic_set()
3135 tmp = newSVpvn_flags(start, out ? (STRLEN)(out - start) : len, in Perl_magic_set()
3918 : newSVpvn_flags(mg->mg_ptr, mg->mg_len, SVs_TEMP); in Perl_magic_sethint()
H A Dgv.c1247 packnamesv = newSVpvn_flags(origname, last_separator - origname, in Perl_gv_fetchmethod_pvn_flags()
1355 packname = newSVpvn_flags(packname_ptr, packname_len, in Perl_gv_autoload_pvn()
1408 SV * const tmpsv = newSVpvn_flags(name, len, is_utf8); in Perl_gv_autoload_pvn()
4192 PUSHs(newSVpvn_flags(AMG_id2name(method + assignshift), in Perl_amagic_call()
/openbsd/gnu/usr.bin/perl/ext/B/
H A DB.xs1031 ret = newSVpvn_flags(cPVOPo->op_pv,
1037 ret = newSVpvn_flags(cPVOPo->op_pv, strlen(cPVOPo->op_pv), SVs_TEMP);
1573 ret = newSVpvn_flags((char *)ptr, 1, SVs_TEMP);
1614 ST(0) = newSVpvn_flags((char *)wp, 8, SVs_TEMP);
1617 ST(0) = newSVpvn_flags((char *)&w, 4, SVs_TEMP);
1637 PUSHs(newSVpvn_flags(RX_PRECOMP(sv), RX_PRELEN(sv), SVs_TEMP));
1780 ST(0) = newSVpvn_flags(p, len, SVs_TEMP | utf8);
1816 PUSHs(newSVpvn_flags(&(mg->mg_type), 1, SVs_TEMP));
1830 PUSHs(newSVpvn_flags(mg->mg_ptr, mg->mg_len, SVs_TEMP));
1848 PUSHs(newSVpvn_flags(rx ? RX_PRECOMP(rx) : NULL,
[all …]
/openbsd/gnu/usr.bin/perl/ext/POSIX/
H A DPOSIX.xs3145 PUSHs(newSVpvn_flags(buf.sysname, strlen(buf.sysname), SVs_TEMP));
3146 PUSHs(newSVpvn_flags(buf.nodename, strlen(buf.nodename), SVs_TEMP));
3147 PUSHs(newSVpvn_flags(buf.release, strlen(buf.release), SVs_TEMP));
3148 PUSHs(newSVpvn_flags(buf.version, strlen(buf.version), SVs_TEMP));
3149 PUSHs(newSVpvn_flags(buf.machine, strlen(buf.machine), SVs_TEMP));
3617 PUSHs(newSVpvn_flags(tzname[0], strlen(tzname[0]), SVs_TEMP));
3618 PUSHs(newSVpvn_flags(tzname[1], strlen(tzname[1]), SVs_TEMP));
/openbsd/gnu/usr.bin/perl/ext/PerlIO-via/
H A Dvia.xs171 modesv = newSVpvn_flags(mode, strlen(mode), SVs_TEMP); in PerlIOVia_pushed()
411 SV *buf = newSVpvn_flags((char *) vbuf, count, SVs_TEMP); in PerlIOVia_unread()
/openbsd/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/
H A D501000142 newSVpvn_flags # U
/openbsd/gnu/usr.bin/perl/dist/IO/
H A DIO.xs176 ST(0) = newSVpvn_flags((char*)&pos, sizeof(Fpos_t), SVs_TEMP);
/openbsd/gnu/usr.bin/perl/cpan/Socket/
H A DSocket.xs227 #ifndef newSVpvn_flags
228 # define newSVpvn_flags(s,len,flags) my_newSVpvn_flags(aTHX_ s,len,flags) macro
/openbsd/gnu/usr.bin/perl/ext/Devel-Peek/
H A DPeek.xs361 newSVpvn_flags("$;$", 3, SVs_TEMP)); in S_ck_dump()
/openbsd/gnu/usr.bin/perl/dist/threads-shared/
H A Dshared.xs1487 ST(0) = newSVpvn_flags(key, len, SVs_TEMP | (utf8 ? SVf_UTF8 : 0));
1514 ST(0) = newSVpvn_flags(key, len, SVs_TEMP | (utf8 ? SVf_UTF8 : 0));

12