21 lines
818 B
Perl
21 lines
818 B
Perl
# !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
|
|
# This file is machine-generated by ..\lib\unicore\mktables from the Unicode
|
|
# 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
|
|
# name or existence of this file are subject to change without notice. Don't
|
|
# use it directly. Use Unicode::UCD to access the Unicode character data
|
|
# base.
|
|
|
|
|
|
|
|
# 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.
|
|
$Unicode::UCD::SwashInfo{'ToIsc'}{'format'} = 'd'; # single decimal digit
|
|
$Unicode::UCD::SwashInfo{'ToIsc'}{'missing'} = ''; # code point maps to the null string
|
|
|
|
return <<'END';
|
|
END
|