Age Owner TLA Line data Source code
1 : /* Generated by Snowball 2.2.0 - https://snowballstem.org/ */
2 :
3 : #include "header.h"
4 :
5 : #ifdef __cplusplus
6 : extern "C" {
7 : #endif
8 : extern int french_UTF_8_stem(struct SN_env * z);
9 : #ifdef __cplusplus
10 : }
11 : #endif
12 : static int r_un_accent(struct SN_env * z);
13 : static int r_un_double(struct SN_env * z);
14 : static int r_residual_suffix(struct SN_env * z);
15 : static int r_verb_suffix(struct SN_env * z);
16 : static int r_i_verb_suffix(struct SN_env * z);
17 : static int r_standard_suffix(struct SN_env * z);
18 : static int r_R2(struct SN_env * z);
19 : static int r_R1(struct SN_env * z);
20 : static int r_RV(struct SN_env * z);
21 : static int r_mark_regions(struct SN_env * z);
22 : static int r_postlude(struct SN_env * z);
23 : static int r_prelude(struct SN_env * z);
24 : #ifdef __cplusplus
25 : extern "C" {
26 : #endif
27 :
28 :
29 : extern struct SN_env * french_UTF_8_create_env(void);
30 : extern void french_UTF_8_close_env(struct SN_env * z);
31 :
32 :
33 : #ifdef __cplusplus
34 : }
35 : #endif
36 : static const symbol s_0_0[3] = { 'c', 'o', 'l' };
37 : static const symbol s_0_1[3] = { 'p', 'a', 'r' };
38 : static const symbol s_0_2[3] = { 't', 'a', 'p' };
39 :
40 : static const struct among a_0[3] =
41 : {
42 : { 3, s_0_0, -1, -1, 0},
43 : { 3, s_0_1, -1, -1, 0},
44 : { 3, s_0_2, -1, -1, 0}
45 : };
46 :
47 : static const symbol s_1_1[1] = { 'H' };
48 : static const symbol s_1_2[2] = { 'H', 'e' };
49 : static const symbol s_1_3[2] = { 'H', 'i' };
50 : static const symbol s_1_4[1] = { 'I' };
51 : static const symbol s_1_5[1] = { 'U' };
52 : static const symbol s_1_6[1] = { 'Y' };
53 :
54 : static const struct among a_1[7] =
55 : {
56 : { 0, 0, -1, 7, 0},
57 : { 1, s_1_1, 0, 6, 0},
58 : { 2, s_1_2, 1, 4, 0},
59 : { 2, s_1_3, 1, 5, 0},
60 : { 1, s_1_4, 0, 1, 0},
61 : { 1, s_1_5, 0, 2, 0},
62 : { 1, s_1_6, 0, 3, 0}
63 : };
64 :
65 : static const symbol s_2_0[3] = { 'i', 'q', 'U' };
66 : static const symbol s_2_1[3] = { 'a', 'b', 'l' };
67 : static const symbol s_2_2[4] = { 'I', 0xC3, 0xA8, 'r' };
68 : static const symbol s_2_3[4] = { 'i', 0xC3, 0xA8, 'r' };
69 : static const symbol s_2_4[3] = { 'e', 'u', 's' };
70 : static const symbol s_2_5[2] = { 'i', 'v' };
71 :
72 : static const struct among a_2[6] =
73 : {
74 : { 3, s_2_0, -1, 3, 0},
75 : { 3, s_2_1, -1, 3, 0},
76 : { 4, s_2_2, -1, 4, 0},
77 : { 4, s_2_3, -1, 4, 0},
78 : { 3, s_2_4, -1, 2, 0},
79 : { 2, s_2_5, -1, 1, 0}
80 : };
81 :
82 : static const symbol s_3_0[2] = { 'i', 'c' };
83 : static const symbol s_3_1[4] = { 'a', 'b', 'i', 'l' };
84 : static const symbol s_3_2[2] = { 'i', 'v' };
85 :
86 : static const struct among a_3[3] =
87 : {
88 : { 2, s_3_0, -1, 2, 0},
89 : { 4, s_3_1, -1, 1, 0},
90 : { 2, s_3_2, -1, 3, 0}
91 : };
92 :
93 : static const symbol s_4_0[4] = { 'i', 'q', 'U', 'e' };
94 : static const symbol s_4_1[6] = { 'a', 't', 'r', 'i', 'c', 'e' };
95 : static const symbol s_4_2[4] = { 'a', 'n', 'c', 'e' };
96 : static const symbol s_4_3[4] = { 'e', 'n', 'c', 'e' };
97 : static const symbol s_4_4[5] = { 'l', 'o', 'g', 'i', 'e' };
98 : static const symbol s_4_5[4] = { 'a', 'b', 'l', 'e' };
99 : static const symbol s_4_6[4] = { 'i', 's', 'm', 'e' };
100 : static const symbol s_4_7[4] = { 'e', 'u', 's', 'e' };
101 : static const symbol s_4_8[4] = { 'i', 's', 't', 'e' };
102 : static const symbol s_4_9[3] = { 'i', 'v', 'e' };
103 : static const symbol s_4_10[2] = { 'i', 'f' };
104 : static const symbol s_4_11[5] = { 'u', 's', 'i', 'o', 'n' };
105 : static const symbol s_4_12[5] = { 'a', 't', 'i', 'o', 'n' };
106 : static const symbol s_4_13[5] = { 'u', 't', 'i', 'o', 'n' };
107 : static const symbol s_4_14[5] = { 'a', 't', 'e', 'u', 'r' };
108 : static const symbol s_4_15[5] = { 'i', 'q', 'U', 'e', 's' };
109 : static const symbol s_4_16[7] = { 'a', 't', 'r', 'i', 'c', 'e', 's' };
110 : static const symbol s_4_17[5] = { 'a', 'n', 'c', 'e', 's' };
111 : static const symbol s_4_18[5] = { 'e', 'n', 'c', 'e', 's' };
112 : static const symbol s_4_19[6] = { 'l', 'o', 'g', 'i', 'e', 's' };
113 : static const symbol s_4_20[5] = { 'a', 'b', 'l', 'e', 's' };
114 : static const symbol s_4_21[5] = { 'i', 's', 'm', 'e', 's' };
115 : static const symbol s_4_22[5] = { 'e', 'u', 's', 'e', 's' };
116 : static const symbol s_4_23[5] = { 'i', 's', 't', 'e', 's' };
117 : static const symbol s_4_24[4] = { 'i', 'v', 'e', 's' };
118 : static const symbol s_4_25[3] = { 'i', 'f', 's' };
119 : static const symbol s_4_26[6] = { 'u', 's', 'i', 'o', 'n', 's' };
120 : static const symbol s_4_27[6] = { 'a', 't', 'i', 'o', 'n', 's' };
121 : static const symbol s_4_28[6] = { 'u', 't', 'i', 'o', 'n', 's' };
122 : static const symbol s_4_29[6] = { 'a', 't', 'e', 'u', 'r', 's' };
123 : static const symbol s_4_30[5] = { 'm', 'e', 'n', 't', 's' };
124 : static const symbol s_4_31[6] = { 'e', 'm', 'e', 'n', 't', 's' };
125 : static const symbol s_4_32[9] = { 'i', 's', 's', 'e', 'm', 'e', 'n', 't', 's' };
126 : static const symbol s_4_33[5] = { 'i', 't', 0xC3, 0xA9, 's' };
127 : static const symbol s_4_34[4] = { 'm', 'e', 'n', 't' };
128 : static const symbol s_4_35[5] = { 'e', 'm', 'e', 'n', 't' };
129 : static const symbol s_4_36[8] = { 'i', 's', 's', 'e', 'm', 'e', 'n', 't' };
130 : static const symbol s_4_37[6] = { 'a', 'm', 'm', 'e', 'n', 't' };
131 : static const symbol s_4_38[6] = { 'e', 'm', 'm', 'e', 'n', 't' };
132 : static const symbol s_4_39[3] = { 'a', 'u', 'x' };
133 : static const symbol s_4_40[4] = { 'e', 'a', 'u', 'x' };
134 : static const symbol s_4_41[3] = { 'e', 'u', 'x' };
135 : static const symbol s_4_42[4] = { 'i', 't', 0xC3, 0xA9 };
136 :
137 : static const struct among a_4[43] =
138 : {
139 : { 4, s_4_0, -1, 1, 0},
140 : { 6, s_4_1, -1, 2, 0},
141 : { 4, s_4_2, -1, 1, 0},
142 : { 4, s_4_3, -1, 5, 0},
143 : { 5, s_4_4, -1, 3, 0},
144 : { 4, s_4_5, -1, 1, 0},
145 : { 4, s_4_6, -1, 1, 0},
146 : { 4, s_4_7, -1, 11, 0},
147 : { 4, s_4_8, -1, 1, 0},
148 : { 3, s_4_9, -1, 8, 0},
149 : { 2, s_4_10, -1, 8, 0},
150 : { 5, s_4_11, -1, 4, 0},
151 : { 5, s_4_12, -1, 2, 0},
152 : { 5, s_4_13, -1, 4, 0},
153 : { 5, s_4_14, -1, 2, 0},
154 : { 5, s_4_15, -1, 1, 0},
155 : { 7, s_4_16, -1, 2, 0},
156 : { 5, s_4_17, -1, 1, 0},
157 : { 5, s_4_18, -1, 5, 0},
158 : { 6, s_4_19, -1, 3, 0},
159 : { 5, s_4_20, -1, 1, 0},
160 : { 5, s_4_21, -1, 1, 0},
161 : { 5, s_4_22, -1, 11, 0},
162 : { 5, s_4_23, -1, 1, 0},
163 : { 4, s_4_24, -1, 8, 0},
164 : { 3, s_4_25, -1, 8, 0},
165 : { 6, s_4_26, -1, 4, 0},
166 : { 6, s_4_27, -1, 2, 0},
167 : { 6, s_4_28, -1, 4, 0},
168 : { 6, s_4_29, -1, 2, 0},
169 : { 5, s_4_30, -1, 15, 0},
170 : { 6, s_4_31, 30, 6, 0},
171 : { 9, s_4_32, 31, 12, 0},
172 : { 5, s_4_33, -1, 7, 0},
173 : { 4, s_4_34, -1, 15, 0},
174 : { 5, s_4_35, 34, 6, 0},
175 : { 8, s_4_36, 35, 12, 0},
176 : { 6, s_4_37, 34, 13, 0},
177 : { 6, s_4_38, 34, 14, 0},
178 : { 3, s_4_39, -1, 10, 0},
179 : { 4, s_4_40, 39, 9, 0},
180 : { 3, s_4_41, -1, 1, 0},
181 : { 4, s_4_42, -1, 7, 0}
182 : };
183 :
184 : static const symbol s_5_0[3] = { 'i', 'r', 'a' };
185 : static const symbol s_5_1[2] = { 'i', 'e' };
186 : static const symbol s_5_2[4] = { 'i', 's', 's', 'e' };
187 : static const symbol s_5_3[7] = { 'i', 's', 's', 'a', 'n', 't', 'e' };
188 : static const symbol s_5_4[1] = { 'i' };
189 : static const symbol s_5_5[4] = { 'i', 'r', 'a', 'i' };
190 : static const symbol s_5_6[2] = { 'i', 'r' };
191 : static const symbol s_5_7[4] = { 'i', 'r', 'a', 's' };
192 : static const symbol s_5_8[3] = { 'i', 'e', 's' };
193 : static const symbol s_5_9[5] = { 0xC3, 0xAE, 'm', 'e', 's' };
194 : static const symbol s_5_10[5] = { 'i', 's', 's', 'e', 's' };
195 : static const symbol s_5_11[8] = { 'i', 's', 's', 'a', 'n', 't', 'e', 's' };
196 : static const symbol s_5_12[5] = { 0xC3, 0xAE, 't', 'e', 's' };
197 : static const symbol s_5_13[2] = { 'i', 's' };
198 : static const symbol s_5_14[5] = { 'i', 'r', 'a', 'i', 's' };
199 : static const symbol s_5_15[6] = { 'i', 's', 's', 'a', 'i', 's' };
200 : static const symbol s_5_16[6] = { 'i', 'r', 'i', 'o', 'n', 's' };
201 : static const symbol s_5_17[7] = { 'i', 's', 's', 'i', 'o', 'n', 's' };
202 : static const symbol s_5_18[5] = { 'i', 'r', 'o', 'n', 's' };
203 : static const symbol s_5_19[6] = { 'i', 's', 's', 'o', 'n', 's' };
204 : static const symbol s_5_20[7] = { 'i', 's', 's', 'a', 'n', 't', 's' };
205 : static const symbol s_5_21[2] = { 'i', 't' };
206 : static const symbol s_5_22[5] = { 'i', 'r', 'a', 'i', 't' };
207 : static const symbol s_5_23[6] = { 'i', 's', 's', 'a', 'i', 't' };
208 : static const symbol s_5_24[6] = { 'i', 's', 's', 'a', 'n', 't' };
209 : static const symbol s_5_25[7] = { 'i', 'r', 'a', 'I', 'e', 'n', 't' };
210 : static const symbol s_5_26[8] = { 'i', 's', 's', 'a', 'I', 'e', 'n', 't' };
211 : static const symbol s_5_27[5] = { 'i', 'r', 'e', 'n', 't' };
212 : static const symbol s_5_28[6] = { 'i', 's', 's', 'e', 'n', 't' };
213 : static const symbol s_5_29[5] = { 'i', 'r', 'o', 'n', 't' };
214 : static const symbol s_5_30[3] = { 0xC3, 0xAE, 't' };
215 : static const symbol s_5_31[5] = { 'i', 'r', 'i', 'e', 'z' };
216 : static const symbol s_5_32[6] = { 'i', 's', 's', 'i', 'e', 'z' };
217 : static const symbol s_5_33[4] = { 'i', 'r', 'e', 'z' };
218 : static const symbol s_5_34[5] = { 'i', 's', 's', 'e', 'z' };
219 :
220 : static const struct among a_5[35] =
221 : {
222 : { 3, s_5_0, -1, 1, 0},
223 : { 2, s_5_1, -1, 1, 0},
224 : { 4, s_5_2, -1, 1, 0},
225 : { 7, s_5_3, -1, 1, 0},
226 : { 1, s_5_4, -1, 1, 0},
227 : { 4, s_5_5, 4, 1, 0},
228 : { 2, s_5_6, -1, 1, 0},
229 : { 4, s_5_7, -1, 1, 0},
230 : { 3, s_5_8, -1, 1, 0},
231 : { 5, s_5_9, -1, 1, 0},
232 : { 5, s_5_10, -1, 1, 0},
233 : { 8, s_5_11, -1, 1, 0},
234 : { 5, s_5_12, -1, 1, 0},
235 : { 2, s_5_13, -1, 1, 0},
236 : { 5, s_5_14, 13, 1, 0},
237 : { 6, s_5_15, 13, 1, 0},
238 : { 6, s_5_16, -1, 1, 0},
239 : { 7, s_5_17, -1, 1, 0},
240 : { 5, s_5_18, -1, 1, 0},
241 : { 6, s_5_19, -1, 1, 0},
242 : { 7, s_5_20, -1, 1, 0},
243 : { 2, s_5_21, -1, 1, 0},
244 : { 5, s_5_22, 21, 1, 0},
245 : { 6, s_5_23, 21, 1, 0},
246 : { 6, s_5_24, -1, 1, 0},
247 : { 7, s_5_25, -1, 1, 0},
248 : { 8, s_5_26, -1, 1, 0},
249 : { 5, s_5_27, -1, 1, 0},
250 : { 6, s_5_28, -1, 1, 0},
251 : { 5, s_5_29, -1, 1, 0},
252 : { 3, s_5_30, -1, 1, 0},
253 : { 5, s_5_31, -1, 1, 0},
254 : { 6, s_5_32, -1, 1, 0},
255 : { 4, s_5_33, -1, 1, 0},
256 : { 5, s_5_34, -1, 1, 0}
257 : };
258 :
259 : static const symbol s_6_0[1] = { 'a' };
260 : static const symbol s_6_1[3] = { 'e', 'r', 'a' };
261 : static const symbol s_6_2[4] = { 'a', 's', 's', 'e' };
262 : static const symbol s_6_3[4] = { 'a', 'n', 't', 'e' };
263 : static const symbol s_6_4[3] = { 0xC3, 0xA9, 'e' };
264 : static const symbol s_6_5[2] = { 'a', 'i' };
265 : static const symbol s_6_6[4] = { 'e', 'r', 'a', 'i' };
266 : static const symbol s_6_7[2] = { 'e', 'r' };
267 : static const symbol s_6_8[2] = { 'a', 's' };
268 : static const symbol s_6_9[4] = { 'e', 'r', 'a', 's' };
269 : static const symbol s_6_10[5] = { 0xC3, 0xA2, 'm', 'e', 's' };
270 : static const symbol s_6_11[5] = { 'a', 's', 's', 'e', 's' };
271 : static const symbol s_6_12[5] = { 'a', 'n', 't', 'e', 's' };
272 : static const symbol s_6_13[5] = { 0xC3, 0xA2, 't', 'e', 's' };
273 : static const symbol s_6_14[4] = { 0xC3, 0xA9, 'e', 's' };
274 : static const symbol s_6_15[3] = { 'a', 'i', 's' };
275 : static const symbol s_6_16[5] = { 'e', 'r', 'a', 'i', 's' };
276 : static const symbol s_6_17[4] = { 'i', 'o', 'n', 's' };
277 : static const symbol s_6_18[6] = { 'e', 'r', 'i', 'o', 'n', 's' };
278 : static const symbol s_6_19[7] = { 'a', 's', 's', 'i', 'o', 'n', 's' };
279 : static const symbol s_6_20[5] = { 'e', 'r', 'o', 'n', 's' };
280 : static const symbol s_6_21[4] = { 'a', 'n', 't', 's' };
281 : static const symbol s_6_22[3] = { 0xC3, 0xA9, 's' };
282 : static const symbol s_6_23[3] = { 'a', 'i', 't' };
283 : static const symbol s_6_24[5] = { 'e', 'r', 'a', 'i', 't' };
284 : static const symbol s_6_25[3] = { 'a', 'n', 't' };
285 : static const symbol s_6_26[5] = { 'a', 'I', 'e', 'n', 't' };
286 : static const symbol s_6_27[7] = { 'e', 'r', 'a', 'I', 'e', 'n', 't' };
287 : static const symbol s_6_28[6] = { 0xC3, 0xA8, 'r', 'e', 'n', 't' };
288 : static const symbol s_6_29[6] = { 'a', 's', 's', 'e', 'n', 't' };
289 : static const symbol s_6_30[5] = { 'e', 'r', 'o', 'n', 't' };
290 : static const symbol s_6_31[3] = { 0xC3, 0xA2, 't' };
291 : static const symbol s_6_32[2] = { 'e', 'z' };
292 : static const symbol s_6_33[3] = { 'i', 'e', 'z' };
293 : static const symbol s_6_34[5] = { 'e', 'r', 'i', 'e', 'z' };
294 : static const symbol s_6_35[6] = { 'a', 's', 's', 'i', 'e', 'z' };
295 : static const symbol s_6_36[4] = { 'e', 'r', 'e', 'z' };
296 : static const symbol s_6_37[2] = { 0xC3, 0xA9 };
297 :
298 : static const struct among a_6[38] =
299 : {
300 : { 1, s_6_0, -1, 3, 0},
301 : { 3, s_6_1, 0, 2, 0},
302 : { 4, s_6_2, -1, 3, 0},
303 : { 4, s_6_3, -1, 3, 0},
304 : { 3, s_6_4, -1, 2, 0},
305 : { 2, s_6_5, -1, 3, 0},
306 : { 4, s_6_6, 5, 2, 0},
307 : { 2, s_6_7, -1, 2, 0},
308 : { 2, s_6_8, -1, 3, 0},
309 : { 4, s_6_9, 8, 2, 0},
310 : { 5, s_6_10, -1, 3, 0},
311 : { 5, s_6_11, -1, 3, 0},
312 : { 5, s_6_12, -1, 3, 0},
313 : { 5, s_6_13, -1, 3, 0},
314 : { 4, s_6_14, -1, 2, 0},
315 : { 3, s_6_15, -1, 3, 0},
316 : { 5, s_6_16, 15, 2, 0},
317 : { 4, s_6_17, -1, 1, 0},
318 : { 6, s_6_18, 17, 2, 0},
319 : { 7, s_6_19, 17, 3, 0},
320 : { 5, s_6_20, -1, 2, 0},
321 : { 4, s_6_21, -1, 3, 0},
322 : { 3, s_6_22, -1, 2, 0},
323 : { 3, s_6_23, -1, 3, 0},
324 : { 5, s_6_24, 23, 2, 0},
325 : { 3, s_6_25, -1, 3, 0},
326 : { 5, s_6_26, -1, 3, 0},
327 : { 7, s_6_27, 26, 2, 0},
328 : { 6, s_6_28, -1, 2, 0},
329 : { 6, s_6_29, -1, 3, 0},
330 : { 5, s_6_30, -1, 2, 0},
331 : { 3, s_6_31, -1, 3, 0},
332 : { 2, s_6_32, -1, 2, 0},
333 : { 3, s_6_33, 32, 2, 0},
334 : { 5, s_6_34, 33, 2, 0},
335 : { 6, s_6_35, 33, 3, 0},
336 : { 4, s_6_36, 32, 2, 0},
337 : { 2, s_6_37, -1, 2, 0}
338 : };
339 :
340 : static const symbol s_7_0[1] = { 'e' };
341 : static const symbol s_7_1[5] = { 'I', 0xC3, 0xA8, 'r', 'e' };
342 : static const symbol s_7_2[5] = { 'i', 0xC3, 0xA8, 'r', 'e' };
343 : static const symbol s_7_3[3] = { 'i', 'o', 'n' };
344 : static const symbol s_7_4[3] = { 'I', 'e', 'r' };
345 : static const symbol s_7_5[3] = { 'i', 'e', 'r' };
346 :
347 : static const struct among a_7[6] =
348 : {
349 : { 1, s_7_0, -1, 3, 0},
350 : { 5, s_7_1, 0, 2, 0},
351 : { 5, s_7_2, 0, 2, 0},
352 : { 3, s_7_3, -1, 1, 0},
353 : { 3, s_7_4, -1, 2, 0},
354 : { 3, s_7_5, -1, 2, 0}
355 : };
356 :
357 : static const symbol s_8_0[3] = { 'e', 'l', 'l' };
358 : static const symbol s_8_1[4] = { 'e', 'i', 'l', 'l' };
359 : static const symbol s_8_2[3] = { 'e', 'n', 'n' };
360 : static const symbol s_8_3[3] = { 'o', 'n', 'n' };
361 : static const symbol s_8_4[3] = { 'e', 't', 't' };
362 :
363 : static const struct among a_8[5] =
364 : {
365 : { 3, s_8_0, -1, -1, 0},
366 : { 4, s_8_1, -1, -1, 0},
367 : { 3, s_8_2, -1, -1, 0},
368 : { 3, s_8_3, -1, -1, 0},
369 : { 3, s_8_4, -1, -1, 0}
370 : };
371 :
372 : static const unsigned char g_v[] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 130, 103, 8, 5 };
373 :
374 : static const unsigned char g_keep_with_s[] = { 1, 65, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128 };
375 :
376 : static const symbol s_0[] = { 'U' };
377 : static const symbol s_1[] = { 'I' };
378 : static const symbol s_2[] = { 'Y' };
379 : static const symbol s_3[] = { 0xC3, 0xAB };
380 : static const symbol s_4[] = { 'H', 'e' };
381 : static const symbol s_5[] = { 0xC3, 0xAF };
382 : static const symbol s_6[] = { 'H', 'i' };
383 : static const symbol s_7[] = { 'Y' };
384 : static const symbol s_8[] = { 'U' };
385 : static const symbol s_9[] = { 'i' };
386 : static const symbol s_10[] = { 'u' };
387 : static const symbol s_11[] = { 'y' };
388 : static const symbol s_12[] = { 0xC3, 0xAB };
389 : static const symbol s_13[] = { 0xC3, 0xAF };
390 : static const symbol s_14[] = { 'i', 'c' };
391 : static const symbol s_15[] = { 'i', 'q', 'U' };
392 : static const symbol s_16[] = { 'l', 'o', 'g' };
393 : static const symbol s_17[] = { 'u' };
394 : static const symbol s_18[] = { 'e', 'n', 't' };
395 : static const symbol s_19[] = { 'a', 't' };
396 : static const symbol s_20[] = { 'e', 'u', 'x' };
397 : static const symbol s_21[] = { 'i' };
398 : static const symbol s_22[] = { 'a', 'b', 'l' };
399 : static const symbol s_23[] = { 'i', 'q', 'U' };
400 : static const symbol s_24[] = { 'a', 't' };
401 : static const symbol s_25[] = { 'i', 'c' };
402 : static const symbol s_26[] = { 'i', 'q', 'U' };
403 : static const symbol s_27[] = { 'e', 'a', 'u' };
404 : static const symbol s_28[] = { 'a', 'l' };
405 : static const symbol s_29[] = { 'e', 'u', 'x' };
406 : static const symbol s_30[] = { 'a', 'n', 't' };
407 : static const symbol s_31[] = { 'e', 'n', 't' };
408 : static const symbol s_32[] = { 'H', 'i' };
409 : static const symbol s_33[] = { 'i' };
410 : static const symbol s_34[] = { 0xC3, 0xA9 };
411 : static const symbol s_35[] = { 0xC3, 0xA8 };
412 : static const symbol s_36[] = { 'e' };
413 : static const symbol s_37[] = { 'i' };
414 : static const symbol s_38[] = { 0xC3, 0xA7 };
415 : static const symbol s_39[] = { 'c' };
416 :
779 peter 417 UBC 0 : static int r_prelude(struct SN_env * z) {
418 0 : while(1) {
419 0 : int c1 = z->c;
420 0 : while(1) {
5710 tgl 421 0 : int c2 = z->c;
779 peter 422 0 : { int c3 = z->c;
423 0 : if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab3;
424 0 : z->bra = z->c;
425 0 : { int c4 = z->c;
426 0 : if (z->c == z->l || z->p[z->c] != 'u') goto lab5;
1658 tgl 427 0 : z->c++;
779 peter 428 0 : z->ket = z->c;
429 0 : if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab5;
430 0 : { int ret = slice_from_s(z, 1, s_0);
5710 tgl 431 0 : if (ret < 0) return ret;
432 : }
433 0 : goto lab4;
434 0 : lab5:
435 0 : z->c = c4;
779 peter 436 0 : if (z->c == z->l || z->p[z->c] != 'i') goto lab6;
1658 tgl 437 0 : z->c++;
779 peter 438 0 : z->ket = z->c;
439 0 : if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab6;
440 0 : { int ret = slice_from_s(z, 1, s_1);
5710 tgl 441 0 : if (ret < 0) return ret;
442 : }
443 0 : goto lab4;
444 0 : lab6:
445 0 : z->c = c4;
779 peter 446 0 : if (z->c == z->l || z->p[z->c] != 'y') goto lab3;
1658 tgl 447 0 : z->c++;
779 peter 448 0 : z->ket = z->c;
449 0 : { int ret = slice_from_s(z, 1, s_2);
5710 tgl 450 0 : if (ret < 0) return ret;
451 : }
452 : }
453 0 : lab4:
454 0 : goto lab2;
455 0 : lab3:
456 0 : z->c = c3;
779 peter 457 0 : z->bra = z->c;
458 0 : if (!(eq_s(z, 2, s_3))) goto lab7;
459 0 : z->ket = z->c;
460 0 : { int ret = slice_from_s(z, 2, s_4);
5710 tgl 461 0 : if (ret < 0) return ret;
462 : }
463 0 : goto lab2;
464 0 : lab7:
465 0 : z->c = c3;
779 peter 466 0 : z->bra = z->c;
467 0 : if (!(eq_s(z, 2, s_5))) goto lab8;
468 0 : z->ket = z->c;
469 0 : { int ret = slice_from_s(z, 2, s_6);
1375 470 0 : if (ret < 0) return ret;
471 : }
472 0 : goto lab2;
473 0 : lab8:
474 0 : z->c = c3;
779 475 0 : z->bra = z->c;
476 0 : if (z->c == z->l || z->p[z->c] != 'y') goto lab9;
1375 477 0 : z->c++;
779 478 0 : z->ket = z->c;
479 0 : if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab9;
480 0 : { int ret = slice_from_s(z, 1, s_7);
1375 481 0 : if (ret < 0) return ret;
482 : }
483 0 : goto lab2;
484 0 : lab9:
485 0 : z->c = c3;
779 486 0 : if (z->c == z->l || z->p[z->c] != 'q') goto lab1;
1375 487 0 : z->c++;
779 488 0 : z->bra = z->c;
489 0 : if (z->c == z->l || z->p[z->c] != 'u') goto lab1;
1375 490 0 : z->c++;
779 491 0 : z->ket = z->c;
492 0 : { int ret = slice_from_s(z, 1, s_8);
5710 tgl 493 0 : if (ret < 0) return ret;
494 : }
495 : }
496 0 : lab2:
497 0 : z->c = c2;
498 0 : break;
499 0 : lab1:
500 0 : z->c = c2;
779 peter 501 0 : { int ret = skip_utf8(z->p, z->c, z->l, 1);
5710 tgl 502 0 : if (ret < 0) goto lab0;
779 peter 503 0 : z->c = ret;
504 : }
505 : }
5710 tgl 506 0 : continue;
507 0 : lab0:
508 0 : z->c = c1;
509 0 : break;
510 : }
511 0 : return 1;
512 : }
513 :
779 peter 514 0 : static int r_mark_regions(struct SN_env * z) {
515 0 : z->I[2] = z->l;
516 0 : z->I[1] = z->l;
517 0 : z->I[0] = z->l;
518 0 : { int c1 = z->c;
519 0 : { int c2 = z->c;
520 0 : if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab2;
521 0 : if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab2;
522 0 : { int ret = skip_utf8(z->p, z->c, z->l, 1);
5710 tgl 523 0 : if (ret < 0) goto lab2;
779 peter 524 0 : z->c = ret;
525 : }
5710 tgl 526 0 : goto lab1;
527 0 : lab2:
528 0 : z->c = c2;
779 peter 529 0 : if (z->c + 2 >= z->l || z->p[z->c + 2] >> 5 != 3 || !((331776 >> (z->p[z->c + 2] & 0x1f)) & 1)) goto lab3;
1658 tgl 530 0 : if (!(find_among(z, a_0, 3))) goto lab3;
5710 531 0 : goto lab1;
532 0 : lab3:
533 0 : z->c = c2;
779 peter 534 0 : { int ret = skip_utf8(z->p, z->c, z->l, 1);
5710 tgl 535 0 : if (ret < 0) goto lab0;
779 peter 536 0 : z->c = ret;
537 : }
538 : {
5710 tgl 539 0 : int ret = out_grouping_U(z, g_v, 97, 251, 1);
540 0 : if (ret < 0) goto lab0;
541 0 : z->c += ret;
542 : }
543 : }
544 0 : lab1:
779 peter 545 0 : z->I[2] = z->c;
5710 tgl 546 0 : lab0:
547 0 : z->c = c1;
548 : }
779 peter 549 0 : { int c3 = z->c;
550 : {
5710 tgl 551 0 : int ret = out_grouping_U(z, g_v, 97, 251, 1);
552 0 : if (ret < 0) goto lab4;
553 0 : z->c += ret;
554 : }
555 : {
556 0 : int ret = in_grouping_U(z, g_v, 97, 251, 1);
557 0 : if (ret < 0) goto lab4;
558 0 : z->c += ret;
559 : }
779 peter 560 0 : z->I[1] = z->c;
561 : {
5710 tgl 562 0 : int ret = out_grouping_U(z, g_v, 97, 251, 1);
563 0 : if (ret < 0) goto lab4;
564 0 : z->c += ret;
565 : }
566 : {
567 0 : int ret = in_grouping_U(z, g_v, 97, 251, 1);
568 0 : if (ret < 0) goto lab4;
569 0 : z->c += ret;
570 : }
779 peter 571 0 : z->I[0] = z->c;
5710 tgl 572 0 : lab4:
573 0 : z->c = c3;
574 : }
575 0 : return 1;
576 : }
577 :
779 peter 578 0 : static int r_postlude(struct SN_env * z) {
579 : int among_var;
580 0 : while(1) {
581 0 : int c1 = z->c;
582 0 : z->bra = z->c;
583 0 : if (z->c >= z->l || z->p[z->c + 0] >> 5 != 2 || !((35652352 >> (z->p[z->c + 0] & 0x1f)) & 1)) among_var = 7; else
1375 584 0 : among_var = find_among(z, a_1, 7);
5710 tgl 585 0 : if (!(among_var)) goto lab0;
779 peter 586 0 : z->ket = z->c;
587 0 : switch (among_var) {
5710 tgl 588 0 : case 1:
779 peter 589 0 : { int ret = slice_from_s(z, 1, s_9);
5710 tgl 590 0 : if (ret < 0) return ret;
591 : }
592 0 : break;
593 0 : case 2:
779 peter 594 0 : { int ret = slice_from_s(z, 1, s_10);
5710 tgl 595 0 : if (ret < 0) return ret;
596 : }
597 0 : break;
598 0 : case 3:
779 peter 599 0 : { int ret = slice_from_s(z, 1, s_11);
5710 tgl 600 0 : if (ret < 0) return ret;
601 : }
602 0 : break;
603 0 : case 4:
779 peter 604 0 : { int ret = slice_from_s(z, 2, s_12);
1375 605 0 : if (ret < 0) return ret;
606 : }
607 0 : break;
608 0 : case 5:
779 609 0 : { int ret = slice_from_s(z, 2, s_13);
1375 610 0 : if (ret < 0) return ret;
611 : }
612 0 : break;
613 0 : case 6:
779 614 0 : { int ret = slice_del(z);
1375 615 0 : if (ret < 0) return ret;
616 : }
617 0 : break;
618 0 : case 7:
779 619 0 : { int ret = skip_utf8(z->p, z->c, z->l, 1);
5710 tgl 620 0 : if (ret < 0) goto lab0;
779 peter 621 0 : z->c = ret;
622 : }
5710 tgl 623 0 : break;
624 : }
625 0 : continue;
626 0 : lab0:
627 0 : z->c = c1;
628 0 : break;
629 : }
630 0 : return 1;
631 : }
632 :
779 peter 633 0 : static int r_RV(struct SN_env * z) {
634 0 : if (!(z->I[2] <= z->c)) return 0;
5710 tgl 635 0 : return 1;
636 : }
637 :
779 peter 638 0 : static int r_R1(struct SN_env * z) {
639 0 : if (!(z->I[1] <= z->c)) return 0;
5710 tgl 640 0 : return 1;
641 : }
642 :
779 peter 643 0 : static int r_R2(struct SN_env * z) {
644 0 : if (!(z->I[0] <= z->c)) return 0;
5710 tgl 645 0 : return 1;
646 : }
647 :
779 peter 648 0 : static int r_standard_suffix(struct SN_env * z) {
649 : int among_var;
650 0 : z->ket = z->c;
651 0 : among_var = find_among_b(z, a_4, 43);
5710 tgl 652 0 : if (!(among_var)) return 0;
779 peter 653 0 : z->bra = z->c;
654 0 : switch (among_var) {
5710 tgl 655 0 : case 1:
779 peter 656 0 : { int ret = r_R2(z);
1658 tgl 657 0 : if (ret <= 0) return ret;
658 : }
779 peter 659 0 : { int ret = slice_del(z);
5710 tgl 660 0 : if (ret < 0) return ret;
661 : }
662 0 : break;
663 0 : case 2:
779 peter 664 0 : { int ret = r_R2(z);
1658 tgl 665 0 : if (ret <= 0) return ret;
666 : }
779 peter 667 0 : { int ret = slice_del(z);
5710 tgl 668 0 : if (ret < 0) return ret;
669 : }
779 peter 670 0 : { int m1 = z->l - z->c; (void)m1;
671 0 : z->ket = z->c;
672 0 : if (!(eq_s_b(z, 2, s_14))) { z->c = z->l - m1; goto lab0; }
673 0 : z->bra = z->c;
674 0 : { int m2 = z->l - z->c; (void)m2;
675 0 : { int ret = r_R2(z);
1658 tgl 676 0 : if (ret == 0) goto lab2;
5710 677 0 : if (ret < 0) return ret;
678 : }
779 peter 679 0 : { int ret = slice_del(z);
5710 tgl 680 0 : if (ret < 0) return ret;
681 : }
682 0 : goto lab1;
683 0 : lab2:
1658 684 0 : z->c = z->l - m2;
779 peter 685 0 : { int ret = slice_from_s(z, 3, s_15);
5710 tgl 686 0 : if (ret < 0) return ret;
687 : }
688 : }
689 0 : lab1:
690 0 : lab0:
691 : ;
692 : }
693 0 : break;
694 0 : case 3:
779 peter 695 0 : { int ret = r_R2(z);
1658 tgl 696 0 : if (ret <= 0) return ret;
697 : }
779 peter 698 0 : { int ret = slice_from_s(z, 3, s_16);
5710 tgl 699 0 : if (ret < 0) return ret;
700 : }
701 0 : break;
702 0 : case 4:
779 peter 703 0 : { int ret = r_R2(z);
1658 tgl 704 0 : if (ret <= 0) return ret;
705 : }
779 peter 706 0 : { int ret = slice_from_s(z, 1, s_17);
5710 tgl 707 0 : if (ret < 0) return ret;
708 : }
709 0 : break;
710 0 : case 5:
779 peter 711 0 : { int ret = r_R2(z);
1658 tgl 712 0 : if (ret <= 0) return ret;
713 : }
779 peter 714 0 : { int ret = slice_from_s(z, 3, s_18);
5710 tgl 715 0 : if (ret < 0) return ret;
716 : }
717 0 : break;
718 0 : case 6:
779 peter 719 0 : { int ret = r_RV(z);
1658 tgl 720 0 : if (ret <= 0) return ret;
721 : }
779 peter 722 0 : { int ret = slice_del(z);
5710 tgl 723 0 : if (ret < 0) return ret;
724 : }
779 peter 725 0 : { int m3 = z->l - z->c; (void)m3;
726 0 : z->ket = z->c;
727 0 : among_var = find_among_b(z, a_2, 6);
1658 tgl 728 0 : if (!(among_var)) { z->c = z->l - m3; goto lab3; }
779 peter 729 0 : z->bra = z->c;
730 : switch (among_var) {
5710 tgl 731 0 : case 1:
779 peter 732 0 : { int ret = r_R2(z);
1658 tgl 733 0 : if (ret == 0) { z->c = z->l - m3; goto lab3; }
5710 734 0 : if (ret < 0) return ret;
735 : }
779 peter 736 0 : { int ret = slice_del(z);
5710 tgl 737 0 : if (ret < 0) return ret;
738 : }
779 peter 739 0 : z->ket = z->c;
740 0 : if (!(eq_s_b(z, 2, s_19))) { z->c = z->l - m3; goto lab3; }
741 0 : z->bra = z->c;
742 0 : { int ret = r_R2(z);
1658 tgl 743 0 : if (ret == 0) { z->c = z->l - m3; goto lab3; }
5710 744 0 : if (ret < 0) return ret;
745 : }
779 peter 746 0 : { int ret = slice_del(z);
5710 tgl 747 0 : if (ret < 0) return ret;
748 : }
749 0 : break;
750 0 : case 2:
779 peter 751 0 : { int m4 = z->l - z->c; (void)m4;
752 0 : { int ret = r_R2(z);
1658 tgl 753 0 : if (ret == 0) goto lab5;
5710 754 0 : if (ret < 0) return ret;
755 : }
779 peter 756 0 : { int ret = slice_del(z);
5710 tgl 757 0 : if (ret < 0) return ret;
758 : }
759 0 : goto lab4;
760 0 : lab5:
1658 761 0 : z->c = z->l - m4;
779 peter 762 0 : { int ret = r_R1(z);
1658 tgl 763 0 : if (ret == 0) { z->c = z->l - m3; goto lab3; }
5710 764 0 : if (ret < 0) return ret;
765 : }
779 peter 766 0 : { int ret = slice_from_s(z, 3, s_20);
5710 tgl 767 0 : if (ret < 0) return ret;
768 : }
769 : }
770 0 : lab4:
771 0 : break;
772 0 : case 3:
779 peter 773 0 : { int ret = r_R2(z);
1658 tgl 774 0 : if (ret == 0) { z->c = z->l - m3; goto lab3; }
5710 775 0 : if (ret < 0) return ret;
776 : }
779 peter 777 0 : { int ret = slice_del(z);
5710 tgl 778 0 : if (ret < 0) return ret;
779 : }
780 0 : break;
781 0 : case 4:
779 peter 782 0 : { int ret = r_RV(z);
1658 tgl 783 0 : if (ret == 0) { z->c = z->l - m3; goto lab3; }
5710 784 0 : if (ret < 0) return ret;
785 : }
779 peter 786 0 : { int ret = slice_from_s(z, 1, s_21);
5710 tgl 787 0 : if (ret < 0) return ret;
788 : }
789 0 : break;
790 : }
791 0 : lab3:
792 : ;
793 : }
794 0 : break;
795 0 : case 7:
779 peter 796 0 : { int ret = r_R2(z);
1658 tgl 797 0 : if (ret <= 0) return ret;
798 : }
779 peter 799 0 : { int ret = slice_del(z);
5710 tgl 800 0 : if (ret < 0) return ret;
801 : }
779 peter 802 0 : { int m5 = z->l - z->c; (void)m5;
803 0 : z->ket = z->c;
804 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4198408 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m5; goto lab6; }
1658 tgl 805 0 : among_var = find_among_b(z, a_3, 3);
806 0 : if (!(among_var)) { z->c = z->l - m5; goto lab6; }
779 peter 807 0 : z->bra = z->c;
808 : switch (among_var) {
5710 tgl 809 0 : case 1:
779 peter 810 0 : { int m6 = z->l - z->c; (void)m6;
811 0 : { int ret = r_R2(z);
1658 tgl 812 0 : if (ret == 0) goto lab8;
5710 813 0 : if (ret < 0) return ret;
814 : }
779 peter 815 0 : { int ret = slice_del(z);
5710 tgl 816 0 : if (ret < 0) return ret;
817 : }
818 0 : goto lab7;
819 0 : lab8:
1658 820 0 : z->c = z->l - m6;
779 peter 821 0 : { int ret = slice_from_s(z, 3, s_22);
5710 tgl 822 0 : if (ret < 0) return ret;
823 : }
824 : }
825 0 : lab7:
826 0 : break;
827 0 : case 2:
779 peter 828 0 : { int m7 = z->l - z->c; (void)m7;
829 0 : { int ret = r_R2(z);
1658 tgl 830 0 : if (ret == 0) goto lab10;
5710 831 0 : if (ret < 0) return ret;
832 : }
779 peter 833 0 : { int ret = slice_del(z);
5710 tgl 834 0 : if (ret < 0) return ret;
835 : }
836 0 : goto lab9;
837 0 : lab10:
1658 838 0 : z->c = z->l - m7;
779 peter 839 0 : { int ret = slice_from_s(z, 3, s_23);
5710 tgl 840 0 : if (ret < 0) return ret;
841 : }
842 : }
843 0 : lab9:
844 0 : break;
845 0 : case 3:
779 peter 846 0 : { int ret = r_R2(z);
1658 tgl 847 0 : if (ret == 0) { z->c = z->l - m5; goto lab6; }
5710 848 0 : if (ret < 0) return ret;
849 : }
779 peter 850 0 : { int ret = slice_del(z);
5710 tgl 851 0 : if (ret < 0) return ret;
852 : }
853 0 : break;
854 : }
855 0 : lab6:
856 : ;
857 : }
858 0 : break;
859 0 : case 8:
779 peter 860 0 : { int ret = r_R2(z);
1658 tgl 861 0 : if (ret <= 0) return ret;
862 : }
779 peter 863 0 : { int ret = slice_del(z);
5710 tgl 864 0 : if (ret < 0) return ret;
865 : }
779 peter 866 0 : { int m8 = z->l - z->c; (void)m8;
867 0 : z->ket = z->c;
868 0 : if (!(eq_s_b(z, 2, s_24))) { z->c = z->l - m8; goto lab11; }
869 0 : z->bra = z->c;
870 0 : { int ret = r_R2(z);
1658 tgl 871 0 : if (ret == 0) { z->c = z->l - m8; goto lab11; }
5710 872 0 : if (ret < 0) return ret;
873 : }
779 peter 874 0 : { int ret = slice_del(z);
5710 tgl 875 0 : if (ret < 0) return ret;
876 : }
779 peter 877 0 : z->ket = z->c;
878 0 : if (!(eq_s_b(z, 2, s_25))) { z->c = z->l - m8; goto lab11; }
879 0 : z->bra = z->c;
880 0 : { int m9 = z->l - z->c; (void)m9;
881 0 : { int ret = r_R2(z);
1658 tgl 882 0 : if (ret == 0) goto lab13;
5710 883 0 : if (ret < 0) return ret;
884 : }
779 peter 885 0 : { int ret = slice_del(z);
5710 tgl 886 0 : if (ret < 0) return ret;
887 : }
888 0 : goto lab12;
889 0 : lab13:
1658 890 0 : z->c = z->l - m9;
779 peter 891 0 : { int ret = slice_from_s(z, 3, s_26);
5710 tgl 892 0 : if (ret < 0) return ret;
893 : }
894 : }
895 0 : lab12:
896 0 : lab11:
897 : ;
898 : }
899 0 : break;
900 0 : case 9:
779 peter 901 0 : { int ret = slice_from_s(z, 3, s_27);
5710 tgl 902 0 : if (ret < 0) return ret;
903 : }
904 0 : break;
905 0 : case 10:
779 peter 906 0 : { int ret = r_R1(z);
1658 tgl 907 0 : if (ret <= 0) return ret;
908 : }
779 peter 909 0 : { int ret = slice_from_s(z, 2, s_28);
5710 tgl 910 0 : if (ret < 0) return ret;
911 : }
912 0 : break;
913 0 : case 11:
779 peter 914 0 : { int m10 = z->l - z->c; (void)m10;
915 0 : { int ret = r_R2(z);
1658 tgl 916 0 : if (ret == 0) goto lab15;
5710 917 0 : if (ret < 0) return ret;
918 : }
779 peter 919 0 : { int ret = slice_del(z);
5710 tgl 920 0 : if (ret < 0) return ret;
921 : }
922 0 : goto lab14;
923 0 : lab15:
1658 924 0 : z->c = z->l - m10;
779 peter 925 0 : { int ret = r_R1(z);
1658 tgl 926 0 : if (ret <= 0) return ret;
927 : }
779 peter 928 0 : { int ret = slice_from_s(z, 3, s_29);
5710 tgl 929 0 : if (ret < 0) return ret;
930 : }
931 : }
932 0 : lab14:
933 0 : break;
934 0 : case 12:
779 peter 935 0 : { int ret = r_R1(z);
1658 tgl 936 0 : if (ret <= 0) return ret;
937 : }
779 peter 938 0 : if (out_grouping_b_U(z, g_v, 97, 251, 0)) return 0;
939 0 : { int ret = slice_del(z);
5710 tgl 940 0 : if (ret < 0) return ret;
941 : }
942 0 : break;
943 0 : case 13:
779 peter 944 0 : { int ret = r_RV(z);
1658 tgl 945 0 : if (ret <= 0) return ret;
946 : }
779 peter 947 0 : { int ret = slice_from_s(z, 3, s_30);
5710 tgl 948 0 : if (ret < 0) return ret;
949 : }
779 peter 950 0 : return 0;
951 : break;
5710 tgl 952 0 : case 14:
779 peter 953 0 : { int ret = r_RV(z);
1658 tgl 954 0 : if (ret <= 0) return ret;
955 : }
779 peter 956 0 : { int ret = slice_from_s(z, 3, s_31);
5710 tgl 957 0 : if (ret < 0) return ret;
958 : }
779 peter 959 0 : return 0;
960 : break;
5710 tgl 961 0 : case 15:
779 peter 962 0 : { int m_test11 = z->l - z->c;
963 0 : if (in_grouping_b_U(z, g_v, 97, 251, 0)) return 0;
964 0 : { int ret = r_RV(z);
1658 tgl 965 0 : if (ret <= 0) return ret;
966 : }
967 0 : z->c = z->l - m_test11;
968 : }
779 peter 969 0 : { int ret = slice_del(z);
5710 tgl 970 0 : if (ret < 0) return ret;
971 : }
779 peter 972 0 : return 0;
973 : break;
974 : }
5710 tgl 975 0 : return 1;
976 : }
977 :
779 peter 978 0 : static int r_i_verb_suffix(struct SN_env * z) {
979 :
980 : { int mlimit1;
981 0 : if (z->c < z->I[2]) return 0;
982 0 : mlimit1 = z->lb; z->lb = z->I[2];
983 0 : z->ket = z->c;
984 0 : if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((68944418 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->lb = mlimit1; return 0; }
1658 tgl 985 0 : if (!(find_among_b(z, a_5, 35))) { z->lb = mlimit1; return 0; }
779 peter 986 0 : z->bra = z->c;
987 0 : { int m2 = z->l - z->c; (void)m2;
988 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'H') goto lab0;
1375 989 0 : z->c--;
990 0 : { z->lb = mlimit1; return 0; }
991 0 : lab0:
992 0 : z->c = z->l - m2;
993 : }
779 994 0 : if (out_grouping_b_U(z, g_v, 97, 251, 0)) { z->lb = mlimit1; return 0; }
995 0 : { int ret = slice_del(z);
1658 tgl 996 0 : if (ret < 0) return ret;
997 : }
998 0 : z->lb = mlimit1;
999 : }
5710 1000 0 : return 1;
1001 : }
1002 :
779 peter 1003 0 : static int r_verb_suffix(struct SN_env * z) {
1004 : int among_var;
1005 :
1006 : { int mlimit1;
1007 0 : if (z->c < z->I[2]) return 0;
1008 0 : mlimit1 = z->lb; z->lb = z->I[2];
1009 0 : z->ket = z->c;
1010 0 : among_var = find_among_b(z, a_6, 38);
1658 tgl 1011 0 : if (!(among_var)) { z->lb = mlimit1; return 0; }
779 peter 1012 0 : z->bra = z->c;
1013 0 : switch (among_var) {
5710 tgl 1014 0 : case 1:
779 peter 1015 0 : { int ret = r_R2(z);
1658 tgl 1016 0 : if (ret == 0) { z->lb = mlimit1; return 0; }
5710 1017 0 : if (ret < 0) return ret;
1018 : }
779 peter 1019 0 : { int ret = slice_del(z);
5710 tgl 1020 0 : if (ret < 0) return ret;
1021 : }
1022 0 : break;
1023 0 : case 2:
779 peter 1024 0 : { int ret = slice_del(z);
5710 tgl 1025 0 : if (ret < 0) return ret;
1026 : }
1027 0 : break;
1028 0 : case 3:
779 peter 1029 0 : { int ret = slice_del(z);
5710 tgl 1030 0 : if (ret < 0) return ret;
1031 : }
779 peter 1032 0 : { int m2 = z->l - z->c; (void)m2;
1033 0 : z->ket = z->c;
1034 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'e') { z->c = z->l - m2; goto lab0; }
1658 tgl 1035 0 : z->c--;
779 peter 1036 0 : z->bra = z->c;
1037 0 : { int ret = slice_del(z);
5710 tgl 1038 0 : if (ret < 0) return ret;
1039 : }
1040 0 : lab0:
1041 : ;
1042 : }
1043 0 : break;
1044 : }
1658 1045 0 : z->lb = mlimit1;
1046 : }
5710 1047 0 : return 1;
1048 : }
1049 :
779 peter 1050 0 : static int r_residual_suffix(struct SN_env * z) {
1051 : int among_var;
1052 0 : { int m1 = z->l - z->c; (void)m1;
1053 0 : z->ket = z->c;
1054 0 : if (z->c <= z->lb || z->p[z->c - 1] != 's') { z->c = z->l - m1; goto lab0; }
1658 tgl 1055 0 : z->c--;
779 peter 1056 0 : z->bra = z->c;
1057 0 : { int m_test2 = z->l - z->c;
1058 0 : { int m3 = z->l - z->c; (void)m3;
1059 0 : if (!(eq_s_b(z, 2, s_32))) goto lab2;
1375 1060 0 : goto lab1;
1061 0 : lab2:
1062 0 : z->c = z->l - m3;
779 1063 0 : if (out_grouping_b_U(z, g_keep_with_s, 97, 232, 0)) { z->c = z->l - m1; goto lab0; }
1064 : }
1375 1065 0 : lab1:
1658 tgl 1066 0 : z->c = z->l - m_test2;
1067 : }
779 peter 1068 0 : { int ret = slice_del(z);
5710 tgl 1069 0 : if (ret < 0) return ret;
1070 : }
1071 0 : lab0:
1072 : ;
1073 : }
1074 :
1075 : { int mlimit4;
779 peter 1076 0 : if (z->c < z->I[2]) return 0;
1077 0 : mlimit4 = z->lb; z->lb = z->I[2];
1078 0 : z->ket = z->c;
1079 0 : if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((278560 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->lb = mlimit4; return 0; }
1375 1080 0 : among_var = find_among_b(z, a_7, 6);
1081 0 : if (!(among_var)) { z->lb = mlimit4; return 0; }
779 1082 0 : z->bra = z->c;
1083 0 : switch (among_var) {
5710 tgl 1084 0 : case 1:
779 peter 1085 0 : { int ret = r_R2(z);
1375 1086 0 : if (ret == 0) { z->lb = mlimit4; return 0; }
5710 tgl 1087 0 : if (ret < 0) return ret;
1088 : }
779 peter 1089 0 : { int m5 = z->l - z->c; (void)m5;
1090 0 : if (z->c <= z->lb || z->p[z->c - 1] != 's') goto lab4;
1658 tgl 1091 0 : z->c--;
1375 peter 1092 0 : goto lab3;
1093 0 : lab4:
1094 0 : z->c = z->l - m5;
779 1095 0 : if (z->c <= z->lb || z->p[z->c - 1] != 't') { z->lb = mlimit4; return 0; }
1658 tgl 1096 0 : z->c--;
1097 : }
1375 peter 1098 0 : lab3:
779 1099 0 : { int ret = slice_del(z);
5710 tgl 1100 0 : if (ret < 0) return ret;
1101 : }
1102 0 : break;
1103 0 : case 2:
779 peter 1104 0 : { int ret = slice_from_s(z, 1, s_33);
5710 tgl 1105 0 : if (ret < 0) return ret;
1106 : }
1107 0 : break;
1108 0 : case 3:
779 peter 1109 0 : { int ret = slice_del(z);
5710 tgl 1110 0 : if (ret < 0) return ret;
1111 : }
1112 0 : break;
1113 : }
1375 peter 1114 0 : z->lb = mlimit4;
1115 : }
5710 tgl 1116 0 : return 1;
1117 : }
1118 :
779 peter 1119 0 : static int r_un_double(struct SN_env * z) {
1120 0 : { int m_test1 = z->l - z->c;
1121 0 : if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1069056 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1658 tgl 1122 0 : if (!(find_among_b(z, a_8, 5))) return 0;
1123 0 : z->c = z->l - m_test1;
1124 : }
779 peter 1125 0 : z->ket = z->c;
1126 0 : { int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
5710 tgl 1127 0 : if (ret < 0) return 0;
779 peter 1128 0 : z->c = ret;
1129 : }
1130 0 : z->bra = z->c;
1131 0 : { int ret = slice_del(z);
5710 tgl 1132 0 : if (ret < 0) return ret;
1133 : }
1134 0 : return 1;
1135 : }
1136 :
779 peter 1137 0 : static int r_un_accent(struct SN_env * z) {
5710 tgl 1138 0 : { int i = 1;
1139 : while(1) {
779 peter 1140 0 : if (out_grouping_b_U(z, g_v, 97, 251, 0)) goto lab0;
5710 tgl 1141 0 : i--;
1142 0 : continue;
1143 0 : lab0:
1144 0 : break;
1145 : }
1146 0 : if (i > 0) return 0;
1147 : }
779 peter 1148 0 : z->ket = z->c;
1149 0 : { int m1 = z->l - z->c; (void)m1;
1150 0 : if (!(eq_s_b(z, 2, s_34))) goto lab2;
5710 tgl 1151 0 : goto lab1;
1152 0 : lab2:
1153 0 : z->c = z->l - m1;
779 peter 1154 0 : if (!(eq_s_b(z, 2, s_35))) return 0;
1155 : }
5710 tgl 1156 0 : lab1:
779 peter 1157 0 : z->bra = z->c;
1158 0 : { int ret = slice_from_s(z, 1, s_36);
5710 tgl 1159 0 : if (ret < 0) return ret;
1160 : }
1161 0 : return 1;
1162 : }
1163 :
779 peter 1164 0 : extern int french_UTF_8_stem(struct SN_env * z) {
1165 0 : { int c1 = z->c;
1166 0 : { int ret = r_prelude(z);
5710 tgl 1167 0 : if (ret < 0) return ret;
1168 : }
1169 0 : z->c = c1;
1170 : }
1171 :
779 peter 1172 0 : { int ret = r_mark_regions(z);
1658 tgl 1173 0 : if (ret < 0) return ret;
1174 : }
779 peter 1175 0 : z->lb = z->c; z->c = z->l;
1176 :
1177 0 : { int m2 = z->l - z->c; (void)m2;
1178 0 : { int m3 = z->l - z->c; (void)m3;
1179 0 : { int m4 = z->l - z->c; (void)m4;
1180 0 : { int m5 = z->l - z->c; (void)m5;
1181 0 : { int ret = r_standard_suffix(z);
1035 1182 0 : if (ret == 0) goto lab4;
5710 tgl 1183 0 : if (ret < 0) return ret;
1184 : }
1035 peter 1185 0 : goto lab3;
1186 0 : lab4:
1658 tgl 1187 0 : z->c = z->l - m5;
779 peter 1188 0 : { int ret = r_i_verb_suffix(z);
1035 1189 0 : if (ret == 0) goto lab5;
5710 tgl 1190 0 : if (ret < 0) return ret;
1191 : }
1035 peter 1192 0 : goto lab3;
1193 0 : lab5:
1658 tgl 1194 0 : z->c = z->l - m5;
779 peter 1195 0 : { int ret = r_verb_suffix(z);
1035 1196 0 : if (ret == 0) goto lab2;
5710 tgl 1197 0 : if (ret < 0) return ret;
1198 : }
1199 : }
1035 peter 1200 0 : lab3:
1658 tgl 1201 0 : z->c = z->l - m4;
779 peter 1202 0 : { int m6 = z->l - z->c; (void)m6;
1203 0 : z->ket = z->c;
1204 0 : { int m7 = z->l - z->c; (void)m7;
1205 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'Y') goto lab8;
1658 tgl 1206 0 : z->c--;
779 peter 1207 0 : z->bra = z->c;
1208 0 : { int ret = slice_from_s(z, 1, s_37);
5710 tgl 1209 0 : if (ret < 0) return ret;
1210 : }
1035 peter 1211 0 : goto lab7;
1212 0 : lab8:
5710 tgl 1213 0 : z->c = z->l - m7;
779 peter 1214 0 : if (!(eq_s_b(z, 2, s_38))) { z->c = z->l - m6; goto lab6; }
1215 0 : z->bra = z->c;
1216 0 : { int ret = slice_from_s(z, 1, s_39);
5710 tgl 1217 0 : if (ret < 0) return ret;
1218 : }
1219 : }
1035 peter 1220 0 : lab7:
1221 0 : lab6:
1222 : ;
1223 : }
1224 : }
1225 0 : goto lab1;
1226 0 : lab2:
1658 tgl 1227 0 : z->c = z->l - m3;
779 peter 1228 0 : { int ret = r_residual_suffix(z);
1035 1229 0 : if (ret == 0) goto lab0;
5710 tgl 1230 0 : if (ret < 0) return ret;
1231 : }
1232 : }
1035 peter 1233 0 : lab1:
1234 0 : lab0:
1658 tgl 1235 0 : z->c = z->l - m2;
1236 : }
779 peter 1237 0 : { int m8 = z->l - z->c; (void)m8;
1238 0 : { int ret = r_un_double(z);
5710 tgl 1239 0 : if (ret < 0) return ret;
1240 : }
1241 0 : z->c = z->l - m8;
1242 : }
779 peter 1243 0 : { int m9 = z->l - z->c; (void)m9;
1244 0 : { int ret = r_un_accent(z);
5710 tgl 1245 0 : if (ret < 0) return ret;
1246 : }
1247 0 : z->c = z->l - m9;
1248 : }
1249 0 : z->c = z->lb;
779 peter 1250 0 : { int c10 = z->c;
1251 0 : { int ret = r_postlude(z);
5710 tgl 1252 0 : if (ret < 0) return ret;
1253 : }
1254 0 : z->c = c10;
1255 : }
1256 0 : return 1;
1257 : }
1258 :
779 peter 1259 0 : extern struct SN_env * french_UTF_8_create_env(void) { return SN_create_env(0, 3); }
1260 :
5710 tgl 1261 0 : extern void french_UTF_8_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1262 :
|
