summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl')
-rw-r--r--Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl10
1 files changed, 6 insertions, 4 deletions
diff --git a/Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl b/Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl
index a7f0c7b4f90..48ff4beacf1 100644
--- a/Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl
+++ b/Master/tlpkg/tlperl/lib/unicore/To/PerlDeci.pl
@@ -1,6 +1,6 @@
# !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
# This file is machine-generated by ..\lib\unicore\mktables from the Unicode
-# database, Version 12.1.0. Any changes made here will be lost!
+# database, Version 13.0.0. Any changes made here will be lost!
# !!!!!!! INTERNAL PERL USE ONLY !!!!!!!
# This file is for internal use by core Perl only. The format and even the
@@ -12,11 +12,11 @@
# The mappings must be modified to get the correct values by adding the code
# point ordinal number to each one that is numeric.
-# The name this swash is to be known by, with the format of the mappings in
+# The name this table is to be known by, with the format of the mappings in
# the main body of the table, and what all code points missing from this file
# map to.
-$utf8::SwashInfo{'ToPerlDecimalDigit'}{'format'} = 'a'; # some entries need adjustment
-$utf8::SwashInfo{'ToPerlDecimalDigit'}{'missing'} = ''; # code point maps to the null string
+$Unicode::UCD::SwashInfo{'ToPerlDecimalDigit'}{'format'} = 'a'; # some entries need adjustment
+$Unicode::UCD::SwashInfo{'ToPerlDecimalDigit'}{'missing'} = ''; # code point maps to the null string
return <<'END';
30 39 0
@@ -69,6 +69,7 @@ FF10 FF19 0
116C0 116C9 0
11730 11739 0
118E0 118E9 0
+11950 11959 0
11C50 11C59 0
11D50 11D59 0
11DA0 11DA9 0
@@ -82,4 +83,5 @@ FF10 FF19 0
1E140 1E149 0
1E2F0 1E2F9 0
1E950 1E959 0
+1FBF0 1FBF9 0
END