Searched refs:sv (Results 51 - 75 of 134) sorted by relevance

123456

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/
H A Dpp_ctl.c84 SV *sv = SvRV(tmpstr); local
85 if(SvMAGICAL(sv))
86 mg = mg_find(sv, PERL_MAGIC_qr);
241 SV *sv = cx->sb_targ; local
244 if (SvTYPE(sv) < SVt_PVMG)
245 (void)SvUPGRADE(sv, SVt_PVMG);
246 if (!(mg = mg_find(sv, PERL_MAGIC_regex_global))) {
247 sv_magic(sv, Nullsv, PERL_MAGIC_regex_global, Nullch, 0);
248 mg = mg_find(sv, PERL_MAGIC_regex_global);
251 if (DO_UTF8(sv))
333 register SV *sv = Nullsv; local
1032 register SV *sv; local
1271 SV *sv; local
1440 SV *sv; local
1804 SV *sv; local
1916 SV *sv = Nullsv; local
2114 SV *sv = POPs; local
2314 SV *sv = GvSV(PL_DBsub); local
2532 S_save_lines(pTHX_ AV *array, SV *sv) argument
2628 Perl_sv_compile_2op(pTHX_ SV *sv, OP** startop, char *code, PAD** padp) argument
2656 SV *sv = sv_newmortal(); local
2956 SV *sv; local
3354 SV *sv = sv_newmortal(); local
3557 S_doparseform(pTHX_ SV *sv) argument
[all...]
H A Ddoio.c637 SV *sv; local
640 sv = *av_fetch(PL_fdpid,fd,TRUE);
641 (void)SvUPGRADE(sv, SVt_IV);
642 pid = SvIVX(sv);
643 SvIVX(sv) = 0;
644 sv = *av_fetch(PL_fdpid,savefd,TRUE);
645 (void)SvUPGRADE(sv, SVt_IV);
646 SvIVX(sv) = pid;
712 register SV *sv; local
746 sv
748 sv_setsv(GvSV(gv),sv); local
801 sv); local
812 PL_oldname, sv, Strerror(errno) ); local
828 PL_oldname, sv, Strerror(errno) ); local
927 Perl_do_pipe(pTHX_ SV *sv, GV *rgv, GV *wgv) argument
1257 Perl_do_print(pTHX_ register SV *sv, PerlIO *fp) argument
1350 SV* sv = POPs; local
1379 SV *sv; local
[all...]
H A Dhv.c156 SV *sv = sv_newmortal(), *esv = sv_newmortal(); local
158 sv_setpvn(sv, key, klen);
162 /* XXX is this line an error ???: SV *sv = sv_newmortal(); */
163 sv_usepvn(sv, (char *) key, klen);
166 SvUTF8_on(sv);
169 Perl_croak(aTHX_ SvPVX(esv), sv); local
347 /* note that hent_val will be a mortal sv for MAGICAL hashes */
380 SV *sv; local
402 sv = sv_newmortal();
415 mg_copy((SV*)hv, sv, (cha
813 SV *sv; local
881 SV *sv; local
1832 SV *sv; local
1878 SV* sv = sv_newmortal(); local
[all...]
H A Dgv.c261 SV* sv = *svp++; local
262 HV* basestash = gv_stashsv(sv, FALSE);
266 sv, HvNAME(stash)); local
633 Perl_gv_stashsv(pTHX_ SV *sv, I32 create) argument
637 ptr = SvPV(sv,len);
1056 SV *sv = GvSV(gv); local
1057 (void)SvUPGRADE(sv, SVt_PVNV);
1058 Perl_sv_setpvf(aTHX_ sv,
1066 SvNVX(sv) = SvNVX(PL_patchlevel);
1067 SvNOK_on(sv);
1073 SV *sv = GvSV(gv); local
1083 Perl_gv_fullname4(pTHX_ SV *sv, GV *gv, const char *prefix, bool keepmain) argument
1099 Perl_gv_fullname3(pTHX_ SV *sv, GV *gv, const char *prefix) argument
1105 Perl_gv_efullname4(pTHX_ SV *sv, GV *gv, const char *prefix, bool keepmain) argument
1114 Perl_gv_efullname3(pTHX_ SV *sv, GV *gv, const char *prefix) argument
1121 Perl_gv_fullname(pTHX_ SV *sv, GV *gv) argument
1128 Perl_gv_efullname(pTHX_ SV *sv, GV *gv) argument
[all...]
H A Dpad.h89 =for apidoc m|SV *|PAD_SETSV |PADOFFSET po|SV* sv
90 Set the slot at offset C<po> in the current pad to C<sv>
126 # define PAD_SETSV(po,sv) pad_setsv(po,sv)
129 # define PAD_SETSV(po,sv) PL_curpad[po] = (sv)
H A Dhv.h33 /* This structure must match the beginning of struct xpvmg in sv.h. */
166 =for apidoc Am|SV*|HeSVKEY_set|HE* he|SV* sv
271 #define HeSVKEY_set(he,sv) ((HeKLEN(he) = HEf_SVKEY), (HeKEY_sv(he) = sv))
322 #define Perl_sharepvn(sv, len, hash) HEK_KEY(share_hek(sv, len, hash))
323 #define sharepvn(sv, len, hash) Perl_sharepvn(sv, len, hash)
H A Dutil.c355 Perl_fbm_compile(pTHX_ SV *sv, U32 flags) argument
365 MAGIC *mg = SvUTF8(sv) && SvMAGICAL(sv) ? mg_find(sv, PERL_MAGIC_utf8) : NULL;
366 sv_catpvn(sv, "\n", 1); /* Taken into account in fbm_instr() */
370 s = (U8*)SvPV_force(sv, len);
371 (void)SvUPGRADE(sv, SVt_PVBM);
382 Sv_Grow(sv, len + 256 + FBM_TABLE_OFFSET);
383 table = (unsigned char*)(SvPVX(sv) + len + FBM_TABLE_OFFSET);
395 sv_magic(sv, Nulls
818 SV *sv; local
885 SV *sv = mess_alloc(); local
949 SV *sv = mess_alloc(); local
1810 SV *sv; local
1943 SV *sv; local
2436 SV *sv; local
2454 SV *sv; local
2504 register SV *sv; local
2950 Perl_condpair_magic(pTHX_ SV *sv) argument
2991 SV *sv = osv; local
3029 SV *sv; local
3122 SV *sv = newSVsv(*svp); local
3801 Perl_getcwd_sv(pTHX_ register SV *sv) argument
4213 Perl_sv_nosharing(pTHX_ SV *sv) argument
4228 Perl_sv_nolocking(pTHX_ SV *sv) argument
4244 Perl_sv_nounlocking(pTHX_ SV *sv) argument
[all...]
H A Dperl.c552 * destructors and destructees still exist. Some sv's might remain.
955 SV* sv; local
960 for (sv = sva + 1; sv < svend; ++sv) {
961 if (SvTYPE(sv) != SVTYPEMASK) {
962 PerlIO_printf(Perl_debug_log, "leaked: 0x%p\n", sv);
1317 register SV *sv; local
1324 sv = newSVpvn("",0); /* first used for -I flags */
1325 SAVEFREESV(sv);
1708 SV* sv; local
2112 Perl_call_sv(pTHX_ SV *sv, I32 flags) argument
2300 Perl_eval_sv(pTHX_ SV *sv, I32 flags) argument
2403 SV* sv = newSVpv(p, 0); local
2436 SV* sv; local
2613 SV *sv; local
2725 SV *sv; local
3049 S_open_script(pTHX_ char *scriptname, bool dosearch, SV *sv) argument
4079 SV *sv = newSVpv(argv[0],0); local
4080 av_push(GvAVn(PL_argvgv),sv); local
4096 S_procself_val(pTHX_ SV *sv, char *arg0) argument
4130 SV *sv; local
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Data/Dumper/
H A DDumper.xs8 static I32 esc_q_utf8 (pTHX_ SV *sv, char *src, STRLEN slen);
9 static SV *sv_x (pTHX_ SV *sv, char *str, STRLEN len, I32 n);
45 #define DD_is_integer(sv) (SvIOK(sv) && (SvIsUV(val) ? SvUV(sv) == SvNV(sv) : SvIV(sv) == SvNV(sv)))
47 #define DD_is_integer(sv) SvIOK(sv)
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/scalar/
H A Dscalar.xs122 SV *sv = s->var;
125 dst = SvGROW(sv, SvCUR(sv) + count);
126 offset = SvCUR(sv);
130 if ((s->posn + count) > SvCUR(sv))
131 dst = SvGROW(sv, (STRLEN)s->posn + count);
133 dst = SvPV_nolen(sv);
138 if ((STRLEN) s->posn > SvCUR(sv))
139 SvCUR_set(sv, (STRLEN)s->posn);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/ByteLoader/
H A DByteLoader.xs130 SV *sv = newSVpvn ("", 0);
132 if (!sv)
134 filter_add(byteloader_filter, sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/CN/
H A DMakefile.PL118 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
121 XPUSHs(sv);
129 SvREFCNT_dec(sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/EBCDIC/
H A DMakefile.PL99 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
102 XPUSHs(sv);
110 SvREFCNT_dec(sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/JP/
H A DMakefile.PL118 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
121 XPUSHs(sv);
129 SvREFCNT_dec(sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/KR/
H A DMakefile.PL116 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
119 XPUSHs(sv);
127 SvREFCNT_dec(sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/Symbol/
H A DMakefile.PL104 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
107 XPUSHs(sv);
115 SvREFCNT_dec(sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/TW/
H A DMakefile.PL114 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
117 XPUSHs(sv);
125 SvREFCNT_dec(sv);
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/
H A DExacct.xs129 SV *sv;
133 sv = SvRV(catalog);
134 if (SvIOK(sv) &&
135 SvSTASH(sv) == Sun_Solaris_Exacct_Catalog_stash) {
136 return (SvIV(sv));
254 deflate_xs_ea_object(SV *sv)
260 PERL_ASSERT(sv != NULL);
261 sv = SvRV(sv);
262 PERL_ASSERT(sv !
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Devel/PPPort/
H A DPPPort.pm96 newCONSTSUB(stash,name,sv)
97 newRV_inc(sv)
98 newRV_noinc(sv)
136 SvPVbyte(sv,lp) [*]
522 # define newRV_inc(sv) newRV(sv)
537 # define newRV_noinc(sv) \
539 SV *nsv = (SV*)newRV(sv); \
540 SvREFCNT_dec(sv); \
545 static SV * newRV_noinc (SV * sv)
[all...]
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/Object/
H A DObject.xs62 SV *sv;
84 sv = copy_xs_ea_object(*svp);
85 if (av_store(dst_av, i, sv) == NULL) {
86 SvREFCNT_dec(sv);
92 sv = newRV_noinc((SV *)dst_av);
93 sv_bless(sv, Sun_Solaris_Exacct_Object__Array_stash);
95 sv_magic((SV *)tied_av, sv, 'P', Nullch, 0);
96 SvREFCNT_dec(sv);
138 SV *rv, *sv;
471 SV *sv, *r
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Digest/MD5/
H A DMD5.xs72 #define SvPVbyte(sv, lp) \
73 ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK) \
74 ? ((lp = SvCUR(sv)), SvPVX(sv)) : my_sv_2pvbyte(aTHX_ sv, &lp))
77 my_sv_2pvbyte(pTHX_ register SV *sv, STRLEN *lp)
79 sv_utf8_downgrade(sv,0);
80 return SvPV(sv,*lp);
469 static MD5_CTX* get_md5_ctx(pTHX_ SV* sv)
471 if (SvROK(sv)) {
[all...]
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/Byte/
H A DMakefile.PL142 SV *sv = sv_bless(newRV_noinc(newSViv(PTR2IV(enc))),stash);
145 XPUSHs(sv);
153 SvREFCNT_dec(sv);
/osnet-11/usr/src/lib/libsocket/common/
H A Dllib-lsocket76 int socketpair(int domain, int type, int protocol, int sv[]);
77 int _socketpair(int domain, int type, int protocol, int *sv);
78 int _socketpair_bsd(int domain, int type, int protocol, int *sv);
79 int __xnet_socketpair(int domain, int type, int protocol, int *sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/IPC/SysV/
H A DSysV.xs65 SV *sv;
68 sv = *av_fetch(list,0,TRUE); ds.msg_perm.uid = SvIV(sv);
69 sv = *av_fetch(list,1,TRUE); ds.msg_perm.gid = SvIV(sv);
70 sv = *av_fetch(list,4,TRUE); ds.msg_perm.mode = SvIV(sv);
71 sv = *av_fetch(list,6,TRUE); ds.msg_qbytes = SvIV(sv);
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/re/
H A Dre.xs17 extern char* my_re_intuit_start (pTHX_ regexp *prog, SV *sv, char *strpos,

Completed in 558 milliseconds

123456