regcharclass.pl: Rmv unused variable

Perl · Aug 1, 2021 · e69f72f · e69f72f
1 parent 871a4a9
commit e69f72f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 3 deletions.
diff --git a/regcharclass.h b/regcharclass.h
@@ -3765,6 +3765,6 @@
  * 696e706fddd3ce8cd48c7ea91caf4c9edf5c296432d320aa7b78631f69aa9eac lib/unicore/mktables
  * 50b85a67451145545a65cea370dab8d3444fbfe07e9c34cef560c5b7da9d3eef lib/unicore/version
  * 0a6b5ab33bb1026531f816efe81aea1a8ffcd34a27cbea37dd6a70a63d73c844 regen/charset_translations.pl
- * 1c0276b3b54a2da17de7b32dd92f3c996ab859307e2fd504046e900d05417270 regen/regcharclass.pl
+ * 4e40347fc698289817c20aaedd624d4c0fea578152ae1577a77177d9712af7a2 regen/regcharclass.pl
  * b2f896452d2b30da3e04800f478c60c1fd0b03d6b668689b020f1e3cf1f1cdd9 regen/regcharclass_multi_char_folds.pl
  * ex: set ro: */
diff --git a/regen/regcharclass.pl b/regen/regcharclass.pl
@@ -1177,7 +1177,6 @@ sub _cond_as_str {
 
     # Here, there was no entire-class optimization that was clearly better
     # than doing things by ranges.  Look at each range.
-    my $range_count_extra = 0;
     for (my $i = $loop_start; $i < $loop_end; $i++) {
         if (! ref $ranges[$i]) {    # Trivial case: no range
             $ranges[$i] = $self->val_fmt($ranges[$i]) . " == $test";
@@ -1198,7 +1197,7 @@ sub _cond_as_str {
     # ranges (some of which could be cut down by using a mask for just it).
     # We return whichever method uses the fewest branches.
     return "( "
-           . join( " || ", (@masks && @masks < @ranges + $range_count_extra)
+           . join( " || ", (@masks && @masks < @ranges)
                             ? @masks
                             : @ranges)
            . " )";