Searched refs:argsv (Results 1 – 3 of 3) sorted by relevance
| /openbsd/src/gnu/usr.bin/perl/ |
| D | pp_sys.c | 2605 SV * const argsv = POPs; variable
2619 if (SvPOK(argsv) || !SvNIOK(argsv)) {
2622 s = SvPV_force(argsv, len);
2625 s = Sv_Grow(argsv, need + 1);
2626 SvCUR_set(argsv, need);
2629 s[SvCUR(argsv)] = 17; /* a little sanity check here */
2632 retval = SvIV(argsv);
2655 if (SvPOK(argsv)) {
2656 if (s[SvCUR(argsv)] != 17)
2659 s[SvCUR(argsv)] = 0; /* put our null back */
[all …]
|
| D | sv.c | 12310 SV *argsv = NULL; local
12653 argsv = efix < sv_count ? svargs[efix]
12676 eptr = SvPV_const(argsv, elen);
12677 if (DO_UTF8(argsv)) {
12680 STRLEN ulen = sv_or_pv_len_utf8(argsv, eptr, elen);
12682 precis = sv_or_pv_pos_u2b(argsv, eptr, p, 0);
12690 elen - sv_or_pv_len_utf8(argsv,eptr,elen);
12813 argsv = MUTABLE_SV(va_arg(*args, void*));
12814 eptr = SvPV_const(argsv, elen);
12815 if (DO_UTF8(argsv))
[all …]
|
| D | pp.c | 3958 SV *argsv = *PL_stack_sp; in PP() local
3960 const U8 *s = (U8*)SvPV_const(argsv, len); in PP()
3962 TARGu(DO_UTF8(argsv) in PP()
|