diff options
Diffstat (limited to 't/porting/regen.t')
| -rw-r--r-- | t/porting/regen.t | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/t/porting/regen.t b/t/porting/regen.t index 221ff17841..ec92dd34ab 100644 --- a/t/porting/regen.t +++ b/t/porting/regen.t @@ -18,9 +18,9 @@ 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(Porting/makemeta regen/regcharclass.pl regen/mk_PL_charclass.pl); +my @progs = qw(regen/regcharclass.pl regen/mk_PL_charclass.pl); -plan (tests => $in_regen_pl + @files + @progs); +plan (tests => $in_regen_pl + @files + @progs + 2); OUTER: foreach my $file (@files) { open my $fh, '<', $file or die "Can't open $file: $!"; @@ -47,3 +47,7 @@ OUTER: foreach my $file (@files) { foreach (@progs, 'regen.pl') { system "$^X $_ --tap"; } + +foreach ( 'META.yml', 'META.json' ) { + system "$^X Porting/makemeta --tap $_"; +} |