regen.t: update test count

diff --git a/t/porting/regen.t b/t/porting/regen.t
index a148382..5af4d58 100644 (file)
--- a/t/porting/regen.t
+++ b/t/porting/regen.t
@@ -16,7 +16,7 @@ if ( $^O eq "VMS" ) {
   skip_all( "- regen.pl needs porting." );
 }
 
-my $in_regen_pl = 19; # I can't see a clean way to calculate this automatically.
+my $in_regen_pl = 21; # I can't see a clean way to calculate this automatically.
 my @files = qw(perly.act perly.h perly.tab keywords.c keywords.h uconfig.h);
 my @progs = qw(Porting/makemeta regen/regcharclass.pl regen/mk_PL_charclass.pl);