Home
last modified time | relevance | path

Searched refs:SvFLAGS (Results 1 – 25 of 30) sorted by relevance

12

/mirbsd/src/gnu/usr.bin/perl/
Dsv.h126 #define SvFLAGS(sv) (sv)->sv_flags macro
579 #define SvNIOK(sv) (SvFLAGS(sv) & (SVf_IOK|SVf_NOK))
580 #define SvNIOKp(sv) (SvFLAGS(sv) & (SVp_IOK|SVp_NOK))
581 #define SvNIOK_off(sv) (SvFLAGS(sv) &= ~(SVf_IOK|SVf_NOK| \
590 #define SvOK(sv) (SvFLAGS(sv) & SVf_OK)
592 SvFLAGS(sv) &= ~(SVf_OK|SVf_AMAGIC| \
596 SvFLAGS(sv) &= ~(SVf_OK|SVf_AMAGIC| \
600 #define SvOKp(sv) (SvFLAGS(sv) & (SVp_IOK|SVp_NOK|SVp_POK))
601 #define SvIOKp(sv) (SvFLAGS(sv) & SVp_IOK)
602 #define SvIOKp_on(sv) ((void)SvOOK_off(sv), SvFLAGS(sv) |= SVp_IOK)
[all …]
Dhv.h219 #define HvSHAREKEYS(hv) (SvFLAGS(hv) & SVphv_SHAREKEYS)
220 #define HvSHAREKEYS_on(hv) (SvFLAGS(hv) |= SVphv_SHAREKEYS)
221 #define HvSHAREKEYS_off(hv) (SvFLAGS(hv) &= ~SVphv_SHAREKEYS)
231 #define HvHASKFLAGS(hv) (SvFLAGS(hv) & SVphv_HASKFLAGS)
232 #define HvHASKFLAGS_on(hv) (SvFLAGS(hv) |= SVphv_HASKFLAGS)
233 #define HvHASKFLAGS_off(hv) (SvFLAGS(hv) &= ~SVphv_HASKFLAGS)
235 #define HvLAZYDEL(hv) (SvFLAGS(hv) & SVphv_LAZYDEL)
236 #define HvLAZYDEL_on(hv) (SvFLAGS(hv) |= SVphv_LAZYDEL)
237 #define HvLAZYDEL_off(hv) (SvFLAGS(hv) &= ~SVphv_LAZYDEL)
239 #define HvREHASH(hv) (SvFLAGS(hv) & SVphv_REHASH)
[all …]
Dpad.c352 SvFLAGS(namesv) |= SVpad_TYPED; in Perl_pad_add_name()
356 SvFLAGS(namesv) |= SVpad_OUR; in Perl_pad_add_name()
432 if (!(SvFLAGS(sv) & (SVs_PADTMP | SVs_PADMY)) && in Perl_pad_alloc()
438 SvFLAGS(sv) |= tmptype; in Perl_pad_alloc()
519 || ((SvFLAGS(sv) & SVpad_OUR) && GvSTASH(sv) == ourstash)) in Perl_pad_check_dup()
539 && ((SvFLAGS(sv) & SVpad_OUR) && GvSTASH(sv) == ourstash) in Perl_pad_check_dup()
606 else if ((SvFLAGS(sv) & SVpad_OUR) in Perl_pad_findmy()
746 (SvFLAGS(sv) & SVpad_TYPED) ? SvSTASH(sv) : Nullhv, in S_pad_findlex()
747 (SvFLAGS(sv) & SVpad_OUR) ? GvSTASH(sv) : Nullhv, in S_pad_findlex()
775 (SvFLAGS(sv) & SVpad_TYPED) in S_pad_findlex()
[all …]
Dscope.c218 SvFLAGS(osv) |= (SvFLAGS(osv) & in S_save_scalar_at()
223 SvFLAGS(sv) |= SvMAGICAL(osv); in S_save_scalar_at()
345 SvFLAGS((SV*)av) |= SvMAGICAL(oav); in Perl_save_ary()
369 SvFLAGS((SV*)hv) |= SvMAGICAL(ohv); in Perl_save_hash()
758 SvFLAGS(value) |= SvMAGICAL(sv); in Perl_leave_scope()
770 SvFLAGS(value) |= (SvFLAGS(value) & in Perl_leave_scope()
792 SvFLAGS((SV*)av) |= SvMAGICAL(goner); in Perl_leave_scope()
810 SvFLAGS(hv) |= SvMAGICAL(goner); in Perl_leave_scope()
962 = SvFLAGS(sv) & (SVs_PADBUSY|SVs_PADMY|SVs_PADTMP); in Perl_leave_scope()
969 SvFLAGS(*(SV**)ptr) |= padflags; /* preserve pad nature */ in Perl_leave_scope()
Dsv.c188 SvFLAGS(p) = SVTYPEMASK; \
241 SvFLAGS(sv) = 0; in S_new_SV()
257 SvFLAGS(p) = 0; \
329 SvFLAGS(sva) = flags; /* FAKE if not to be freed */ in Perl_sv_add_arena()
343 SvFLAGS(sv) = SVTYPEMASK; in Perl_sv_add_arena()
350 SvFLAGS(sv) = SVTYPEMASK; in Perl_sv_add_arena()
449 SvFLAGS(sv) |= SVf_BREAK; in do_clean_named_objs()
482 SvFLAGS(sv) |= SVf_BREAK; in do_clean_all()
1408 assert((SvFLAGS(sv) & SVpad_TYPED) == 0); in Perl_sv_upgrade()
1422 SvFLAGS(sv) &= ~SVTYPEMASK; in Perl_sv_upgrade()
[all …]
Dcc_runtime.h32 SvFLAGS(sv) &= ~(SVf_NOK|SVf_POK|SVp_NOK|SVp_POK); \
Ddump.c170 if (!(SvFLAGS(sv) & (SVf_OK|SVf_OOK|SVs_OBJECT| in Perl_sv_peek()
177 if (!(SvFLAGS(sv) & (SVf_ROK|SVf_OOK|SVs_OBJECT| in Perl_sv_peek()
179 !(~SvFLAGS(sv) & (SVf_POK|SVf_NOK|SVf_READONLY| in Perl_sv_peek()
187 if (!(SvFLAGS(sv) & (SVf_ROK|SVf_OOK|SVs_OBJECT| in Perl_sv_peek()
189 !(~SvFLAGS(sv) & (SVf_POK|SVf_NOK|SVf_READONLY| in Perl_sv_peek()
198 if (!(SvFLAGS(sv) & (SVf_OK|SVf_OOK|SVs_OBJECT| in Perl_sv_peek()
991 flags = SvFLAGS(sv); in Perl_do_sv_dump()
Dperl.c920 if (SvFLAGS(resv) & SVf_BREAK) { in perl_destruct()
924 SvFLAGS(resv) &= ~SVf_BREAK; in perl_destruct()
1161 SvFLAGS(PL_fdpid) |= SVTYPEMASK; /* don't clean out pid table now */ in perl_destruct()
1162 SvFLAGS(PL_strtab) |= SVTYPEMASK; /* don't clean out strtab now */ in perl_destruct()
1168 SvFLAGS(PL_fdpid) &= ~SVTYPEMASK; in perl_destruct()
1169 SvFLAGS(PL_fdpid) |= SVt_PVAV; in perl_destruct()
1170 SvFLAGS(PL_strtab) &= ~SVTYPEMASK; in perl_destruct()
1171 SvFLAGS(PL_strtab) |= SVt_PVHV; in perl_destruct()
1219 SvFLAGS(&PL_sv_yes) = 0; in perl_destruct()
1224 SvFLAGS(&PL_sv_no) = 0; in perl_destruct()
[all …]
Dmg.c103 SvFLAGS(sv) |= (SvFLAGS(sv) & (SVp_NOK|SVp_POK)) >> PRIVSHIFT; in S_save_magic()
125 if (!(SvFLAGS(sv) & (SVs_GMG|SVs_SMG)) || vtbl->svt_clear) in Perl_mg_magical()
2002 (UV)SvFLAGS(svp[i])); in Perl_magic_killbackrefs()
2724 SvFLAGS(sv) |= mgs->mgs_flags; in S_restore_magic()
2731 U32 public = SvFLAGS(sv) & (SVf_IOK|SVf_NOK|SVf_POK); in S_restore_magic()
2733 SvFLAGS(sv) &= ~( public | SVp_IOK|SVp_NOK|SVp_POK ); in S_restore_magic()
2734 SvFLAGS(sv) |= ( public << PRIVSHIFT ); in S_restore_magic()
Dpad.h221 #define PAD_COMPNAME_FLAGS(po) SvFLAGS(*av_fetch(PL_comppad_name, (po), FALSE))
Dpp.h470 if (opASSIGN || (SvFLAGS(TARG) & SVs_PADMY)) \
475 if (SvFLAGS(TARG) & SVs_PADMY) \
Dpp_sort.c1480 #define SvNSIOK(sv) ((SvFLAGS(sv) & SVf_NOK) || ((SvFLAGS(sv) & (SVf_IOK|SVf_IVisUV)) == SVf_IOK))
1481 #define SvSIOK(sv) ((SvFLAGS(sv) & (SVf_IOK|SVf_IVisUV)) == SVf_IOK)
Dpp_hot.c324 SvFLAGS(TOPs) &= ~(SVp_NOK|SVp_POK); in PP()
1821 if (SvFLAGS(TOPs) & (SVs_PADTMP|SVs_TEMP)) in PP()
1835 if (!(SvFLAGS(*mark) & (SVs_PADTMP|SVs_TEMP))) { in PP()
2419 else if (SvFLAGS(*mark) & (SVs_PADTMP | SVf_READONLY)) in PP()
2447 if (SvFLAGS(TOPs) & (SVs_TEMP | SVs_PADTMP | SVf_READONLY) && in PP()
2479 && SvFLAGS(*mark) & (SVs_TEMP | SVs_PADTMP | SVf_READONLY)) { in PP()
Dbytecode.pl377 sv_flags SvFLAGS(bstate->bs_sv) U32
Dutil.c866 SvFLAGS(sv) = SVt_PVMG; in S_mess_alloc()
1095 SvFLAGS(msg) |= utf8; in S_vdie_common()
1162 SvFLAGS(ERRSV) |= utf8; in Perl_vdie()
1207 SvFLAGS(ERRSV) |= utf8; in Perl_vcroak()
1289 SvFLAGS(msg) |= utf8; in Perl_vwarn()
1376 SvFLAGS(ERRSV) |= utf8; in Perl_vwarner()
Dop.c2796 SvFLAGS(pat) |= was_readonly; in Perl_pmruntime()
5905 SvFLAGS(sv) |= was_readonly; in Perl_ck_require()
6732 if (!(SvFLAGS(lexname) & SVpad_TYPED)) in Perl_peep()
6756 SvFLAGS(sv) |= (SvFLAGS(*svp) in Perl_peep()
6783 if (!(SvFLAGS(lexname) & SVpad_TYPED)) in Perl_peep()
6819 SvFLAGS(sv) |= (SvFLAGS(*svp) in Perl_peep()
/mirbsd/src/gnu/usr.bin/perl/ext/List/Util/
Dmulticall.h29 # define AvFLAGS SvFLAGS
50 if ((SvFLAGS(names[ix]) & SVf_FAKE) || sigil == '&') { in multicall_pad_push()
DUtil.xs493 RETVAL = SvFLAGS(sv) & (SVf_NOK|SVp_NOK|SVf_IOK|SVp_IOK);
/mirbsd/src/gnu/usr.bin/perl/ext/Devel/PPPort/parts/inc/
DSvPV48 ((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
81 ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK) \
/mirbsd/src/gnu/usr.bin/perl/ext/MIME/Base64/
DBase64.xs91 ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK) \
/mirbsd/src/gnu/usr.bin/perl/ext/ByteLoader/
Dbytecode.h198 SvFLAGS(sv) = arg; \
Dbyterun.c213 SvFLAGS(bstate->bs_sv) = arg; in byterun()
/mirbsd/src/gnu/usr.bin/perl/ext/B/
DB.xs1113 SvFLAGS(sv)
1227 SvFLAGS(ST(0)) |= SvUTF8(sv);
/mirbsd/src/gnu/usr.bin/perl/ext/Time/HiRes/
Dppport.h3620 ((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
3666 ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK) \
/mirbsd/src/gnu/usr.bin/perl/ext/Cwd/
Dppport.h3620 ((SvFLAGS(sv) & (SVf_POK)) == SVf_POK \
3666 ((SvFLAGS(sv) & (SVf_POK|SVf_UTF8)) == (SVf_POK) \

12