Age Owner Branch data TLA Line data Source code
1 : : /* Generated from english.sbl by Snowball 3.0.0 - https://snowballstem.org/ */
2 : :
3 : : #include "stem_UTF_8_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_UTF_8_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 : :
1850 peter@eisentraut.org 357 :CBC 3155 : static int r_prelude(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 358 :GNC 3155 : ((SN_local *)z)->b_Y_found = 0;
359 : : {
360 : 3155 : int v_1 = z->c;
1850 peter@eisentraut.org 361 :CBC 3155 : z->bra = z->c;
362 [ + - + - ]: 3155 : if (z->c == z->l || z->p[z->c] != '\'') goto lab0;
2729 tgl@sss.pgh.pa.us 363 :UBC 0 : z->c++;
1850 peter@eisentraut.org 364 : 0 : z->ket = z->c;
365 : : {
69 tgl@sss.pgh.pa.us 366 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 367 [ # # ]:UBC 0 : if (ret < 0) return ret;
368 : : }
369 : 0 : lab0:
69 tgl@sss.pgh.pa.us 370 :GNC 3155 : z->c = v_1;
371 : : }
372 : : {
373 : 3155 : int v_2 = z->c;
1850 peter@eisentraut.org 374 :CBC 3155 : z->bra = z->c;
375 [ + - + + ]: 3155 : if (z->c == z->l || z->p[z->c] != 'y') goto lab1;
2729 tgl@sss.pgh.pa.us 376 : 21 : z->c++;
1850 peter@eisentraut.org 377 : 21 : z->ket = z->c;
378 : : {
69 tgl@sss.pgh.pa.us 379 :GNC 21 : int ret = slice_from_s(z, 1, s_0);
6781 tgl@sss.pgh.pa.us 380 [ - + ]:CBC 21 : if (ret < 0) return ret;
381 : : }
69 tgl@sss.pgh.pa.us 382 :GNC 21 : ((SN_local *)z)->b_Y_found = 1;
6781 tgl@sss.pgh.pa.us 383 :CBC 3155 : lab1:
69 tgl@sss.pgh.pa.us 384 :GNC 3155 : z->c = v_2;
385 : : }
386 : : {
387 : 3155 : int v_3 = z->c;
388 : 243 : while (1) {
389 : 3398 : int v_4 = z->c;
390 : 14660 : while (1) {
391 : 18058 : int v_5 = z->c;
1850 peter@eisentraut.org 392 [ + + ]:CBC 18058 : if (in_grouping_U(z, g_v, 97, 121, 0)) goto lab4;
393 : 5760 : z->bra = z->c;
394 [ + + + + ]: 5760 : if (z->c == z->l || z->p[z->c] != 'y') goto lab4;
2729 tgl@sss.pgh.pa.us 395 : 243 : z->c++;
1850 peter@eisentraut.org 396 : 243 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 397 :GNC 243 : z->c = v_5;
6781 tgl@sss.pgh.pa.us 398 :CBC 243 : break;
399 : 17815 : lab4:
69 tgl@sss.pgh.pa.us 400 :GNC 17815 : z->c = v_5;
401 : : {
402 : 17815 : int ret = skip_utf8(z->p, z->c, z->l, 1);
6781 tgl@sss.pgh.pa.us 403 [ + + ]:CBC 17815 : if (ret < 0) goto lab3;
1850 peter@eisentraut.org 404 : 14660 : z->c = ret;
405 : : }
406 : : }
407 : : {
69 tgl@sss.pgh.pa.us 408 :GNC 243 : int ret = slice_from_s(z, 1, s_1);
6781 tgl@sss.pgh.pa.us 409 [ - + ]:CBC 243 : if (ret < 0) return ret;
410 : : }
69 tgl@sss.pgh.pa.us 411 :GNC 243 : ((SN_local *)z)->b_Y_found = 1;
6781 tgl@sss.pgh.pa.us 412 :CBC 243 : continue;
413 : 3155 : lab3:
69 tgl@sss.pgh.pa.us 414 :GNC 3155 : z->c = v_4;
6781 tgl@sss.pgh.pa.us 415 :CBC 3155 : break;
416 : : }
69 tgl@sss.pgh.pa.us 417 :GNC 3155 : z->c = v_3;
418 : : }
6781 tgl@sss.pgh.pa.us 419 :CBC 3155 : return 1;
420 : : }
421 : :
1850 peter@eisentraut.org 422 : 3155 : static int r_mark_regions(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 423 :GNC 3155 : ((SN_local *)z)->i_p1 = z->l;
424 : 3155 : ((SN_local *)z)->i_p2 = z->l;
425 : : {
426 : 3155 : int v_1 = z->c;
427 : : do {
428 : 3155 : int v_2 = z->c;
429 [ + + + + : 3155 : if (z->c + 3 >= z->l || z->p[z->c + 3] >> 5 != 3 || !((5513250 >> (z->p[z->c + 3] & 0x1f)) & 1)) goto lab1;
+ + ]
430 [ + - ]: 1026 : if (!find_among(z, a_0, 9, 0)) goto lab1;
69 tgl@sss.pgh.pa.us 431 :UNC 0 : break;
69 tgl@sss.pgh.pa.us 432 :GNC 3155 : lab1:
433 : 3155 : z->c = v_2;
434 : : {
6781 tgl@sss.pgh.pa.us 435 :CBC 3155 : int ret = out_grouping_U(z, g_v, 97, 121, 1);
436 [ + + ]: 3155 : if (ret < 0) goto lab0;
437 : 2819 : z->c += ret;
438 : : }
439 : : {
440 : 2819 : int ret = in_grouping_U(z, g_v, 97, 121, 1);
441 [ + + ]: 2819 : if (ret < 0) goto lab0;
442 : 2515 : z->c += ret;
443 : : }
444 : : } while (0);
69 tgl@sss.pgh.pa.us 445 :GNC 2515 : ((SN_local *)z)->i_p1 = z->c;
446 : : {
6781 tgl@sss.pgh.pa.us 447 :CBC 2515 : int ret = out_grouping_U(z, g_v, 97, 121, 1);
448 [ + + ]: 2515 : if (ret < 0) goto lab0;
449 : 1375 : z->c += ret;
450 : : }
451 : : {
452 : 1375 : int ret = in_grouping_U(z, g_v, 97, 121, 1);
453 [ + + ]: 1375 : if (ret < 0) goto lab0;
454 : 1102 : z->c += ret;
455 : : }
69 tgl@sss.pgh.pa.us 456 :GNC 1102 : ((SN_local *)z)->i_p2 = z->c;
6781 tgl@sss.pgh.pa.us 457 :CBC 3155 : lab0:
69 tgl@sss.pgh.pa.us 458 :GNC 3155 : z->c = v_1;
459 : : }
6781 tgl@sss.pgh.pa.us 460 :CBC 3155 : return 1;
461 : : }
462 : :
1850 peter@eisentraut.org 463 : 224 : static int r_shortv(struct SN_env * z) {
464 : : do {
69 tgl@sss.pgh.pa.us 465 :GNC 224 : int v_1 = z->l - z->c;
466 [ - + ]: 224 : if (out_grouping_b_U(z, g_v_WXY, 89, 121, 0)) goto lab0;
467 [ + + ]: 224 : if (in_grouping_b_U(z, g_v, 97, 121, 0)) goto lab0;
468 [ + + ]: 122 : if (out_grouping_b_U(z, g_v, 97, 121, 0)) goto lab0;
469 : 33 : break;
470 : 191 : lab0:
471 : 191 : z->c = z->l - v_1;
1850 peter@eisentraut.org 472 [ - + ]:CBC 191 : if (out_grouping_b_U(z, g_v, 97, 121, 0)) goto lab1;
69 tgl@sss.pgh.pa.us 473 [ + + ]:GNC 191 : if (in_grouping_b_U(z, g_v, 97, 121, 0)) goto lab1;
474 [ + + ]: 89 : if (z->c > z->lb) goto lab1;
475 : 60 : break;
6781 tgl@sss.pgh.pa.us 476 :CBC 131 : lab1:
69 tgl@sss.pgh.pa.us 477 :GNC 131 : z->c = z->l - v_1;
478 [ + - ]: 131 : if (!(eq_s_b(z, 4, s_2))) return 0;
479 : : } while (0);
6781 tgl@sss.pgh.pa.us 480 :CBC 93 : return 1;
481 : : }
482 : :
1850 peter@eisentraut.org 483 : 315 : static int r_R1(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 484 :GNC 315 : return ((SN_local *)z)->i_p1 <= z->c;
485 : : }
486 : :
1850 peter@eisentraut.org 487 :CBC 877 : static int r_R2(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 488 :GNC 877 : return ((SN_local *)z)->i_p2 <= z->c;
489 : : }
490 : :
1850 peter@eisentraut.org 491 :CBC 3155 : static int r_Step_1a(struct SN_env * z) {
492 : : int among_var;
493 : : {
69 tgl@sss.pgh.pa.us 494 :GNC 3155 : int v_1 = z->l - z->c;
1850 peter@eisentraut.org 495 :CBC 3155 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 496 [ + - + - :GNC 3155 : 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; }
+ + ]
497 [ + - ]: 149 : if (!find_among_b(z, a_1, 3, 0)) { z->c = z->l - v_1; goto lab0; }
1850 peter@eisentraut.org 498 :UBC 0 : z->bra = z->c;
499 : : {
69 tgl@sss.pgh.pa.us 500 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 501 [ # # ]:UBC 0 : if (ret < 0) return ret;
502 : : }
6781 503 : 0 : lab0:
504 : : ;
505 : : }
1850 peter@eisentraut.org 506 :CBC 3155 : z->ket = z->c;
507 [ + - + + : 3155 : if (z->c <= z->lb || (z->p[z->c - 1] != 100 && z->p[z->c - 1] != 115)) return 0;
+ + ]
69 tgl@sss.pgh.pa.us 508 :GNC 395 : among_var = find_among_b(z, a_2, 6, 0);
390 tgl@sss.pgh.pa.us 509 [ + + ]:CBC 395 : if (!among_var) return 0;
1850 peter@eisentraut.org 510 : 149 : z->bra = z->c;
511 [ - - + + ]: 149 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 512 :UBC 0 : case 1:
513 : : {
69 tgl@sss.pgh.pa.us 514 :UNC 0 : int ret = slice_from_s(z, 2, s_3);
6781 tgl@sss.pgh.pa.us 515 [ # # ]:UBC 0 : if (ret < 0) return ret;
516 : : }
517 : 0 : break;
518 : 0 : case 2:
519 : : do {
69 tgl@sss.pgh.pa.us 520 :UNC 0 : int v_2 = z->l - z->c;
521 : : {
522 : 0 : int ret = skip_b_utf8(z->p, z->c, z->lb, 2);
523 [ # # ]: 0 : if (ret < 0) goto lab1;
2729 tgl@sss.pgh.pa.us 524 :UBC 0 : z->c = ret;
525 : : }
526 : : {
69 tgl@sss.pgh.pa.us 527 :UNC 0 : int ret = slice_from_s(z, 1, s_4);
6781 tgl@sss.pgh.pa.us 528 [ # # ]:UBC 0 : if (ret < 0) return ret;
529 : : }
69 tgl@sss.pgh.pa.us 530 :UNC 0 : break;
531 : 0 : lab1:
532 : 0 : z->c = z->l - v_2;
533 : : {
534 : 0 : int ret = slice_from_s(z, 2, s_5);
6781 tgl@sss.pgh.pa.us 535 [ # # ]:UBC 0 : if (ret < 0) return ret;
536 : : }
537 : : } while (0);
538 : 0 : break;
6781 tgl@sss.pgh.pa.us 539 :CBC 122 : case 3:
540 : : {
69 tgl@sss.pgh.pa.us 541 :GNC 122 : int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
6781 tgl@sss.pgh.pa.us 542 [ - + ]:CBC 122 : if (ret < 0) return 0;
1850 peter@eisentraut.org 543 : 122 : z->c = ret;
544 : : }
545 : : {
6781 tgl@sss.pgh.pa.us 546 : 122 : int ret = out_grouping_b_U(z, g_v, 97, 121, 1);
547 [ + + ]: 122 : if (ret < 0) return 0;
548 : 119 : z->c -= ret;
549 : : }
550 : : {
69 tgl@sss.pgh.pa.us 551 :GNC 119 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 552 [ - + ]:CBC 119 : if (ret < 0) return ret;
553 : : }
554 : 119 : break;
555 : : }
556 : 146 : return 1;
557 : : }
558 : :
1850 peter@eisentraut.org 559 : 3155 : static int r_Step_1b(struct SN_env * z) {
560 : : int among_var;
561 : 3155 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 562 [ + - + + :GNC 3155 : 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
+ + ]
563 : 571 : among_var = find_among_b(z, a_5, 7, 0);
1850 peter@eisentraut.org 564 :CBC 3155 : z->bra = z->c;
565 : : do {
69 tgl@sss.pgh.pa.us 566 :GNC 3155 : int v_1 = z->l - z->c;
567 [ - + + + ]: 3155 : switch (among_var) {
69 tgl@sss.pgh.pa.us 568 :UNC 0 : case 1:
569 : : {
570 : 0 : int v_2 = z->l - z->c;
571 : : {
572 : 0 : int ret = r_R1(z);
573 [ # # ]: 0 : if (ret == 0) goto lab1;
574 [ # # ]: 0 : if (ret < 0) return ret;
575 : : }
576 : : do {
577 : 0 : int v_3 = z->l - z->c;
578 [ # # # # ]: 0 : if (z->c - 2 <= z->lb || z->p[z->c - 1] != 99) goto lab2;
579 [ # # ]: 0 : if (!find_among_b(z, a_3, 3, 0)) goto lab2;
580 [ # # ]: 0 : if (z->c > z->lb) goto lab2;
581 : 0 : break;
582 : 0 : lab2:
583 : 0 : z->c = z->l - v_3;
584 : : {
585 : 0 : int ret = slice_from_s(z, 2, s_6);
586 [ # # ]: 0 : if (ret < 0) return ret;
587 : : }
588 : : } while (0);
589 : 0 : lab1:
590 : 0 : z->c = z->l - v_2;
591 : : }
592 : 0 : break;
69 tgl@sss.pgh.pa.us 593 :GNC 165 : case 2:
594 : 165 : goto lab0;
595 : : break;
596 : 29 : case 3:
597 [ + - + - : 29 : if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((34881536 >> (z->p[z->c - 1] & 0x1f)) & 1)) goto lab0;
+ - ]
69 tgl@sss.pgh.pa.us 598 :UNC 0 : among_var = find_among_b(z, a_4, 7, 0);
599 [ # # ]: 0 : if (!among_var) goto lab0;
390 tgl@sss.pgh.pa.us 600 [ # # # - ]:LBC (194) : switch (among_var) {
390 tgl@sss.pgh.pa.us 601 :UBC 0 : case 1:
602 : : {
69 tgl@sss.pgh.pa.us 603 :UNC 0 : int v_4 = z->l - z->c;
604 [ # # ]: 0 : if (out_grouping_b_U(z, g_v, 97, 121, 0)) goto lab0;
390 tgl@sss.pgh.pa.us 605 [ # # ]:UBC 0 : if (z->c > z->lb) goto lab0;
69 tgl@sss.pgh.pa.us 606 :UNC 0 : z->c = z->l - v_4;
607 : : }
608 : 0 : z->bra = z->c;
609 : : {
610 : 0 : int ret = slice_from_s(z, 2, s_7);
390 tgl@sss.pgh.pa.us 611 [ # # ]:LBC (3) : if (ret < 0) return ret;
612 : : }
69 tgl@sss.pgh.pa.us 613 :UNC 0 : break;
614 : 0 : case 2:
615 [ # # ]: 0 : if (z->c > z->lb) goto lab0;
390 tgl@sss.pgh.pa.us 616 :UIC 0 : break;
617 : : }
69 tgl@sss.pgh.pa.us 618 :UNC 0 : break;
619 : : }
69 tgl@sss.pgh.pa.us 620 :GNC 2961 : break;
621 : 194 : lab0:
622 : 194 : z->c = z->l - v_1;
623 : : {
624 : 194 : int v_5 = z->l - z->c;
625 : : {
626 : 194 : int ret = out_grouping_b_U(z, g_v, 97, 121, 1);
390 tgl@sss.pgh.pa.us 627 [ - + ]:CBC 194 : if (ret < 0) return 0;
69 tgl@sss.pgh.pa.us 628 :GNC 194 : z->c -= ret;
629 : : }
630 : 194 : z->c = z->l - v_5;
631 : : }
632 : : {
633 : 194 : int ret = slice_del(z);
634 [ - + ]: 194 : if (ret < 0) return ret;
635 : : }
636 : 194 : z->ket = z->c;
637 : 194 : z->bra = z->c;
638 : : {
639 : 194 : int v_6 = z->l - z->c;
640 [ + - + - : 194 : 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
+ + ]
641 : 162 : among_var = find_among_b(z, a_6, 13, 0);
642 [ - + + - ]: 194 : switch (among_var) {
69 tgl@sss.pgh.pa.us 643 :UNC 0 : case 1:
644 : : {
645 : 0 : int ret = slice_from_s(z, 1, s_8);
646 [ # # ]: 0 : if (ret < 0) return ret;
647 : : }
648 : 0 : return 0;
649 : : break;
69 tgl@sss.pgh.pa.us 650 :GNC 18 : case 2:
651 : : {
652 : 18 : int v_7 = z->l - z->c;
653 [ + - ]: 18 : if (in_grouping_b_U(z, g_aeo, 97, 111, 0)) goto lab3;
69 tgl@sss.pgh.pa.us 654 [ # # ]:UNC 0 : if (z->c > z->lb) goto lab3;
655 : 0 : return 0;
69 tgl@sss.pgh.pa.us 656 :GNC 18 : lab3:
657 : 18 : z->c = z->l - v_7;
658 : : }
659 : 18 : break;
660 : 176 : case 3:
661 [ + + ]: 176 : if (z->c != ((SN_local *)z)->i_p1) return 0;
662 : : {
663 : 29 : int v_8 = z->l - z->c;
664 : : {
665 : 29 : int ret = r_shortv(z);
666 [ + + ]: 29 : if (ret <= 0) return ret;
667 : : }
668 : 3 : z->c = z->l - v_8;
669 : : }
670 : : {
671 : 3 : int ret = slice_from_s(z, 1, s_9);
672 [ - + ]: 3 : if (ret < 0) return ret;
673 : : }
674 : 3 : return 0;
675 : : break;
676 : : }
677 : 18 : z->c = z->l - v_6;
678 : : }
679 : 18 : z->ket = z->c;
680 : : {
681 : 18 : int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
682 [ - + ]: 18 : if (ret < 0) return 0;
683 : 18 : z->c = ret;
684 : : }
685 : 18 : z->bra = z->c;
686 : : {
687 : 18 : int ret = slice_del(z);
688 [ - + ]: 18 : if (ret < 0) return ret;
689 : : }
690 : : } while (0);
6781 tgl@sss.pgh.pa.us 691 :CBC 2979 : return 1;
692 : : }
693 : :
1850 peter@eisentraut.org 694 : 3155 : static int r_Step_1c(struct SN_env * z) {
695 : 3155 : z->ket = z->c;
696 : : do {
69 tgl@sss.pgh.pa.us 697 :GNC 3155 : int v_1 = z->l - z->c;
698 [ + - + + ]: 3155 : if (z->c <= z->lb || z->p[z->c - 1] != 'y') goto lab0;
2729 tgl@sss.pgh.pa.us 699 :CBC 177 : z->c--;
69 tgl@sss.pgh.pa.us 700 :GNC 177 : break;
701 : 2978 : lab0:
702 : 2978 : z->c = z->l - v_1;
1850 peter@eisentraut.org 703 [ + - + + ]:CBC 2978 : if (z->c <= z->lb || z->p[z->c - 1] != 'Y') return 0;
2729 tgl@sss.pgh.pa.us 704 : 243 : z->c--;
705 : : } while (0);
1850 peter@eisentraut.org 706 : 420 : z->bra = z->c;
707 [ + + ]: 420 : if (out_grouping_b_U(z, g_v, 97, 121, 0)) return 0;
69 tgl@sss.pgh.pa.us 708 [ + - ]:GNC 177 : if (z->c > z->lb) goto lab1;
2729 tgl@sss.pgh.pa.us 709 :UBC 0 : return 0;
69 tgl@sss.pgh.pa.us 710 :GNC 177 : lab1:
711 : : {
712 : 177 : int ret = slice_from_s(z, 1, s_10);
6781 tgl@sss.pgh.pa.us 713 [ - + ]:CBC 177 : if (ret < 0) return ret;
714 : : }
715 : 177 : return 1;
716 : : }
717 : :
1850 peter@eisentraut.org 718 : 3155 : static int r_Step_2(struct SN_env * z) {
719 : : int among_var;
720 : 3155 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 721 [ + - + + :GNC 3155 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1864192 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
+ + ]
722 : 1246 : among_var = find_among_b(z, a_7, 25, 0);
390 tgl@sss.pgh.pa.us 723 [ + + ]:CBC 1246 : if (!among_var) return 0;
1850 peter@eisentraut.org 724 : 29 : z->bra = z->c;
725 : : {
69 tgl@sss.pgh.pa.us 726 :GNC 29 : int ret = r_R1(z);
2729 tgl@sss.pgh.pa.us 727 [ - + ]:CBC 29 : if (ret <= 0) return ret;
728 : : }
1850 peter@eisentraut.org 729 [ - - - - : 29 : switch (among_var) {
- - + + -
- - - - -
- - - ]
6781 tgl@sss.pgh.pa.us 730 :UBC 0 : case 1:
731 : : {
69 tgl@sss.pgh.pa.us 732 :UNC 0 : int ret = slice_from_s(z, 4, s_11);
6781 tgl@sss.pgh.pa.us 733 [ # # ]:UBC 0 : if (ret < 0) return ret;
734 : : }
735 : 0 : break;
736 : 0 : case 2:
737 : : {
69 tgl@sss.pgh.pa.us 738 :UNC 0 : int ret = slice_from_s(z, 4, s_12);
6781 tgl@sss.pgh.pa.us 739 [ # # ]:UBC 0 : if (ret < 0) return ret;
740 : : }
741 : 0 : break;
742 : 0 : case 3:
743 : : {
69 tgl@sss.pgh.pa.us 744 :UNC 0 : int ret = slice_from_s(z, 4, s_13);
6781 tgl@sss.pgh.pa.us 745 [ # # ]:UBC 0 : if (ret < 0) return ret;
746 : : }
747 : 0 : break;
748 : 0 : case 4:
749 : : {
69 tgl@sss.pgh.pa.us 750 :UNC 0 : int ret = slice_from_s(z, 4, s_14);
6781 tgl@sss.pgh.pa.us 751 [ # # ]:UBC 0 : if (ret < 0) return ret;
752 : : }
753 : 0 : break;
754 : 0 : case 5:
755 : : {
69 tgl@sss.pgh.pa.us 756 :UNC 0 : int ret = slice_from_s(z, 3, s_15);
6781 tgl@sss.pgh.pa.us 757 [ # # ]:UBC 0 : if (ret < 0) return ret;
758 : : }
759 : 0 : break;
760 : 0 : case 6:
761 : : {
69 tgl@sss.pgh.pa.us 762 :UNC 0 : int ret = slice_from_s(z, 3, s_16);
6781 tgl@sss.pgh.pa.us 763 [ # # ]:UBC 0 : if (ret < 0) return ret;
764 : : }
765 : 0 : break;
6781 tgl@sss.pgh.pa.us 766 :CBC 23 : case 7:
767 : : {
69 tgl@sss.pgh.pa.us 768 :GNC 23 : int ret = slice_from_s(z, 3, s_17);
6781 tgl@sss.pgh.pa.us 769 [ - + ]:CBC 23 : if (ret < 0) return ret;
770 : : }
771 : 23 : break;
772 : 6 : case 8:
773 : : {
69 tgl@sss.pgh.pa.us 774 :GNC 6 : int ret = slice_from_s(z, 2, s_18);
6781 tgl@sss.pgh.pa.us 775 [ - + ]:CBC 6 : if (ret < 0) return ret;
776 : : }
777 : 6 : break;
6781 tgl@sss.pgh.pa.us 778 :UBC 0 : case 9:
779 : : {
69 tgl@sss.pgh.pa.us 780 :UNC 0 : int ret = slice_from_s(z, 3, s_19);
6781 tgl@sss.pgh.pa.us 781 [ # # ]:UBC 0 : if (ret < 0) return ret;
782 : : }
783 : 0 : break;
784 : 0 : case 10:
785 : : {
69 tgl@sss.pgh.pa.us 786 :UNC 0 : int ret = slice_from_s(z, 3, s_20);
6781 tgl@sss.pgh.pa.us 787 [ # # ]:UBC 0 : if (ret < 0) return ret;
788 : : }
789 : 0 : break;
790 : 0 : case 11:
791 : : {
69 tgl@sss.pgh.pa.us 792 :UNC 0 : int ret = slice_from_s(z, 3, s_21);
6781 tgl@sss.pgh.pa.us 793 [ # # ]:UBC 0 : if (ret < 0) return ret;
794 : : }
795 : 0 : break;
796 : 0 : case 12:
797 : : {
69 tgl@sss.pgh.pa.us 798 :UNC 0 : int ret = slice_from_s(z, 3, s_22);
6781 tgl@sss.pgh.pa.us 799 [ # # ]:UBC 0 : if (ret < 0) return ret;
800 : : }
801 : 0 : break;
802 : 0 : case 13:
803 : : {
69 tgl@sss.pgh.pa.us 804 :UNC 0 : int ret = slice_from_s(z, 2, s_23);
6781 tgl@sss.pgh.pa.us 805 [ # # ]:UBC 0 : if (ret < 0) return ret;
806 : : }
807 : 0 : break;
808 : 0 : case 14:
69 tgl@sss.pgh.pa.us 809 [ # # # # ]:UNC 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'l') return 0;
810 : 0 : z->c--;
811 : : {
812 : 0 : int ret = slice_from_s(z, 2, s_24);
6781 tgl@sss.pgh.pa.us 813 [ # # ]:UBC 0 : if (ret < 0) return ret;
814 : : }
815 : 0 : break;
816 : 0 : case 15:
817 : : {
69 tgl@sss.pgh.pa.us 818 :UNC 0 : int ret = slice_from_s(z, 4, s_25);
819 [ # # ]: 0 : if (ret < 0) return ret;
820 : : }
821 : 0 : break;
822 : 0 : case 16:
1850 peter@eisentraut.org 823 [ # # ]:UBC 0 : if (in_grouping_b_U(z, g_valid_LI, 99, 116, 0)) return 0;
824 : : {
69 tgl@sss.pgh.pa.us 825 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 826 [ # # ]:UBC 0 : if (ret < 0) return ret;
827 : : }
828 : 0 : break;
829 : : }
6781 tgl@sss.pgh.pa.us 830 :CBC 29 : return 1;
831 : : }
832 : :
1850 peter@eisentraut.org 833 : 3155 : static int r_Step_3(struct SN_env * z) {
834 : : int among_var;
835 : 3155 : z->ket = z->c;
836 [ + - + + : 3155 : if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((528928 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
+ + ]
69 tgl@sss.pgh.pa.us 837 :GNC 722 : among_var = find_among_b(z, a_8, 9, 0);
390 tgl@sss.pgh.pa.us 838 [ + - ]:CBC 722 : if (!among_var) return 0;
1850 peter@eisentraut.org 839 :UBC 0 : z->bra = z->c;
840 : : {
69 tgl@sss.pgh.pa.us 841 :UNC 0 : int ret = r_R1(z);
2729 tgl@sss.pgh.pa.us 842 [ # # ]:UBC 0 : if (ret <= 0) return ret;
843 : : }
1850 peter@eisentraut.org 844 [ # # # # : 0 : switch (among_var) {
# # # ]
6781 tgl@sss.pgh.pa.us 845 : 0 : case 1:
846 : : {
69 tgl@sss.pgh.pa.us 847 :UNC 0 : int ret = slice_from_s(z, 4, s_26);
6781 tgl@sss.pgh.pa.us 848 [ # # ]:UBC 0 : if (ret < 0) return ret;
849 : : }
850 : 0 : break;
851 : 0 : case 2:
852 : : {
69 tgl@sss.pgh.pa.us 853 :UNC 0 : int ret = slice_from_s(z, 3, s_27);
6781 tgl@sss.pgh.pa.us 854 [ # # ]:UBC 0 : if (ret < 0) return ret;
855 : : }
856 : 0 : break;
857 : 0 : case 3:
858 : : {
69 tgl@sss.pgh.pa.us 859 :UNC 0 : int ret = slice_from_s(z, 2, s_28);
6781 tgl@sss.pgh.pa.us 860 [ # # ]:UBC 0 : if (ret < 0) return ret;
861 : : }
862 : 0 : break;
863 : 0 : case 4:
864 : : {
69 tgl@sss.pgh.pa.us 865 :UNC 0 : int ret = slice_from_s(z, 2, s_29);
6781 tgl@sss.pgh.pa.us 866 [ # # ]:UBC 0 : if (ret < 0) return ret;
867 : : }
868 : 0 : break;
869 : 0 : case 5:
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 : 0 : break;
875 : 0 : case 6:
876 : : {
69 tgl@sss.pgh.pa.us 877 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 878 [ # # ]:UBC 0 : if (ret <= 0) return ret;
879 : : }
880 : : {
69 tgl@sss.pgh.pa.us 881 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 882 [ # # ]:UBC 0 : if (ret < 0) return ret;
883 : : }
884 : 0 : break;
885 : : }
886 : 0 : return 1;
887 : : }
888 : :
1850 peter@eisentraut.org 889 :CBC 3155 : static int r_Step_4(struct SN_env * z) {
890 : : int among_var;
891 : 3155 : z->ket = z->c;
892 [ + - + + : 3155 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1864232 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
+ + ]
69 tgl@sss.pgh.pa.us 893 :GNC 1729 : among_var = find_among_b(z, a_9, 18, 0);
390 tgl@sss.pgh.pa.us 894 [ + + ]:CBC 1729 : if (!among_var) return 0;
1850 peter@eisentraut.org 895 : 424 : z->bra = z->c;
896 : : {
69 tgl@sss.pgh.pa.us 897 :GNC 424 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 898 [ + + ]:CBC 424 : if (ret <= 0) return ret;
899 : : }
1850 peter@eisentraut.org 900 [ + - - ]: 44 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 901 : 44 : case 1:
902 : : {
69 tgl@sss.pgh.pa.us 903 :GNC 44 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 904 [ - + ]:CBC 44 : if (ret < 0) return ret;
905 : : }
906 : 44 : break;
6781 tgl@sss.pgh.pa.us 907 :UBC 0 : case 2:
908 : : do {
69 tgl@sss.pgh.pa.us 909 :UNC 0 : int v_1 = z->l - z->c;
910 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 's') goto lab0;
2729 tgl@sss.pgh.pa.us 911 :UBC 0 : z->c--;
69 tgl@sss.pgh.pa.us 912 :UNC 0 : break;
913 : 0 : lab0:
914 : 0 : z->c = z->l - v_1;
1850 peter@eisentraut.org 915 [ # # # # ]:UBC 0 : if (z->c <= z->lb || z->p[z->c - 1] != 't') return 0;
2729 tgl@sss.pgh.pa.us 916 : 0 : z->c--;
917 : : } while (0);
918 : : {
69 tgl@sss.pgh.pa.us 919 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 920 [ # # ]:UBC 0 : if (ret < 0) return ret;
921 : : }
922 : 0 : break;
923 : : }
6781 tgl@sss.pgh.pa.us 924 :CBC 44 : return 1;
925 : : }
926 : :
1850 peter@eisentraut.org 927 : 3155 : static int r_Step_5(struct SN_env * z) {
928 : : int among_var;
929 : 3155 : z->ket = z->c;
930 [ + - + + : 3155 : if (z->c <= z->lb || (z->p[z->c - 1] != 101 && z->p[z->c - 1] != 108)) return 0;
+ + ]
69 tgl@sss.pgh.pa.us 931 :GNC 453 : among_var = find_among_b(z, a_10, 2, 0);
390 tgl@sss.pgh.pa.us 932 [ - + ]:CBC 453 : if (!among_var) return 0;
1850 peter@eisentraut.org 933 : 453 : z->bra = z->c;
934 [ + + - ]: 453 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 935 : 405 : case 1:
936 : : do {
937 : : {
69 tgl@sss.pgh.pa.us 938 :GNC 405 : int ret = r_R2(z);
939 [ + + ]: 405 : if (ret == 0) goto lab0;
6781 tgl@sss.pgh.pa.us 940 [ - + ]:CBC 119 : if (ret < 0) return ret;
941 : : }
69 tgl@sss.pgh.pa.us 942 :GNC 119 : break;
943 : 286 : lab0:
944 : : {
945 : 286 : int ret = r_R1(z);
946 [ + + ]: 286 : if (ret <= 0) return ret;
947 : : }
948 : : {
949 : 195 : int v_1 = z->l - z->c;
950 : : {
951 : 195 : int ret = r_shortv(z);
952 [ + + ]: 195 : if (ret == 0) goto lab1;
953 [ - + ]: 90 : if (ret < 0) return ret;
954 : : }
955 : 90 : return 0;
956 : 105 : lab1:
957 : 105 : z->c = z->l - v_1;
958 : : }
959 : : } while (0);
960 : : {
961 : 224 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 962 [ - + ]:CBC 224 : if (ret < 0) return ret;
963 : : }
964 : 224 : break;
965 : 48 : case 2:
966 : : {
69 tgl@sss.pgh.pa.us 967 :GNC 48 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 968 [ + + ]:CBC 48 : if (ret <= 0) return ret;
969 : : }
1850 peter@eisentraut.org 970 [ + - + - ]: 3 : if (z->c <= z->lb || z->p[z->c - 1] != 'l') return 0;
2729 tgl@sss.pgh.pa.us 971 :UBC 0 : z->c--;
972 : : {
69 tgl@sss.pgh.pa.us 973 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 974 [ # # ]:UBC 0 : if (ret < 0) return ret;
975 : : }
976 : 0 : break;
977 : : }
6781 tgl@sss.pgh.pa.us 978 :CBC 224 : return 1;
979 : : }
980 : :
1850 peter@eisentraut.org 981 : 3425 : static int r_exception1(struct SN_env * z) {
982 : : int among_var;
983 : 3425 : z->bra = z->c;
984 [ + + + + : 3425 : if (z->c + 2 >= z->l || z->p[z->c + 2] >> 5 != 3 || !((42750482 >> (z->p[z->c + 2] & 0x1f)) & 1)) return 0;
+ + ]
69 tgl@sss.pgh.pa.us 985 :GNC 1491 : among_var = find_among(z, a_11, 15, 0);
390 tgl@sss.pgh.pa.us 986 [ + + ]:CBC 1491 : if (!among_var) return 0;
1850 peter@eisentraut.org 987 : 18 : z->ket = z->c;
988 [ - + ]: 18 : if (z->c < z->l) return 0;
989 [ - + - - : 18 : switch (among_var) {
- - - - -
- - - ]
6781 tgl@sss.pgh.pa.us 990 :UBC 0 : case 1:
991 : : {
69 tgl@sss.pgh.pa.us 992 :UNC 0 : int ret = slice_from_s(z, 3, s_30);
6781 tgl@sss.pgh.pa.us 993 [ # # ]:UBC 0 : if (ret < 0) return ret;
994 : : }
995 : 0 : break;
6781 tgl@sss.pgh.pa.us 996 :CBC 18 : case 2:
997 : : {
69 tgl@sss.pgh.pa.us 998 :GNC 18 : int ret = slice_from_s(z, 3, s_31);
6781 tgl@sss.pgh.pa.us 999 [ - + ]:CBC 18 : if (ret < 0) return ret;
1000 : : }
1001 : 18 : break;
6781 tgl@sss.pgh.pa.us 1002 :UBC 0 : case 3:
1003 : : {
69 tgl@sss.pgh.pa.us 1004 :UNC 0 : int ret = slice_from_s(z, 3, s_32);
6781 tgl@sss.pgh.pa.us 1005 [ # # ]:UBC 0 : if (ret < 0) return ret;
1006 : : }
1007 : 0 : break;
1008 : 0 : case 4:
1009 : : {
69 tgl@sss.pgh.pa.us 1010 :UNC 0 : int ret = slice_from_s(z, 5, s_33);
6781 tgl@sss.pgh.pa.us 1011 [ # # ]:UBC 0 : if (ret < 0) return ret;
1012 : : }
1013 : 0 : break;
1014 : 0 : case 5:
1015 : : {
69 tgl@sss.pgh.pa.us 1016 :UNC 0 : int ret = slice_from_s(z, 4, s_34);
6781 tgl@sss.pgh.pa.us 1017 [ # # ]:UBC 0 : if (ret < 0) return ret;
1018 : : }
1019 : 0 : break;
1020 : 0 : case 6:
1021 : : {
69 tgl@sss.pgh.pa.us 1022 :UNC 0 : int ret = slice_from_s(z, 5, s_35);
6781 tgl@sss.pgh.pa.us 1023 [ # # ]:UBC 0 : if (ret < 0) return ret;
1024 : : }
1025 : 0 : break;
1026 : 0 : case 7:
1027 : : {
69 tgl@sss.pgh.pa.us 1028 :UNC 0 : int ret = slice_from_s(z, 4, s_36);
6781 tgl@sss.pgh.pa.us 1029 [ # # ]:UBC 0 : if (ret < 0) return ret;
1030 : : }
1031 : 0 : break;
1032 : 0 : case 8:
1033 : : {
69 tgl@sss.pgh.pa.us 1034 :UNC 0 : int ret = slice_from_s(z, 5, s_37);
6781 tgl@sss.pgh.pa.us 1035 [ # # ]:UBC 0 : if (ret < 0) return ret;
1036 : : }
1037 : 0 : break;
1038 : : }
6781 tgl@sss.pgh.pa.us 1039 :CBC 18 : return 1;
1040 : : }
1041 : :
1850 peter@eisentraut.org 1042 : 3155 : static int r_postlude(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 1043 [ + + ]:GNC 3155 : if (!((SN_local *)z)->b_Y_found) return 0;
1044 : 264 : while (1) {
1045 : 528 : int v_1 = z->c;
1046 : 813 : while (1) {
1047 : 1341 : int v_2 = z->c;
1850 peter@eisentraut.org 1048 :CBC 1341 : z->bra = z->c;
1049 [ + + + + ]: 1341 : if (z->c == z->l || z->p[z->c] != 'Y') goto lab1;
2729 tgl@sss.pgh.pa.us 1050 : 264 : z->c++;
1850 peter@eisentraut.org 1051 : 264 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 1052 :GNC 264 : z->c = v_2;
6781 tgl@sss.pgh.pa.us 1053 :CBC 264 : break;
1054 : 1077 : lab1:
69 tgl@sss.pgh.pa.us 1055 :GNC 1077 : z->c = v_2;
1056 : : {
1057 : 1077 : int ret = skip_utf8(z->p, z->c, z->l, 1);
6781 tgl@sss.pgh.pa.us 1058 [ + + ]:CBC 1077 : if (ret < 0) goto lab0;
1850 peter@eisentraut.org 1059 : 813 : z->c = ret;
1060 : : }
1061 : : }
1062 : : {
69 tgl@sss.pgh.pa.us 1063 :GNC 264 : int ret = slice_from_s(z, 1, s_38);
6781 tgl@sss.pgh.pa.us 1064 [ - + ]:CBC 264 : if (ret < 0) return ret;
1065 : : }
1066 : 264 : continue;
1067 : 264 : lab0:
69 tgl@sss.pgh.pa.us 1068 :GNC 264 : z->c = v_1;
6781 tgl@sss.pgh.pa.us 1069 :CBC 264 : break;
1070 : : }
1071 : 264 : return 1;
1072 : : }
1073 : :
1850 peter@eisentraut.org 1074 : 3425 : extern int english_UTF_8_stem(struct SN_env * z) {
1075 : : do {
69 tgl@sss.pgh.pa.us 1076 :GNC 3425 : int v_1 = z->c;
1077 : : {
1078 : 3425 : int ret = r_exception1(z);
1079 [ + + ]: 3425 : if (ret == 0) goto lab0;
6781 tgl@sss.pgh.pa.us 1080 [ - + ]:CBC 18 : if (ret < 0) return ret;
1081 : : }
69 tgl@sss.pgh.pa.us 1082 :GNC 18 : break;
1083 : 3407 : lab0:
1084 : 3407 : z->c = v_1;
1085 : : {
1086 : 3407 : int v_2 = z->c;
1087 : : {
1088 : 3407 : int ret = skip_utf8(z->p, z->c, z->l, 3);
1089 [ + + ]: 3407 : if (ret < 0) goto lab2;
2729 tgl@sss.pgh.pa.us 1090 :CBC 3155 : z->c = ret;
1091 : : }
69 tgl@sss.pgh.pa.us 1092 :GNC 3155 : goto lab1;
1093 : 252 : lab2:
1094 : 252 : z->c = v_2;
1095 : : }
1096 : 252 : break;
1097 : 3155 : lab1:
1098 : 3155 : z->c = v_1;
1099 : : {
1100 : 3155 : int ret = r_prelude(z);
2729 tgl@sss.pgh.pa.us 1101 [ - + ]:CBC 3155 : if (ret < 0) return ret;
1102 : : }
1103 : : {
69 tgl@sss.pgh.pa.us 1104 :GNC 3155 : int ret = r_mark_regions(z);
2729 tgl@sss.pgh.pa.us 1105 [ - + ]:CBC 3155 : if (ret < 0) return ret;
1106 : : }
1850 peter@eisentraut.org 1107 : 3155 : z->lb = z->c; z->c = z->l;
1108 : : {
69 tgl@sss.pgh.pa.us 1109 :GNC 3155 : int v_3 = z->l - z->c;
1110 : : {
1111 : 3155 : int ret = r_Step_1a(z);
6781 tgl@sss.pgh.pa.us 1112 [ - + ]:CBC 3155 : if (ret < 0) return ret;
1113 : : }
69 tgl@sss.pgh.pa.us 1114 :GNC 3155 : z->c = z->l - v_3;
1115 : : }
1116 : : {
1117 : 3155 : int v_4 = z->l - z->c;
1118 : : {
1119 : 3155 : int ret = r_Step_1b(z);
6781 tgl@sss.pgh.pa.us 1120 [ - + ]:GBC 3155 : if (ret < 0) return ret;
1121 : : }
69 tgl@sss.pgh.pa.us 1122 :GNC 3155 : z->c = z->l - v_4;
1123 : : }
1124 : : {
1125 : 3155 : int v_5 = z->l - z->c;
1126 : : {
1127 : 3155 : int ret = r_Step_1c(z);
1128 [ - + ]: 3155 : if (ret < 0) return ret;
1129 : : }
1130 : 3155 : z->c = z->l - v_5;
1131 : : }
1132 : : {
1133 : 3155 : int v_6 = z->l - z->c;
1134 : : {
1135 : 3155 : int ret = r_Step_2(z);
1136 [ - + ]: 3155 : if (ret < 0) return ret;
1137 : : }
1138 : 3155 : z->c = z->l - v_6;
1139 : : }
1140 : : {
1141 : 3155 : int v_7 = z->l - z->c;
1142 : : {
1143 : 3155 : int ret = r_Step_3(z);
1144 [ - + ]: 3155 : if (ret < 0) return ret;
1145 : : }
1146 : 3155 : z->c = z->l - v_7;
1147 : : }
1148 : : {
1149 : 3155 : int v_8 = z->l - z->c;
1150 : : {
1151 : 3155 : int ret = r_Step_4(z);
1152 [ - + ]: 3155 : if (ret < 0) return ret;
1153 : : }
1154 : 3155 : z->c = z->l - v_8;
1155 : : }
1156 : : {
1157 : 3155 : int v_9 = z->l - z->c;
1158 : : {
1159 : 3155 : int ret = r_Step_5(z);
1160 [ - + ]: 3155 : if (ret < 0) return ret;
1161 : : }
1162 : 3155 : z->c = z->l - v_9;
1163 : : }
6781 tgl@sss.pgh.pa.us 1164 :CBC 3155 : z->c = z->lb;
1165 : : {
69 tgl@sss.pgh.pa.us 1166 :GNC 3155 : int v_10 = z->c;
1167 : : {
1168 : 3155 : int ret = r_postlude(z);
6781 tgl@sss.pgh.pa.us 1169 [ - + ]:CBC 3155 : if (ret < 0) return ret;
1170 : : }
69 tgl@sss.pgh.pa.us 1171 :GNC 3155 : z->c = v_10;
1172 : : }
1173 : : } while (0);
6781 tgl@sss.pgh.pa.us 1174 :CBC 3425 : return 1;
1175 : : }
1176 : :
69 tgl@sss.pgh.pa.us 1177 :GNC 22 : extern struct SN_env * english_UTF_8_create_env(void) {
1178 : 22 : struct SN_env * z = SN_new_env(sizeof(SN_local));
1179 [ + - ]: 22 : if (z) {
1180 : 22 : ((SN_local *)z)->b_Y_found = 0;
1181 : 22 : ((SN_local *)z)->i_p2 = 0;
1182 : 22 : ((SN_local *)z)->i_p1 = 0;
1183 : : }
1184 : 22 : return z;
1185 : : }
1186 : :
69 tgl@sss.pgh.pa.us 1187 :UNC 0 : extern void english_UTF_8_close_env(struct SN_env * z) {
1188 : 0 : SN_delete_env(z);
1189 : 0 : }
1190 : :
|
