Searched refs:SvPOKp (Results 1 – 25 of 28) sorted by relevance
12
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/inc/ |
| D | SvPV | 95 …pv_dummy_; STRLEN *_lp_2pv = (lp); _lp_2pv = _lp_2pv ? : &sv_2pv_dummy_; SvPOKp(_sv_2pv) ? ((*(_lp…
97 …__UNDEFINED__ sv_2pv(sv, lp) (SvPOKp(sv) ? ((*((lp) ? (lp) : &PL_na) = SvCUR(sv)), SvPVX(sv)) : Pe…
123 … &sv_2pv_dummy_; ((!(_flags_2pv & SV_GMAGIC) || !SvGMAGICAL(_sv_2pv)) && SvPOKp(_sv_2pv)) ? ((*(_l…
125 …__UNDEFINED__ sv_2pv_flags(sv, lp, flags) (((!((flags) & SV_GMAGIC) || !SvGMAGICAL(sv)) && SvPOKp(…
|
| /openbsd/src/gnu/usr.bin/perl/ext/PerlIO-encoding/ |
| D | encoding.xs | 370 if (!SvPOKp(e->dataSV)) (void)SvPV_force_nolen(e->dataSV); in PerlIOEncode_fill()
448 if (!SvPOKp(e->bufsv) || SvTHINKFIRST(e->bufsv)) in PerlIOEncode_flush()
|
| /openbsd/src/gnu/usr.bin/perl/ |
| D | vutil.c | 881 else if (SvPOKp(ver)) { in Perl_upg_version2()
1122 || SvPOKp(pv) in Perl_vstringify2()
|
| D | sv.h | 999 #define SvPOKp(sv) (SvFLAGS(sv) & SVp_POK) macro
1322 SvPOKp(_svvalid) \
2478 assert (!SvPOKp(sv_)); \
2487 assert (!SvPOKp(sv_)); \
|
| D | sv.c | 1873 if (SvPOK(sv) || SvPOKp(sv)) { in Perl_looks_like_number()
2173 else if (SvPOKp(sv)) { in S_sv_2iuv_common()
2387 assert(SvPOKp(sv)); in Perl_sv_2iv_flags()
2477 assert(SvPOKp(sv)); in Perl_sv_2uv_flags()
2551 if (SvPOKp(sv) && !SvIOKp(sv)) { in Perl_sv_2nv_flags()
2628 else if (SvPOKp(sv)) { in Perl_sv_2nv_flags()
3061 if (SvPOKp(sv)) { in Perl_sv_2pv_flags()
3457 if (SvREADONLY(sv) && (SvPOKp(sv) || SvIOKp(sv) || SvNOKp(sv))) { in Perl_sv_utf8_upgrade_flags_grow()
3630 if (SvPOKp(sv) && SvUTF8(sv)) { in Perl_sv_utf8_downgrade_flags()
3709 if (SvPOKp(sv)) { in Perl_sv_utf8_decode()
[all …]
|
| D | pp.c | 164 (SvPOKp(sv) && SvCUR(sv)>32 ? "..." : ""), in S_rv2gv()
227 (SvPOKp(sv) && SvCUR(sv)>32 ? "..." : ""), what); in Perl_softref2xv()
2714 assert(SvPOKp(sv)); in S_negate_string()
2747 if (SvPOKp(sv) && S_negate_string(aTHX)) in PP()
2780 else if (SvPOKp(sv) && SvIV_please_nomg(sv)) in PP()
3124 if (SvPOKp(sv) && S_negate_string(aTHX)) in PP()
|
| D | doop.c | 602 if (!SvPOKp(sv) || SvTHINKFIRST(sv)) in Perl_do_trans()
|
| D | pp_ctl.c | 777 if (SvPOKp(sv))
1376 SvNIOKp(left) || (SvOK(left) && !SvPOKp(left)) || \
1377 SvNIOKp(right) || (SvOK(right) && !SvPOKp(right)) || \
1379 looks_like_number(left)) && SvPOKp(left) \
|
| D | pp_sys.c | 573 else if (SvPOKp(errsv) ? SvCUR(errsv) : SvNIOKp(errsv)) {
1396 if (!SvPOKp(sv))
4639 if (SvPOK(origsv) || SvPOKp(origsv)) {
|
| D | regexec.c | 3523 && SvPOKp(RXp_SAVED_COPY(prog)) in S_reg_set_capture_string()
3525 && SvPOKp(sv) in S_reg_set_capture_string()
3540 assert (SvPOKp(RXp_SAVED_COPY(prog))); in S_reg_set_capture_string()
3637 if (SvPOKp(sv) && SvPVX(sv) == strbeg) in S_reg_set_capture_string()
|
| D | pp_hot.c | 4439 (SvPOKp(sv) && SvCUR(sv)>32 ? "..." : ""), what); in S_softref2xv_lite()
5283 if (!SvPOKp(TARG) || SvTYPE(TARG) == SVt_PVGV || SvVOK(TARG)) in PP()
|
| D | doio.c | 763 || (SvPOKp(*svp) && looks_like_number(*svp)) in Perl_do_open6()
|
| D | pp_pack.c | 2905 } else if (SvPOKp(fromstr)) in S_pack_rec()
|
| D | perl.c | 5037 assert(SvPOKp(caret_X)); in S_mayberelocate()
|
| D | dump.c | 580 if (SvPOKp(sv)) { in Perl_sv_peek()
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Encode/ |
| D | Encode.xs | 949 if (!SvTAINTED(sv) && SvPOKp(sv)) {
965 if (!SvTAINTED(sv) && SvPOKp(sv)) {
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Scalar-List-Utils/ |
| D | ListUtil.xs | 1717 ST(0) = boolSV((SvPOK(sv) || SvPOKp(sv)) && (SvNIOK(sv) || SvNIOKp(sv)));
1867 if(SvPOK(sv) || SvPOKp(sv)) {
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Compress-Raw-Zlib/ |
| D | Zlib.xs | 226 # define sv_2pv(sv, lp) ({ SV *_sv_2pv = (sv); SvPOKp(_sv_2pv) ? ((*(lp) = SvCUR(_sv_2pv)), SvPV…
228 # define sv_2pv(sv, lp) (SvPOKp(sv) ? ((*(lp) = SvCUR(sv)), SvPVX(sv)) : Perl_sv_2pv(aTHX_ (sv),…
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/todo/ |
| D | 5003007 | 738 SvPOKp # T
|
| /openbsd/src/gnu/usr.bin/perl/cpan/Socket/ |
| D | Socket.xs | 728 if(!SvPOKp(addr)) in xs_getnameinfo()
|
| /openbsd/src/gnu/usr.bin/perl/dist/Storable/ |
| D | ChangeLog | 1035 - I said SvPOK() had changed to SvPOKp(), but that was a lie...
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/ |
| D | apidoc.fnc | 900 Amd|U32|SvPOKp|SV* sv
|
| /openbsd/src/gnu/usr.bin/perl/win32/ |
| D | win32.c | 692 if (SvNIOKp(*(mark+1)) && !SvPOKp(*(mark+1))) { in Perl_do_aspawn()
|
| /openbsd/src/gnu/usr.bin/perl/dist/Devel-PPPort/parts/base/ |
| D | 5003007 | 1449 SvPOKp # T
|
| /openbsd/src/gnu/usr.bin/perl/os2/ |
| D | os2.c | 1501 if (cnt > 1 && SvNIOKp(*argp) && !SvPOKp(*argp)) { in os2_aspawn_4()
|
12