This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
t/porting/regen.t: Add file to check
authorKarl Williamson <public@khwilliamson.com>
Tue, 16 Apr 2013 15:04:50 +0000 (09:04 -0600)
committerKarl Williamson <public@khwilliamson.com>
Mon, 20 May 2013 14:59:14 +0000 (08:59 -0600)
t/porting/regen.t

index e127eb0..e38ea81 100644 (file)
@@ -18,7 +18,8 @@ if ( $^O eq "VMS" ) {
 
 my $in_regen_pl = 23; # 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(regen/regcharclass.pl regen/mk_PL_charclass.pl);
+my @progs = qw(regen/regcharclass.pl regen/mk_PL_charclass.pl
+               regen/unicode_constants.pl);
 
 plan (tests => $in_regen_pl + @files + @progs + 2);