1------------------------------------------------------------------------------
2--                                                                          --
3--                            Matreshka Project                             --
4--                                                                          --
5--        Localization, Internationalization, Globalization for Ada         --
6--                                                                          --
7--                        Runtime Library Component                         --
8--                                                                          --
9------------------------------------------------------------------------------
10--                                                                          --
11-- Copyright © 2012-2015, Vadim Godunko <vgodunko@gmail.com>                --
12-- All rights reserved.                                                     --
13--                                                                          --
14-- Redistribution and use in source and binary forms, with or without       --
15-- modification, are permitted provided that the following conditions       --
16-- are met:                                                                 --
17--                                                                          --
18--  * Redistributions of source code must retain the above copyright        --
19--    notice, this list of conditions and the following disclaimer.         --
20--                                                                          --
21--  * Redistributions in binary form must reproduce the above copyright     --
22--    notice, this list of conditions and the following disclaimer in the   --
23--    documentation and/or other materials provided with the distribution.  --
24--                                                                          --
25--  * Neither the name of the Vadim Godunko, IE nor the names of its        --
26--    contributors may be used to endorse or promote products derived from  --
27--    this software without specific prior written permission.              --
28--                                                                          --
29-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS      --
30-- "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT        --
31-- LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR    --
32-- A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT     --
33-- HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,   --
34-- SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED --
35-- TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR   --
36-- PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF   --
37-- LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING     --
38-- NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS       --
39-- SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.             --
40--                                                                          --
41------------------------------------------------------------------------------
42--  $Revision: 5307 $ $Date: 2015-05-16 01:04:40 +0300 (Sat, 16 May 2015) $
43------------------------------------------------------------------------------
44
45pragma Restrictions (No_Elaboration_Code);
46--  GNAT: enforce generation of preinitialized data section instead of
47--  generation of elaboration code.
48
49package Matreshka.Internals.Unicode.Ucd.Core_001C is
50
51   pragma Preelaborate;
52
53   Group_001C : aliased constant Core_Second_Stage
54     := (16#00# .. 16#23# =>  --  1C00 .. 1C23
55          (Other_Letter, Neutral,
56           Other, A_Letter, O_Letter, Alphabetic,
57           (Alphabetic
58              | Grapheme_Base
59              | ID_Continue
60              | ID_Start
61              | XID_Continue
62              | XID_Start => True,
63            others => False)),
64         16#24# .. 16#2B# =>  --  1C24 .. 1C2B
65          (Spacing_Mark, Neutral,
66           Spacing_Mark, Extend, Extend, Combining_Mark,
67           (Other_Alphabetic
68              | Alphabetic
69              | Grapheme_Base
70              | ID_Continue
71              | XID_Continue => True,
72            others => False)),
73         16#2C# .. 16#33# =>  --  1C2C .. 1C33
74          (Nonspacing_Mark, Neutral,
75           Extend, Extend, Extend, Combining_Mark,
76           (Other_Alphabetic
77              | Alphabetic
78              | Case_Ignorable
79              | Grapheme_Extend
80              | ID_Continue
81              | XID_Continue => True,
82            others => False)),
83         16#34# .. 16#35# =>  --  1C34 .. 1C35
84          (Spacing_Mark, Neutral,
85           Spacing_Mark, Extend, Extend, Combining_Mark,
86           (Other_Alphabetic
87              | Alphabetic
88              | Grapheme_Base
89              | ID_Continue
90              | XID_Continue => True,
91            others => False)),
92         16#36#           =>  --  1C36
93          (Nonspacing_Mark, Neutral,
94           Extend, Extend, Extend, Combining_Mark,
95           (Diacritic
96              | Extender
97              | Case_Ignorable
98              | Grapheme_Extend
99              | ID_Continue
100              | XID_Continue => True,
101            others => False)),
102         16#37#           =>  --  1C37
103          (Nonspacing_Mark, Neutral,
104           Extend, Extend, Extend, Combining_Mark,
105           (Diacritic
106              | Case_Ignorable
107              | Grapheme_Extend
108              | ID_Continue
109              | XID_Continue => True,
110            others => False)),
111         16#3B# .. 16#3C# =>  --  1C3B .. 1C3C
112          (Other_Punctuation, Neutral,
113           Other, Other, S_Term, Break_After,
114           (STerm
115              | Terminal_Punctuation
116              | Grapheme_Base => True,
117            others => False)),
118         16#3D# .. 16#3F# =>  --  1C3D .. 1C3F
119          (Other_Punctuation, Neutral,
120           Other, Other, Other, Break_After,
121           (Terminal_Punctuation
122              | Grapheme_Base => True,
123            others => False)),
124         16#40# .. 16#49# =>  --  1C40 .. 1C49
125          (Decimal_Number, Neutral,
126           Other, Numeric, Numeric, Numeric,
127           (Grapheme_Base
128              | ID_Continue
129              | XID_Continue => True,
130            others => False)),
131         16#4D# .. 16#4F# =>  --  1C4D .. 1C4F
132          (Other_Letter, Neutral,
133           Other, A_Letter, O_Letter, Alphabetic,
134           (Alphabetic
135              | Grapheme_Base
136              | ID_Continue
137              | ID_Start
138              | XID_Continue
139              | XID_Start => True,
140            others => False)),
141         16#50# .. 16#59# =>  --  1C50 .. 1C59
142          (Decimal_Number, Neutral,
143           Other, Numeric, Numeric, Numeric,
144           (Grapheme_Base
145              | ID_Continue
146              | XID_Continue => True,
147            others => False)),
148         16#5A# .. 16#77# =>  --  1C5A .. 1C77
149          (Other_Letter, Neutral,
150           Other, A_Letter, O_Letter, Alphabetic,
151           (Alphabetic
152              | Grapheme_Base
153              | ID_Continue
154              | ID_Start
155              | XID_Continue
156              | XID_Start => True,
157            others => False)),
158         16#78# .. 16#7A# =>  --  1C78 .. 1C7A
159          (Modifier_Letter, Neutral,
160           Other, A_Letter, O_Letter, Alphabetic,
161           (Diacritic
162              | Alphabetic
163              | Case_Ignorable
164              | Grapheme_Base
165              | ID_Continue
166              | ID_Start
167              | XID_Continue
168              | XID_Start => True,
169            others => False)),
170         16#7B#           =>  --  1C7B
171          (Modifier_Letter, Neutral,
172           Other, A_Letter, O_Letter, Alphabetic,
173           (Diacritic
174              | Extender
175              | Alphabetic
176              | Case_Ignorable
177              | Grapheme_Base
178              | ID_Continue
179              | ID_Start
180              | XID_Continue
181              | XID_Start => True,
182            others => False)),
183         16#7C# .. 16#7D# =>  --  1C7C .. 1C7D
184          (Modifier_Letter, Neutral,
185           Other, A_Letter, O_Letter, Alphabetic,
186           (Diacritic
187              | Alphabetic
188              | Case_Ignorable
189              | Grapheme_Base
190              | ID_Continue
191              | ID_Start
192              | XID_Continue
193              | XID_Start => True,
194            others => False)),
195         16#7E# .. 16#7F# =>  --  1C7E .. 1C7F
196          (Other_Punctuation, Neutral,
197           Other, Other, S_Term, Break_After,
198           (STerm
199              | Terminal_Punctuation
200              | Grapheme_Base => True,
201            others => False)),
202         16#C0# .. 16#C7# =>  --  1CC0 .. 1CC7
203          (Other_Punctuation, Neutral,
204           Other, Other, Other, Alphabetic,
205           (Grapheme_Base => True,
206            others => False)),
207         16#D0# .. 16#D2# =>  --  1CD0 .. 1CD2
208          (Nonspacing_Mark, Neutral,
209           Extend, Extend, Extend, Combining_Mark,
210           (Diacritic
211              | Case_Ignorable
212              | Grapheme_Extend
213              | ID_Continue
214              | XID_Continue => True,
215            others => False)),
216         16#D3#           =>  --  1CD3
217          (Other_Punctuation, Neutral,
218           Other, Other, Other, Alphabetic,
219           (Diacritic
220              | Grapheme_Base => True,
221            others => False)),
222         16#D4# .. 16#E0# =>  --  1CD4 .. 1CE0
223          (Nonspacing_Mark, Neutral,
224           Extend, Extend, Extend, Combining_Mark,
225           (Diacritic
226              | Case_Ignorable
227              | Grapheme_Extend
228              | ID_Continue
229              | XID_Continue => True,
230            others => False)),
231         16#E1#           =>  --  1CE1
232          (Spacing_Mark, Neutral,
233           Spacing_Mark, Extend, Extend, Combining_Mark,
234           (Diacritic
235              | Grapheme_Base
236              | ID_Continue
237              | XID_Continue => True,
238            others => False)),
239         16#E2# .. 16#E8# =>  --  1CE2 .. 1CE8
240          (Nonspacing_Mark, Neutral,
241           Extend, Extend, Extend, Combining_Mark,
242           (Diacritic
243              | Case_Ignorable
244              | Grapheme_Extend
245              | ID_Continue
246              | XID_Continue => True,
247            others => False)),
248         16#E9# .. 16#EC# =>  --  1CE9 .. 1CEC
249          (Other_Letter, Neutral,
250           Other, A_Letter, O_Letter, Alphabetic,
251           (Alphabetic
252              | Grapheme_Base
253              | ID_Continue
254              | ID_Start
255              | XID_Continue
256              | XID_Start => True,
257            others => False)),
258         16#ED#           =>  --  1CED
259          (Nonspacing_Mark, Neutral,
260           Extend, Extend, Extend, Combining_Mark,
261           (Diacritic
262              | Case_Ignorable
263              | Grapheme_Extend
264              | ID_Continue
265              | XID_Continue => True,
266            others => False)),
267         16#EE# .. 16#F1# =>  --  1CEE .. 1CF1
268          (Other_Letter, Neutral,
269           Other, A_Letter, O_Letter, Alphabetic,
270           (Alphabetic
271              | Grapheme_Base
272              | ID_Continue
273              | ID_Start
274              | XID_Continue
275              | XID_Start => True,
276            others => False)),
277         16#F2# .. 16#F3# =>  --  1CF2 .. 1CF3
278          (Spacing_Mark, Neutral,
279           Spacing_Mark, Extend, Extend, Combining_Mark,
280           (Other_Alphabetic
281              | Alphabetic
282              | Grapheme_Base
283              | ID_Continue
284              | XID_Continue => True,
285            others => False)),
286         16#F4#           =>  --  1CF4
287          (Nonspacing_Mark, Neutral,
288           Extend, Extend, Extend, Combining_Mark,
289           (Diacritic
290              | Case_Ignorable
291              | Grapheme_Extend
292              | ID_Continue
293              | XID_Continue => True,
294            others => False)),
295         16#F5# .. 16#F6# =>  --  1CF5 .. 1CF6
296          (Other_Letter, Neutral,
297           Other, A_Letter, O_Letter, Alphabetic,
298           (Alphabetic
299              | Grapheme_Base
300              | ID_Continue
301              | ID_Start
302              | XID_Continue
303              | XID_Start => True,
304            others => False)),
305         16#F8# .. 16#F9# =>  --  1CF8 .. 1CF9
306          (Nonspacing_Mark, Neutral,
307           Extend, Extend, Extend, Combining_Mark,
308           (Diacritic
309              | Case_Ignorable
310              | Grapheme_Extend
311              | ID_Continue
312              | XID_Continue => True,
313            others => False)),
314         others           =>
315          (Unassigned, Neutral,
316           Other, Other, Other, Unknown,
317           (others => False)));
318
319end Matreshka.Internals.Unicode.Ucd.Core_001C;
320