diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-06-08 08:07:05 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-06-08 08:07:05 +0000 |
| commit | 8c074e2aa6f4be490d6bedf1bc337b09fa1c1185 (patch) | |
| tree | b8e60ab0e59d55a84c1f651d1c5acba02e79289b /pp.h | |
| parent | 002e4c743b8ad1aef49c84ea61819956800a7f1e (diff) | |
| download | perl-8c074e2aa6f4be490d6bedf1bc337b09fa1c1185.tar.gz | |
Convert POPpx POPpconstx and POPpbytex to use nolen macros.
Elminate a lot of C<n_a>s
p4raw-id: //depot/perl@24748
Diffstat (limited to 'pp.h')
| -rw-r--r-- | pp.h | 11 |
1 files changed, 4 insertions, 7 deletions
@@ -98,16 +98,13 @@ See C<PUSHMARK> and L<perlcall> for other uses. Pops an SV off the stack. =for apidoc Amn|char*|POPp -Pops a string off the stack. Deprecated. New code should provide -a STRLEN n_a and use POPpx. +Pops a string off the stack. Deprecated. New code should use POPpx. =for apidoc Amn|char*|POPpx Pops a string off the stack. -Requires a variable STRLEN n_a in scope. =for apidoc Amn|char*|POPpbytex Pops a string off the stack which must consist of bytes i.e. characters < 256. -Requires a variable STRLEN n_a in scope. =for apidoc Amn|NV|POPn Pops a double off the stack. @@ -128,9 +125,9 @@ Pops a long off the stack. #define POPs (*sp--) #define POPp (SvPVx(POPs, PL_na)) /* deprecated */ -#define POPpx (SvPVx(POPs, n_a)) -#define POPpconstx (SvPVx_const(POPs, n_a)) -#define POPpbytex (SvPVbytex(POPs, n_a)) +#define POPpx (SvPVx_nolen(POPs)) +#define POPpconstx (SvPVx_nolen_const(POPs)) +#define POPpbytex (SvPVbytex_nolen(POPs)) #define POPn (SvNVx(POPs)) #define POPi ((IV)SvIVx(POPs)) #define POPu ((UV)SvUVx(POPs)) |