mktables: Don't generate no-longer needed tables

These internal tables were only used in regen code, and those have been
modified to not use them; so can be removed.

diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index 7e41e29..6e6d1f5 100644 (file)
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -11487,8 +11487,6 @@ sub filter_old_style_case_folding {
     # Create the map for simple only if are going to output it, for otherwise
     # it takes no part in anything we do.
     my $to_output_simple;
-    my $multi_char_folds;
-    my $non_final_folds;
     my $all_folds;
 
     sub setup_case_folding($) {
@@ -11502,21 +11500,6 @@ sub filter_old_style_case_folding {
             property_ref('Case_Folding')->set_proxy_for('Simple_Case_Folding');
         }
 
-        $multi_char_folds = $perl->add_match_table("_Perl_Multi_Char_Folds",
-                            Perl_Extension => 1,
-                            Fate => $INTERNAL_ONLY,
-                            Description => "Code points that fold to more than one character",
-                            );
-        $non_final_folds = $perl->add_match_table("_Perl_Non_Final_Folds",
-                           Perl_Extension => 1,
-                           Fate => $INTERNAL_ONLY,
-                           Description => "Code points that particpate in a multi-char fold and are not the final character of said fold",
-                           );
-        $non_final_folds->add_comment(<<END
-Note that this is not a closure.  'f' is in the list, but not things that fold
-singly to 'f', namely 'F'
-END
-        );
         $all_folds = $perl->add_match_table("_Perl_Any_Folds",
                            Perl_Extension => 1,
                            Fate => $INTERNAL_ONLY,
@@ -11582,10 +11565,8 @@ END
                 my @string = split " ", $map;
                 for my $i (0 .. @string  - 1 -1) {
                     my $decimal = hex $string[$i];
-                    $non_final_folds->add_range($decimal, $decimal);
                     $all_folds->add_range($decimal, $decimal);
                 }
-                $multi_char_folds->add_range($from, $from);
             }
             else {
                 $all_folds->add_range(hex $map, hex $map);