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