Re: [PATCH] More regex optimisations and debug enhancements (including Andys stuff...

[p5sagit/p5-mst-13.2.git] / regcomp.pl

diff --git a/regcomp.pl b/regcomp.pl
index e7a9d05..144cb0c 100644 (file)
--- a/regcomp.pl
+++ b/regcomp.pl
@@ -16,6 +16,8 @@ while (<DESC>) {
 }
 close DESC;
 $tot = $ind;
+die "Too many regexp opcodes! Maximum is 256, but there are $tot in file!"
+    if $tot>256;
 
 $tmp_h = 'tmp_reg.h';