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