Branch data Line data Source code
1 : : /* Generated from english.sbl by Snowball 3.0.0 - https://snowballstem.org/ */
2 : :
3 : : #include "stem_ISO_8859_1_english.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 : : unsigned char b_Y_found;
14 : : };
15 : :
16 : : typedef struct SN_local SN_local;
17 : :
18 : : #ifdef __cplusplus
19 : : extern "C" {
20 : : #endif
21 : : extern int english_ISO_8859_1_stem(struct SN_env * z);
22 : : #ifdef __cplusplus
23 : : }
24 : : #endif
25 : :
26 : : static int r_exception1(struct SN_env * z);
27 : : static int r_Step_5(struct SN_env * z);
28 : : static int r_Step_4(struct SN_env * z);
29 : : static int r_Step_3(struct SN_env * z);
30 : : static int r_Step_2(struct SN_env * z);
31 : : static int r_Step_1c(struct SN_env * z);
32 : : static int r_Step_1b(struct SN_env * z);
33 : : static int r_Step_1a(struct SN_env * z);
34 : : static int r_R2(struct SN_env * z);
35 : : static int r_R1(struct SN_env * z);
36 : : static int r_shortv(struct SN_env * z);
37 : : static int r_mark_regions(struct SN_env * z);
38 : : static int r_postlude(struct SN_env * z);
39 : : static int r_prelude(struct SN_env * z);
40 : :
41 : : static const symbol s_0[] = { 'Y' };
42 : : static const symbol s_1[] = { 'Y' };
43 : : static const symbol s_2[] = { 'p', 'a', 's', 't' };
44 : : static const symbol s_3[] = { 's', 's' };
45 : : static const symbol s_4[] = { 'i' };
46 : : static const symbol s_5[] = { 'i', 'e' };
47 : : static const symbol s_6[] = { 'e', 'e' };
48 : : static const symbol s_7[] = { 'i', 'e' };
49 : : static const symbol s_8[] = { 'e' };
50 : : static const symbol s_9[] = { 'e' };
51 : : static const symbol s_10[] = { 'i' };
52 : : static const symbol s_11[] = { 't', 'i', 'o', 'n' };
53 : : static const symbol s_12[] = { 'e', 'n', 'c', 'e' };
54 : : static const symbol s_13[] = { 'a', 'n', 'c', 'e' };
55 : : static const symbol s_14[] = { 'a', 'b', 'l', 'e' };
56 : : static const symbol s_15[] = { 'e', 'n', 't' };
57 : : static const symbol s_16[] = { 'i', 'z', 'e' };
58 : : static const symbol s_17[] = { 'a', 't', 'e' };
59 : : static const symbol s_18[] = { 'a', 'l' };
60 : : static const symbol s_19[] = { 'f', 'u', 'l' };
61 : : static const symbol s_20[] = { 'o', 'u', 's' };
62 : : static const symbol s_21[] = { 'i', 'v', 'e' };
63 : : static const symbol s_22[] = { 'b', 'l', 'e' };
64 : : static const symbol s_23[] = { 'o', 'g' };
65 : : static const symbol s_24[] = { 'o', 'g' };
66 : : static const symbol s_25[] = { 'l', 'e', 's', 's' };
67 : : static const symbol s_26[] = { 't', 'i', 'o', 'n' };
68 : : static const symbol s_27[] = { 'a', 't', 'e' };
69 : : static const symbol s_28[] = { 'a', 'l' };
70 : : static const symbol s_29[] = { 'i', 'c' };
71 : : static const symbol s_30[] = { 's', 'k', 'i' };
72 : : static const symbol s_31[] = { 's', 'k', 'y' };
73 : : static const symbol s_32[] = { 'i', 'd', 'l' };
74 : : static const symbol s_33[] = { 'g', 'e', 'n', 't', 'l' };
75 : : static const symbol s_34[] = { 'u', 'g', 'l', 'i' };
76 : : static const symbol s_35[] = { 'e', 'a', 'r', 'l', 'i' };
77 : : static const symbol s_36[] = { 'o', 'n', 'l', 'i' };
78 : : static const symbol s_37[] = { 's', 'i', 'n', 'g', 'l' };
79 : : static const symbol s_38[] = { 'y' };
80 : :
81 : : static const symbol s_0_0[5] = { 'a', 'r', 's', 'e', 'n' };
82 : : static const symbol s_0_1[6] = { 'c', 'o', 'm', 'm', 'u', 'n' };
83 : : static const symbol s_0_2[5] = { 'e', 'm', 'e', 'r', 'g' };
84 : : static const symbol s_0_3[5] = { 'g', 'e', 'n', 'e', 'r' };
85 : : static const symbol s_0_4[5] = { 'i', 'n', 't', 'e', 'r' };
86 : : static const symbol s_0_5[5] = { 'l', 'a', 't', 'e', 'r' };
87 : : static const symbol s_0_6[5] = { 'o', 'r', 'g', 'a', 'n' };
88 : : static const symbol s_0_7[4] = { 'p', 'a', 's', 't' };
89 : : static const symbol s_0_8[7] = { 'u', 'n', 'i', 'v', 'e', 'r', 's' };
90 : : static const struct among a_0[9] = {
91 : : { 5, s_0_0, 0, -1, 0},
92 : : { 6, s_0_1, 0, -1, 0},
93 : : { 5, s_0_2, 0, -1, 0},
94 : : { 5, s_0_3, 0, -1, 0},
95 : : { 5, s_0_4, 0, -1, 0},
96 : : { 5, s_0_5, 0, -1, 0},
97 : : { 5, s_0_6, 0, -1, 0},
98 : : { 4, s_0_7, 0, -1, 0},
99 : : { 7, s_0_8, 0, -1, 0}
100 : : };
101 : :
102 : : static const symbol s_1_0[1] = { '\'' };
103 : : static const symbol s_1_1[3] = { '\'', 's', '\'' };
104 : : static const symbol s_1_2[2] = { '\'', 's' };
105 : : static const struct among a_1[3] = {
106 : : { 1, s_1_0, 0, 1, 0},
107 : : { 3, s_1_1, -1, 1, 0},
108 : : { 2, s_1_2, 0, 1, 0}
109 : : };
110 : :
111 : : static const symbol s_2_0[3] = { 'i', 'e', 'd' };
112 : : static const symbol s_2_1[1] = { 's' };
113 : : static const symbol s_2_2[3] = { 'i', 'e', 's' };
114 : : static const symbol s_2_3[4] = { 's', 's', 'e', 's' };
115 : : static const symbol s_2_4[2] = { 's', 's' };
116 : : static const symbol s_2_5[2] = { 'u', 's' };
117 : : static const struct among a_2[6] = {
118 : : { 3, s_2_0, 0, 2, 0},
119 : : { 1, s_2_1, 0, 3, 0},
120 : : { 3, s_2_2, -1, 2, 0},
121 : : { 4, s_2_3, -2, 1, 0},
122 : : { 2, s_2_4, -3, -1, 0},
123 : : { 2, s_2_5, -4, -1, 0}
124 : : };
125 : :
126 : : static const symbol s_3_0[4] = { 's', 'u', 'c', 'c' };
127 : : static const symbol s_3_1[4] = { 'p', 'r', 'o', 'c' };
128 : : static const symbol s_3_2[3] = { 'e', 'x', 'c' };
129 : : static const struct among a_3[3] = {
130 : : { 4, s_3_0, 0, 1, 0},
131 : : { 4, s_3_1, 0, 1, 0},
132 : : { 3, s_3_2, 0, 1, 0}
133 : : };
134 : :
135 : : static const symbol s_4_0[4] = { 'e', 'v', 'e', 'n' };
136 : : static const symbol s_4_1[4] = { 'c', 'a', 'n', 'n' };
137 : : static const symbol s_4_2[3] = { 'i', 'n', 'n' };
138 : : static const symbol s_4_3[4] = { 'e', 'a', 'r', 'r' };
139 : : static const symbol s_4_4[4] = { 'h', 'e', 'r', 'r' };
140 : : static const symbol s_4_5[3] = { 'o', 'u', 't' };
141 : : static const symbol s_4_6[1] = { 'y' };
142 : : static const struct among a_4[7] = {
143 : : { 4, s_4_0, 0, 2, 0},
144 : : { 4, s_4_1, 0, 2, 0},
145 : : { 3, s_4_2, 0, 2, 0},
146 : : { 4, s_4_3, 0, 2, 0},
147 : : { 4, s_4_4, 0, 2, 0},
148 : : { 3, s_4_5, 0, 2, 0},
149 : : { 1, s_4_6, 0, 1, 0}
150 : : };
151 : :
152 : : static const symbol s_5_1[2] = { 'e', 'd' };
153 : : static const symbol s_5_2[3] = { 'e', 'e', 'd' };
154 : : static const symbol s_5_3[3] = { 'i', 'n', 'g' };
155 : : static const symbol s_5_4[4] = { 'e', 'd', 'l', 'y' };
156 : : static const symbol s_5_5[5] = { 'e', 'e', 'd', 'l', 'y' };
157 : : static const symbol s_5_6[5] = { 'i', 'n', 'g', 'l', 'y' };
158 : : static const struct among a_5[7] = {
159 : : { 0, 0, 0, -1, 0},
160 : : { 2, s_5_1, -1, 2, 0},
161 : : { 3, s_5_2, -1, 1, 0},
162 : : { 3, s_5_3, -3, 3, 0},
163 : : { 4, s_5_4, -4, 2, 0},
164 : : { 5, s_5_5, -1, 1, 0},
165 : : { 5, s_5_6, -6, 2, 0}
166 : : };
167 : :
168 : : static const symbol s_6_1[2] = { 'b', 'b' };
169 : : static const symbol s_6_2[2] = { 'd', 'd' };
170 : : static const symbol s_6_3[2] = { 'f', 'f' };
171 : : static const symbol s_6_4[2] = { 'g', 'g' };
172 : : static const symbol s_6_5[2] = { 'b', 'l' };
173 : : static const symbol s_6_6[2] = { 'm', 'm' };
174 : : static const symbol s_6_7[2] = { 'n', 'n' };
175 : : static const symbol s_6_8[2] = { 'p', 'p' };
176 : : static const symbol s_6_9[2] = { 'r', 'r' };
177 : : static const symbol s_6_10[2] = { 'a', 't' };
178 : : static const symbol s_6_11[2] = { 't', 't' };
179 : : static const symbol s_6_12[2] = { 'i', 'z' };
180 : : static const struct among a_6[13] = {
181 : : { 0, 0, 0, 3, 0},
182 : : { 2, s_6_1, -1, 2, 0},
183 : : { 2, s_6_2, -2, 2, 0},
184 : : { 2, s_6_3, -3, 2, 0},
185 : : { 2, s_6_4, -4, 2, 0},
186 : : { 2, s_6_5, -5, 1, 0},
187 : : { 2, s_6_6, -6, 2, 0},
188 : : { 2, s_6_7, -7, 2, 0},
189 : : { 2, s_6_8, -8, 2, 0},
190 : : { 2, s_6_9, -9, 2, 0},
191 : : { 2, s_6_10, -10, 1, 0},
192 : : { 2, s_6_11, -11, 2, 0},
193 : : { 2, s_6_12, -12, 1, 0}
194 : : };
195 : :
196 : : static const symbol s_7_0[4] = { 'a', 'n', 'c', 'i' };
197 : : static const symbol s_7_1[4] = { 'e', 'n', 'c', 'i' };
198 : : static const symbol s_7_2[3] = { 'o', 'g', 'i' };
199 : : static const symbol s_7_3[2] = { 'l', 'i' };
200 : : static const symbol s_7_4[3] = { 'b', 'l', 'i' };
201 : : static const symbol s_7_5[4] = { 'a', 'b', 'l', 'i' };
202 : : static const symbol s_7_6[4] = { 'a', 'l', 'l', 'i' };
203 : : static const symbol s_7_7[5] = { 'f', 'u', 'l', 'l', 'i' };
204 : : static const symbol s_7_8[6] = { 'l', 'e', 's', 's', 'l', 'i' };
205 : : static const symbol s_7_9[5] = { 'o', 'u', 's', 'l', 'i' };
206 : : static const symbol s_7_10[5] = { 'e', 'n', 't', 'l', 'i' };
207 : : static const symbol s_7_11[5] = { 'a', 'l', 'i', 't', 'i' };
208 : : static const symbol s_7_12[6] = { 'b', 'i', 'l', 'i', 't', 'i' };
209 : : static const symbol s_7_13[5] = { 'i', 'v', 'i', 't', 'i' };
210 : : static const symbol s_7_14[6] = { 't', 'i', 'o', 'n', 'a', 'l' };
211 : : static const symbol s_7_15[7] = { 'a', 't', 'i', 'o', 'n', 'a', 'l' };
212 : : static const symbol s_7_16[5] = { 'a', 'l', 'i', 's', 'm' };
213 : : static const symbol s_7_17[5] = { 'a', 't', 'i', 'o', 'n' };
214 : : static const symbol s_7_18[7] = { 'i', 'z', 'a', 't', 'i', 'o', 'n' };
215 : : static const symbol s_7_19[4] = { 'i', 'z', 'e', 'r' };
216 : : static const symbol s_7_20[4] = { 'a', 't', 'o', 'r' };
217 : : static const symbol s_7_21[7] = { 'i', 'v', 'e', 'n', 'e', 's', 's' };
218 : : static const symbol s_7_22[7] = { 'f', 'u', 'l', 'n', 'e', 's', 's' };
219 : : static const symbol s_7_23[7] = { 'o', 'u', 's', 'n', 'e', 's', 's' };
220 : : static const symbol s_7_24[5] = { 'o', 'g', 'i', 's', 't' };
221 : : static const struct among a_7[25] = {
222 : : { 4, s_7_0, 0, 3, 0},
223 : : { 4, s_7_1, 0, 2, 0},
224 : : { 3, s_7_2, 0, 14, 0},
225 : : { 2, s_7_3, 0, 16, 0},
226 : : { 3, s_7_4, -1, 12, 0},
227 : : { 4, s_7_5, -1, 4, 0},
228 : : { 4, s_7_6, -3, 8, 0},
229 : : { 5, s_7_7, -4, 9, 0},
230 : : { 6, s_7_8, -5, 15, 0},
231 : : { 5, s_7_9, -6, 10, 0},
232 : : { 5, s_7_10, -7, 5, 0},
233 : : { 5, s_7_11, 0, 8, 0},
234 : : { 6, s_7_12, 0, 12, 0},
235 : : { 5, s_7_13, 0, 11, 0},
236 : : { 6, s_7_14, 0, 1, 0},
237 : : { 7, s_7_15, -1, 7, 0},
238 : : { 5, s_7_16, 0, 8, 0},
239 : : { 5, s_7_17, 0, 7, 0},
240 : : { 7, s_7_18, -1, 6, 0},
241 : : { 4, s_7_19, 0, 6, 0},
242 : : { 4, s_7_20, 0, 7, 0},
243 : : { 7, s_7_21, 0, 11, 0},
244 : : { 7, s_7_22, 0, 9, 0},
245 : : { 7, s_7_23, 0, 10, 0},
246 : : { 5, s_7_24, 0, 13, 0}
247 : : };
248 : :
249 : : static const symbol s_8_0[5] = { 'i', 'c', 'a', 't', 'e' };
250 : : static const symbol s_8_1[5] = { 'a', 't', 'i', 'v', 'e' };
251 : : static const symbol s_8_2[5] = { 'a', 'l', 'i', 'z', 'e' };
252 : : static const symbol s_8_3[5] = { 'i', 'c', 'i', 't', 'i' };
253 : : static const symbol s_8_4[4] = { 'i', 'c', 'a', 'l' };
254 : : static const symbol s_8_5[6] = { 't', 'i', 'o', 'n', 'a', 'l' };
255 : : static const symbol s_8_6[7] = { 'a', 't', 'i', 'o', 'n', 'a', 'l' };
256 : : static const symbol s_8_7[3] = { 'f', 'u', 'l' };
257 : : static const symbol s_8_8[4] = { 'n', 'e', 's', 's' };
258 : : static const struct among a_8[9] = {
259 : : { 5, s_8_0, 0, 4, 0},
260 : : { 5, s_8_1, 0, 6, 0},
261 : : { 5, s_8_2, 0, 3, 0},
262 : : { 5, s_8_3, 0, 4, 0},
263 : : { 4, s_8_4, 0, 4, 0},
264 : : { 6, s_8_5, 0, 1, 0},
265 : : { 7, s_8_6, -1, 2, 0},
266 : : { 3, s_8_7, 0, 5, 0},
267 : : { 4, s_8_8, 0, 5, 0}
268 : : };
269 : :
270 : : static const symbol s_9_0[2] = { 'i', 'c' };
271 : : static const symbol s_9_1[4] = { 'a', 'n', 'c', 'e' };
272 : : static const symbol s_9_2[4] = { 'e', 'n', 'c', 'e' };
273 : : static const symbol s_9_3[4] = { 'a', 'b', 'l', 'e' };
274 : : static const symbol s_9_4[4] = { 'i', 'b', 'l', 'e' };
275 : : static const symbol s_9_5[3] = { 'a', 't', 'e' };
276 : : static const symbol s_9_6[3] = { 'i', 'v', 'e' };
277 : : static const symbol s_9_7[3] = { 'i', 'z', 'e' };
278 : : static const symbol s_9_8[3] = { 'i', 't', 'i' };
279 : : static const symbol s_9_9[2] = { 'a', 'l' };
280 : : static const symbol s_9_10[3] = { 'i', 's', 'm' };
281 : : static const symbol s_9_11[3] = { 'i', 'o', 'n' };
282 : : static const symbol s_9_12[2] = { 'e', 'r' };
283 : : static const symbol s_9_13[3] = { 'o', 'u', 's' };
284 : : static const symbol s_9_14[3] = { 'a', 'n', 't' };
285 : : static const symbol s_9_15[3] = { 'e', 'n', 't' };
286 : : static const symbol s_9_16[4] = { 'm', 'e', 'n', 't' };
287 : : static const symbol s_9_17[5] = { 'e', 'm', 'e', 'n', 't' };
288 : : static const struct among a_9[18] = {
289 : : { 2, s_9_0, 0, 1, 0},
290 : : { 4, s_9_1, 0, 1, 0},
291 : : { 4, s_9_2, 0, 1, 0},
292 : : { 4, s_9_3, 0, 1, 0},
293 : : { 4, s_9_4, 0, 1, 0},
294 : : { 3, s_9_5, 0, 1, 0},
295 : : { 3, s_9_6, 0, 1, 0},
296 : : { 3, s_9_7, 0, 1, 0},
297 : : { 3, s_9_8, 0, 1, 0},
298 : : { 2, s_9_9, 0, 1, 0},
299 : : { 3, s_9_10, 0, 1, 0},
300 : : { 3, s_9_11, 0, 2, 0},
301 : : { 2, s_9_12, 0, 1, 0},
302 : : { 3, s_9_13, 0, 1, 0},
303 : : { 3, s_9_14, 0, 1, 0},
304 : : { 3, s_9_15, 0, 1, 0},
305 : : { 4, s_9_16, -1, 1, 0},
306 : : { 5, s_9_17, -1, 1, 0}
307 : : };
308 : :
309 : : static const symbol s_10_0[1] = { 'e' };
310 : : static const symbol s_10_1[1] = { 'l' };
311 : : static const struct among a_10[2] = {
312 : : { 1, s_10_0, 0, 1, 0},
313 : : { 1, s_10_1, 0, 2, 0}
314 : : };
315 : :
316 : : static const symbol s_11_0[5] = { 'a', 'n', 'd', 'e', 's' };
317 : : static const symbol s_11_1[5] = { 'a', 't', 'l', 'a', 's' };
318 : : static const symbol s_11_2[4] = { 'b', 'i', 'a', 's' };
319 : : static const symbol s_11_3[6] = { 'c', 'o', 's', 'm', 'o', 's' };
320 : : static const symbol s_11_4[5] = { 'e', 'a', 'r', 'l', 'y' };
321 : : static const symbol s_11_5[6] = { 'g', 'e', 'n', 't', 'l', 'y' };
322 : : static const symbol s_11_6[4] = { 'h', 'o', 'w', 'e' };
323 : : static const symbol s_11_7[4] = { 'i', 'd', 'l', 'y' };
324 : : static const symbol s_11_8[4] = { 'n', 'e', 'w', 's' };
325 : : static const symbol s_11_9[4] = { 'o', 'n', 'l', 'y' };
326 : : static const symbol s_11_10[6] = { 's', 'i', 'n', 'g', 'l', 'y' };
327 : : static const symbol s_11_11[5] = { 's', 'k', 'i', 'e', 's' };
328 : : static const symbol s_11_12[4] = { 's', 'k', 'i', 's' };
329 : : static const symbol s_11_13[3] = { 's', 'k', 'y' };
330 : : static const symbol s_11_14[4] = { 'u', 'g', 'l', 'y' };
331 : : static const struct among a_11[15] = {
332 : : { 5, s_11_0, 0, -1, 0},
333 : : { 5, s_11_1, 0, -1, 0},
334 : : { 4, s_11_2, 0, -1, 0},
335 : : { 6, s_11_3, 0, -1, 0},
336 : : { 5, s_11_4, 0, 6, 0},
337 : : { 6, s_11_5, 0, 4, 0},
338 : : { 4, s_11_6, 0, -1, 0},
339 : : { 4, s_11_7, 0, 3, 0},
340 : : { 4, s_11_8, 0, -1, 0},
341 : : { 4, s_11_9, 0, 7, 0},
342 : : { 6, s_11_10, 0, 8, 0},
343 : : { 5, s_11_11, 0, 2, 0},
344 : : { 4, s_11_12, 0, 1, 0},
345 : : { 3, s_11_13, 0, -1, 0},
346 : : { 4, s_11_14, 0, 5, 0}
347 : : };
348 : :
349 : : static const unsigned char g_aeo[] = { 17, 64 };
350 : :
351 : : static const unsigned char g_v[] = { 17, 65, 16, 1 };
352 : :
353 : : static const unsigned char g_v_WXY[] = { 1, 17, 65, 208, 1 };
354 : :
355 : : static const unsigned char g_valid_LI[] = { 55, 141, 2 };
356 : :
357 : 0 : static int r_prelude(struct SN_env * z) {
358 : 0 : ((SN_local *)z)->b_Y_found = 0;
359 : : {
360 : 0 : int v_1 = z->c;
361 : 0 : z->bra = z->c;
362 [ # # # # ]: 0 : if (z->c == z->l || z->p[z->c] != '\'') goto lab0;
363 : 0 : z->c++;
364 : 0 : z->ket = z->c;
365 : : {
366 : 0 : int ret = slice_del(z);
367 [ # # ]: 0 : if (ret < 0) return ret;
368 [ # # ]: 0 : }
369 : : lab0:
370 : 0 : z->c = v_1;
371 [ # # ]: 0 : }
372 : : {
373 : 0 : int v_2 = z->c;
374 : 0 : z->bra = z->c;
375 [ # # # # ]: 0 : if (z->c == z->l || z->p[z->c] != 'y') goto lab1;
376 : 0 : z->c++;
377 : 0 : z->ket = z->c;
378 : : {
379 : 0 : int ret = slice_from_s(z, 1, s_0);
380 [ # # ]: 0 : if (ret < 0) return ret;
381 [ # # ]: 0 : }
382 : 0 : ((SN_local *)z)->b_Y_found = 1;
383 : : lab1:
384 : 0 : z->c = v_2;
385 [ # # ]: 0 : }
386 : : {
387 : 0 : int v_3 = z->c;
388 : 0 : while (1) {
389 : 0 : int v_4 = z->c;
390 : 0 : while (1) {
391 : 0 : int v_5 = z->c;
392 [ # # ]: 0 : if (in_grouping(z, g_v, 97, 121, 0)) goto lab4;
393 : 0 : z->bra = z->c;
394 [ # # # # ]: 0 : if (z->c == z->l || z->p[z->c] != 'y') goto lab4;
395 : 0 : z->c++;
396 : 0 : z->ket = z->c;
397 : 0 : z->c = v_5;
398 : 0 : break;
399 : : lab4:
400 : 0 : z->c = v_5;
401 [ # # ]: 0 : if (z->c >= z->l) goto lab3;
402 : 0 : z->c++;
403 [ # # # # ]: 0 : }
404 : : {
405 : 0 : int ret = slice_from_s(z, 1, s_1);
406 [ # # ]: 0 : if (ret < 0) return ret;
407 [ # # ]: 0 : }
408 : 0 : ((SN_local *)z)->b_Y_found = 1;
409 : 0 : continue;
410 : : lab3:
411 : 0 : z->c = v_4;
412 : 0 : break;
413 [ # # # ]: 0 : }
414 : 0 : z->c = v_3;
415 [ # # ]: 0 : }
416 : 0 : return 1;
417 : 0 : }
418 : :
419 : 0 : static int r_mark_regions(struct SN_env * z) {
420 : 0 : ((SN_local *)z)->i_p1 = z->l;
421 : 0 : ((SN_local *)z)->i_p2 = z->l;
422 : : {
423 : 0 : int v_1 = z->c;
424 : 0 : do {
425 : 0 : int v_2 = z->c;
426 [ # # # # : 0 : if (z->c + 3 >= z->l || z->p[z->c + 3] >> 5 != 3 || !((5513250 >> (z->p[z->c + 3] & 0x1f)) & 1)) goto lab1;
# # ]
427 [ # # ]: 0 : if (!find_among(z, a_0, 9, 0)) goto lab1;
428 : 0 : break;
429 : : lab1:
430 : 0 : z->c = v_2;
431 : : {
432 : 0 : int ret = out_grouping(z, g_v, 97, 121, 1);
433 [ # # ]: 0 : if (ret < 0) goto lab0;
434 : 0 : z->c += ret;
435 [ # # ]: 0 : }
436 : : {
437 : 0 : int ret = in_grouping(z, g_v, 97, 121, 1);
438 [ # # ]: 0 : if (ret < 0) goto lab0;
439 : 0 : z->c += ret;
440 [ # # ]: 0 : }
441 [ # # # ]: 0 : } while (0);
442 : 0 : ((SN_local *)z)->i_p1 = z->c;
443 : : {
444 : 0 : int ret = out_grouping(z, g_v, 97, 121, 1);
445 [ # # ]: 0 : if (ret < 0) goto lab0;
446 : 0 : z->c += ret;
447 [ # # ]: 0 : }
448 : : {
449 : 0 : int ret = in_grouping(z, g_v, 97, 121, 1);
450 [ # # ]: 0 : if (ret < 0) goto lab0;
451 : 0 : z->c += ret;
452 [ # # ]: 0 : }
453 : 0 : ((SN_local *)z)->i_p2 = z->c;
454 : : lab0:
455 : 0 : z->c = v_1;
456 : 0 : }
457 : 0 : return 1;
458 : : }
459 : :
460 : 0 : static int r_shortv(struct SN_env * z) {
461 : 0 : do {
462 : 0 : int v_1 = z->l - z->c;
463 [ # # ]: 0 : if (out_grouping_b(z, g_v_WXY, 89, 121, 0)) goto lab0;
464 [ # # ]: 0 : if (in_grouping_b(z, g_v, 97, 121, 0)) goto lab0;
465 [ # # ]: 0 : if (out_grouping_b(z, g_v, 97, 121, 0)) goto lab0;
466 : 0 : break;
467 : : lab0:
468 : 0 : z->c = z->l - v_1;
469 [ # # ]: 0 : if (out_grouping_b(z, g_v, 97, 121, 0)) goto lab1;
470 [ # # ]: 0 : if (in_grouping_b(z, g_v, 97, 121, 0)) goto lab1;
471 [ # # ]: 0 : if (z->c > z->lb) goto lab1;
472 : 0 : break;
473 : : lab1:
474 : 0 : z->c = z->l - v_1;
475 [ # # ]: 0 : if (!(eq_s_b(z, 4, s_2))) return 0;
476 [ # # # # ]: 0 : } while (0);
477 : 0 : return 1;
478 : 0 : }
479 : :
480 : 0 : static int r_R1(struct SN_env * z) {
481 : 0 : return ((SN_local *)z)->i_p1 <= z->c;
482 : : }
483 : :
484 : 0 : static int r_R2(struct SN_env * z) {
485 : 0 : return ((SN_local *)z)->i_p2 <= z->c;
486 : : }
487 : :
488 : 0 : static int r_Step_1a(struct SN_env * z) {
489 : 0 : int among_var;
490 : : {
491 : 0 : int v_1 = z->l - z->c;
492 : 0 : z->ket = z->c;
493 [ # # # # : 0 : if (z->c <= z->lb || (z->p[z->c - 1] != 39 && z->p[z->c - 1] != 115)) { z->c = z->l - v_1; goto lab0; }
# # ]
494 [ # # ]: 0 : if (!find_among_b(z, a_1, 3, 0)) { z->c = z->l - v_1; goto lab0; }
495 : 0 : z->bra = z->c;
496 : : {
497 : 0 : int ret = slice_del(z);
498 [ # # ]: 0 : if (ret < 0) return ret;
499 [ # # ]: 0 : }
500 : : lab0:
501 : : ;
502 [ # # ]: 0 : }
503 : 0 : z->ket = z->c;
504 [ # # # # : 0 : if (z->c <= z->lb || (z->p[z->c - 1] != 100 && z->p[z->c - 1] != 115)) return 0;
# # ]
505 : 0 : among_var = find_among_b(z, a_2, 6, 0);
506 [ # # ]: 0 : if (!among_var) return 0;
507 : 0 : z->bra = z->c;
508 [ # # # # ]: 0 : switch (among_var) {
509 : : case 1:
510 : : {
511 : 0 : int ret = slice_from_s(z, 2, s_3);
512 [ # # ]: 0 : if (ret < 0) return ret;
513 [ # # ]: 0 : }
514 : 0 : break;
515 : : case 2:
516 : 0 : do {
517 : 0 : int v_2 = z->l - z->c;
518 [ # # ]: 0 : if (z->c - 2 < z->lb) goto lab1;
519 : 0 : z->c -= 2;
520 : : {
521 : 0 : int ret = slice_from_s(z, 1, s_4);
522 [ # # ]: 0 : if (ret < 0) return ret;
523 [ # # ]: 0 : }
524 : 0 : break;
525 : : lab1:
526 : 0 : z->c = z->l - v_2;
527 : : {
528 : 0 : int ret = slice_from_s(z, 2, s_5);
529 [ # # ]: 0 : if (ret < 0) return ret;
530 [ # # ]: 0 : }
531 [ # # # ]: 0 : } while (0);
532 : 0 : break;
533 : : case 3:
534 [ # # ]: 0 : if (z->c <= z->lb) return 0;
535 : 0 : z->c--;
536 : : {
537 : 0 : int ret = out_grouping_b(z, g_v, 97, 121, 1);
538 [ # # ]: 0 : if (ret < 0) return 0;
539 : 0 : z->c -= ret;
540 [ # # ]: 0 : }
541 : : {
542 : 0 : int ret = slice_del(z);
543 [ # # ]: 0 : if (ret < 0) return ret;
544 [ # # ]: 0 : }
545 : 0 : break;
546 : : }
547 : 0 : return 1;
548 : 0 : }
549 : :
550 : 0 : static int r_Step_1b(struct SN_env * z) {
551 : 0 : int among_var;
552 : 0 : z->ket = z->c;
553 [ # # # # : 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((33554576 >> (z->p[z->c - 1] & 0x1f)) & 1)) among_var = -1; else
# # ]
554 : 0 : among_var = find_among_b(z, a_5, 7, 0);
555 : 0 : z->bra = z->c;
556 : 0 : do {
557 : 0 : int v_1 = z->l - z->c;
558 [ # # # # ]: 0 : switch (among_var) {
559 : : case 1:
560 : : {
561 : 0 : int v_2 = z->l - z->c;
562 : : {
563 : 0 : int ret = r_R1(z);
564 [ # # ]: 0 : if (ret == 0) goto lab1;
565 [ # # ]: 0 : if (ret < 0) return ret;
566 [ # # # ]: 0 : }
567 : 0 : do {
568 : 0 : int v_3 = z->l - z->c;
569 [ # # # # ]: 0 : if (z->c - 2 <= z->lb || z->p[z->c - 1] != 99) goto lab2;
570 [ # # ]: 0 : if (!find_among_b(z, a_3, 3, 0)) goto lab2;
571 [ # # ]: 0 : if (z->c > z->lb) goto lab2;
572 : 0 : break;
573 : : lab2:
574 : 0 : z->c = z->l - v_3;
575 : : {
576 : 0 : int ret = slice_from_s(z, 2, s_6);
577 [ # # ]: 0 : if (ret < 0) return ret;
578 [ # # ]: 0 : }
579 [ # # # ]: 0 : } while (0);
580 : : lab1:
581 : 0 : z->c = z->l - v_2;
582 [ # # ]: 0 : }
583 : 0 : break;
584 : : case 2:
585 : 0 : goto lab0;
586 : : break;
587 : : case 3:
588 [ # # # # : 0 : if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((34881536 >> (z->p[z->c - 1] & 0x1f)) & 1)) goto lab0;
# # ]
589 : 0 : among_var = find_among_b(z, a_4, 7, 0);
590 [ # # ]: 0 : if (!among_var) goto lab0;
591 [ # # # ]: 0 : switch (among_var) {
592 : : case 1:
593 : : {
594 : 0 : int v_4 = z->l - z->c;
595 [ # # ]: 0 : if (out_grouping_b(z, g_v, 97, 121, 0)) goto lab0;
596 [ # # ]: 0 : if (z->c > z->lb) goto lab0;
597 : 0 : z->c = z->l - v_4;
598 [ # # # ]: 0 : }
599 : 0 : z->bra = z->c;
600 : : {
601 : 0 : int ret = slice_from_s(z, 2, s_7);
602 [ # # ]: 0 : if (ret < 0) return ret;
603 [ # # ]: 0 : }
604 : 0 : break;
605 : : case 2:
606 [ # # ]: 0 : if (z->c > z->lb) goto lab0;
607 : 0 : break;
608 : : }
609 : 0 : break;
610 : : }
611 : 0 : break;
612 : : lab0:
613 : 0 : z->c = z->l - v_1;
614 : : {
615 : 0 : int v_5 = z->l - z->c;
616 : : {
617 : 0 : int ret = out_grouping_b(z, g_v, 97, 121, 1);
618 [ # # ]: 0 : if (ret < 0) return 0;
619 : 0 : z->c -= ret;
620 [ # # ]: 0 : }
621 : 0 : z->c = z->l - v_5;
622 [ # # ]: 0 : }
623 : : {
624 : 0 : int ret = slice_del(z);
625 [ # # ]: 0 : if (ret < 0) return ret;
626 [ # # ]: 0 : }
627 : 0 : z->ket = z->c;
628 : 0 : z->bra = z->c;
629 : : {
630 : 0 : int v_6 = z->l - z->c;
631 [ # # # # : 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((68514004 >> (z->p[z->c - 1] & 0x1f)) & 1)) among_var = 3; else
# # ]
632 : 0 : among_var = find_among_b(z, a_6, 13, 0);
633 [ # # # # ]: 0 : switch (among_var) {
634 : : case 1:
635 : : {
636 : 0 : int ret = slice_from_s(z, 1, s_8);
637 [ # # ]: 0 : if (ret < 0) return ret;
638 [ # # ]: 0 : }
639 : 0 : return 0;
640 : : break;
641 : : case 2:
642 : : {
643 : 0 : int v_7 = z->l - z->c;
644 [ # # ]: 0 : if (in_grouping_b(z, g_aeo, 97, 111, 0)) goto lab3;
645 [ # # ]: 0 : if (z->c > z->lb) goto lab3;
646 : 0 : return 0;
647 : : lab3:
648 : 0 : z->c = z->l - v_7;
649 [ # # ]: 0 : }
650 : 0 : break;
651 : : case 3:
652 [ # # ]: 0 : if (z->c != ((SN_local *)z)->i_p1) return 0;
653 : : {
654 : 0 : int v_8 = z->l - z->c;
655 : : {
656 : 0 : int ret = r_shortv(z);
657 [ # # ]: 0 : if (ret <= 0) return ret;
658 [ # # ]: 0 : }
659 : 0 : z->c = z->l - v_8;
660 [ # # ]: 0 : }
661 : : {
662 : 0 : int ret = slice_from_s(z, 1, s_9);
663 [ # # ]: 0 : if (ret < 0) return ret;
664 [ # # ]: 0 : }
665 : 0 : return 0;
666 : : break;
667 : : }
668 : 0 : z->c = z->l - v_6;
669 [ # # ]: 0 : }
670 : 0 : z->ket = z->c;
671 [ # # ]: 0 : if (z->c <= z->lb) return 0;
672 : 0 : z->c--;
673 : 0 : z->bra = z->c;
674 : : {
675 : 0 : int ret = slice_del(z);
676 [ # # ]: 0 : if (ret < 0) return ret;
677 [ # # ]: 0 : }
678 [ # # # ]: 0 : } while (0);
679 : 0 : return 1;
680 : 0 : }
681 : :
682 : 0 : static int r_Step_1c(struct SN_env * z) {
683 : 0 : z->ket = z->c;
684 : 0 : do {
685 : 0 : int v_1 = z->l - z->c;
686 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'y') goto lab0;
687 : 0 : z->c--;
688 : 0 : break;
689 : : lab0:
690 : 0 : z->c = z->l - v_1;
691 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'Y') return 0;
692 : 0 : z->c--;
693 [ # # # ]: 0 : } while (0);
694 : 0 : z->bra = z->c;
695 [ # # ]: 0 : if (out_grouping_b(z, g_v, 97, 121, 0)) return 0;
696 [ # # ]: 0 : if (z->c > z->lb) goto lab1;
697 : 0 : return 0;
698 : : lab1:
699 : : {
700 : 0 : int ret = slice_from_s(z, 1, s_10);
701 [ # # ]: 0 : if (ret < 0) return ret;
702 [ # # ]: 0 : }
703 : 0 : return 1;
704 : 0 : }
705 : :
706 : 0 : static int r_Step_2(struct SN_env * z) {
707 : 0 : int among_var;
708 : 0 : z->ket = z->c;
709 [ # # # # : 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1864192 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
# # ]
710 : 0 : among_var = find_among_b(z, a_7, 25, 0);
711 [ # # ]: 0 : if (!among_var) return 0;
712 : 0 : z->bra = z->c;
713 : : {
714 : 0 : int ret = r_R1(z);
715 [ # # ]: 0 : if (ret <= 0) return ret;
716 [ # # ]: 0 : }
717 [ # # # # : 0 : switch (among_var) {
# # # # #
# # # # #
# # # ]
718 : : case 1:
719 : : {
720 : 0 : int ret = slice_from_s(z, 4, s_11);
721 [ # # ]: 0 : if (ret < 0) return ret;
722 [ # # ]: 0 : }
723 : 0 : break;
724 : : case 2:
725 : : {
726 : 0 : int ret = slice_from_s(z, 4, s_12);
727 [ # # ]: 0 : if (ret < 0) return ret;
728 [ # # ]: 0 : }
729 : 0 : break;
730 : : case 3:
731 : : {
732 : 0 : int ret = slice_from_s(z, 4, s_13);
733 [ # # ]: 0 : if (ret < 0) return ret;
734 [ # # ]: 0 : }
735 : 0 : break;
736 : : case 4:
737 : : {
738 : 0 : int ret = slice_from_s(z, 4, s_14);
739 [ # # ]: 0 : if (ret < 0) return ret;
740 [ # # ]: 0 : }
741 : 0 : break;
742 : : case 5:
743 : : {
744 : 0 : int ret = slice_from_s(z, 3, s_15);
745 [ # # ]: 0 : if (ret < 0) return ret;
746 [ # # ]: 0 : }
747 : 0 : break;
748 : : case 6:
749 : : {
750 : 0 : int ret = slice_from_s(z, 3, s_16);
751 [ # # ]: 0 : if (ret < 0) return ret;
752 [ # # ]: 0 : }
753 : 0 : break;
754 : : case 7:
755 : : {
756 : 0 : int ret = slice_from_s(z, 3, s_17);
757 [ # # ]: 0 : if (ret < 0) return ret;
758 [ # # ]: 0 : }
759 : 0 : break;
760 : : case 8:
761 : : {
762 : 0 : int ret = slice_from_s(z, 2, s_18);
763 [ # # ]: 0 : if (ret < 0) return ret;
764 [ # # ]: 0 : }
765 : 0 : break;
766 : : case 9:
767 : : {
768 : 0 : int ret = slice_from_s(z, 3, s_19);
769 [ # # ]: 0 : if (ret < 0) return ret;
770 [ # # ]: 0 : }
771 : 0 : break;
772 : : case 10:
773 : : {
774 : 0 : int ret = slice_from_s(z, 3, s_20);
775 [ # # ]: 0 : if (ret < 0) return ret;
776 [ # # ]: 0 : }
777 : 0 : break;
778 : : case 11:
779 : : {
780 : 0 : int ret = slice_from_s(z, 3, s_21);
781 [ # # ]: 0 : if (ret < 0) return ret;
782 [ # # ]: 0 : }
783 : 0 : break;
784 : : case 12:
785 : : {
786 : 0 : int ret = slice_from_s(z, 3, s_22);
787 [ # # ]: 0 : if (ret < 0) return ret;
788 [ # # ]: 0 : }
789 : 0 : break;
790 : : case 13:
791 : : {
792 : 0 : int ret = slice_from_s(z, 2, s_23);
793 [ # # ]: 0 : if (ret < 0) return ret;
794 [ # # ]: 0 : }
795 : 0 : break;
796 : : case 14:
797 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'l') return 0;
798 : 0 : z->c--;
799 : : {
800 : 0 : int ret = slice_from_s(z, 2, s_24);
801 [ # # ]: 0 : if (ret < 0) return ret;
802 [ # # ]: 0 : }
803 : 0 : break;
804 : : case 15:
805 : : {
806 : 0 : int ret = slice_from_s(z, 4, s_25);
807 [ # # ]: 0 : if (ret < 0) return ret;
808 [ # # ]: 0 : }
809 : 0 : break;
810 : : case 16:
811 [ # # ]: 0 : if (in_grouping_b(z, g_valid_LI, 99, 116, 0)) return 0;
812 : : {
813 : 0 : int ret = slice_del(z);
814 [ # # ]: 0 : if (ret < 0) return ret;
815 [ # # ]: 0 : }
816 : 0 : break;
817 : : }
818 : 0 : return 1;
819 : 0 : }
820 : :
821 : 0 : static int r_Step_3(struct SN_env * z) {
822 : 0 : int among_var;
823 : 0 : z->ket = z->c;
824 [ # # # # : 0 : if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((528928 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
# # ]
825 : 0 : among_var = find_among_b(z, a_8, 9, 0);
826 [ # # ]: 0 : if (!among_var) return 0;
827 : 0 : z->bra = z->c;
828 : : {
829 : 0 : int ret = r_R1(z);
830 [ # # ]: 0 : if (ret <= 0) return ret;
831 [ # # ]: 0 : }
832 [ # # # # : 0 : switch (among_var) {
# # # ]
833 : : case 1:
834 : : {
835 : 0 : int ret = slice_from_s(z, 4, s_26);
836 [ # # ]: 0 : if (ret < 0) return ret;
837 [ # # ]: 0 : }
838 : 0 : break;
839 : : case 2:
840 : : {
841 : 0 : int ret = slice_from_s(z, 3, s_27);
842 [ # # ]: 0 : if (ret < 0) return ret;
843 [ # # ]: 0 : }
844 : 0 : break;
845 : : case 3:
846 : : {
847 : 0 : int ret = slice_from_s(z, 2, s_28);
848 [ # # ]: 0 : if (ret < 0) return ret;
849 [ # # ]: 0 : }
850 : 0 : break;
851 : : case 4:
852 : : {
853 : 0 : int ret = slice_from_s(z, 2, s_29);
854 [ # # ]: 0 : if (ret < 0) return ret;
855 [ # # ]: 0 : }
856 : 0 : break;
857 : : case 5:
858 : : {
859 : 0 : int ret = slice_del(z);
860 [ # # ]: 0 : if (ret < 0) return ret;
861 [ # # ]: 0 : }
862 : 0 : break;
863 : : case 6:
864 : : {
865 : 0 : int ret = r_R2(z);
866 [ # # ]: 0 : if (ret <= 0) return ret;
867 [ # # ]: 0 : }
868 : : {
869 : 0 : int ret = slice_del(z);
870 [ # # ]: 0 : if (ret < 0) return ret;
871 [ # # ]: 0 : }
872 : 0 : break;
873 : : }
874 : 0 : return 1;
875 : 0 : }
876 : :
877 : 0 : static int r_Step_4(struct SN_env * z) {
878 : 0 : int among_var;
879 : 0 : z->ket = z->c;
880 [ # # # # : 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1864232 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
# # ]
881 : 0 : among_var = find_among_b(z, a_9, 18, 0);
882 [ # # ]: 0 : if (!among_var) return 0;
883 : 0 : z->bra = z->c;
884 : : {
885 : 0 : int ret = r_R2(z);
886 [ # # ]: 0 : if (ret <= 0) return ret;
887 [ # # ]: 0 : }
888 [ # # # ]: 0 : switch (among_var) {
889 : : case 1:
890 : : {
891 : 0 : int ret = slice_del(z);
892 [ # # ]: 0 : if (ret < 0) return ret;
893 [ # # ]: 0 : }
894 : 0 : break;
895 : : case 2:
896 : 0 : do {
897 : 0 : int v_1 = z->l - z->c;
898 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 's') goto lab0;
899 : 0 : z->c--;
900 : 0 : break;
901 : : lab0:
902 : 0 : z->c = z->l - v_1;
903 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 't') return 0;
904 : 0 : z->c--;
905 [ # # # ]: 0 : } while (0);
906 : : {
907 : 0 : int ret = slice_del(z);
908 [ # # ]: 0 : if (ret < 0) return ret;
909 [ # # ]: 0 : }
910 : 0 : break;
911 : : }
912 : 0 : return 1;
913 : 0 : }
914 : :
915 : 0 : static int r_Step_5(struct SN_env * z) {
916 : 0 : int among_var;
917 : 0 : z->ket = z->c;
918 [ # # # # : 0 : if (z->c <= z->lb || (z->p[z->c - 1] != 101 && z->p[z->c - 1] != 108)) return 0;
# # ]
919 : 0 : among_var = find_among_b(z, a_10, 2, 0);
920 [ # # ]: 0 : if (!among_var) return 0;
921 : 0 : z->bra = z->c;
922 [ # # # ]: 0 : switch (among_var) {
923 : : case 1:
924 : 0 : do {
925 : : {
926 : 0 : int ret = r_R2(z);
927 [ # # ]: 0 : if (ret == 0) goto lab0;
928 [ # # ]: 0 : if (ret < 0) return ret;
929 [ # # # ]: 0 : }
930 : 0 : break;
931 : : lab0:
932 : : {
933 : 0 : int ret = r_R1(z);
934 [ # # ]: 0 : if (ret <= 0) return ret;
935 [ # # ]: 0 : }
936 : : {
937 : 0 : int v_1 = z->l - z->c;
938 : : {
939 : 0 : int ret = r_shortv(z);
940 [ # # ]: 0 : if (ret == 0) goto lab1;
941 [ # # ]: 0 : if (ret < 0) return ret;
942 [ # # # ]: 0 : }
943 : 0 : return 0;
944 : : lab1:
945 : 0 : z->c = z->l - v_1;
946 [ # # ]: 0 : }
947 : 0 : } while (0);
948 : : {
949 : 0 : int ret = slice_del(z);
950 [ # # ]: 0 : if (ret < 0) return ret;
951 [ # # ]: 0 : }
952 : 0 : break;
953 : : case 2:
954 : : {
955 : 0 : int ret = r_R2(z);
956 [ # # ]: 0 : if (ret <= 0) return ret;
957 [ # # ]: 0 : }
958 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'l') return 0;
959 : 0 : z->c--;
960 : : {
961 : 0 : int ret = slice_del(z);
962 [ # # ]: 0 : if (ret < 0) return ret;
963 [ # # ]: 0 : }
964 : 0 : break;
965 : : }
966 : 0 : return 1;
967 : 0 : }
968 : :
969 : 0 : static int r_exception1(struct SN_env * z) {
970 : 0 : int among_var;
971 : 0 : z->bra = z->c;
972 [ # # # # : 0 : if (z->c + 2 >= z->l || z->p[z->c + 2] >> 5 != 3 || !((42750482 >> (z->p[z->c + 2] & 0x1f)) & 1)) return 0;
# # ]
973 : 0 : among_var = find_among(z, a_11, 15, 0);
974 [ # # ]: 0 : if (!among_var) return 0;
975 : 0 : z->ket = z->c;
976 [ # # ]: 0 : if (z->c < z->l) return 0;
977 [ # # # # : 0 : switch (among_var) {
# # # #
# ]
978 : : case 1:
979 : : {
980 : 0 : int ret = slice_from_s(z, 3, s_30);
981 [ # # ]: 0 : if (ret < 0) return ret;
982 [ # # ]: 0 : }
983 : 0 : break;
984 : : case 2:
985 : : {
986 : 0 : int ret = slice_from_s(z, 3, s_31);
987 [ # # ]: 0 : if (ret < 0) return ret;
988 [ # # ]: 0 : }
989 : 0 : break;
990 : : case 3:
991 : : {
992 : 0 : int ret = slice_from_s(z, 3, s_32);
993 [ # # ]: 0 : if (ret < 0) return ret;
994 [ # # ]: 0 : }
995 : 0 : break;
996 : : case 4:
997 : : {
998 : 0 : int ret = slice_from_s(z, 5, s_33);
999 [ # # ]: 0 : if (ret < 0) return ret;
1000 [ # # ]: 0 : }
1001 : 0 : break;
1002 : : case 5:
1003 : : {
1004 : 0 : int ret = slice_from_s(z, 4, s_34);
1005 [ # # ]: 0 : if (ret < 0) return ret;
1006 [ # # ]: 0 : }
1007 : 0 : break;
1008 : : case 6:
1009 : : {
1010 : 0 : int ret = slice_from_s(z, 5, s_35);
1011 [ # # ]: 0 : if (ret < 0) return ret;
1012 [ # # ]: 0 : }
1013 : 0 : break;
1014 : : case 7:
1015 : : {
1016 : 0 : int ret = slice_from_s(z, 4, s_36);
1017 [ # # ]: 0 : if (ret < 0) return ret;
1018 [ # # ]: 0 : }
1019 : 0 : break;
1020 : : case 8:
1021 : : {
1022 : 0 : int ret = slice_from_s(z, 5, s_37);
1023 [ # # ]: 0 : if (ret < 0) return ret;
1024 [ # # ]: 0 : }
1025 : 0 : break;
1026 : : }
1027 : 0 : return 1;
1028 : 0 : }
1029 : :
1030 : 0 : static int r_postlude(struct SN_env * z) {
1031 [ # # ]: 0 : if (!((SN_local *)z)->b_Y_found) return 0;
1032 : 0 : while (1) {
1033 : 0 : int v_1 = z->c;
1034 : 0 : while (1) {
1035 : 0 : int v_2 = z->c;
1036 : 0 : z->bra = z->c;
1037 [ # # # # ]: 0 : if (z->c == z->l || z->p[z->c] != 'Y') goto lab1;
1038 : 0 : z->c++;
1039 : 0 : z->ket = z->c;
1040 : 0 : z->c = v_2;
1041 : 0 : break;
1042 : : lab1:
1043 : 0 : z->c = v_2;
1044 [ # # ]: 0 : if (z->c >= z->l) goto lab0;
1045 : 0 : z->c++;
1046 [ # # # # ]: 0 : }
1047 : : {
1048 : 0 : int ret = slice_from_s(z, 1, s_38);
1049 [ # # ]: 0 : if (ret < 0) return ret;
1050 [ # # ]: 0 : }
1051 : 0 : continue;
1052 : : lab0:
1053 : 0 : z->c = v_1;
1054 : 0 : break;
1055 [ # # # # ]: 0 : }
1056 : 0 : return 1;
1057 : 0 : }
1058 : :
1059 : 0 : extern int english_ISO_8859_1_stem(struct SN_env * z) {
1060 : 0 : do {
1061 : 0 : int v_1 = z->c;
1062 : : {
1063 : 0 : int ret = r_exception1(z);
1064 [ # # ]: 0 : if (ret == 0) goto lab0;
1065 [ # # ]: 0 : if (ret < 0) return ret;
1066 [ # # # ]: 0 : }
1067 : 0 : break;
1068 : : lab0:
1069 : 0 : z->c = v_1;
1070 : : {
1071 : 0 : int v_2 = z->c;
1072 [ # # ]: 0 : if (z->c + 3 > z->l) goto lab2;
1073 : 0 : z->c += 3;
1074 : 0 : goto lab1;
1075 : : lab2:
1076 : 0 : z->c = v_2;
1077 [ # # # ]: 0 : }
1078 : 0 : break;
1079 : : lab1:
1080 : 0 : z->c = v_1;
1081 : : {
1082 : 0 : int ret = r_prelude(z);
1083 [ # # ]: 0 : if (ret < 0) return ret;
1084 [ # # ]: 0 : }
1085 : : {
1086 : 0 : int ret = r_mark_regions(z);
1087 [ # # ]: 0 : if (ret < 0) return ret;
1088 [ # # ]: 0 : }
1089 : 0 : z->lb = z->c; z->c = z->l;
1090 : : {
1091 : 0 : int v_3 = z->l - z->c;
1092 : : {
1093 : 0 : int ret = r_Step_1a(z);
1094 [ # # ]: 0 : if (ret < 0) return ret;
1095 [ # # ]: 0 : }
1096 : 0 : z->c = z->l - v_3;
1097 [ # # ]: 0 : }
1098 : : {
1099 : 0 : int v_4 = z->l - z->c;
1100 : : {
1101 : 0 : int ret = r_Step_1b(z);
1102 [ # # ]: 0 : if (ret < 0) return ret;
1103 [ # # ]: 0 : }
1104 : 0 : z->c = z->l - v_4;
1105 [ # # ]: 0 : }
1106 : : {
1107 : 0 : int v_5 = z->l - z->c;
1108 : : {
1109 : 0 : int ret = r_Step_1c(z);
1110 [ # # ]: 0 : if (ret < 0) return ret;
1111 [ # # ]: 0 : }
1112 : 0 : z->c = z->l - v_5;
1113 [ # # ]: 0 : }
1114 : : {
1115 : 0 : int v_6 = z->l - z->c;
1116 : : {
1117 : 0 : int ret = r_Step_2(z);
1118 [ # # ]: 0 : if (ret < 0) return ret;
1119 [ # # ]: 0 : }
1120 : 0 : z->c = z->l - v_6;
1121 [ # # ]: 0 : }
1122 : : {
1123 : 0 : int v_7 = z->l - z->c;
1124 : : {
1125 : 0 : int ret = r_Step_3(z);
1126 [ # # ]: 0 : if (ret < 0) return ret;
1127 [ # # ]: 0 : }
1128 : 0 : z->c = z->l - v_7;
1129 [ # # ]: 0 : }
1130 : : {
1131 : 0 : int v_8 = z->l - z->c;
1132 : : {
1133 : 0 : int ret = r_Step_4(z);
1134 [ # # ]: 0 : if (ret < 0) return ret;
1135 [ # # ]: 0 : }
1136 : 0 : z->c = z->l - v_8;
1137 [ # # ]: 0 : }
1138 : : {
1139 : 0 : int v_9 = z->l - z->c;
1140 : : {
1141 : 0 : int ret = r_Step_5(z);
1142 [ # # ]: 0 : if (ret < 0) return ret;
1143 [ # # ]: 0 : }
1144 : 0 : z->c = z->l - v_9;
1145 [ # # ]: 0 : }
1146 : 0 : z->c = z->lb;
1147 : : {
1148 : 0 : int v_10 = z->c;
1149 : : {
1150 : 0 : int ret = r_postlude(z);
1151 [ # # ]: 0 : if (ret < 0) return ret;
1152 [ # # ]: 0 : }
1153 : 0 : z->c = v_10;
1154 [ # # ]: 0 : }
1155 [ # # # # ]: 0 : } while (0);
1156 : 0 : return 1;
1157 : 0 : }
1158 : :
1159 : 0 : extern struct SN_env * english_ISO_8859_1_create_env(void) {
1160 : 0 : struct SN_env * z = SN_new_env(sizeof(SN_local));
1161 [ # # ]: 0 : if (z) {
1162 : 0 : ((SN_local *)z)->b_Y_found = 0;
1163 : 0 : ((SN_local *)z)->i_p2 = 0;
1164 : 0 : ((SN_local *)z)->i_p1 = 0;
1165 : 0 : }
1166 : 0 : return z;
1167 : 0 : }
1168 : :
1169 : 0 : extern void english_ISO_8859_1_close_env(struct SN_env * z) {
1170 : 0 : SN_delete_env(z);
1171 : 0 : }
1172 : :
|
