diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-06 19:23:06 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-06 19:23:06 +0000 |
| commit | e788e7d35b1f8979a002a1e994535be7aae30018 (patch) | |
| tree | 441eb4c139c118d109a46c23ef6b62ad744408ac /pp_ctl.c | |
| parent | 9bc648147f297cac824aecca53c6e0232b54c002 (diff) | |
| download | perl-e788e7d35b1f8979a002a1e994535be7aae30018.tar.gz | |
rename s/\bSI_/PERLSI_/ to avoid collisions with sysinfo headers
p4raw-id: //depot/perl@1339
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -729,7 +729,7 @@ PP(pp_sort) SAVEOP(); CATCH_SET(TRUE); - PUSHSTACKi(SI_SORT); + PUSHSTACKi(PERLSI_SORT); if (sortstash != stash) { firstgv = gv_fetchpv("a", TRUE, SVt_PV); secondgv = gv_fetchpv("b", TRUE, SVt_PV); @@ -1471,7 +1471,7 @@ PP(pp_return) PMOP *newpm; I32 optype = 0; - if (curstackinfo->si_type == SI_SORT) { + if (curstackinfo->si_type == PERLSI_SORT) { if (cxstack_ix == sortcxix || dopoptosub(cxstack_ix) <= sortcxix) { if (cxstack_ix > sortcxix) dounwind(sortcxix); |