diff options
| author | Karl Williamson <khw@cpan.org> | 2017-12-23 13:34:47 -0700 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2017-12-24 17:12:03 -0700 |
| commit | cdc243dd1df9966473a3b0f622a5872f5d4bcb1b (patch) | |
| tree | e4f8d4cdd30af1bd9c02c7c4835ab5e9f7ab8c6b /regen | |
| parent | 34623dbb20698f0fedd1ded1b2461b2d281b172f (diff) | |
| download | perl-cdc243dd1df9966473a3b0f622a5872f5d4bcb1b.tar.gz | |
regen/mk_invlists.pl: Don't generate unneeded #define
This was only defined in regexec.c, but is currently unused
Diffstat (limited to 'regen')
| -rw-r--r-- | regen/mk_invlists.pl | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/regen/mk_invlists.pl b/regen/mk_invlists.pl index 1328f5850d..8304ee6dbe 100644 --- a/regen/mk_invlists.pl +++ b/regen/mk_invlists.pl @@ -349,8 +349,9 @@ sub output_invmap ($$$$$$$) { $short_name = uc($short_name) if length($short_name) < 3 || substr($short_name, 0, 1) =~ /[[:lower:]]/; $name_prefix = "${short_name}_"; - my $enum_count = keys %enums; - print $out_fh "\n#define ${name_prefix}ENUM_COUNT ", scalar keys %enums, "\n"; + + # Currently unneeded + #print $out_fh "\n#define ${name_prefix}ENUM_COUNT ", scalar keys %enums, "\n"; if ($input_format eq 'sl') { print $out_fh |