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