From 924508f06969d29692d1762cecf34a062431e1af Mon Sep 17 00:00:00 2001 From: Gurusamy Sarathy Date: Sat, 7 Mar 1998 01:05:21 +0000 Subject: [win32] change all 'sp' to 'SP' in code and in the docs. Explicitly mention that local stack pointer should be called SP. This makes the API safer from source incompatibilities down the line. p4raw-id: //depot/win32/perl@795 --- pp.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'pp.c') diff --git a/pp.c b/pp.c index ac297eefa6..4a94b372bc 100644 --- a/pp.c +++ b/pp.c @@ -2216,7 +2216,7 @@ PP(pp_aslice) if (SvTYPE(av) == SVt_PVAV) { if (lval && op->op_private & OPpLVAL_INTRO) { I32 max = -1; - for (svp = mark + 1; svp <= sp; svp++) { + for (svp = MARK + 1; svp <= SP; svp++) { elem = SvIVx(*svp); if (elem > max) max = elem; @@ -2858,7 +2858,7 @@ PP(pp_unpack) { djSP; dPOPPOPssrl; - SV **oldsp = sp; + SV **oldsp = SP; I32 gimme = GIMME_V; SV *sv; STRLEN llen; @@ -3542,7 +3542,7 @@ PP(pp_unpack) checksum = 0; } } - if (sp == oldsp && gimme == G_SCALAR) + if (SP == oldsp && gimme == G_SCALAR) PUSHs(&sv_undef); RETURN; } @@ -4436,7 +4436,7 @@ PP(pp_threadsv) { djSP; #ifdef USE_THREADS - EXTEND(sp, 1); + EXTEND(SP, 1); if (op->op_private & OPpLVAL_INTRO) PUSHs(*save_threadsv(op->op_targ)); else -- cgit v1.2.1