/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Project/ |
H A D | Project.xs | 38 PUSHs(sv_2mortal(newSVpv(proj->pj_name, 0))); 43 PUSHs(sv_2mortal(newSVpv(proj->pj_name, 0))); 44 PUSHs(sv_2mortal(newSViv(proj->pj_projid))); 45 PUSHs(sv_2mortal(newSVpv(proj->pj_comment, 0))); 50 PUSHs(sv_2mortal(newRV_noinc((SV *)ary))); 55 PUSHs(sv_2mortal(newRV_noinc((SV *)ary))); 56 PUSHs(sv_2mortal(newSVpv(proj->pj_attr, 0))); 72 PUSHs(sv_2mortal(newSViv(project))); 317 XPUSHs(sv_2mortal(newSVpv(string, 0))); 318 XPUSHs(sv_2mortal(newSVi [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/attrs/ |
H A D | attrs.xs | 63 XPUSHs(sv_2mortal(newSVpvn("method", 6))); 65 XPUSHs(sv_2mortal(newSVpvn("locked", 6)));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/POSIX/ |
H A D | POSIX.xs | 819 sv = sv_2mortal(newSVpvf("%s is not a valid POSIX macro", s)); 825 sv = sv_2mortal(newSVpvf( 835 sv = sv_2mortal(newSVpvf( 1016 sv_2mortal((SV*)RETVAL); 1185 PUSHs(sv_2mortal(newSVnv(frexp(x,&expvar)))); 1186 PUSHs(sv_2mortal(newSViv(expvar))); 1203 PUSHs(sv_2mortal(newSVnv(Perl_modf(x,&intvar)))); 1204 PUSHs(sv_2mortal(newSVnv(intvar))); 1449 XPUSHs(sv_2mortal(newSVpvn("0 but true", 10))); 1451 XPUSHs(sv_2mortal(newSVi [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Opcode/ |
H A D | Opcode.xs | 59 put_op_bitspec(aTHX_ ":none",0, sv_2mortal(new_opset(aTHX_ Nullsv))); 298 PL_endav = (AV*)sv_2mortal((SV*)newAV()); /* ignore END blocks for now */ 343 opset = sv_2mortal(new_opset(aTHX_ opset)); /* verify and clone opset */ 371 XPUSHs(sv_2mortal(newSVpv(names[myopcode], 0))); 385 opset = sv_2mortal(new_opset(aTHX_ Nullsv)); 425 sv_setsv(mask, sv_2mortal(new_opset(aTHX_ PERMITING ? opset_all : Nullsv))); 458 args = (SV**)SvPVX(sv_2mortal(newSVpvn((char*)&ST(0), items*sizeof(SV*)))); 466 XPUSHs(sv_2mortal(newSVpv(op_desc[myopcode], 0))); 477 XPUSHs(sv_2mortal(newSVpv(op_desc[myopcode], 0))); 501 ST(0) = sv_2mortal(new_opse [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Socket/ |
H A D | Socket.xs | 281 ST(0) = sv_2mortal(newSVpvn(addr_str, strlen(addr_str))); 297 ST(0) = sv_2mortal(newSViv(((struct sockaddr*)sockaddr_pv)->sa_family)); 341 ST(0) = sv_2mortal(newSVpvn((char *)&sun_ad, sizeof sun_ad)); 382 ST(0) = sv_2mortal(newSVpvn(addr.sun_path, e - (char*)addr.sun_path)); 415 ST(0) = sv_2mortal(newSVpvn((char *)&sin, sizeof sin)); 444 PUSHs(sv_2mortal(newSViv((IV) port))); 445 PUSHs(sv_2mortal(newSVpvn((char *)&ip_address, sizeof ip_address)));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
H A D | xsutils.c | 206 XPUSHs(sv_2mortal(newSVpvn("locked", 6))); 209 XPUSHs(sv_2mortal(newSVpvn("lvalue", 6))); 212 XPUSHs(sv_2mortal(newSVpvn("method", 6))); 214 XPUSHs(sv_2mortal(newSVpvn("unique", 6))); 218 XPUSHs(sv_2mortal(newSVpvn("unique", 6)));
|
H A D | mg.h | 55 ((mg)->mg_obj ? (mg)->mg_obj : sv_2mortal(newRV(sv)))
|
H A D | XSUB.h | 185 #define XST_mIV(i,v) (ST(i) = sv_2mortal(newSViv(v)) ) 186 #define XST_mUV(i,v) (ST(i) = sv_2mortal(newSVuv(v)) ) 187 #define XST_mNV(i,v) (ST(i) = sv_2mortal(newSVnv(v)) ) 188 #define XST_mPV(i,v) (ST(i) = sv_2mortal(newSVpv(v,0))) 189 #define XST_mPVN(i,v,n) (ST(i) = sv_2mortal(newSVpvn(v,n))) 282 arg = sv_2mortal(arg); \
|
H A D | pp_sys.c | 358 XPUSHs(sv_2mortal(sv)); 404 PL_rs = sv_2mortal(newSVpvn("\000", 1)); 447 tmpsv = sv_2mortal(newSVpvn("Warning: something's wrong", 26)); 485 SV *file = sv_2mortal(newSVpv(CopFILE(PL_curcop),0)); 486 SV *line = sv_2mortal(newSVuv(CopLINE(PL_curcop))); 508 tmpsv = sv_2mortal(newSVpvn("Died", 4)); 884 XPUSHs(sv_2mortal(newSViv(SvREFCNT(obj)-1))); 953 PUSHs(sv_2mortal(newSVuv(O_RDWR|O_CREAT))); 955 PUSHs(sv_2mortal(newSVuv(O_RDWR))); 966 PUSHs(sv_2mortal(newSVu [all...] |
H A D | pp_pack.c | 690 XPUSHs(sv_2mortal(sv)); 756 XPUSHs(sv_2mortal(sv)); 787 XPUSHs(sv_2mortal(sv)); 814 PUSHs(sv_2mortal(sv)); 842 PUSHs(sv_2mortal(sv)); 879 PUSHs(sv_2mortal(sv)); 911 PUSHs(sv_2mortal(sv)); 951 PUSHs(sv_2mortal(sv)); 982 PUSHs(sv_2mortal(sv)); 1031 PUSHs(sv_2mortal(s [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/File/Glob/ |
H A D | Glob.xs | 66 tmp = sv_2mortal(newSVpvn(pglob.gl_pathv[i],
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Sys/Hostname/ |
H A D | Hostname.xs | 78 PUSHs(sv_2mortal(sv));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/ |
H A D | Encode.xs | 43 XPUSHs(sv_2mortal(newSVpvn(name, strlen(name)))); 72 SV *dst = sv_2mortal(newSV(slen+1)); 162 sv_2mortal(newSVpvf("\\x{%04"UVxf"}", (UV)ch)); 168 sv_2mortal(newSVpvf("&#%" UVuf ";", (UV)ch)); 174 sv_2mortal(newSVpvf("&#x%" UVxf ";", (UV)ch)); 204 sv_2mortal(newSVpvf("\\x%02" UVXf, (UV)s[slen])); 347 ST(0) = sv_2mortal(dst); 393 ST(0) = sv_2mortal(dst); 415 ST(0) = sv_2mortal(newSVpvn(enc->name[0],strlen(enc->name[0])));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/via/ |
H A D | via.xs | 154 modesv = sv_2mortal(newSVpvn(mode, strlen(mode))); 221 SV *fdsv = sv_2mortal(newSViv(fd)); 228 SV *imodesv = sv_2mortal(newSViv(imode)); 229 SV *permsv = sv_2mortal(newSViv(perm)); 363 SV *offsv = sv_2mortal(sizeof(Off_t) > sizeof(IV) 365 SV *whsv = sv_2mortal(newSViv(whence)); 394 SV *buf = sv_2mortal(newSVpvn((char *) vbuf, count)); 414 SV *buf = sv_2mortal(newSV(count)); 415 SV *n = sv_2mortal(newSViv(count));
|
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Exacct/File/ |
H A D | File.xs | 182 PUSHs(sv_2mortal(sv)); 195 PUSHs(sv_2mortal(sv)); 196 PUSHs(sv_2mortal(new_catalog(object.eo_catalog)));
|
/osnet-11/usr/src/cmd/perl/contrib/Sun/Solaris/Ucred/ |
H A D | Ucred.xs | 139 PUSHs(sv_2mortal(newSViv(n))); 147 PUSHs(sv_2mortal(newSViv(gids[i])));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/DynaLoader/ |
H A D | dlutils.c | 72 XPUSHs(sv_2mortal(dl_libref));
|
H A D | dl_dlopen.xs | 253 ST(0) = sv_2mortal(newRV((SV*)newXS(perl_name,
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Time/HiRes/ |
H A D | HiRes.xs | 863 PUSHs(sv_2mortal(newSVuv(Tp.tv_sec))); 864 PUSHs(sv_2mortal(newSViv(Tp.tv_usec))); 867 PUSHs(sv_2mortal(newSVnv(Tp.tv_sec + (Tp.tv_usec / 1000000.0)))); 893 PUSHs(sv_2mortal(newSViv(Tp.tv_sec))); 894 PUSHs(sv_2mortal(newSViv(Tp.tv_usec))); 897 PUSHs(sv_2mortal(newSVnv(Tp.tv_sec + (Tp.tv_usec / 1000000.0)))); 937 PUSHs(sv_2mortal(newSVnv(TV2NV(oldit.it_value)))); 940 PUSHs(sv_2mortal(newSVnv(TV2NV(oldit.it_interval)))); 952 PUSHs(sv_2mortal(newSVnv(TV2NV(nowit.it_value)))); 955 PUSHs(sv_2mortal(newSVn [all...] |
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/CN/ |
H A D | Makefile.PL | 125 XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/EBCDIC/ |
H A D | Makefile.PL | 106 XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/JP/ |
H A D | Makefile.PL | 125 XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/KR/ |
H A D | Makefile.PL | 123 XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/Symbol/ |
H A D | Makefile.PL | 111 XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
|
/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/TW/ |
H A D | Makefile.PL | 121 XPUSHs(sv_2mortal(newSVpvn(name,strlen(name))));
|