mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-05-15 11:22:34 +02:00
126 lines
4.8 KiB
SQL
126 lines
4.8 KiB
SQL
{ Unicode implementation tables.
|
|
|
|
Copyright (c) 2013 by Inoussa OUEDRAOGO
|
|
|
|
Permission is hereby granted, free of charge, to any person
|
|
obtaining a copy of the Unicode data files and any associated
|
|
documentation (the "Data Files") or Unicode software and any
|
|
associated documentation (the "Software") to deal in the Data
|
|
Files or Software without restriction, including without
|
|
limitation the rights to use, copy, modify, merge, publish,
|
|
distribute, and/or sell copies of the Data Files or Software,
|
|
and to permit persons to whom the Data Files or Software are
|
|
furnished to do so, provided that (a) the above copyright
|
|
notice(s) and this permission notice appear with all copies
|
|
of the Data Files or Software, (b) both the above copyright
|
|
notice(s) and this permission notice appear in associated
|
|
documentation, and (c) there is clear notice in each modified
|
|
Data File or in the Software as well as in the documentation
|
|
associated with the Data File(s) or Software that the data or
|
|
software has been modified.
|
|
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. }
|
|
|
|
const
|
|
VERSION_STRING = '6.2.0';
|
|
VARIABLE_LOW_LIMIT = 256;
|
|
VARIABLE_HIGH_LIMIT = 782;
|
|
VARIABLE_WEIGHT = 0;
|
|
BACKWARDS_0 = False;
|
|
BACKWARDS_1 = False;
|
|
BACKWARDS_2 = False;
|
|
BACKWARDS_3 = False;
|
|
PROP_COUNT = 233964;
|
|
|
|
const
|
|
UCA_TABLE_1 : array[0..255] of Byte = (
|
|
0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,
|
|
16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,
|
|
32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,
|
|
48,49,50,51,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,53,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
54,55,56,57,58,59,60,61,62,63,64,65,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,66,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,52,
|
|
52,52,52,52,52,52,52,52,52,52,67,68,69,70,71,72
|
|
);
|
|
|
|
const
|
|
UCAO_TABLE_1 : array[0..1023] of Word = (
|
|
0,1,2,3,4,5,6,6,7,8,6,6,9,10,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,11,12,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,13,6,6,6,
|
|
6,6,6,6,14,15,6,6,6,6,6,16,17,18,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
19,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,
|
|
6,6,6,6,6,6,6,6,6,6,6,6,6,6,6,6
|
|
);
|
|
|