summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-07-06 19:23:06 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-07-06 19:23:06 +0000
commite788e7d35b1f8979a002a1e994535be7aae30018 (patch)
tree441eb4c139c118d109a46c23ef6b62ad744408ac /mg.c
parent9bc648147f297cac824aecca53c6e0232b54c002 (diff)
downloadperl-e788e7d35b1f8979a002a1e994535be7aae30018.tar.gz
rename s/\bSI_/PERLSI_/ to avoid collisions with sysinfo headers
p4raw-id: //depot/perl@1339
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c12
1 files changed, 6 insertions, 6 deletions
diff --git a/mg.c b/mg.c
index b3dde0e246..2b96829572 100644
--- a/mg.c
+++ b/mg.c
@@ -981,7 +981,7 @@ magic_methpack(SV *sv, MAGIC *mg, char *meth)
ENTER;
SAVETMPS;
- PUSHSTACKi(SI_MAGIC);
+ PUSHSTACKi(PERLSI_MAGIC);
if (magic_methcall(mg, meth, G_SCALAR, 2, NULL)) {
sv_setsv(sv, *stack_sp--);
@@ -1007,7 +1007,7 @@ magic_setpack(SV *sv, MAGIC *mg)
{
dSP;
ENTER;
- PUSHSTACKi(SI_MAGIC);
+ PUSHSTACKi(PERLSI_MAGIC);
magic_methcall(mg, "STORE", G_SCALAR|G_DISCARD, 3, sv);
POPSTACK;
LEAVE;
@@ -1029,7 +1029,7 @@ magic_sizepack(SV *sv, MAGIC *mg)
ENTER;
SAVETMPS;
- PUSHSTACKi(SI_MAGIC);
+ PUSHSTACKi(PERLSI_MAGIC);
if (magic_methcall(mg, "FETCHSIZE", G_SCALAR, 2, NULL)) {
sv = *stack_sp--;
retval = (U32) SvIV(sv)-1;
@@ -1045,7 +1045,7 @@ int magic_wipepack(SV *sv, MAGIC *mg)
dSP;
ENTER;
- PUSHSTACKi(SI_MAGIC);
+ PUSHSTACKi(PERLSI_MAGIC);
PUSHMARK(SP);
XPUSHs(mg->mg_obj);
PUTBACK;
@@ -1063,7 +1063,7 @@ magic_nextpack(SV *sv, MAGIC *mg, SV *key)
ENTER;
SAVETMPS;
- PUSHSTACKi(SI_MAGIC);
+ PUSHSTACKi(PERLSI_MAGIC);
PUSHMARK(SP);
EXTEND(SP, 2);
PUSHs(mg->mg_obj);
@@ -1947,7 +1947,7 @@ sighandler(int sig)
sv_setpv(sv,sig_name[sig]);
}
- PUSHSTACKi(SI_SIGNAL);
+ PUSHSTACKi(PERLSI_SIGNAL);
PUSHMARK(SP);
PUSHs(sv);
PUTBACK;