Age Owner Branch data TLA Line data Source code
1 : : /* Generated from russian.sbl by Snowball 3.0.0 - https://snowballstem.org/ */
2 : :
3 : : #include "stem_UTF_8_russian.h"
4 : :
5 : : #include <stddef.h>
6 : :
7 : : #include "snowball_runtime.h"
8 : :
9 : : struct SN_local {
10 : : struct SN_env z;
11 : : int i_p2;
12 : : int i_pV;
13 : : };
14 : :
15 : : typedef struct SN_local SN_local;
16 : :
17 : : #ifdef __cplusplus
18 : : extern "C" {
19 : : #endif
20 : : extern int russian_UTF_8_stem(struct SN_env * z);
21 : : #ifdef __cplusplus
22 : : }
23 : : #endif
24 : :
25 : : static int r_tidy_up(struct SN_env * z);
26 : : static int r_derivational(struct SN_env * z);
27 : : static int r_noun(struct SN_env * z);
28 : : static int r_verb(struct SN_env * z);
29 : : static int r_reflexive(struct SN_env * z);
30 : : static int r_adjectival(struct SN_env * z);
31 : : static int r_adjective(struct SN_env * z);
32 : : static int r_perfective_gerund(struct SN_env * z);
33 : : static int r_R2(struct SN_env * z);
34 : : static int r_mark_regions(struct SN_env * z);
35 : :
36 : : static const symbol s_0[] = { 0xD0, 0xB0 };
37 : : static const symbol s_1[] = { 0xD1, 0x8F };
38 : : static const symbol s_2[] = { 0xD0, 0xB0 };
39 : : static const symbol s_3[] = { 0xD1, 0x8F };
40 : : static const symbol s_4[] = { 0xD0, 0xB0 };
41 : : static const symbol s_5[] = { 0xD1, 0x8F };
42 : : static const symbol s_6[] = { 0xD0, 0xBD };
43 : : static const symbol s_7[] = { 0xD0, 0xBD };
44 : : static const symbol s_8[] = { 0xD0, 0xBD };
45 : : static const symbol s_9[] = { 0xD1, 0x91 };
46 : : static const symbol s_10[] = { 0xD0, 0xB5 };
47 : : static const symbol s_11[] = { 0xD0, 0xB8 };
48 : :
49 : : static const symbol s_0_0[10] = { 0xD0, 0xB2, 0xD1, 0x88, 0xD0, 0xB8, 0xD1, 0x81, 0xD1, 0x8C };
50 : : static const symbol s_0_1[12] = { 0xD1, 0x8B, 0xD0, 0xB2, 0xD1, 0x88, 0xD0, 0xB8, 0xD1, 0x81, 0xD1, 0x8C };
51 : : static const symbol s_0_2[12] = { 0xD0, 0xB8, 0xD0, 0xB2, 0xD1, 0x88, 0xD0, 0xB8, 0xD1, 0x81, 0xD1, 0x8C };
52 : : static const symbol s_0_3[2] = { 0xD0, 0xB2 };
53 : : static const symbol s_0_4[4] = { 0xD1, 0x8B, 0xD0, 0xB2 };
54 : : static const symbol s_0_5[4] = { 0xD0, 0xB8, 0xD0, 0xB2 };
55 : : static const symbol s_0_6[6] = { 0xD0, 0xB2, 0xD1, 0x88, 0xD0, 0xB8 };
56 : : static const symbol s_0_7[8] = { 0xD1, 0x8B, 0xD0, 0xB2, 0xD1, 0x88, 0xD0, 0xB8 };
57 : : static const symbol s_0_8[8] = { 0xD0, 0xB8, 0xD0, 0xB2, 0xD1, 0x88, 0xD0, 0xB8 };
58 : : static const struct among a_0[9] = {
59 : : { 10, s_0_0, 0, 1, 0},
60 : : { 12, s_0_1, -1, 2, 0},
61 : : { 12, s_0_2, -2, 2, 0},
62 : : { 2, s_0_3, 0, 1, 0},
63 : : { 4, s_0_4, -1, 2, 0},
64 : : { 4, s_0_5, -2, 2, 0},
65 : : { 6, s_0_6, 0, 1, 0},
66 : : { 8, s_0_7, -1, 2, 0},
67 : : { 8, s_0_8, -2, 2, 0}
68 : : };
69 : :
70 : : static const symbol s_1_0[6] = { 0xD0, 0xB5, 0xD0, 0xBC, 0xD1, 0x83 };
71 : : static const symbol s_1_1[6] = { 0xD0, 0xBE, 0xD0, 0xBC, 0xD1, 0x83 };
72 : : static const symbol s_1_2[4] = { 0xD1, 0x8B, 0xD1, 0x85 };
73 : : static const symbol s_1_3[4] = { 0xD0, 0xB8, 0xD1, 0x85 };
74 : : static const symbol s_1_4[4] = { 0xD1, 0x83, 0xD1, 0x8E };
75 : : static const symbol s_1_5[4] = { 0xD1, 0x8E, 0xD1, 0x8E };
76 : : static const symbol s_1_6[4] = { 0xD0, 0xB5, 0xD1, 0x8E };
77 : : static const symbol s_1_7[4] = { 0xD0, 0xBE, 0xD1, 0x8E };
78 : : static const symbol s_1_8[4] = { 0xD1, 0x8F, 0xD1, 0x8F };
79 : : static const symbol s_1_9[4] = { 0xD0, 0xB0, 0xD1, 0x8F };
80 : : static const symbol s_1_10[4] = { 0xD1, 0x8B, 0xD0, 0xB5 };
81 : : static const symbol s_1_11[4] = { 0xD0, 0xB5, 0xD0, 0xB5 };
82 : : static const symbol s_1_12[4] = { 0xD0, 0xB8, 0xD0, 0xB5 };
83 : : static const symbol s_1_13[4] = { 0xD0, 0xBE, 0xD0, 0xB5 };
84 : : static const symbol s_1_14[6] = { 0xD1, 0x8B, 0xD0, 0xBC, 0xD0, 0xB8 };
85 : : static const symbol s_1_15[6] = { 0xD0, 0xB8, 0xD0, 0xBC, 0xD0, 0xB8 };
86 : : static const symbol s_1_16[4] = { 0xD1, 0x8B, 0xD0, 0xB9 };
87 : : static const symbol s_1_17[4] = { 0xD0, 0xB5, 0xD0, 0xB9 };
88 : : static const symbol s_1_18[4] = { 0xD0, 0xB8, 0xD0, 0xB9 };
89 : : static const symbol s_1_19[4] = { 0xD0, 0xBE, 0xD0, 0xB9 };
90 : : static const symbol s_1_20[4] = { 0xD1, 0x8B, 0xD0, 0xBC };
91 : : static const symbol s_1_21[4] = { 0xD0, 0xB5, 0xD0, 0xBC };
92 : : static const symbol s_1_22[4] = { 0xD0, 0xB8, 0xD0, 0xBC };
93 : : static const symbol s_1_23[4] = { 0xD0, 0xBE, 0xD0, 0xBC };
94 : : static const symbol s_1_24[6] = { 0xD0, 0xB5, 0xD0, 0xB3, 0xD0, 0xBE };
95 : : static const symbol s_1_25[6] = { 0xD0, 0xBE, 0xD0, 0xB3, 0xD0, 0xBE };
96 : : static const struct among a_1[26] = {
97 : : { 6, s_1_0, 0, 1, 0},
98 : : { 6, s_1_1, 0, 1, 0},
99 : : { 4, s_1_2, 0, 1, 0},
100 : : { 4, s_1_3, 0, 1, 0},
101 : : { 4, s_1_4, 0, 1, 0},
102 : : { 4, s_1_5, 0, 1, 0},
103 : : { 4, s_1_6, 0, 1, 0},
104 : : { 4, s_1_7, 0, 1, 0},
105 : : { 4, s_1_8, 0, 1, 0},
106 : : { 4, s_1_9, 0, 1, 0},
107 : : { 4, s_1_10, 0, 1, 0},
108 : : { 4, s_1_11, 0, 1, 0},
109 : : { 4, s_1_12, 0, 1, 0},
110 : : { 4, s_1_13, 0, 1, 0},
111 : : { 6, s_1_14, 0, 1, 0},
112 : : { 6, s_1_15, 0, 1, 0},
113 : : { 4, s_1_16, 0, 1, 0},
114 : : { 4, s_1_17, 0, 1, 0},
115 : : { 4, s_1_18, 0, 1, 0},
116 : : { 4, s_1_19, 0, 1, 0},
117 : : { 4, s_1_20, 0, 1, 0},
118 : : { 4, s_1_21, 0, 1, 0},
119 : : { 4, s_1_22, 0, 1, 0},
120 : : { 4, s_1_23, 0, 1, 0},
121 : : { 6, s_1_24, 0, 1, 0},
122 : : { 6, s_1_25, 0, 1, 0}
123 : : };
124 : :
125 : : static const symbol s_2_0[4] = { 0xD0, 0xB2, 0xD1, 0x88 };
126 : : static const symbol s_2_1[6] = { 0xD1, 0x8B, 0xD0, 0xB2, 0xD1, 0x88 };
127 : : static const symbol s_2_2[6] = { 0xD0, 0xB8, 0xD0, 0xB2, 0xD1, 0x88 };
128 : : static const symbol s_2_3[2] = { 0xD1, 0x89 };
129 : : static const symbol s_2_4[4] = { 0xD1, 0x8E, 0xD1, 0x89 };
130 : : static const symbol s_2_5[6] = { 0xD1, 0x83, 0xD1, 0x8E, 0xD1, 0x89 };
131 : : static const symbol s_2_6[4] = { 0xD0, 0xB5, 0xD0, 0xBC };
132 : : static const symbol s_2_7[4] = { 0xD0, 0xBD, 0xD0, 0xBD };
133 : : static const struct among a_2[8] = {
134 : : { 4, s_2_0, 0, 1, 0},
135 : : { 6, s_2_1, -1, 2, 0},
136 : : { 6, s_2_2, -2, 2, 0},
137 : : { 2, s_2_3, 0, 1, 0},
138 : : { 4, s_2_4, -1, 1, 0},
139 : : { 6, s_2_5, -1, 2, 0},
140 : : { 4, s_2_6, 0, 1, 0},
141 : : { 4, s_2_7, 0, 1, 0}
142 : : };
143 : :
144 : : static const symbol s_3_0[4] = { 0xD1, 0x81, 0xD1, 0x8C };
145 : : static const symbol s_3_1[4] = { 0xD1, 0x81, 0xD1, 0x8F };
146 : : static const struct among a_3[2] = {
147 : : { 4, s_3_0, 0, 1, 0},
148 : : { 4, s_3_1, 0, 1, 0}
149 : : };
150 : :
151 : : static const symbol s_4_0[4] = { 0xD1, 0x8B, 0xD1, 0x82 };
152 : : static const symbol s_4_1[4] = { 0xD1, 0x8E, 0xD1, 0x82 };
153 : : static const symbol s_4_2[6] = { 0xD1, 0x83, 0xD1, 0x8E, 0xD1, 0x82 };
154 : : static const symbol s_4_3[4] = { 0xD1, 0x8F, 0xD1, 0x82 };
155 : : static const symbol s_4_4[4] = { 0xD0, 0xB5, 0xD1, 0x82 };
156 : : static const symbol s_4_5[6] = { 0xD1, 0x83, 0xD0, 0xB5, 0xD1, 0x82 };
157 : : static const symbol s_4_6[4] = { 0xD0, 0xB8, 0xD1, 0x82 };
158 : : static const symbol s_4_7[4] = { 0xD0, 0xBD, 0xD1, 0x8B };
159 : : static const symbol s_4_8[6] = { 0xD0, 0xB5, 0xD0, 0xBD, 0xD1, 0x8B };
160 : : static const symbol s_4_9[4] = { 0xD1, 0x82, 0xD1, 0x8C };
161 : : static const symbol s_4_10[6] = { 0xD1, 0x8B, 0xD1, 0x82, 0xD1, 0x8C };
162 : : static const symbol s_4_11[6] = { 0xD0, 0xB8, 0xD1, 0x82, 0xD1, 0x8C };
163 : : static const symbol s_4_12[6] = { 0xD0, 0xB5, 0xD1, 0x88, 0xD1, 0x8C };
164 : : static const symbol s_4_13[6] = { 0xD0, 0xB8, 0xD1, 0x88, 0xD1, 0x8C };
165 : : static const symbol s_4_14[2] = { 0xD1, 0x8E };
166 : : static const symbol s_4_15[4] = { 0xD1, 0x83, 0xD1, 0x8E };
167 : : static const symbol s_4_16[4] = { 0xD0, 0xBB, 0xD0, 0xB0 };
168 : : static const symbol s_4_17[6] = { 0xD1, 0x8B, 0xD0, 0xBB, 0xD0, 0xB0 };
169 : : static const symbol s_4_18[6] = { 0xD0, 0xB8, 0xD0, 0xBB, 0xD0, 0xB0 };
170 : : static const symbol s_4_19[4] = { 0xD0, 0xBD, 0xD0, 0xB0 };
171 : : static const symbol s_4_20[6] = { 0xD0, 0xB5, 0xD0, 0xBD, 0xD0, 0xB0 };
172 : : static const symbol s_4_21[6] = { 0xD0, 0xB5, 0xD1, 0x82, 0xD0, 0xB5 };
173 : : static const symbol s_4_22[6] = { 0xD0, 0xB8, 0xD1, 0x82, 0xD0, 0xB5 };
174 : : static const symbol s_4_23[6] = { 0xD0, 0xB9, 0xD1, 0x82, 0xD0, 0xB5 };
175 : : static const symbol s_4_24[8] = { 0xD1, 0x83, 0xD0, 0xB9, 0xD1, 0x82, 0xD0, 0xB5 };
176 : : static const symbol s_4_25[8] = { 0xD0, 0xB5, 0xD0, 0xB9, 0xD1, 0x82, 0xD0, 0xB5 };
177 : : static const symbol s_4_26[4] = { 0xD0, 0xBB, 0xD0, 0xB8 };
178 : : static const symbol s_4_27[6] = { 0xD1, 0x8B, 0xD0, 0xBB, 0xD0, 0xB8 };
179 : : static const symbol s_4_28[6] = { 0xD0, 0xB8, 0xD0, 0xBB, 0xD0, 0xB8 };
180 : : static const symbol s_4_29[2] = { 0xD0, 0xB9 };
181 : : static const symbol s_4_30[4] = { 0xD1, 0x83, 0xD0, 0xB9 };
182 : : static const symbol s_4_31[4] = { 0xD0, 0xB5, 0xD0, 0xB9 };
183 : : static const symbol s_4_32[2] = { 0xD0, 0xBB };
184 : : static const symbol s_4_33[4] = { 0xD1, 0x8B, 0xD0, 0xBB };
185 : : static const symbol s_4_34[4] = { 0xD0, 0xB8, 0xD0, 0xBB };
186 : : static const symbol s_4_35[4] = { 0xD1, 0x8B, 0xD0, 0xBC };
187 : : static const symbol s_4_36[4] = { 0xD0, 0xB5, 0xD0, 0xBC };
188 : : static const symbol s_4_37[4] = { 0xD0, 0xB8, 0xD0, 0xBC };
189 : : static const symbol s_4_38[2] = { 0xD0, 0xBD };
190 : : static const symbol s_4_39[4] = { 0xD0, 0xB5, 0xD0, 0xBD };
191 : : static const symbol s_4_40[4] = { 0xD0, 0xBB, 0xD0, 0xBE };
192 : : static const symbol s_4_41[6] = { 0xD1, 0x8B, 0xD0, 0xBB, 0xD0, 0xBE };
193 : : static const symbol s_4_42[6] = { 0xD0, 0xB8, 0xD0, 0xBB, 0xD0, 0xBE };
194 : : static const symbol s_4_43[4] = { 0xD0, 0xBD, 0xD0, 0xBE };
195 : : static const symbol s_4_44[6] = { 0xD0, 0xB5, 0xD0, 0xBD, 0xD0, 0xBE };
196 : : static const symbol s_4_45[6] = { 0xD0, 0xBD, 0xD0, 0xBD, 0xD0, 0xBE };
197 : : static const struct among a_4[46] = {
198 : : { 4, s_4_0, 0, 2, 0},
199 : : { 4, s_4_1, 0, 1, 0},
200 : : { 6, s_4_2, -1, 2, 0},
201 : : { 4, s_4_3, 0, 2, 0},
202 : : { 4, s_4_4, 0, 1, 0},
203 : : { 6, s_4_5, -1, 2, 0},
204 : : { 4, s_4_6, 0, 2, 0},
205 : : { 4, s_4_7, 0, 1, 0},
206 : : { 6, s_4_8, -1, 2, 0},
207 : : { 4, s_4_9, 0, 1, 0},
208 : : { 6, s_4_10, -1, 2, 0},
209 : : { 6, s_4_11, -2, 2, 0},
210 : : { 6, s_4_12, 0, 1, 0},
211 : : { 6, s_4_13, 0, 2, 0},
212 : : { 2, s_4_14, 0, 2, 0},
213 : : { 4, s_4_15, -1, 2, 0},
214 : : { 4, s_4_16, 0, 1, 0},
215 : : { 6, s_4_17, -1, 2, 0},
216 : : { 6, s_4_18, -2, 2, 0},
217 : : { 4, s_4_19, 0, 1, 0},
218 : : { 6, s_4_20, -1, 2, 0},
219 : : { 6, s_4_21, 0, 1, 0},
220 : : { 6, s_4_22, 0, 2, 0},
221 : : { 6, s_4_23, 0, 1, 0},
222 : : { 8, s_4_24, -1, 2, 0},
223 : : { 8, s_4_25, -2, 2, 0},
224 : : { 4, s_4_26, 0, 1, 0},
225 : : { 6, s_4_27, -1, 2, 0},
226 : : { 6, s_4_28, -2, 2, 0},
227 : : { 2, s_4_29, 0, 1, 0},
228 : : { 4, s_4_30, -1, 2, 0},
229 : : { 4, s_4_31, -2, 2, 0},
230 : : { 2, s_4_32, 0, 1, 0},
231 : : { 4, s_4_33, -1, 2, 0},
232 : : { 4, s_4_34, -2, 2, 0},
233 : : { 4, s_4_35, 0, 2, 0},
234 : : { 4, s_4_36, 0, 1, 0},
235 : : { 4, s_4_37, 0, 2, 0},
236 : : { 2, s_4_38, 0, 1, 0},
237 : : { 4, s_4_39, -1, 2, 0},
238 : : { 4, s_4_40, 0, 1, 0},
239 : : { 6, s_4_41, -1, 2, 0},
240 : : { 6, s_4_42, -2, 2, 0},
241 : : { 4, s_4_43, 0, 1, 0},
242 : : { 6, s_4_44, -1, 2, 0},
243 : : { 6, s_4_45, -2, 1, 0}
244 : : };
245 : :
246 : : static const symbol s_5_0[2] = { 0xD1, 0x83 };
247 : : static const symbol s_5_1[4] = { 0xD1, 0x8F, 0xD1, 0x85 };
248 : : static const symbol s_5_2[6] = { 0xD0, 0xB8, 0xD1, 0x8F, 0xD1, 0x85 };
249 : : static const symbol s_5_3[4] = { 0xD0, 0xB0, 0xD1, 0x85 };
250 : : static const symbol s_5_4[2] = { 0xD1, 0x8B };
251 : : static const symbol s_5_5[2] = { 0xD1, 0x8C };
252 : : static const symbol s_5_6[2] = { 0xD1, 0x8E };
253 : : static const symbol s_5_7[4] = { 0xD1, 0x8C, 0xD1, 0x8E };
254 : : static const symbol s_5_8[4] = { 0xD0, 0xB8, 0xD1, 0x8E };
255 : : static const symbol s_5_9[2] = { 0xD1, 0x8F };
256 : : static const symbol s_5_10[4] = { 0xD1, 0x8C, 0xD1, 0x8F };
257 : : static const symbol s_5_11[4] = { 0xD0, 0xB8, 0xD1, 0x8F };
258 : : static const symbol s_5_12[2] = { 0xD0, 0xB0 };
259 : : static const symbol s_5_13[4] = { 0xD0, 0xB5, 0xD0, 0xB2 };
260 : : static const symbol s_5_14[4] = { 0xD0, 0xBE, 0xD0, 0xB2 };
261 : : static const symbol s_5_15[2] = { 0xD0, 0xB5 };
262 : : static const symbol s_5_16[4] = { 0xD1, 0x8C, 0xD0, 0xB5 };
263 : : static const symbol s_5_17[4] = { 0xD0, 0xB8, 0xD0, 0xB5 };
264 : : static const symbol s_5_18[2] = { 0xD0, 0xB8 };
265 : : static const symbol s_5_19[4] = { 0xD0, 0xB5, 0xD0, 0xB8 };
266 : : static const symbol s_5_20[4] = { 0xD0, 0xB8, 0xD0, 0xB8 };
267 : : static const symbol s_5_21[6] = { 0xD1, 0x8F, 0xD0, 0xBC, 0xD0, 0xB8 };
268 : : static const symbol s_5_22[8] = { 0xD0, 0xB8, 0xD1, 0x8F, 0xD0, 0xBC, 0xD0, 0xB8 };
269 : : static const symbol s_5_23[6] = { 0xD0, 0xB0, 0xD0, 0xBC, 0xD0, 0xB8 };
270 : : static const symbol s_5_24[2] = { 0xD0, 0xB9 };
271 : : static const symbol s_5_25[4] = { 0xD0, 0xB5, 0xD0, 0xB9 };
272 : : static const symbol s_5_26[6] = { 0xD0, 0xB8, 0xD0, 0xB5, 0xD0, 0xB9 };
273 : : static const symbol s_5_27[4] = { 0xD0, 0xB8, 0xD0, 0xB9 };
274 : : static const symbol s_5_28[4] = { 0xD0, 0xBE, 0xD0, 0xB9 };
275 : : static const symbol s_5_29[4] = { 0xD1, 0x8F, 0xD0, 0xBC };
276 : : static const symbol s_5_30[6] = { 0xD0, 0xB8, 0xD1, 0x8F, 0xD0, 0xBC };
277 : : static const symbol s_5_31[4] = { 0xD0, 0xB0, 0xD0, 0xBC };
278 : : static const symbol s_5_32[4] = { 0xD0, 0xB5, 0xD0, 0xBC };
279 : : static const symbol s_5_33[6] = { 0xD0, 0xB8, 0xD0, 0xB5, 0xD0, 0xBC };
280 : : static const symbol s_5_34[4] = { 0xD0, 0xBE, 0xD0, 0xBC };
281 : : static const symbol s_5_35[2] = { 0xD0, 0xBE };
282 : : static const struct among a_5[36] = {
283 : : { 2, s_5_0, 0, 1, 0},
284 : : { 4, s_5_1, 0, 1, 0},
285 : : { 6, s_5_2, -1, 1, 0},
286 : : { 4, s_5_3, 0, 1, 0},
287 : : { 2, s_5_4, 0, 1, 0},
288 : : { 2, s_5_5, 0, 1, 0},
289 : : { 2, s_5_6, 0, 1, 0},
290 : : { 4, s_5_7, -1, 1, 0},
291 : : { 4, s_5_8, -2, 1, 0},
292 : : { 2, s_5_9, 0, 1, 0},
293 : : { 4, s_5_10, -1, 1, 0},
294 : : { 4, s_5_11, -2, 1, 0},
295 : : { 2, s_5_12, 0, 1, 0},
296 : : { 4, s_5_13, 0, 1, 0},
297 : : { 4, s_5_14, 0, 1, 0},
298 : : { 2, s_5_15, 0, 1, 0},
299 : : { 4, s_5_16, -1, 1, 0},
300 : : { 4, s_5_17, -2, 1, 0},
301 : : { 2, s_5_18, 0, 1, 0},
302 : : { 4, s_5_19, -1, 1, 0},
303 : : { 4, s_5_20, -2, 1, 0},
304 : : { 6, s_5_21, -3, 1, 0},
305 : : { 8, s_5_22, -1, 1, 0},
306 : : { 6, s_5_23, -5, 1, 0},
307 : : { 2, s_5_24, 0, 1, 0},
308 : : { 4, s_5_25, -1, 1, 0},
309 : : { 6, s_5_26, -1, 1, 0},
310 : : { 4, s_5_27, -3, 1, 0},
311 : : { 4, s_5_28, -4, 1, 0},
312 : : { 4, s_5_29, 0, 1, 0},
313 : : { 6, s_5_30, -1, 1, 0},
314 : : { 4, s_5_31, 0, 1, 0},
315 : : { 4, s_5_32, 0, 1, 0},
316 : : { 6, s_5_33, -1, 1, 0},
317 : : { 4, s_5_34, 0, 1, 0},
318 : : { 2, s_5_35, 0, 1, 0}
319 : : };
320 : :
321 : : static const symbol s_6_0[6] = { 0xD0, 0xBE, 0xD1, 0x81, 0xD1, 0x82 };
322 : : static const symbol s_6_1[8] = { 0xD0, 0xBE, 0xD1, 0x81, 0xD1, 0x82, 0xD1, 0x8C };
323 : : static const struct among a_6[2] = {
324 : : { 6, s_6_0, 0, 1, 0},
325 : : { 8, s_6_1, 0, 1, 0}
326 : : };
327 : :
328 : : static const symbol s_7_0[6] = { 0xD0, 0xB5, 0xD0, 0xB9, 0xD1, 0x88 };
329 : : static const symbol s_7_1[2] = { 0xD1, 0x8C };
330 : : static const symbol s_7_2[8] = { 0xD0, 0xB5, 0xD0, 0xB9, 0xD1, 0x88, 0xD0, 0xB5 };
331 : : static const symbol s_7_3[2] = { 0xD0, 0xBD };
332 : : static const struct among a_7[4] = {
333 : : { 6, s_7_0, 0, 1, 0},
334 : : { 2, s_7_1, 0, 3, 0},
335 : : { 8, s_7_2, 0, 1, 0},
336 : : { 2, s_7_3, 0, 2, 0}
337 : : };
338 : :
339 : : static const unsigned char g_v[] = { 33, 65, 8, 232 };
340 : :
1850 peter@eisentraut.org 341 :UBC 0 : static int r_mark_regions(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 342 :UNC 0 : ((SN_local *)z)->i_pV = z->l;
343 : 0 : ((SN_local *)z)->i_p2 = z->l;
344 : : {
345 : 0 : int v_1 = z->c;
346 : : {
6781 tgl@sss.pgh.pa.us 347 :UBC 0 : int ret = out_grouping_U(z, g_v, 1072, 1103, 1);
348 [ # # ]: 0 : if (ret < 0) goto lab0;
349 : 0 : z->c += ret;
350 : : }
69 tgl@sss.pgh.pa.us 351 :UNC 0 : ((SN_local *)z)->i_pV = z->c;
352 : : {
6781 tgl@sss.pgh.pa.us 353 :UBC 0 : int ret = in_grouping_U(z, g_v, 1072, 1103, 1);
354 [ # # ]: 0 : if (ret < 0) goto lab0;
355 : 0 : z->c += ret;
356 : : }
357 : : {
358 : 0 : int ret = out_grouping_U(z, g_v, 1072, 1103, 1);
359 [ # # ]: 0 : if (ret < 0) goto lab0;
360 : 0 : z->c += ret;
361 : : }
362 : : {
363 : 0 : int ret = in_grouping_U(z, g_v, 1072, 1103, 1);
364 [ # # ]: 0 : if (ret < 0) goto lab0;
365 : 0 : z->c += ret;
366 : : }
69 tgl@sss.pgh.pa.us 367 :UNC 0 : ((SN_local *)z)->i_p2 = z->c;
6781 tgl@sss.pgh.pa.us 368 :UBC 0 : lab0:
69 tgl@sss.pgh.pa.us 369 :UNC 0 : z->c = v_1;
370 : : }
6781 tgl@sss.pgh.pa.us 371 :UBC 0 : return 1;
372 : : }
373 : :
1850 peter@eisentraut.org 374 : 0 : static int r_R2(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 375 :UNC 0 : return ((SN_local *)z)->i_p2 <= z->c;
376 : : }
377 : :
1850 peter@eisentraut.org 378 :UBC 0 : static int r_perfective_gerund(struct SN_env * z) {
379 : : int among_var;
380 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 381 :UNC 0 : among_var = find_among_b(z, a_0, 9, 0);
390 tgl@sss.pgh.pa.us 382 [ # # ]:UBC 0 : if (!among_var) return 0;
1850 peter@eisentraut.org 383 : 0 : z->bra = z->c;
384 [ # # # ]: 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 385 : 0 : case 1:
386 : : do {
69 tgl@sss.pgh.pa.us 387 :UNC 0 : int v_1 = z->l - z->c;
388 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_0))) goto lab0;
389 : 0 : break;
390 : 0 : lab0:
391 : 0 : z->c = z->l - v_1;
1850 peter@eisentraut.org 392 [ # # ]:UBC 0 : if (!(eq_s_b(z, 2, s_1))) return 0;
393 : : } while (0);
394 : : {
69 tgl@sss.pgh.pa.us 395 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 396 [ # # ]:UBC 0 : if (ret < 0) return ret;
397 : : }
398 : 0 : break;
399 : 0 : case 2:
400 : : {
69 tgl@sss.pgh.pa.us 401 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 402 [ # # ]:UBC 0 : if (ret < 0) return ret;
403 : : }
404 : 0 : break;
405 : : }
406 : 0 : return 1;
407 : : }
408 : :
1850 peter@eisentraut.org 409 : 0 : static int r_adjective(struct SN_env * z) {
410 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 411 [ # # ]:UNC 0 : if (!find_among_b(z, a_1, 26, 0)) return 0;
1850 peter@eisentraut.org 412 :UBC 0 : z->bra = z->c;
413 : : {
69 tgl@sss.pgh.pa.us 414 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 415 [ # # ]:UBC 0 : if (ret < 0) return ret;
416 : : }
6781 417 : 0 : return 1;
418 : : }
419 : :
1850 peter@eisentraut.org 420 : 0 : static int r_adjectival(struct SN_env * z) {
421 : : int among_var;
422 : : {
69 tgl@sss.pgh.pa.us 423 :UNC 0 : int ret = r_adjective(z);
2729 tgl@sss.pgh.pa.us 424 [ # # ]:UBC 0 : if (ret <= 0) return ret;
425 : : }
426 : : {
69 tgl@sss.pgh.pa.us 427 :UNC 0 : int v_1 = z->l - z->c;
1850 peter@eisentraut.org 428 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 429 :UNC 0 : among_var = find_among_b(z, a_2, 8, 0);
430 [ # # ]: 0 : if (!among_var) { z->c = z->l - v_1; goto lab0; }
1850 peter@eisentraut.org 431 :UBC 0 : z->bra = z->c;
432 [ # # # ]: 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 433 : 0 : case 1:
434 : : do {
69 tgl@sss.pgh.pa.us 435 :UNC 0 : int v_2 = z->l - z->c;
436 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_2))) goto lab1;
437 : 0 : break;
438 : 0 : lab1:
439 : 0 : z->c = z->l - v_2;
440 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_3))) { z->c = z->l - v_1; goto lab0; }
441 : : } while (0);
442 : : {
443 : 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 444 [ # # ]:UBC 0 : if (ret < 0) return ret;
445 : : }
446 : 0 : break;
447 : 0 : case 2:
448 : : {
69 tgl@sss.pgh.pa.us 449 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 450 [ # # ]:UBC 0 : if (ret < 0) return ret;
451 : : }
452 : 0 : break;
453 : : }
454 : 0 : lab0:
455 : : ;
456 : : }
457 : 0 : return 1;
458 : : }
459 : :
1850 peter@eisentraut.org 460 : 0 : static int r_reflexive(struct SN_env * z) {
461 : 0 : z->ket = z->c;
462 [ # # # # : 0 : if (z->c - 3 <= z->lb || (z->p[z->c - 1] != 140 && z->p[z->c - 1] != 143)) return 0;
# # ]
69 tgl@sss.pgh.pa.us 463 [ # # ]:UNC 0 : if (!find_among_b(z, a_3, 2, 0)) return 0;
1850 peter@eisentraut.org 464 :UBC 0 : z->bra = z->c;
465 : : {
69 tgl@sss.pgh.pa.us 466 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 467 [ # # ]:UBC 0 : if (ret < 0) return ret;
468 : : }
6781 469 : 0 : return 1;
470 : : }
471 : :
1850 peter@eisentraut.org 472 : 0 : static int r_verb(struct SN_env * z) {
473 : : int among_var;
474 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 475 :UNC 0 : among_var = find_among_b(z, a_4, 46, 0);
390 tgl@sss.pgh.pa.us 476 [ # # ]:UBC 0 : if (!among_var) return 0;
1850 peter@eisentraut.org 477 : 0 : z->bra = z->c;
478 [ # # # ]: 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 479 : 0 : case 1:
480 : : do {
69 tgl@sss.pgh.pa.us 481 :UNC 0 : int v_1 = z->l - z->c;
482 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_4))) goto lab0;
483 : 0 : break;
484 : 0 : lab0:
485 : 0 : z->c = z->l - v_1;
1850 peter@eisentraut.org 486 [ # # ]:UBC 0 : if (!(eq_s_b(z, 2, s_5))) return 0;
487 : : } while (0);
488 : : {
69 tgl@sss.pgh.pa.us 489 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 490 [ # # ]:UBC 0 : if (ret < 0) return ret;
491 : : }
492 : 0 : break;
493 : 0 : case 2:
494 : : {
69 tgl@sss.pgh.pa.us 495 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 496 [ # # ]:UBC 0 : if (ret < 0) return ret;
497 : : }
498 : 0 : break;
499 : : }
500 : 0 : return 1;
501 : : }
502 : :
1850 peter@eisentraut.org 503 : 0 : static int r_noun(struct SN_env * z) {
504 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 505 [ # # ]:UNC 0 : if (!find_among_b(z, a_5, 36, 0)) return 0;
1850 peter@eisentraut.org 506 :UBC 0 : z->bra = z->c;
507 : : {
69 tgl@sss.pgh.pa.us 508 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 509 [ # # ]:UBC 0 : if (ret < 0) return ret;
510 : : }
6781 511 : 0 : return 1;
512 : : }
513 : :
1850 peter@eisentraut.org 514 : 0 : static int r_derivational(struct SN_env * z) {
515 : 0 : z->ket = z->c;
516 [ # # # # : 0 : if (z->c - 5 <= z->lb || (z->p[z->c - 1] != 130 && z->p[z->c - 1] != 140)) return 0;
# # ]
69 tgl@sss.pgh.pa.us 517 [ # # ]:UNC 0 : if (!find_among_b(z, a_6, 2, 0)) return 0;
1850 peter@eisentraut.org 518 :UBC 0 : z->bra = z->c;
519 : : {
69 tgl@sss.pgh.pa.us 520 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 521 [ # # ]:UBC 0 : if (ret <= 0) return ret;
522 : : }
523 : : {
69 tgl@sss.pgh.pa.us 524 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 525 [ # # ]:UBC 0 : if (ret < 0) return ret;
526 : : }
6781 527 : 0 : return 1;
528 : : }
529 : :
1850 peter@eisentraut.org 530 : 0 : static int r_tidy_up(struct SN_env * z) {
531 : : int among_var;
532 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 533 :UNC 0 : among_var = find_among_b(z, a_7, 4, 0);
390 tgl@sss.pgh.pa.us 534 [ # # ]:UBC 0 : if (!among_var) return 0;
1850 peter@eisentraut.org 535 : 0 : z->bra = z->c;
536 [ # # # # ]: 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 537 : 0 : case 1:
538 : : {
69 tgl@sss.pgh.pa.us 539 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 540 [ # # ]:UBC 0 : if (ret < 0) return ret;
541 : : }
1850 peter@eisentraut.org 542 : 0 : z->ket = z->c;
543 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_6))) return 0;
544 : 0 : z->bra = z->c;
545 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_7))) return 0;
546 : : {
69 tgl@sss.pgh.pa.us 547 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 548 [ # # ]:UBC 0 : if (ret < 0) return ret;
549 : : }
550 : 0 : break;
551 : 0 : case 2:
1850 peter@eisentraut.org 552 [ # # ]: 0 : if (!(eq_s_b(z, 2, s_8))) return 0;
553 : : {
69 tgl@sss.pgh.pa.us 554 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 555 [ # # ]:UBC 0 : if (ret < 0) return ret;
556 : : }
557 : 0 : break;
558 : 0 : case 3:
559 : : {
69 tgl@sss.pgh.pa.us 560 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 561 [ # # ]:UBC 0 : if (ret < 0) return ret;
562 : : }
563 : 0 : break;
564 : : }
565 : 0 : return 1;
566 : : }
567 : :
1850 peter@eisentraut.org 568 : 0 : extern int russian_UTF_8_stem(struct SN_env * z) {
569 : : {
69 tgl@sss.pgh.pa.us 570 :UNC 0 : int v_1 = z->c;
571 : 0 : while (1) {
572 : 0 : int v_2 = z->c;
573 : 0 : while (1) {
574 : 0 : int v_3 = z->c;
1850 peter@eisentraut.org 575 :UBC 0 : z->bra = z->c;
576 [ # # ]: 0 : if (!(eq_s(z, 2, s_9))) goto lab2;
577 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 578 :UNC 0 : z->c = v_3;
2729 tgl@sss.pgh.pa.us 579 :UBC 0 : break;
580 : 0 : lab2:
69 tgl@sss.pgh.pa.us 581 :UNC 0 : z->c = v_3;
582 : : {
583 : 0 : int ret = skip_utf8(z->p, z->c, z->l, 1);
2729 tgl@sss.pgh.pa.us 584 [ # # ]:UBC 0 : if (ret < 0) goto lab1;
1850 peter@eisentraut.org 585 : 0 : z->c = ret;
586 : : }
587 : : }
588 : : {
69 tgl@sss.pgh.pa.us 589 :UNC 0 : int ret = slice_from_s(z, 2, s_10);
2729 tgl@sss.pgh.pa.us 590 [ # # ]:UBC 0 : if (ret < 0) return ret;
591 : : }
592 : 0 : continue;
593 : 0 : lab1:
69 tgl@sss.pgh.pa.us 594 :UNC 0 : z->c = v_2;
2729 tgl@sss.pgh.pa.us 595 :UBC 0 : break;
596 : : }
69 tgl@sss.pgh.pa.us 597 :UNC 0 : z->c = v_1;
598 : : }
599 : : {
600 : 0 : int ret = r_mark_regions(z);
2729 tgl@sss.pgh.pa.us 601 [ # # ]:UBC 0 : if (ret < 0) return ret;
602 : : }
1850 peter@eisentraut.org 603 : 0 : z->lb = z->c; z->c = z->l;
604 : : {
605 : : int v_4;
69 tgl@sss.pgh.pa.us 606 [ # # ]:UNC 0 : if (z->c < ((SN_local *)z)->i_pV) return 0;
607 : 0 : v_4 = z->lb; z->lb = ((SN_local *)z)->i_pV;
608 : : {
609 : 0 : int v_5 = z->l - z->c;
610 : : do {
611 : 0 : int v_6 = z->l - z->c;
612 : : {
613 : 0 : int ret = r_perfective_gerund(z);
614 [ # # ]: 0 : if (ret == 0) goto lab4;
6781 tgl@sss.pgh.pa.us 615 [ # # ]:UBC 0 : if (ret < 0) return ret;
616 : : }
69 tgl@sss.pgh.pa.us 617 :UNC 0 : break;
618 : 0 : lab4:
619 : 0 : z->c = z->l - v_6;
620 : : {
621 : 0 : int v_7 = z->l - z->c;
622 : : {
623 : 0 : int ret = r_reflexive(z);
624 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_7; goto lab5; }
6781 tgl@sss.pgh.pa.us 625 [ # # ]:UBC 0 : if (ret < 0) return ret;
626 : : }
69 tgl@sss.pgh.pa.us 627 :UNC 0 : lab5:
628 : : ;
629 : : }
630 : : do {
631 : 0 : int v_8 = z->l - z->c;
632 : : {
633 : 0 : int ret = r_adjectival(z);
634 [ # # ]: 0 : if (ret == 0) goto lab6;
6781 tgl@sss.pgh.pa.us 635 [ # # ]:UBC 0 : if (ret < 0) return ret;
636 : : }
69 tgl@sss.pgh.pa.us 637 :UNC 0 : break;
638 : 0 : lab6:
639 : 0 : z->c = z->l - v_8;
640 : : {
641 : 0 : int ret = r_verb(z);
642 [ # # ]: 0 : if (ret == 0) goto lab7;
6781 tgl@sss.pgh.pa.us 643 [ # # ]:UBC 0 : if (ret < 0) return ret;
644 : : }
69 tgl@sss.pgh.pa.us 645 :UNC 0 : break;
646 : 0 : lab7:
647 : 0 : z->c = z->l - v_8;
648 : : {
649 : 0 : int ret = r_noun(z);
2106 peter@eisentraut.org 650 [ # # ]:UBC 0 : if (ret == 0) goto lab3;
6781 tgl@sss.pgh.pa.us 651 [ # # ]: 0 : if (ret < 0) return ret;
652 : : }
653 : : } while (0);
654 : : } while (0);
2106 peter@eisentraut.org 655 : 0 : lab3:
69 tgl@sss.pgh.pa.us 656 :UNC 0 : z->c = z->l - v_5;
657 : : }
658 : : {
659 : 0 : int v_9 = z->l - z->c;
1850 peter@eisentraut.org 660 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 661 [ # # ]:UNC 0 : if (!(eq_s_b(z, 2, s_11))) { z->c = z->l - v_9; goto lab8; }
1850 peter@eisentraut.org 662 :UBC 0 : z->bra = z->c;
663 : : {
69 tgl@sss.pgh.pa.us 664 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 665 [ # # ]:UBC 0 : if (ret < 0) return ret;
666 : : }
69 tgl@sss.pgh.pa.us 667 :UNC 0 : lab8:
668 : : ;
669 : : }
670 : : {
671 : 0 : int v_10 = z->l - z->c;
672 : : {
673 : 0 : int ret = r_derivational(z);
6781 tgl@sss.pgh.pa.us 674 [ # # ]:UBC 0 : if (ret < 0) return ret;
675 : : }
69 tgl@sss.pgh.pa.us 676 :UNC 0 : z->c = z->l - v_10;
677 : : }
678 : : {
679 : 0 : int v_11 = z->l - z->c;
680 : : {
681 : 0 : int ret = r_tidy_up(z);
6781 tgl@sss.pgh.pa.us 682 [ # # ]:UBC 0 : if (ret < 0) return ret;
683 : : }
69 tgl@sss.pgh.pa.us 684 :UNC 0 : z->c = z->l - v_11;
685 : : }
686 : 0 : z->lb = v_4;
687 : : }
6781 tgl@sss.pgh.pa.us 688 :UBC 0 : z->c = z->lb;
689 : 0 : return 1;
690 : : }
691 : :
69 tgl@sss.pgh.pa.us 692 :UNC 0 : extern struct SN_env * russian_UTF_8_create_env(void) {
693 : 0 : struct SN_env * z = SN_new_env(sizeof(SN_local));
694 [ # # ]: 0 : if (z) {
695 : 0 : ((SN_local *)z)->i_p2 = 0;
696 : 0 : ((SN_local *)z)->i_pV = 0;
697 : : }
698 : 0 : return z;
699 : : }
700 : :
701 : 0 : extern void russian_UTF_8_close_env(struct SN_env * z) {
702 : 0 : SN_delete_env(z);
703 : 0 : }
704 : :
|
