Lines Matching defs:sobj
113 * In this file, any variable name prefixed with 's' (e.g., ssv, stmp or sobj)
733 S_get_RV(pTHX_ SV *sv, SV *sobj) {
737 (Perl_sharedsv_find(aTHX_ obj) == sobj) &&
738 (SvTYPE(obj) == SvTYPE(sobj))))
748 obj = S_sharedsv_new_private(aTHX_ sobj);
757 if (SvOBJECT(sobj)) {
760 char* stash_ptr = SvPV((SV*) SvSTASH(sobj), len);
769 #define get_RV(sv, sobj) \
770 S_get_RV(aTHX_ sv, sobj); \
772 if (SvROK(sobj)) { \
774 S_get_RV(aTHX_ SvRV(sv), SvRV(sobj)); \
816 SV *sobj = Perl_sharedsv_find(aTHX_ obj);
817 if (sobj) {
820 /* Creating a tmp ref to sobj then assigning it to ssv ensures
824 tmpref = newRV_inc(sobj);
828 if (SvOBJECT(sobj)) {
830 SvREFCNT_dec(SvSTASH(sobj));
831 SvOBJECT_off(sobj);
835 SvOBJECT_on(sobj);
836 SvSTASH_set(sobj, (HV*)fake_stash);
1328 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1339 av_push((AV*) sobj, stmp);
1350 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1354 av_unshift((AV*)sobj, items - 1);
1363 av_store((AV*) sobj, ii - 1, stmp);
1375 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1379 ssv = av_pop((AV*)sobj);
1392 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1396 ssv = av_shift((AV*)sobj);
1409 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1411 av_extend((AV*)sobj, count);
1450 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1452 if (SvTYPE(sobj) == SVt_PVAV) {
1454 exists = av_exists((AV*) sobj, SvIV(index));
1464 exists = hv_exists((HV*) sobj, key, len);
1475 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1481 hv_iterinit((HV*) sobj);
1482 entry = hv_iternext((HV*) sobj);
1500 SV *sobj = SHAREDSV_FROM_OBJ(obj);
1509 entry = hv_iternext((HV*) sobj);