diff options
| author | Yves Orton <demerphq@gmail.com> | 2022-10-31 12:22:19 +0100 |
|---|---|---|
| committer | Yves Orton <demerphq@gmail.com> | 2022-11-01 11:57:31 +0100 |
| commit | 4bd3be3563698eb6e927a62c29755b216b926a27 (patch) | |
| tree | 81cd1ee7b48249763b06f151586430e5644f6700 /t/porting | |
| parent | 721bab593870c27a22ad9e917c5d3624f4a3468e (diff) | |
| download | perl-4bd3be3563698eb6e927a62c29755b216b926a27.tar.gz | |
regen/scope_types.pl - add tool to manage the scope type defines
In scope.c and scope.h there are various defines that must be coordinated
with the contents of an array, and comments and ids which might have to be
mass changed manually in some circumstances. As this is error prone this
patch adds a new regen script to ensure it is kept in sync and to make the
process of adding new types trivial. The data that drives the script is
kept in the scripts __DATA__ section.
Diffstat (limited to 't/porting')
| -rw-r--r-- | t/porting/regen.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/porting/regen.t b/t/porting/regen.t index d684fdc19f..b54293a5bd 100644 --- a/t/porting/regen.t +++ b/t/porting/regen.t @@ -26,7 +26,7 @@ if ( $Config{usecrosscompile} ) { skip_all( "Not all files are available during cross-compilation" ); } -my $tests = 24; # I can't see a clean way to calculate this automatically. +my $tests = 25; # I can't see a clean way to calculate this automatically. my %skip = ("regen_perly.pl" => [qw(perly.act perly.h perly.tab)], "regen/keywords.pl" => [qw(keywords.c keywords.h)], @@ -62,7 +62,7 @@ die "Can't find __END__ in regen.pl" foreach (qw(embed_lib.pl regen_lib.pl uconfig_h.pl regcharclass_multi_char_folds.pl charset_translations.pl - mph.pl + mph.pl sorted_types.pl ), map {chomp $_; $_} <$fh>) { ++$skip{"regen/$_"}; |