PageRenderTime 24ms CodeModel.GetById 21ms app.highlight 2ms RepoModel.GetById 0ms app.codeStats 0ms

/compiler/cp850.pas

https://github.com/slibre/freepascal
Pascal | 282 lines | 275 code | 6 blank | 1 comment | 0 complexity | 6890cc54d753350483d7f59450b9c64c MD5 | raw file
Possible License(s): LGPL-2.0, LGPL-2.1, LGPL-3.0
  1{ This is an automatically created file, so don't edit it }
  2unit cp850;
  3
  4  interface
  5
  6  implementation
  7
  8  uses
  9     {$if FPC_FULLVERSION<20700}ccharset{$else}charset{$endif};
 10
 11  const
 12     map : array[0..255] of tunicodecharmapping = (
 13       (unicode : 0; flag : umf_noinfo; reserved : 0),
 14       (unicode : 1; flag : umf_noinfo; reserved : 0),
 15       (unicode : 2; flag : umf_noinfo; reserved : 0),
 16       (unicode : 3; flag : umf_noinfo; reserved : 0),
 17       (unicode : 4; flag : umf_noinfo; reserved : 0),
 18       (unicode : 5; flag : umf_noinfo; reserved : 0),
 19       (unicode : 6; flag : umf_noinfo; reserved : 0),
 20       (unicode : 7; flag : umf_noinfo; reserved : 0),
 21       (unicode : 8; flag : umf_noinfo; reserved : 0),
 22       (unicode : 9; flag : umf_noinfo; reserved : 0),
 23       (unicode : 10; flag : umf_noinfo; reserved : 0),
 24       (unicode : 11; flag : umf_noinfo; reserved : 0),
 25       (unicode : 12; flag : umf_noinfo; reserved : 0),
 26       (unicode : 13; flag : umf_noinfo; reserved : 0),
 27       (unicode : 14; flag : umf_noinfo; reserved : 0),
 28       (unicode : 15; flag : umf_noinfo; reserved : 0),
 29       (unicode : 16; flag : umf_noinfo; reserved : 0),
 30       (unicode : 17; flag : umf_noinfo; reserved : 0),
 31       (unicode : 18; flag : umf_noinfo; reserved : 0),
 32       (unicode : 19; flag : umf_noinfo; reserved : 0),
 33       (unicode : 20; flag : umf_noinfo; reserved : 0),
 34       (unicode : 21; flag : umf_noinfo; reserved : 0),
 35       (unicode : 22; flag : umf_noinfo; reserved : 0),
 36       (unicode : 23; flag : umf_noinfo; reserved : 0),
 37       (unicode : 24; flag : umf_noinfo; reserved : 0),
 38       (unicode : 25; flag : umf_noinfo; reserved : 0),
 39       (unicode : 26; flag : umf_noinfo; reserved : 0),
 40       (unicode : 27; flag : umf_noinfo; reserved : 0),
 41       (unicode : 28; flag : umf_noinfo; reserved : 0),
 42       (unicode : 29; flag : umf_noinfo; reserved : 0),
 43       (unicode : 30; flag : umf_noinfo; reserved : 0),
 44       (unicode : 31; flag : umf_noinfo; reserved : 0),
 45       (unicode : 32; flag : umf_noinfo; reserved : 0),
 46       (unicode : 33; flag : umf_noinfo; reserved : 0),
 47       (unicode : 34; flag : umf_noinfo; reserved : 0),
 48       (unicode : 35; flag : umf_noinfo; reserved : 0),
 49       (unicode : 36; flag : umf_noinfo; reserved : 0),
 50       (unicode : 37; flag : umf_noinfo; reserved : 0),
 51       (unicode : 38; flag : umf_noinfo; reserved : 0),
 52       (unicode : 39; flag : umf_noinfo; reserved : 0),
 53       (unicode : 40; flag : umf_noinfo; reserved : 0),
 54       (unicode : 41; flag : umf_noinfo; reserved : 0),
 55       (unicode : 42; flag : umf_noinfo; reserved : 0),
 56       (unicode : 43; flag : umf_noinfo; reserved : 0),
 57       (unicode : 44; flag : umf_noinfo; reserved : 0),
 58       (unicode : 45; flag : umf_noinfo; reserved : 0),
 59       (unicode : 46; flag : umf_noinfo; reserved : 0),
 60       (unicode : 47; flag : umf_noinfo; reserved : 0),
 61       (unicode : 48; flag : umf_noinfo; reserved : 0),
 62       (unicode : 49; flag : umf_noinfo; reserved : 0),
 63       (unicode : 50; flag : umf_noinfo; reserved : 0),
 64       (unicode : 51; flag : umf_noinfo; reserved : 0),
 65       (unicode : 52; flag : umf_noinfo; reserved : 0),
 66       (unicode : 53; flag : umf_noinfo; reserved : 0),
 67       (unicode : 54; flag : umf_noinfo; reserved : 0),
 68       (unicode : 55; flag : umf_noinfo; reserved : 0),
 69       (unicode : 56; flag : umf_noinfo; reserved : 0),
 70       (unicode : 57; flag : umf_noinfo; reserved : 0),
 71       (unicode : 58; flag : umf_noinfo; reserved : 0),
 72       (unicode : 59; flag : umf_noinfo; reserved : 0),
 73       (unicode : 60; flag : umf_noinfo; reserved : 0),
 74       (unicode : 61; flag : umf_noinfo; reserved : 0),
 75       (unicode : 62; flag : umf_noinfo; reserved : 0),
 76       (unicode : 63; flag : umf_noinfo; reserved : 0),
 77       (unicode : 64; flag : umf_noinfo; reserved : 0),
 78       (unicode : 65; flag : umf_noinfo; reserved : 0),
 79       (unicode : 66; flag : umf_noinfo; reserved : 0),
 80       (unicode : 67; flag : umf_noinfo; reserved : 0),
 81       (unicode : 68; flag : umf_noinfo; reserved : 0),
 82       (unicode : 69; flag : umf_noinfo; reserved : 0),
 83       (unicode : 70; flag : umf_noinfo; reserved : 0),
 84       (unicode : 71; flag : umf_noinfo; reserved : 0),
 85       (unicode : 72; flag : umf_noinfo; reserved : 0),
 86       (unicode : 73; flag : umf_noinfo; reserved : 0),
 87       (unicode : 74; flag : umf_noinfo; reserved : 0),
 88       (unicode : 75; flag : umf_noinfo; reserved : 0),
 89       (unicode : 76; flag : umf_noinfo; reserved : 0),
 90       (unicode : 77; flag : umf_noinfo; reserved : 0),
 91       (unicode : 78; flag : umf_noinfo; reserved : 0),
 92       (unicode : 79; flag : umf_noinfo; reserved : 0),
 93       (unicode : 80; flag : umf_noinfo; reserved : 0),
 94       (unicode : 81; flag : umf_noinfo; reserved : 0),
 95       (unicode : 82; flag : umf_noinfo; reserved : 0),
 96       (unicode : 83; flag : umf_noinfo; reserved : 0),
 97       (unicode : 84; flag : umf_noinfo; reserved : 0),
 98       (unicode : 85; flag : umf_noinfo; reserved : 0),
 99       (unicode : 86; flag : umf_noinfo; reserved : 0),
100       (unicode : 87; flag : umf_noinfo; reserved : 0),
101       (unicode : 88; flag : umf_noinfo; reserved : 0),
102       (unicode : 89; flag : umf_noinfo; reserved : 0),
103       (unicode : 90; flag : umf_noinfo; reserved : 0),
104       (unicode : 91; flag : umf_noinfo; reserved : 0),
105       (unicode : 92; flag : umf_noinfo; reserved : 0),
106       (unicode : 93; flag : umf_noinfo; reserved : 0),
107       (unicode : 94; flag : umf_noinfo; reserved : 0),
108       (unicode : 95; flag : umf_noinfo; reserved : 0),
109       (unicode : 96; flag : umf_noinfo; reserved : 0),
110       (unicode : 97; flag : umf_noinfo; reserved : 0),
111       (unicode : 98; flag : umf_noinfo; reserved : 0),
112       (unicode : 99; flag : umf_noinfo; reserved : 0),
113       (unicode : 100; flag : umf_noinfo; reserved : 0),
114       (unicode : 101; flag : umf_noinfo; reserved : 0),
115       (unicode : 102; flag : umf_noinfo; reserved : 0),
116       (unicode : 103; flag : umf_noinfo; reserved : 0),
117       (unicode : 104; flag : umf_noinfo; reserved : 0),
118       (unicode : 105; flag : umf_noinfo; reserved : 0),
119       (unicode : 106; flag : umf_noinfo; reserved : 0),
120       (unicode : 107; flag : umf_noinfo; reserved : 0),
121       (unicode : 108; flag : umf_noinfo; reserved : 0),
122       (unicode : 109; flag : umf_noinfo; reserved : 0),
123       (unicode : 110; flag : umf_noinfo; reserved : 0),
124       (unicode : 111; flag : umf_noinfo; reserved : 0),
125       (unicode : 112; flag : umf_noinfo; reserved : 0),
126       (unicode : 113; flag : umf_noinfo; reserved : 0),
127       (unicode : 114; flag : umf_noinfo; reserved : 0),
128       (unicode : 115; flag : umf_noinfo; reserved : 0),
129       (unicode : 116; flag : umf_noinfo; reserved : 0),
130       (unicode : 117; flag : umf_noinfo; reserved : 0),
131       (unicode : 118; flag : umf_noinfo; reserved : 0),
132       (unicode : 119; flag : umf_noinfo; reserved : 0),
133       (unicode : 120; flag : umf_noinfo; reserved : 0),
134       (unicode : 121; flag : umf_noinfo; reserved : 0),
135       (unicode : 122; flag : umf_noinfo; reserved : 0),
136       (unicode : 123; flag : umf_noinfo; reserved : 0),
137       (unicode : 124; flag : umf_noinfo; reserved : 0),
138       (unicode : 125; flag : umf_noinfo; reserved : 0),
139       (unicode : 126; flag : umf_noinfo; reserved : 0),
140       (unicode : 127; flag : umf_noinfo; reserved : 0),
141       (unicode : 199; flag : umf_noinfo; reserved : 0),
142       (unicode : 252; flag : umf_noinfo; reserved : 0),
143       (unicode : 233; flag : umf_noinfo; reserved : 0),
144       (unicode : 226; flag : umf_noinfo; reserved : 0),
145       (unicode : 228; flag : umf_noinfo; reserved : 0),
146       (unicode : 224; flag : umf_noinfo; reserved : 0),
147       (unicode : 229; flag : umf_noinfo; reserved : 0),
148       (unicode : 231; flag : umf_noinfo; reserved : 0),
149       (unicode : 234; flag : umf_noinfo; reserved : 0),
150       (unicode : 235; flag : umf_noinfo; reserved : 0),
151       (unicode : 232; flag : umf_noinfo; reserved : 0),
152       (unicode : 239; flag : umf_noinfo; reserved : 0),
153       (unicode : 238; flag : umf_noinfo; reserved : 0),
154       (unicode : 236; flag : umf_noinfo; reserved : 0),
155       (unicode : 196; flag : umf_noinfo; reserved : 0),
156       (unicode : 197; flag : umf_noinfo; reserved : 0),
157       (unicode : 201; flag : umf_noinfo; reserved : 0),
158       (unicode : 230; flag : umf_noinfo; reserved : 0),
159       (unicode : 198; flag : umf_noinfo; reserved : 0),
160       (unicode : 244; flag : umf_noinfo; reserved : 0),
161       (unicode : 246; flag : umf_noinfo; reserved : 0),
162       (unicode : 242; flag : umf_noinfo; reserved : 0),
163       (unicode : 251; flag : umf_noinfo; reserved : 0),
164       (unicode : 249; flag : umf_noinfo; reserved : 0),
165       (unicode : 255; flag : umf_noinfo; reserved : 0),
166       (unicode : 214; flag : umf_noinfo; reserved : 0),
167       (unicode : 220; flag : umf_noinfo; reserved : 0),
168       (unicode : 248; flag : umf_noinfo; reserved : 0),
169       (unicode : 163; flag : umf_noinfo; reserved : 0),
170       (unicode : 216; flag : umf_noinfo; reserved : 0),
171       (unicode : 215; flag : umf_noinfo; reserved : 0),
172       (unicode : 402; flag : umf_noinfo; reserved : 0),
173       (unicode : 225; flag : umf_noinfo; reserved : 0),
174       (unicode : 237; flag : umf_noinfo; reserved : 0),
175       (unicode : 243; flag : umf_noinfo; reserved : 0),
176       (unicode : 250; flag : umf_noinfo; reserved : 0),
177       (unicode : 241; flag : umf_noinfo; reserved : 0),
178       (unicode : 209; flag : umf_noinfo; reserved : 0),
179       (unicode : 170; flag : umf_noinfo; reserved : 0),
180       (unicode : 186; flag : umf_noinfo; reserved : 0),
181       (unicode : 191; flag : umf_noinfo; reserved : 0),
182       (unicode : 174; flag : umf_noinfo; reserved : 0),
183       (unicode : 172; flag : umf_noinfo; reserved : 0),
184       (unicode : 189; flag : umf_noinfo; reserved : 0),
185       (unicode : 188; flag : umf_noinfo; reserved : 0),
186       (unicode : 161; flag : umf_noinfo; reserved : 0),
187       (unicode : 171; flag : umf_noinfo; reserved : 0),
188       (unicode : 187; flag : umf_noinfo; reserved : 0),
189       (unicode : 9617; flag : umf_noinfo; reserved : 0),
190       (unicode : 9618; flag : umf_noinfo; reserved : 0),
191       (unicode : 9619; flag : umf_noinfo; reserved : 0),
192       (unicode : 9474; flag : umf_noinfo; reserved : 0),
193       (unicode : 9508; flag : umf_noinfo; reserved : 0),
194       (unicode : 193; flag : umf_noinfo; reserved : 0),
195       (unicode : 194; flag : umf_noinfo; reserved : 0),
196       (unicode : 192; flag : umf_noinfo; reserved : 0),
197       (unicode : 169; flag : umf_noinfo; reserved : 0),
198       (unicode : 9571; flag : umf_noinfo; reserved : 0),
199       (unicode : 9553; flag : umf_noinfo; reserved : 0),
200       (unicode : 9559; flag : umf_noinfo; reserved : 0),
201       (unicode : 9565; flag : umf_noinfo; reserved : 0),
202       (unicode : 162; flag : umf_noinfo; reserved : 0),
203       (unicode : 165; flag : umf_noinfo; reserved : 0),
204       (unicode : 9488; flag : umf_noinfo; reserved : 0),
205       (unicode : 9492; flag : umf_noinfo; reserved : 0),
206       (unicode : 9524; flag : umf_noinfo; reserved : 0),
207       (unicode : 9516; flag : umf_noinfo; reserved : 0),
208       (unicode : 9500; flag : umf_noinfo; reserved : 0),
209       (unicode : 9472; flag : umf_noinfo; reserved : 0),
210       (unicode : 9532; flag : umf_noinfo; reserved : 0),
211       (unicode : 227; flag : umf_noinfo; reserved : 0),
212       (unicode : 195; flag : umf_noinfo; reserved : 0),
213       (unicode : 9562; flag : umf_noinfo; reserved : 0),
214       (unicode : 9556; flag : umf_noinfo; reserved : 0),
215       (unicode : 9577; flag : umf_noinfo; reserved : 0),
216       (unicode : 9574; flag : umf_noinfo; reserved : 0),
217       (unicode : 9568; flag : umf_noinfo; reserved : 0),
218       (unicode : 9552; flag : umf_noinfo; reserved : 0),
219       (unicode : 9580; flag : umf_noinfo; reserved : 0),
220       (unicode : 164; flag : umf_noinfo; reserved : 0),
221       (unicode : 240; flag : umf_noinfo; reserved : 0),
222       (unicode : 208; flag : umf_noinfo; reserved : 0),
223       (unicode : 202; flag : umf_noinfo; reserved : 0),
224       (unicode : 203; flag : umf_noinfo; reserved : 0),
225       (unicode : 200; flag : umf_noinfo; reserved : 0),
226       (unicode : 305; flag : umf_noinfo; reserved : 0),
227       (unicode : 205; flag : umf_noinfo; reserved : 0),
228       (unicode : 206; flag : umf_noinfo; reserved : 0),
229       (unicode : 207; flag : umf_noinfo; reserved : 0),
230       (unicode : 9496; flag : umf_noinfo; reserved : 0),
231       (unicode : 9484; flag : umf_noinfo; reserved : 0),
232       (unicode : 9608; flag : umf_noinfo; reserved : 0),
233       (unicode : 9604; flag : umf_noinfo; reserved : 0),
234       (unicode : 166; flag : umf_noinfo; reserved : 0),
235       (unicode : 204; flag : umf_noinfo; reserved : 0),
236       (unicode : 9600; flag : umf_noinfo; reserved : 0),
237       (unicode : 211; flag : umf_noinfo; reserved : 0),
238       (unicode : 223; flag : umf_noinfo; reserved : 0),
239       (unicode : 212; flag : umf_noinfo; reserved : 0),
240       (unicode : 210; flag : umf_noinfo; reserved : 0),
241       (unicode : 245; flag : umf_noinfo; reserved : 0),
242       (unicode : 213; flag : umf_noinfo; reserved : 0),
243       (unicode : 181; flag : umf_noinfo; reserved : 0),
244       (unicode : 254; flag : umf_noinfo; reserved : 0),
245       (unicode : 222; flag : umf_noinfo; reserved : 0),
246       (unicode : 218; flag : umf_noinfo; reserved : 0),
247       (unicode : 219; flag : umf_noinfo; reserved : 0),
248       (unicode : 217; flag : umf_noinfo; reserved : 0),
249       (unicode : 253; flag : umf_noinfo; reserved : 0),
250       (unicode : 221; flag : umf_noinfo; reserved : 0),
251       (unicode : 175; flag : umf_noinfo; reserved : 0),
252       (unicode : 180; flag : umf_noinfo; reserved : 0),
253       (unicode : 173; flag : umf_noinfo; reserved : 0),
254       (unicode : 177; flag : umf_noinfo; reserved : 0),
255       (unicode : 8215; flag : umf_noinfo; reserved : 0),
256       (unicode : 190; flag : umf_noinfo; reserved : 0),
257       (unicode : 182; flag : umf_noinfo; reserved : 0),
258       (unicode : 167; flag : umf_noinfo; reserved : 0),
259       (unicode : 247; flag : umf_noinfo; reserved : 0),
260       (unicode : 184; flag : umf_noinfo; reserved : 0),
261       (unicode : 176; flag : umf_noinfo; reserved : 0),
262       (unicode : 168; flag : umf_noinfo; reserved : 0),
263       (unicode : 183; flag : umf_noinfo; reserved : 0),
264       (unicode : 185; flag : umf_noinfo; reserved : 0),
265       (unicode : 179; flag : umf_noinfo; reserved : 0),
266       (unicode : 178; flag : umf_noinfo; reserved : 0),
267       (unicode : 9632; flag : umf_noinfo; reserved : 0),
268       (unicode : 160; flag : umf_noinfo; reserved : 0)
269     );
270
271     unicodemap : tunicodemap = (
272       cpname : 'cp850';
273       cp : 850;
274       map : @map[0];
275       lastchar : 255;
276       next : nil;
277       internalmap : true
278     );
279
280  begin
281     registermapping(@unicodemap)
282  end.