diff options
| author | Graham Knop <haarg@haarg.org> | 2020-06-02 21:03:12 +0200 |
|---|---|---|
| committer | Todd Rinaldo <toddr@cpan.org> | 2020-07-30 16:26:44 -0500 |
| commit | 193e9da6a922dda4eeea116fee74c69d0c5e54b5 (patch) | |
| tree | e7006df38ea60a3b9137ed73d97bb4f3aa155433 /regen/warnings.pl | |
| parent | 894d8b10212a906402f4db9f9aac9efe9fa084fd (diff) | |
| download | perl-193e9da6a922dda4eeea116fee74c69d0c5e54b5.tar.gz | |
use semicolon to separate statements
One of the statements in warnings.pm was terminated with a comma rather
than a semicolon, most likely as a typo. There's no reason for it to be
a comma, so change it to a semicolon for clarity and to avoid potential
issues with statement reordering.
Diffstat (limited to 'regen/warnings.pl')
| -rw-r--r-- | regen/warnings.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/regen/warnings.pl b/regen/warnings.pl index 4907666b77..1a272d58db 100644 --- a/regen/warnings.pl +++ b/regen/warnings.pl @@ -566,7 +566,7 @@ print $pm ");\n\n" ; print $pm "# These are used by various things, including our own tests\n"; print $pm tab(6, 'our $NONE'), '= "', ('\0' x $warn_size) , "\";\n" ; print $pm tab(6, 'our $DEFAULT'), '= "', mkHex($warn_size, map $_ * 2, @def), - '", # [', mkRange(sort { $a <=> $b } @def), "]\n" ; + '"; # [', mkRange(sort { $a <=> $b } @def), "]\n" ; print $pm tab(6, 'our $LAST_BIT'), '= ' . "$index ;\n" ; print $pm tab(6, 'our $BYTES'), '= ' . "$warn_size ;\n" ; while (<DATA>) { |