diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-01-11 11:31:34 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-01-11 11:31:34 +0000 |
| commit | ccb2c8b8ab146edc148e377cd6b108da77d1320b (patch) | |
| tree | b58534185023feabf06d12fe6445ce3fbc9ebbdb /pp_hot.c | |
| parent | 52b4506763c1e322f848f17908bebdf7672f168e (diff) | |
| download | perl-ccb2c8b8ab146edc148e377cd6b108da77d1320b.tar.gz | |
Introduce macro PERL_MAX_SUB_DEPTH
p4raw-id: //depot/perl@32949
Diffstat (limited to 'pp_hot.c')
| -rw-r--r-- | pp_hot.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -2830,7 +2830,7 @@ try_autoload: * stuff so that __WARN__ handlers can safely dounwind() * if they want to */ - if (CvDEPTH(cv) == 100 && ckWARN(WARN_RECURSION) + if (CvDEPTH(cv) == PERL_MAX_SUB_DEPTH && ckWARN(WARN_RECURSION) && !(PERLDB_SUB && cv == GvCV(PL_DBsub))) sub_crush_depth(cv); #if 0 |