summaryrefslogtreecommitdiff
path: root/pp_hot.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_hot.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_hot.c')
-rw-r--r--pp_hot.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_hot.c b/pp_hot.c
index 6288db114d..2cb394e8a6 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2821,7 +2821,7 @@ try_autoload:
* stuff so that __WARN__ handlers can safely dounwind()
* if they want to
*/
- if (CvDEPTH(cv) == PERL_MAX_SUB_DEPTH && ckWARN(WARN_RECURSION)
+ if (CvDEPTH(cv) == PERL_SUB_DEPTH_WARN && ckWARN(WARN_RECURSION)
&& !(PERLDB_SUB && cv == GvCV(PL_DBsub)))
sub_crush_depth(cv);
#if 0