/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
H A D | taint.c | 126 STRLEN n_a; local 128 char *t = SvPV(*svp, n_a); 129 char *e = t + n_a;
|
H A D | perly.c | 1874 { STRLEN n_a; char *name = SvPV(((SVOP*)yyvsp[0].opval)->op_sv,n_a); local
|
H A D | av.c | 950 STRLEN n_a; local 955 Perl_croak(aTHX_ "No such pseudo-hash field \"%s\"", SvPV(keysv,n_a));
|
H A D | universal.c | 221 STRLEN n_a; local 235 name = (char *)SvPV(ST(1),n_a); 248 STRLEN n_a; local 262 name = (char *)SvPV(ST(1),n_a);
|
H A D | dump.c | 148 STRLEN n_a; local 324 return SvPV(t, n_a); 648 STRLEN n_a; 652 Perl_dump_indent(aTHX_ level, file, "GV = %s\n", SvPV(tmpsv, n_a));
|
H A D | pp_hot.c | 1563 STRLEN n_a; local 1564 (void)SvPV_force(sv, n_a); 1745 STRLEN n_a; local 1746 DIE(aTHX_ PL_no_helem, SvPV(keysv, n_a)); 2576 STRLEN n_a; local 2590 sym = SvPV(sv, n_a);
|
H A D | pp_sort.c | 1447 STRLEN n_a; local 1448 char *proto = SvPV((SV*)cv, n_a); 1516 STRLEN n_a; local 1520 (void)sv_2pv(*p1, &n_a);
|
H A D | doop.c | 1009 STRLEN n_a; local 1126 s = SvPV_force(sv, n_a); 1178 STRLEN n_a; local 1179 dc = SvPV_force(sv, n_a);
|
H A D | mg.c | 546 STRLEN n_a; local 547 sv_2pv(sv, &n_a); 1020 STRLEN n_a; local 1021 my_setenv(MgPV(mg,n_a),Nullch); 1033 STRLEN n_a; 1039 SvPV(hv_iterval((HV*)sv, entry), n_a)); 1104 STRLEN n_a; local 1106 i = whichsig(MgPV(mg,n_a)); 1137 STRLEN n_a; local 1139 s = MgPV(mg,n_a); 1624 STRLEN n_a; local 1743 STRLEN n_a; local 1913 STRLEN n_a; local [all...] |
H A D | perl.c | 2413 STRLEN n_a; local 2414 Perl_croak(aTHX_ SvPVx(ERRSV, n_a)); 3391 STRLEN n_a; local 3490 strnNE(SvPV(PL_linestr,n_a),"#!",2) ) /* required even on Sys V */ 3492 s = SvPV(PL_linestr,n_a)+2; 3501 for (s2 = s; (s2 > SvPV(PL_linestr,n_a)+2 && 3504 if ( (s2-4 < SvPV(PL_linestr,n_a)+2 || strnNE(s2-4,"perl",4)) && 3505 (s-9 < SvPV(PL_linestr,n_a)+2 || strnNE(s-9,"perl",4)) )
|
H A D | pp.c | 551 STRLEN n_a; local 554 elem = SvPV(sv, n_a); 3075 STRLEN n_a; local 3076 SvPV_force(sv,n_a); 3298 STRLEN n_a; local 3331 sv_setpv(TARG, fcrypt(tmps, SvPV(right, n_a))); 3333 sv_setpv(TARG, PerlProc_crypt(tmps, SvPV(right, n_a))); 3909 STRLEN n_a; local 3910 DIE(aTHX_ PL_no_helem, SvPV(keysv, n_a)); 4540 STRLEN n_a; local [all...] |
H A D | pp_ctl.c | 1060 STRLEN len, n_a; local 1064 SvPV_force(sv,n_a); 1315 STRLEN n_a; local 1331 e = SvPV(err, n_a); 1332 e += n_a - msglen; 1387 char* msg = SvPVx(ERRSV, n_a); 1589 STRLEN n_a; local 1721 STRLEN n_a; local 1723 (void) SvPV_force(cx->blk_loop.iterlval,n_a); 1724 (void) SvPV(right,n_a); 2115 STRLEN n_a; local 2516 STRLEN n_a; local 2823 STRLEN n_a; local 2964 STRLEN n_a; local [all...] |
H A D | pp_sys.c | 313 STRLEN n_a; local 1001 STRLEN n_a; local 1073 SvPV_force(sv,n_a); /* force string conversion */ 2077 STRLEN n_a; local 2124 name = SvPV(sv, n_a); 2770 STRLEN n_a; local 2810 sv_setpv(PL_statname, SvPV(sv,n_a)); 2815 PL_laststatval = PerlLIO_lstat(SvPV(PL_statname, n_a), &PL_statcache); 2818 PL_laststatval = PerlLIO_stat(SvPV(PL_statname, n_a), &PL_statcache); 2820 if (ckWARN(WARN_NEWLINE) && strchr(SvPV(PL_statname, n_a), '\ 2892 STRLEN n_a; local 2919 STRLEN n_a; local 2946 STRLEN n_a; local 2973 STRLEN n_a; local 3000 STRLEN n_a; local 3027 STRLEN n_a; local 3255 STRLEN n_a; local 3296 STRLEN n_a; local 3452 STRLEN n_a; local 3506 STRLEN n_a; local 3550 STRLEN n_a; local 3577 STRLEN n_a; local 3592 STRLEN n_a; local 3611 STRLEN n_a; local 3793 STRLEN n_a; local 4079 STRLEN n_a; local 4209 STRLEN n_a; local 4669 STRLEN n_a; local 4785 STRLEN n_a; local 4886 STRLEN n_a; local 4973 STRLEN n_a; local 5169 STRLEN n_a; local 5448 STRLEN n_a; local 5560 STRLEN n_a; local [all...] |
H A D | doio.c | 1380 STRLEN n_a; local 1404 sv_setpv(PL_statname,SvPV(sv, n_a)); 1405 PL_laststatval = PerlLIO_lstat(SvPV(sv, n_a),&PL_statcache); 1406 if (PL_laststatval < 0 && ckWARN(WARN_NEWLINE) && strchr(SvPV(sv, n_a), '\n')) 1428 STRLEN n_a; 1435 *a++ = SvPVx(*mark, n_a); 1441 tmps = SvPV(really, n_a); 1619 STRLEN n_a; local 1645 char *name = SvPVx(*mark, n_a); 1662 char *name = SvPVx(*mark, n_a); [all...] |
H A D | op.c | 108 STRLEN n_a; local 111 return SvPV(tmpsv,n_a); 3893 STRLEN n_a; local 3901 ? SvPVx(((SVOP*)label)->op_sv, n_a) 4108 STRLEN n_a; local 4112 char *ps = proto ? SvPVx(((SVOP*)proto)->op_sv, n_a) : Nullch; 4116 name = o ? SvPVx(cSVOPo->op_sv, n_a) : Nullch; 4607 STRLEN n_a; local 4610 name = SvPVx(cSVOPo->op_sv, n_a); 5040 STRLEN n_a; local 5151 STRLEN n_a; local 5191 STRLEN n_a; local 6104 STRLEN n_a; local 6354 STRLEN n_a; local [all...] |
H A D | perlio.c | 4384 STRLEN n_a; local 4386 msg = SvPVx(error, n_a);
|
H A D | toke.c | 6123 STRLEN n_a; local 6125 yyerror(SvPV(ERRSV, n_a)); /* Duplicates the message inside eval */
|
H A D | sv.c | 2891 STRLEN n_a; local 2892 return sv_2pv(sv, &n_a); 3294 STRLEN n_a; local 3295 return sv_2pvbyte(sv, &n_a); 3331 STRLEN n_a; local 3332 return sv_2pvutf8(sv, &n_a); 7171 STRLEN n_a; local 7188 gv = gv_fetchpv(SvPV(sv,n_a), FALSE, SVt_PVIO); 7214 STRLEN n_a; local 7255 gv = gv_fetchpv(SvPV(sv, n_a), lre 7382 STRLEN n_a; local [all...] |