There are no folds to multiple chars in early Unicode versions

[perl5.git] / lib / unicore / mktables

diff --git a/lib/unicore/mktables b/lib/unicore/mktables
index fdcb0ff..2f6fc5f 100644 (file)
--- a/lib/unicore/mktables
+++ b/lib/unicore/mktables
@@ -13989,6 +13989,9 @@ sub compile_perl() {
          Description =>
               "Code points whose fold is a string of more than one character",
     );
+    if ($v_version lt v3.0.1) {
+        push @tables_that_may_be_empty, '_Perl_Folds_To_Multi_Char';
+    }
 
     # Look through all the known folds to populate these tables.
     foreach my $range ($cf->ranges) {