paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 13:49:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug #36478: add array of category names

Browse Source 
git-svn-id: trunk@43799 -
This commit is contained in:
michael 2019-12-27 11:08:52 +00:00
parent 0485f59cad
commit a37cb2d2fa
1 changed files with 35 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
rtl/objpas/unicodedata.pas
View File

@ -181,6 +181,41 @@ const
UGC_PrivateUse = 28; UGC_PrivateUse = 28;
UGC_Unassigned = 29; UGC_Unassigned = 29;
// Names
UnicodeCategoryNames: array[0..29] of string[2] = (
'Lu',
'Ll',
'Lt',
'Lm',
'Lo',
'Mn',
'Mc',
'Me',
'Nd',
'Nl',
'No',
'Pc',
'Pd',
'Ps',
'Pe',
'Pi',
'Pf',
'Po',
'Sm',
'Sc',
'Sk',
'So',
'Zs',
'Zl',
'Zp',
'Cc',
'Cf',
'Cs',
'Co',
'Cn'
);
type type
TUInt24Rec = packed record TUInt24Rec = packed record