summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2015-12-25 22:41:21 +0000
committerDavid Mitchell <davem@iabyn.com>2016-02-03 09:19:18 +0000
commitd2af2719f1469dcb5f93ecdd69cd33aa6799b78a (patch)
treed4d68c273971d3b6a11af14d9a388c3703bce8f9 /pp_sys.c
parent53d3542d62a6150413de482742e24f24b82112a8 (diff)
downloadperl-d2af2719f1469dcb5f93ecdd69cd33aa6799b78a.tar.gz
eliminate PERL_STACK_OVERFLOW_CHECK
This macro is defined as NOOP on all platforms except for MacOS classic, where it was added as a hook to allow for OSes that have a small CPU stack size. Since pp_entersub et al don't actually use the CPU stack, this hook looks misconceived from the beginning. So remove all uses of it in the core.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/pp_sys.c b/pp_sys.c
index ea99011594..3be4be3b76 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1391,10 +1391,8 @@ S_doform(pTHX_ CV *cv, GV *gv, OP *retop)
PUSHBLOCK(cx, CXt_FORMAT, PL_stack_sp);
PUSHFORMAT(cx, retop);
- if (CvDEPTH(cv) >= 2) {
- PERL_STACK_OVERFLOW_CHECK();
+ if (CvDEPTH(cv) >= 2)
pad_push(CvPADLIST(cv), CvDEPTH(cv));
- }
PAD_SET_CUR_NOSAVE(CvPADLIST(cv), CvDEPTH(cv));
setdefout(gv); /* locally select filehandle so $% et al work */