diff options
author | Joshua Pritikin <joshua.pritikin@db.com> | 1998-06-26 05:34:34 -0400 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-06-28 21:35:02 +0000 |
commit | d3acc0f7e51973106c8c51ff053cffc8bd402843 (patch) | |
tree | 00f1e3a5300571443c61a4ea0113c741c33431ca /gv.c | |
parent | ea7c11a37de2088ba174a077e567a01d0e73d0ca (diff) | |
download | perl-d3acc0f7e51973106c8c51ff053cffc8bd402843.tar.gz |
PUSHSTACK renovation
Message-Id: <H00000e500081d23@MHS>
p4raw-id: //depot/perl@1254
Diffstat (limited to 'gv.c')
-rw-r--r-- | gv.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1356,7 +1356,7 @@ amagic_call(SV *left, SV *right, int method, int flags) myop.op_next = Nullop; myop.op_flags = OPf_WANT_SCALAR | OPf_STACKED; - PUSHSTACK(SI_OVERLOAD); + PUSHSTACKi(SI_OVERLOAD); ENTER; SAVEOP(); op = (OP *) &myop; @@ -1381,7 +1381,7 @@ amagic_call(SV *left, SV *right, int method, int flags) SPAGAIN; res=POPs; - POPSTACK(); + POPSTACK; CATCH_SET(oldcatch); if (postpr) { |