This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
warn if ++ or -- are unable to change the value because it's beyond
[perl5.git] / perl.h
diff --git a/perl.h b/perl.h
index c028bba..0dadba4 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -920,8 +920,8 @@ EXTERN_C int usleep(unsigned int);
 #endif
 
 /* Maximum level of recursion */
-#ifndef PERL_MAX_SUB_DEPTH
-#define PERL_MAX_SUB_DEPTH 100
+#ifndef PERL_SUB_DEPTH_WARN
+#define PERL_SUB_DEPTH_WARN 100
 #endif
 
 #endif /* PERL_CORE */