summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-01-11 13:59:32 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-01-11 13:59:32 +0000
commit2b9dff677564dc07a8460b233c79a21850696d33 (patch)
tree55f94314949056557d498a24cd56d041a95bcc62 /pp_ctl.c
parent4c84d7f2a03f1d29578b3894e1b6863673b307fb (diff)
downloadperl-2b9dff677564dc07a8460b233c79a21850696d33.tar.gz
Rename PERL_MAX_SUB_DEPTH to PERL_SUB_DEPTH_WARN, per Tim Bunce's
suggestion p4raw-id: //depot/perl@32955
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index d5027204d4..5cc002c603 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -2432,7 +2432,7 @@ PP(pp_goto)
if (CvDEPTH(cv) < 2)
SvREFCNT_inc_simple_void_NN(cv);
else {
- if (CvDEPTH(cv) == PERL_MAX_SUB_DEPTH && ckWARN(WARN_RECURSION))
+ if (CvDEPTH(cv) == PERL_SUB_DEPTH_WARN && ckWARN(WARN_RECURSION))
sub_crush_depth(cv);
pad_push(padlist, CvDEPTH(cv));
}