Fix a signed/unsigned warning

[perl5.git] / regcomp.pl

diff --git a/regcomp.pl b/regcomp.pl
index 144cb0c..febd550 100644 (file)
--- a/regcomp.pl
+++ b/regcomp.pl
@@ -45,6 +45,7 @@ EOP
 }
 
 print OUT <<EOP;
+#define REGNODE_MAX $oind
 
 #ifndef DOINIT
 EXTCONST U8 PL_regkind[];