summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-03-07 01:05:21 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-03-07 01:05:21 +0000
commit924508f06969d29692d1762cecf34a062431e1af (patch)
treefa410a2e2cf94abd7708db2687960ff056039f69 /pp_sys.c
parent07ba589215942ebbc273059e8ab8622602f3e0f2 (diff)
downloadperl-924508f06969d29692d1762cecf34a062431e1af.tar.gz
[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
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 8058fb2656..ccb64ab47f 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -648,9 +648,9 @@ PP(pp_dbmopen)
}
ENTER;
- PUSHMARK(sp);
+ PUSHMARK(SP);
- EXTEND(sp, 5);
+ EXTEND(SP, 5);
PUSHs(sv);
PUSHs(left);
if (SvIV(right))
@@ -663,8 +663,8 @@ PP(pp_dbmopen)
SPAGAIN;
if (!sv_isobject(TOPs)) {
- sp--;
- PUSHMARK(sp);
+ SP--;
+ PUSHMARK(SP);
PUSHs(sv);
PUSHs(left);
PUSHs(sv_2mortal(newSViv(O_RDONLY)));
@@ -3978,7 +3978,7 @@ PP(pp_ehostent)
djSP;
#ifdef HAS_ENDHOSTENT
endhostent();
- EXTEND(sp,1);
+ EXTEND(SP,1);
RETPUSHYES;
#else
DIE(no_sock_func, "endhostent");
@@ -3990,7 +3990,7 @@ PP(pp_enetent)
djSP;
#ifdef HAS_ENDNETENT
endnetent();
- EXTEND(sp,1);
+ EXTEND(SP,1);
RETPUSHYES;
#else
DIE(no_sock_func, "endnetent");
@@ -4002,7 +4002,7 @@ PP(pp_eprotoent)
djSP;
#ifdef HAS_ENDPROTOENT
endprotoent();
- EXTEND(sp,1);
+ EXTEND(SP,1);
RETPUSHYES;
#else
DIE(no_sock_func, "endprotoent");
@@ -4014,7 +4014,7 @@ PP(pp_eservent)
djSP;
#ifdef HAS_ENDSERVENT
endservent();
- EXTEND(sp,1);
+ EXTEND(SP,1);
RETPUSHYES;
#else
DIE(no_sock_func, "endservent");