summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/unicore/To/Upper.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/unicore/To/Upper.pl')
-rw-r--r--Master/tlpkg/tlperl/lib/unicore/To/Upper.pl20
1 files changed, 18 insertions, 2 deletions
diff --git a/Master/tlpkg/tlperl/lib/unicore/To/Upper.pl b/Master/tlpkg/tlperl/lib/unicore/To/Upper.pl
index 8813aa293ab..49dc9b58adf 100644
--- a/Master/tlpkg/tlperl/lib/unicore/To/Upper.pl
+++ b/Master/tlpkg/tlperl/lib/unicore/To/Upper.pl
@@ -1,12 +1,23 @@
# !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
# This file is machine-generated by mktables from the Unicode
-# database, Version 6.0.0. Any changes made here will be lost!
+# database, Version 6.1.0. Any changes made here will be lost!
+
+# !!!!!!! IT IS DEPRECATED TO USE THIS FILE !!!!!!!
+
+# This file is for internal use by core Perl only. It is retained for
+# backwards compatibility with applications that may have come to rely on it,
+# but its format and even its name or existence are subject to change without
+# notice in a future Perl version. Don't use it directly. Instead, its
+# contents are now retrievable through a stable API in the Unicode::UCD
+# module: Unicode::UCD::prop_invmap('Uppercase_Mapping').
+
# The name this swash 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{'ToUpper'}{'format'} = 'x'; # positive hex whole number; a code point
+$utf8::SwashInfo{'ToUpper'}{'format'} = 'x'; # non-negative hex whole number; a code point
+$utf8::SwashInfo{'ToUpper'}{'specials_name'} = 'utf8::ToSpecUpper'; # Name of hash of special mappings
$utf8::SwashInfo{'ToUpper'}{'missing'} = '<code point>'; # code point maps to itself
# Some code points require special handling because their mappings are each to
@@ -341,6 +352,7 @@ return <<'END';
0260 0193
0263 0194
0265 A78D
+0266 A7AA
0268 0197
0269 0196
026B 2C62
@@ -950,6 +962,7 @@ return <<'END';
2CE3 2CE2
2CEC 2CEB
2CEE 2CED
+2CF3 2CF2
2D00 10A0
2D01 10A1
2D02 10A2
@@ -988,6 +1001,8 @@ return <<'END';
2D23 10C3
2D24 10C4
2D25 10C5
+2D27 10C7
+2D2D 10CD
A641 A640
A643 A642
A645 A644
@@ -1070,6 +1085,7 @@ A785 A784
A787 A786
A78C A78B
A791 A790
+A793 A792
A7A1 A7A0
A7A3 A7A2
A7A5 A7A4