Age Owner TLA Line data Source code
1 : /* Generated by Snowball 2.2.0 - https://snowballstem.org/ */
2 :
3 : #include "header.h"
4 :
5 : #ifdef __cplusplus
6 : extern "C" {
7 : #endif
8 : extern int spanish_UTF_8_stem(struct SN_env * z);
9 : #ifdef __cplusplus
10 : }
11 : #endif
12 : static int r_residual_suffix(struct SN_env * z);
13 : static int r_verb_suffix(struct SN_env * z);
14 : static int r_y_verb_suffix(struct SN_env * z);
15 : static int r_standard_suffix(struct SN_env * z);
16 : static int r_attached_pronoun(struct SN_env * z);
17 : static int r_R2(struct SN_env * z);
18 : static int r_R1(struct SN_env * z);
19 : static int r_RV(struct SN_env * z);
20 : static int r_mark_regions(struct SN_env * z);
21 : static int r_postlude(struct SN_env * z);
22 : #ifdef __cplusplus
23 : extern "C" {
24 : #endif
25 :
26 :
27 : extern struct SN_env * spanish_UTF_8_create_env(void);
28 : extern void spanish_UTF_8_close_env(struct SN_env * z);
29 :
30 :
31 : #ifdef __cplusplus
32 : }
33 : #endif
34 : static const symbol s_0_1[2] = { 0xC3, 0xA1 };
35 : static const symbol s_0_2[2] = { 0xC3, 0xA9 };
36 : static const symbol s_0_3[2] = { 0xC3, 0xAD };
37 : static const symbol s_0_4[2] = { 0xC3, 0xB3 };
38 : static const symbol s_0_5[2] = { 0xC3, 0xBA };
39 :
40 : static const struct among a_0[6] =
41 : {
42 : { 0, 0, -1, 6, 0},
43 : { 2, s_0_1, 0, 1, 0},
44 : { 2, s_0_2, 0, 2, 0},
45 : { 2, s_0_3, 0, 3, 0},
46 : { 2, s_0_4, 0, 4, 0},
47 : { 2, s_0_5, 0, 5, 0}
48 : };
49 :
50 : static const symbol s_1_0[2] = { 'l', 'a' };
51 : static const symbol s_1_1[4] = { 's', 'e', 'l', 'a' };
52 : static const symbol s_1_2[2] = { 'l', 'e' };
53 : static const symbol s_1_3[2] = { 'm', 'e' };
54 : static const symbol s_1_4[2] = { 's', 'e' };
55 : static const symbol s_1_5[2] = { 'l', 'o' };
56 : static const symbol s_1_6[4] = { 's', 'e', 'l', 'o' };
57 : static const symbol s_1_7[3] = { 'l', 'a', 's' };
58 : static const symbol s_1_8[5] = { 's', 'e', 'l', 'a', 's' };
59 : static const symbol s_1_9[3] = { 'l', 'e', 's' };
60 : static const symbol s_1_10[3] = { 'l', 'o', 's' };
61 : static const symbol s_1_11[5] = { 's', 'e', 'l', 'o', 's' };
62 : static const symbol s_1_12[3] = { 'n', 'o', 's' };
63 :
64 : static const struct among a_1[13] =
65 : {
66 : { 2, s_1_0, -1, -1, 0},
67 : { 4, s_1_1, 0, -1, 0},
68 : { 2, s_1_2, -1, -1, 0},
69 : { 2, s_1_3, -1, -1, 0},
70 : { 2, s_1_4, -1, -1, 0},
71 : { 2, s_1_5, -1, -1, 0},
72 : { 4, s_1_6, 5, -1, 0},
73 : { 3, s_1_7, -1, -1, 0},
74 : { 5, s_1_8, 7, -1, 0},
75 : { 3, s_1_9, -1, -1, 0},
76 : { 3, s_1_10, -1, -1, 0},
77 : { 5, s_1_11, 10, -1, 0},
78 : { 3, s_1_12, -1, -1, 0}
79 : };
80 :
81 : static const symbol s_2_0[4] = { 'a', 'n', 'd', 'o' };
82 : static const symbol s_2_1[5] = { 'i', 'e', 'n', 'd', 'o' };
83 : static const symbol s_2_2[5] = { 'y', 'e', 'n', 'd', 'o' };
84 : static const symbol s_2_3[5] = { 0xC3, 0xA1, 'n', 'd', 'o' };
85 : static const symbol s_2_4[6] = { 'i', 0xC3, 0xA9, 'n', 'd', 'o' };
86 : static const symbol s_2_5[2] = { 'a', 'r' };
87 : static const symbol s_2_6[2] = { 'e', 'r' };
88 : static const symbol s_2_7[2] = { 'i', 'r' };
89 : static const symbol s_2_8[3] = { 0xC3, 0xA1, 'r' };
90 : static const symbol s_2_9[3] = { 0xC3, 0xA9, 'r' };
91 : static const symbol s_2_10[3] = { 0xC3, 0xAD, 'r' };
92 :
93 : static const struct among a_2[11] =
94 : {
95 : { 4, s_2_0, -1, 6, 0},
96 : { 5, s_2_1, -1, 6, 0},
97 : { 5, s_2_2, -1, 7, 0},
98 : { 5, s_2_3, -1, 2, 0},
99 : { 6, s_2_4, -1, 1, 0},
100 : { 2, s_2_5, -1, 6, 0},
101 : { 2, s_2_6, -1, 6, 0},
102 : { 2, s_2_7, -1, 6, 0},
103 : { 3, s_2_8, -1, 3, 0},
104 : { 3, s_2_9, -1, 4, 0},
105 : { 3, s_2_10, -1, 5, 0}
106 : };
107 :
108 : static const symbol s_3_0[2] = { 'i', 'c' };
109 : static const symbol s_3_1[2] = { 'a', 'd' };
110 : static const symbol s_3_2[2] = { 'o', 's' };
111 : static const symbol s_3_3[2] = { 'i', 'v' };
112 :
113 : static const struct among a_3[4] =
114 : {
115 : { 2, s_3_0, -1, -1, 0},
116 : { 2, s_3_1, -1, -1, 0},
117 : { 2, s_3_2, -1, -1, 0},
118 : { 2, s_3_3, -1, 1, 0}
119 : };
120 :
121 : static const symbol s_4_0[4] = { 'a', 'b', 'l', 'e' };
122 : static const symbol s_4_1[4] = { 'i', 'b', 'l', 'e' };
123 : static const symbol s_4_2[4] = { 'a', 'n', 't', 'e' };
124 :
125 : static const struct among a_4[3] =
126 : {
127 : { 4, s_4_0, -1, 1, 0},
128 : { 4, s_4_1, -1, 1, 0},
129 : { 4, s_4_2, -1, 1, 0}
130 : };
131 :
132 : static const symbol s_5_0[2] = { 'i', 'c' };
133 : static const symbol s_5_1[4] = { 'a', 'b', 'i', 'l' };
134 : static const symbol s_5_2[2] = { 'i', 'v' };
135 :
136 : static const struct among a_5[3] =
137 : {
138 : { 2, s_5_0, -1, 1, 0},
139 : { 4, s_5_1, -1, 1, 0},
140 : { 2, s_5_2, -1, 1, 0}
141 : };
142 :
143 : static const symbol s_6_0[3] = { 'i', 'c', 'a' };
144 : static const symbol s_6_1[5] = { 'a', 'n', 'c', 'i', 'a' };
145 : static const symbol s_6_2[5] = { 'e', 'n', 'c', 'i', 'a' };
146 : static const symbol s_6_3[5] = { 'a', 'd', 'o', 'r', 'a' };
147 : static const symbol s_6_4[3] = { 'o', 's', 'a' };
148 : static const symbol s_6_5[4] = { 'i', 's', 't', 'a' };
149 : static const symbol s_6_6[3] = { 'i', 'v', 'a' };
150 : static const symbol s_6_7[4] = { 'a', 'n', 'z', 'a' };
151 : static const symbol s_6_8[6] = { 'l', 'o', 'g', 0xC3, 0xAD, 'a' };
152 : static const symbol s_6_9[4] = { 'i', 'd', 'a', 'd' };
153 : static const symbol s_6_10[4] = { 'a', 'b', 'l', 'e' };
154 : static const symbol s_6_11[4] = { 'i', 'b', 'l', 'e' };
155 : static const symbol s_6_12[4] = { 'a', 'n', 't', 'e' };
156 : static const symbol s_6_13[5] = { 'm', 'e', 'n', 't', 'e' };
157 : static const symbol s_6_14[6] = { 'a', 'm', 'e', 'n', 't', 'e' };
158 : static const symbol s_6_15[6] = { 'a', 'c', 'i', 0xC3, 0xB3, 'n' };
159 : static const symbol s_6_16[6] = { 'u', 'c', 'i', 0xC3, 0xB3, 'n' };
160 : static const symbol s_6_17[3] = { 'i', 'c', 'o' };
161 : static const symbol s_6_18[4] = { 'i', 's', 'm', 'o' };
162 : static const symbol s_6_19[3] = { 'o', 's', 'o' };
163 : static const symbol s_6_20[7] = { 'a', 'm', 'i', 'e', 'n', 't', 'o' };
164 : static const symbol s_6_21[7] = { 'i', 'm', 'i', 'e', 'n', 't', 'o' };
165 : static const symbol s_6_22[3] = { 'i', 'v', 'o' };
166 : static const symbol s_6_23[4] = { 'a', 'd', 'o', 'r' };
167 : static const symbol s_6_24[4] = { 'i', 'c', 'a', 's' };
168 : static const symbol s_6_25[6] = { 'a', 'n', 'c', 'i', 'a', 's' };
169 : static const symbol s_6_26[6] = { 'e', 'n', 'c', 'i', 'a', 's' };
170 : static const symbol s_6_27[6] = { 'a', 'd', 'o', 'r', 'a', 's' };
171 : static const symbol s_6_28[4] = { 'o', 's', 'a', 's' };
172 : static const symbol s_6_29[5] = { 'i', 's', 't', 'a', 's' };
173 : static const symbol s_6_30[4] = { 'i', 'v', 'a', 's' };
174 : static const symbol s_6_31[5] = { 'a', 'n', 'z', 'a', 's' };
175 : static const symbol s_6_32[7] = { 'l', 'o', 'g', 0xC3, 0xAD, 'a', 's' };
176 : static const symbol s_6_33[6] = { 'i', 'd', 'a', 'd', 'e', 's' };
177 : static const symbol s_6_34[5] = { 'a', 'b', 'l', 'e', 's' };
178 : static const symbol s_6_35[5] = { 'i', 'b', 'l', 'e', 's' };
179 : static const symbol s_6_36[7] = { 'a', 'c', 'i', 'o', 'n', 'e', 's' };
180 : static const symbol s_6_37[7] = { 'u', 'c', 'i', 'o', 'n', 'e', 's' };
181 : static const symbol s_6_38[6] = { 'a', 'd', 'o', 'r', 'e', 's' };
182 : static const symbol s_6_39[5] = { 'a', 'n', 't', 'e', 's' };
183 : static const symbol s_6_40[4] = { 'i', 'c', 'o', 's' };
184 : static const symbol s_6_41[5] = { 'i', 's', 'm', 'o', 's' };
185 : static const symbol s_6_42[4] = { 'o', 's', 'o', 's' };
186 : static const symbol s_6_43[8] = { 'a', 'm', 'i', 'e', 'n', 't', 'o', 's' };
187 : static const symbol s_6_44[8] = { 'i', 'm', 'i', 'e', 'n', 't', 'o', 's' };
188 : static const symbol s_6_45[4] = { 'i', 'v', 'o', 's' };
189 :
190 : static const struct among a_6[46] =
191 : {
192 : { 3, s_6_0, -1, 1, 0},
193 : { 5, s_6_1, -1, 2, 0},
194 : { 5, s_6_2, -1, 5, 0},
195 : { 5, s_6_3, -1, 2, 0},
196 : { 3, s_6_4, -1, 1, 0},
197 : { 4, s_6_5, -1, 1, 0},
198 : { 3, s_6_6, -1, 9, 0},
199 : { 4, s_6_7, -1, 1, 0},
200 : { 6, s_6_8, -1, 3, 0},
201 : { 4, s_6_9, -1, 8, 0},
202 : { 4, s_6_10, -1, 1, 0},
203 : { 4, s_6_11, -1, 1, 0},
204 : { 4, s_6_12, -1, 2, 0},
205 : { 5, s_6_13, -1, 7, 0},
206 : { 6, s_6_14, 13, 6, 0},
207 : { 6, s_6_15, -1, 2, 0},
208 : { 6, s_6_16, -1, 4, 0},
209 : { 3, s_6_17, -1, 1, 0},
210 : { 4, s_6_18, -1, 1, 0},
211 : { 3, s_6_19, -1, 1, 0},
212 : { 7, s_6_20, -1, 1, 0},
213 : { 7, s_6_21, -1, 1, 0},
214 : { 3, s_6_22, -1, 9, 0},
215 : { 4, s_6_23, -1, 2, 0},
216 : { 4, s_6_24, -1, 1, 0},
217 : { 6, s_6_25, -1, 2, 0},
218 : { 6, s_6_26, -1, 5, 0},
219 : { 6, s_6_27, -1, 2, 0},
220 : { 4, s_6_28, -1, 1, 0},
221 : { 5, s_6_29, -1, 1, 0},
222 : { 4, s_6_30, -1, 9, 0},
223 : { 5, s_6_31, -1, 1, 0},
224 : { 7, s_6_32, -1, 3, 0},
225 : { 6, s_6_33, -1, 8, 0},
226 : { 5, s_6_34, -1, 1, 0},
227 : { 5, s_6_35, -1, 1, 0},
228 : { 7, s_6_36, -1, 2, 0},
229 : { 7, s_6_37, -1, 4, 0},
230 : { 6, s_6_38, -1, 2, 0},
231 : { 5, s_6_39, -1, 2, 0},
232 : { 4, s_6_40, -1, 1, 0},
233 : { 5, s_6_41, -1, 1, 0},
234 : { 4, s_6_42, -1, 1, 0},
235 : { 8, s_6_43, -1, 1, 0},
236 : { 8, s_6_44, -1, 1, 0},
237 : { 4, s_6_45, -1, 9, 0}
238 : };
239 :
240 : static const symbol s_7_0[2] = { 'y', 'a' };
241 : static const symbol s_7_1[2] = { 'y', 'e' };
242 : static const symbol s_7_2[3] = { 'y', 'a', 'n' };
243 : static const symbol s_7_3[3] = { 'y', 'e', 'n' };
244 : static const symbol s_7_4[5] = { 'y', 'e', 'r', 'o', 'n' };
245 : static const symbol s_7_5[5] = { 'y', 'e', 'n', 'd', 'o' };
246 : static const symbol s_7_6[2] = { 'y', 'o' };
247 : static const symbol s_7_7[3] = { 'y', 'a', 's' };
248 : static const symbol s_7_8[3] = { 'y', 'e', 's' };
249 : static const symbol s_7_9[4] = { 'y', 'a', 'i', 's' };
250 : static const symbol s_7_10[5] = { 'y', 'a', 'm', 'o', 's' };
251 : static const symbol s_7_11[3] = { 'y', 0xC3, 0xB3 };
252 :
253 : static const struct among a_7[12] =
254 : {
255 : { 2, s_7_0, -1, 1, 0},
256 : { 2, s_7_1, -1, 1, 0},
257 : { 3, s_7_2, -1, 1, 0},
258 : { 3, s_7_3, -1, 1, 0},
259 : { 5, s_7_4, -1, 1, 0},
260 : { 5, s_7_5, -1, 1, 0},
261 : { 2, s_7_6, -1, 1, 0},
262 : { 3, s_7_7, -1, 1, 0},
263 : { 3, s_7_8, -1, 1, 0},
264 : { 4, s_7_9, -1, 1, 0},
265 : { 5, s_7_10, -1, 1, 0},
266 : { 3, s_7_11, -1, 1, 0}
267 : };
268 :
269 : static const symbol s_8_0[3] = { 'a', 'b', 'a' };
270 : static const symbol s_8_1[3] = { 'a', 'd', 'a' };
271 : static const symbol s_8_2[3] = { 'i', 'd', 'a' };
272 : static const symbol s_8_3[3] = { 'a', 'r', 'a' };
273 : static const symbol s_8_4[4] = { 'i', 'e', 'r', 'a' };
274 : static const symbol s_8_5[3] = { 0xC3, 0xAD, 'a' };
275 : static const symbol s_8_6[5] = { 'a', 'r', 0xC3, 0xAD, 'a' };
276 : static const symbol s_8_7[5] = { 'e', 'r', 0xC3, 0xAD, 'a' };
277 : static const symbol s_8_8[5] = { 'i', 'r', 0xC3, 0xAD, 'a' };
278 : static const symbol s_8_9[2] = { 'a', 'd' };
279 : static const symbol s_8_10[2] = { 'e', 'd' };
280 : static const symbol s_8_11[2] = { 'i', 'd' };
281 : static const symbol s_8_12[3] = { 'a', 's', 'e' };
282 : static const symbol s_8_13[4] = { 'i', 'e', 's', 'e' };
283 : static const symbol s_8_14[4] = { 'a', 's', 't', 'e' };
284 : static const symbol s_8_15[4] = { 'i', 's', 't', 'e' };
285 : static const symbol s_8_16[2] = { 'a', 'n' };
286 : static const symbol s_8_17[4] = { 'a', 'b', 'a', 'n' };
287 : static const symbol s_8_18[4] = { 'a', 'r', 'a', 'n' };
288 : static const symbol s_8_19[5] = { 'i', 'e', 'r', 'a', 'n' };
289 : static const symbol s_8_20[4] = { 0xC3, 0xAD, 'a', 'n' };
290 : static const symbol s_8_21[6] = { 'a', 'r', 0xC3, 0xAD, 'a', 'n' };
291 : static const symbol s_8_22[6] = { 'e', 'r', 0xC3, 0xAD, 'a', 'n' };
292 : static const symbol s_8_23[6] = { 'i', 'r', 0xC3, 0xAD, 'a', 'n' };
293 : static const symbol s_8_24[2] = { 'e', 'n' };
294 : static const symbol s_8_25[4] = { 'a', 's', 'e', 'n' };
295 : static const symbol s_8_26[5] = { 'i', 'e', 's', 'e', 'n' };
296 : static const symbol s_8_27[4] = { 'a', 'r', 'o', 'n' };
297 : static const symbol s_8_28[5] = { 'i', 'e', 'r', 'o', 'n' };
298 : static const symbol s_8_29[5] = { 'a', 'r', 0xC3, 0xA1, 'n' };
299 : static const symbol s_8_30[5] = { 'e', 'r', 0xC3, 0xA1, 'n' };
300 : static const symbol s_8_31[5] = { 'i', 'r', 0xC3, 0xA1, 'n' };
301 : static const symbol s_8_32[3] = { 'a', 'd', 'o' };
302 : static const symbol s_8_33[3] = { 'i', 'd', 'o' };
303 : static const symbol s_8_34[4] = { 'a', 'n', 'd', 'o' };
304 : static const symbol s_8_35[5] = { 'i', 'e', 'n', 'd', 'o' };
305 : static const symbol s_8_36[2] = { 'a', 'r' };
306 : static const symbol s_8_37[2] = { 'e', 'r' };
307 : static const symbol s_8_38[2] = { 'i', 'r' };
308 : static const symbol s_8_39[2] = { 'a', 's' };
309 : static const symbol s_8_40[4] = { 'a', 'b', 'a', 's' };
310 : static const symbol s_8_41[4] = { 'a', 'd', 'a', 's' };
311 : static const symbol s_8_42[4] = { 'i', 'd', 'a', 's' };
312 : static const symbol s_8_43[4] = { 'a', 'r', 'a', 's' };
313 : static const symbol s_8_44[5] = { 'i', 'e', 'r', 'a', 's' };
314 : static const symbol s_8_45[4] = { 0xC3, 0xAD, 'a', 's' };
315 : static const symbol s_8_46[6] = { 'a', 'r', 0xC3, 0xAD, 'a', 's' };
316 : static const symbol s_8_47[6] = { 'e', 'r', 0xC3, 0xAD, 'a', 's' };
317 : static const symbol s_8_48[6] = { 'i', 'r', 0xC3, 0xAD, 'a', 's' };
318 : static const symbol s_8_49[2] = { 'e', 's' };
319 : static const symbol s_8_50[4] = { 'a', 's', 'e', 's' };
320 : static const symbol s_8_51[5] = { 'i', 'e', 's', 'e', 's' };
321 : static const symbol s_8_52[5] = { 'a', 'b', 'a', 'i', 's' };
322 : static const symbol s_8_53[5] = { 'a', 'r', 'a', 'i', 's' };
323 : static const symbol s_8_54[6] = { 'i', 'e', 'r', 'a', 'i', 's' };
324 : static const symbol s_8_55[5] = { 0xC3, 0xAD, 'a', 'i', 's' };
325 : static const symbol s_8_56[7] = { 'a', 'r', 0xC3, 0xAD, 'a', 'i', 's' };
326 : static const symbol s_8_57[7] = { 'e', 'r', 0xC3, 0xAD, 'a', 'i', 's' };
327 : static const symbol s_8_58[7] = { 'i', 'r', 0xC3, 0xAD, 'a', 'i', 's' };
328 : static const symbol s_8_59[5] = { 'a', 's', 'e', 'i', 's' };
329 : static const symbol s_8_60[6] = { 'i', 'e', 's', 'e', 'i', 's' };
330 : static const symbol s_8_61[6] = { 'a', 's', 't', 'e', 'i', 's' };
331 : static const symbol s_8_62[6] = { 'i', 's', 't', 'e', 'i', 's' };
332 : static const symbol s_8_63[4] = { 0xC3, 0xA1, 'i', 's' };
333 : static const symbol s_8_64[4] = { 0xC3, 0xA9, 'i', 's' };
334 : static const symbol s_8_65[6] = { 'a', 'r', 0xC3, 0xA9, 'i', 's' };
335 : static const symbol s_8_66[6] = { 'e', 'r', 0xC3, 0xA9, 'i', 's' };
336 : static const symbol s_8_67[6] = { 'i', 'r', 0xC3, 0xA9, 'i', 's' };
337 : static const symbol s_8_68[4] = { 'a', 'd', 'o', 's' };
338 : static const symbol s_8_69[4] = { 'i', 'd', 'o', 's' };
339 : static const symbol s_8_70[4] = { 'a', 'm', 'o', 's' };
340 : static const symbol s_8_71[7] = { 0xC3, 0xA1, 'b', 'a', 'm', 'o', 's' };
341 : static const symbol s_8_72[7] = { 0xC3, 0xA1, 'r', 'a', 'm', 'o', 's' };
342 : static const symbol s_8_73[8] = { 'i', 0xC3, 0xA9, 'r', 'a', 'm', 'o', 's' };
343 : static const symbol s_8_74[6] = { 0xC3, 0xAD, 'a', 'm', 'o', 's' };
344 : static const symbol s_8_75[8] = { 'a', 'r', 0xC3, 0xAD, 'a', 'm', 'o', 's' };
345 : static const symbol s_8_76[8] = { 'e', 'r', 0xC3, 0xAD, 'a', 'm', 'o', 's' };
346 : static const symbol s_8_77[8] = { 'i', 'r', 0xC3, 0xAD, 'a', 'm', 'o', 's' };
347 : static const symbol s_8_78[4] = { 'e', 'm', 'o', 's' };
348 : static const symbol s_8_79[6] = { 'a', 'r', 'e', 'm', 'o', 's' };
349 : static const symbol s_8_80[6] = { 'e', 'r', 'e', 'm', 'o', 's' };
350 : static const symbol s_8_81[6] = { 'i', 'r', 'e', 'm', 'o', 's' };
351 : static const symbol s_8_82[7] = { 0xC3, 0xA1, 's', 'e', 'm', 'o', 's' };
352 : static const symbol s_8_83[8] = { 'i', 0xC3, 0xA9, 's', 'e', 'm', 'o', 's' };
353 : static const symbol s_8_84[4] = { 'i', 'm', 'o', 's' };
354 : static const symbol s_8_85[5] = { 'a', 'r', 0xC3, 0xA1, 's' };
355 : static const symbol s_8_86[5] = { 'e', 'r', 0xC3, 0xA1, 's' };
356 : static const symbol s_8_87[5] = { 'i', 'r', 0xC3, 0xA1, 's' };
357 : static const symbol s_8_88[3] = { 0xC3, 0xAD, 's' };
358 : static const symbol s_8_89[4] = { 'a', 'r', 0xC3, 0xA1 };
359 : static const symbol s_8_90[4] = { 'e', 'r', 0xC3, 0xA1 };
360 : static const symbol s_8_91[4] = { 'i', 'r', 0xC3, 0xA1 };
361 : static const symbol s_8_92[4] = { 'a', 'r', 0xC3, 0xA9 };
362 : static const symbol s_8_93[4] = { 'e', 'r', 0xC3, 0xA9 };
363 : static const symbol s_8_94[4] = { 'i', 'r', 0xC3, 0xA9 };
364 : static const symbol s_8_95[3] = { 'i', 0xC3, 0xB3 };
365 :
366 : static const struct among a_8[96] =
367 : {
368 : { 3, s_8_0, -1, 2, 0},
369 : { 3, s_8_1, -1, 2, 0},
370 : { 3, s_8_2, -1, 2, 0},
371 : { 3, s_8_3, -1, 2, 0},
372 : { 4, s_8_4, -1, 2, 0},
373 : { 3, s_8_5, -1, 2, 0},
374 : { 5, s_8_6, 5, 2, 0},
375 : { 5, s_8_7, 5, 2, 0},
376 : { 5, s_8_8, 5, 2, 0},
377 : { 2, s_8_9, -1, 2, 0},
378 : { 2, s_8_10, -1, 2, 0},
379 : { 2, s_8_11, -1, 2, 0},
380 : { 3, s_8_12, -1, 2, 0},
381 : { 4, s_8_13, -1, 2, 0},
382 : { 4, s_8_14, -1, 2, 0},
383 : { 4, s_8_15, -1, 2, 0},
384 : { 2, s_8_16, -1, 2, 0},
385 : { 4, s_8_17, 16, 2, 0},
386 : { 4, s_8_18, 16, 2, 0},
387 : { 5, s_8_19, 16, 2, 0},
388 : { 4, s_8_20, 16, 2, 0},
389 : { 6, s_8_21, 20, 2, 0},
390 : { 6, s_8_22, 20, 2, 0},
391 : { 6, s_8_23, 20, 2, 0},
392 : { 2, s_8_24, -1, 1, 0},
393 : { 4, s_8_25, 24, 2, 0},
394 : { 5, s_8_26, 24, 2, 0},
395 : { 4, s_8_27, -1, 2, 0},
396 : { 5, s_8_28, -1, 2, 0},
397 : { 5, s_8_29, -1, 2, 0},
398 : { 5, s_8_30, -1, 2, 0},
399 : { 5, s_8_31, -1, 2, 0},
400 : { 3, s_8_32, -1, 2, 0},
401 : { 3, s_8_33, -1, 2, 0},
402 : { 4, s_8_34, -1, 2, 0},
403 : { 5, s_8_35, -1, 2, 0},
404 : { 2, s_8_36, -1, 2, 0},
405 : { 2, s_8_37, -1, 2, 0},
406 : { 2, s_8_38, -1, 2, 0},
407 : { 2, s_8_39, -1, 2, 0},
408 : { 4, s_8_40, 39, 2, 0},
409 : { 4, s_8_41, 39, 2, 0},
410 : { 4, s_8_42, 39, 2, 0},
411 : { 4, s_8_43, 39, 2, 0},
412 : { 5, s_8_44, 39, 2, 0},
413 : { 4, s_8_45, 39, 2, 0},
414 : { 6, s_8_46, 45, 2, 0},
415 : { 6, s_8_47, 45, 2, 0},
416 : { 6, s_8_48, 45, 2, 0},
417 : { 2, s_8_49, -1, 1, 0},
418 : { 4, s_8_50, 49, 2, 0},
419 : { 5, s_8_51, 49, 2, 0},
420 : { 5, s_8_52, -1, 2, 0},
421 : { 5, s_8_53, -1, 2, 0},
422 : { 6, s_8_54, -1, 2, 0},
423 : { 5, s_8_55, -1, 2, 0},
424 : { 7, s_8_56, 55, 2, 0},
425 : { 7, s_8_57, 55, 2, 0},
426 : { 7, s_8_58, 55, 2, 0},
427 : { 5, s_8_59, -1, 2, 0},
428 : { 6, s_8_60, -1, 2, 0},
429 : { 6, s_8_61, -1, 2, 0},
430 : { 6, s_8_62, -1, 2, 0},
431 : { 4, s_8_63, -1, 2, 0},
432 : { 4, s_8_64, -1, 1, 0},
433 : { 6, s_8_65, 64, 2, 0},
434 : { 6, s_8_66, 64, 2, 0},
435 : { 6, s_8_67, 64, 2, 0},
436 : { 4, s_8_68, -1, 2, 0},
437 : { 4, s_8_69, -1, 2, 0},
438 : { 4, s_8_70, -1, 2, 0},
439 : { 7, s_8_71, 70, 2, 0},
440 : { 7, s_8_72, 70, 2, 0},
441 : { 8, s_8_73, 70, 2, 0},
442 : { 6, s_8_74, 70, 2, 0},
443 : { 8, s_8_75, 74, 2, 0},
444 : { 8, s_8_76, 74, 2, 0},
445 : { 8, s_8_77, 74, 2, 0},
446 : { 4, s_8_78, -1, 1, 0},
447 : { 6, s_8_79, 78, 2, 0},
448 : { 6, s_8_80, 78, 2, 0},
449 : { 6, s_8_81, 78, 2, 0},
450 : { 7, s_8_82, 78, 2, 0},
451 : { 8, s_8_83, 78, 2, 0},
452 : { 4, s_8_84, -1, 2, 0},
453 : { 5, s_8_85, -1, 2, 0},
454 : { 5, s_8_86, -1, 2, 0},
455 : { 5, s_8_87, -1, 2, 0},
456 : { 3, s_8_88, -1, 2, 0},
457 : { 4, s_8_89, -1, 2, 0},
458 : { 4, s_8_90, -1, 2, 0},
459 : { 4, s_8_91, -1, 2, 0},
460 : { 4, s_8_92, -1, 2, 0},
461 : { 4, s_8_93, -1, 2, 0},
462 : { 4, s_8_94, -1, 2, 0},
463 : { 3, s_8_95, -1, 2, 0}
464 : };
465 :
466 : static const symbol s_9_0[1] = { 'a' };
467 : static const symbol s_9_1[1] = { 'e' };
468 : static const symbol s_9_2[1] = { 'o' };
469 : static const symbol s_9_3[2] = { 'o', 's' };
470 : static const symbol s_9_4[2] = { 0xC3, 0xA1 };
471 : static const symbol s_9_5[2] = { 0xC3, 0xA9 };
472 : static const symbol s_9_6[2] = { 0xC3, 0xAD };
473 : static const symbol s_9_7[2] = { 0xC3, 0xB3 };
474 :
475 : static const struct among a_9[8] =
476 : {
477 : { 1, s_9_0, -1, 1, 0},
478 : { 1, s_9_1, -1, 2, 0},
479 : { 1, s_9_2, -1, 1, 0},
480 : { 2, s_9_3, -1, 1, 0},
481 : { 2, s_9_4, -1, 1, 0},
482 : { 2, s_9_5, -1, 2, 0},
483 : { 2, s_9_6, -1, 1, 0},
484 : { 2, s_9_7, -1, 1, 0}
485 : };
486 :
487 : static const unsigned char g_v[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 17, 4, 10 };
488 :
489 : static const symbol s_0[] = { 'a' };
490 : static const symbol s_1[] = { 'e' };
491 : static const symbol s_2[] = { 'i' };
492 : static const symbol s_3[] = { 'o' };
493 : static const symbol s_4[] = { 'u' };
494 : static const symbol s_5[] = { 'i', 'e', 'n', 'd', 'o' };
495 : static const symbol s_6[] = { 'a', 'n', 'd', 'o' };
496 : static const symbol s_7[] = { 'a', 'r' };
497 : static const symbol s_8[] = { 'e', 'r' };
498 : static const symbol s_9[] = { 'i', 'r' };
499 : static const symbol s_10[] = { 'i', 'c' };
500 : static const symbol s_11[] = { 'l', 'o', 'g' };
501 : static const symbol s_12[] = { 'u' };
502 : static const symbol s_13[] = { 'e', 'n', 't', 'e' };
503 : static const symbol s_14[] = { 'a', 't' };
504 : static const symbol s_15[] = { 'a', 't' };
505 :
779 peter 506 UBC 0 : static int r_mark_regions(struct SN_env * z) {
507 0 : z->I[2] = z->l;
508 0 : z->I[1] = z->l;
509 0 : z->I[0] = z->l;
510 0 : { int c1 = z->c;
511 0 : { int c2 = z->c;
512 0 : if (in_grouping_U(z, g_v, 97, 252, 0)) goto lab2;
513 0 : { int c3 = z->c;
514 0 : if (out_grouping_U(z, g_v, 97, 252, 0)) goto lab4;
515 : {
5710 tgl 516 0 : int ret = out_grouping_U(z, g_v, 97, 252, 1);
517 0 : if (ret < 0) goto lab4;
518 0 : z->c += ret;
519 : }
520 0 : goto lab3;
521 0 : lab4:
522 0 : z->c = c3;
779 peter 523 0 : if (in_grouping_U(z, g_v, 97, 252, 0)) goto lab2;
524 : {
5710 tgl 525 0 : int ret = in_grouping_U(z, g_v, 97, 252, 1);
526 0 : if (ret < 0) goto lab2;
527 0 : z->c += ret;
528 : }
529 : }
530 0 : lab3:
531 0 : goto lab1;
532 0 : lab2:
533 0 : z->c = c2;
779 peter 534 0 : if (out_grouping_U(z, g_v, 97, 252, 0)) goto lab0;
535 0 : { int c4 = z->c;
536 0 : if (out_grouping_U(z, g_v, 97, 252, 0)) goto lab6;
537 : {
5710 tgl 538 0 : int ret = out_grouping_U(z, g_v, 97, 252, 1);
539 0 : if (ret < 0) goto lab6;
540 0 : z->c += ret;
541 : }
542 0 : goto lab5;
543 0 : lab6:
544 0 : z->c = c4;
779 peter 545 0 : if (in_grouping_U(z, g_v, 97, 252, 0)) goto lab0;
546 0 : { int ret = skip_utf8(z->p, z->c, z->l, 1);
5710 tgl 547 0 : if (ret < 0) goto lab0;
779 peter 548 0 : z->c = ret;
549 : }
550 : }
5710 tgl 551 0 : lab5:
552 : ;
553 : }
554 0 : lab1:
779 peter 555 0 : z->I[2] = z->c;
5710 tgl 556 0 : lab0:
557 0 : z->c = c1;
558 : }
779 peter 559 0 : { int c5 = z->c;
560 : {
5710 tgl 561 0 : int ret = out_grouping_U(z, g_v, 97, 252, 1);
562 0 : if (ret < 0) goto lab7;
563 0 : z->c += ret;
564 : }
565 : {
566 0 : int ret = in_grouping_U(z, g_v, 97, 252, 1);
567 0 : if (ret < 0) goto lab7;
568 0 : z->c += ret;
569 : }
779 peter 570 0 : z->I[1] = z->c;
571 : {
5710 tgl 572 0 : int ret = out_grouping_U(z, g_v, 97, 252, 1);
573 0 : if (ret < 0) goto lab7;
574 0 : z->c += ret;
575 : }
576 : {
577 0 : int ret = in_grouping_U(z, g_v, 97, 252, 1);
578 0 : if (ret < 0) goto lab7;
579 0 : z->c += ret;
580 : }
779 peter 581 0 : z->I[0] = z->c;
5710 tgl 582 0 : lab7:
583 0 : z->c = c5;
584 : }
585 0 : return 1;
586 : }
587 :
779 peter 588 0 : static int r_postlude(struct SN_env * z) {
589 : int among_var;
590 0 : while(1) {
591 0 : int c1 = z->c;
592 0 : z->bra = z->c;
593 0 : if (z->c + 1 >= z->l || z->p[z->c + 1] >> 5 != 5 || !((67641858 >> (z->p[z->c + 1] & 0x1f)) & 1)) among_var = 6; else
1658 tgl 594 0 : among_var = find_among(z, a_0, 6);
5710 595 0 : if (!(among_var)) goto lab0;
779 peter 596 0 : z->ket = z->c;
597 0 : switch (among_var) {
5710 tgl 598 0 : case 1:
779 peter 599 0 : { int ret = slice_from_s(z, 1, s_0);
5710 tgl 600 0 : if (ret < 0) return ret;
601 : }
602 0 : break;
603 0 : case 2:
779 peter 604 0 : { int ret = slice_from_s(z, 1, s_1);
5710 tgl 605 0 : if (ret < 0) return ret;
606 : }
607 0 : break;
608 0 : case 3:
779 peter 609 0 : { int ret = slice_from_s(z, 1, s_2);
5710 tgl 610 0 : if (ret < 0) return ret;
611 : }
612 0 : break;
613 0 : case 4:
779 peter 614 0 : { int ret = slice_from_s(z, 1, s_3);
5710 tgl 615 0 : if (ret < 0) return ret;
616 : }
617 0 : break;
618 0 : case 5:
779 peter 619 0 : { int ret = slice_from_s(z, 1, s_4);
5710 tgl 620 0 : if (ret < 0) return ret;
621 : }
622 0 : break;
623 0 : case 6:
779 peter 624 0 : { int ret = skip_utf8(z->p, z->c, z->l, 1);
5710 tgl 625 0 : if (ret < 0) goto lab0;
779 peter 626 0 : z->c = ret;
627 : }
5710 tgl 628 0 : break;
629 : }
630 0 : continue;
631 0 : lab0:
632 0 : z->c = c1;
633 0 : break;
634 : }
635 0 : return 1;
636 : }
637 :
779 peter 638 0 : static int r_RV(struct SN_env * z) {
639 0 : if (!(z->I[2] <= z->c)) return 0;
5710 tgl 640 0 : return 1;
641 : }
642 :
779 peter 643 0 : static int r_R1(struct SN_env * z) {
644 0 : if (!(z->I[1] <= z->c)) return 0;
5710 tgl 645 0 : return 1;
646 : }
647 :
779 peter 648 0 : static int r_R2(struct SN_env * z) {
649 0 : if (!(z->I[0] <= z->c)) return 0;
5710 tgl 650 0 : return 1;
651 : }
652 :
779 peter 653 0 : static int r_attached_pronoun(struct SN_env * z) {
654 : int among_var;
655 0 : z->ket = z->c;
656 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((557090 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1658 tgl 657 0 : if (!(find_among_b(z, a_1, 13))) return 0;
779 peter 658 0 : z->bra = z->c;
659 0 : if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 111 && z->p[z->c - 1] != 114)) return 0;
1658 tgl 660 0 : among_var = find_among_b(z, a_2, 11);
5710 661 0 : if (!(among_var)) return 0;
779 peter 662 0 : { int ret = r_RV(z);
1658 tgl 663 0 : if (ret <= 0) return ret;
664 : }
779 peter 665 0 : switch (among_var) {
5710 tgl 666 0 : case 1:
779 peter 667 0 : z->bra = z->c;
668 0 : { int ret = slice_from_s(z, 5, s_5);
5710 tgl 669 0 : if (ret < 0) return ret;
670 : }
671 0 : break;
672 0 : case 2:
779 peter 673 0 : z->bra = z->c;
674 0 : { int ret = slice_from_s(z, 4, s_6);
5710 tgl 675 0 : if (ret < 0) return ret;
676 : }
677 0 : break;
678 0 : case 3:
779 peter 679 0 : z->bra = z->c;
680 0 : { int ret = slice_from_s(z, 2, s_7);
5710 tgl 681 0 : if (ret < 0) return ret;
682 : }
683 0 : break;
684 0 : case 4:
779 peter 685 0 : z->bra = z->c;
686 0 : { int ret = slice_from_s(z, 2, s_8);
5710 tgl 687 0 : if (ret < 0) return ret;
688 : }
689 0 : break;
690 0 : case 5:
779 peter 691 0 : z->bra = z->c;
692 0 : { int ret = slice_from_s(z, 2, s_9);
5710 tgl 693 0 : if (ret < 0) return ret;
694 : }
695 0 : break;
696 0 : case 6:
779 peter 697 0 : { int ret = slice_del(z);
5710 tgl 698 0 : if (ret < 0) return ret;
699 : }
700 0 : break;
701 0 : case 7:
779 peter 702 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') return 0;
1658 tgl 703 0 : z->c--;
779 peter 704 0 : { int ret = slice_del(z);
5710 tgl 705 0 : if (ret < 0) return ret;
706 : }
707 0 : break;
708 : }
709 0 : return 1;
710 : }
711 :
779 peter 712 0 : static int r_standard_suffix(struct SN_env * z) {
713 : int among_var;
714 0 : z->ket = z->c;
715 0 : if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((835634 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1658 tgl 716 0 : among_var = find_among_b(z, a_6, 46);
5710 717 0 : if (!(among_var)) return 0;
779 peter 718 0 : z->bra = z->c;
719 0 : switch (among_var) {
5710 tgl 720 0 : case 1:
779 peter 721 0 : { int ret = r_R2(z);
1658 tgl 722 0 : if (ret <= 0) return ret;
723 : }
779 peter 724 0 : { int ret = slice_del(z);
5710 tgl 725 0 : if (ret < 0) return ret;
726 : }
727 0 : break;
728 0 : case 2:
779 peter 729 0 : { int ret = r_R2(z);
1658 tgl 730 0 : if (ret <= 0) return ret;
731 : }
779 peter 732 0 : { int ret = slice_del(z);
5710 tgl 733 0 : if (ret < 0) return ret;
734 : }
779 peter 735 0 : { int m1 = z->l - z->c; (void)m1;
736 0 : z->ket = z->c;
737 0 : if (!(eq_s_b(z, 2, s_10))) { z->c = z->l - m1; goto lab0; }
738 0 : z->bra = z->c;
739 0 : { int ret = r_R2(z);
1658 tgl 740 0 : if (ret == 0) { z->c = z->l - m1; goto lab0; }
5710 741 0 : if (ret < 0) return ret;
742 : }
779 peter 743 0 : { int ret = slice_del(z);
5710 tgl 744 0 : if (ret < 0) return ret;
745 : }
746 0 : lab0:
747 : ;
748 : }
749 0 : break;
750 0 : case 3:
779 peter 751 0 : { int ret = r_R2(z);
1658 tgl 752 0 : if (ret <= 0) return ret;
753 : }
779 peter 754 0 : { int ret = slice_from_s(z, 3, s_11);
5710 tgl 755 0 : if (ret < 0) return ret;
756 : }
757 0 : break;
758 0 : case 4:
779 peter 759 0 : { int ret = r_R2(z);
1658 tgl 760 0 : if (ret <= 0) return ret;
761 : }
779 peter 762 0 : { int ret = slice_from_s(z, 1, s_12);
5710 tgl 763 0 : if (ret < 0) return ret;
764 : }
765 0 : break;
766 0 : case 5:
779 peter 767 0 : { int ret = r_R2(z);
1658 tgl 768 0 : if (ret <= 0) return ret;
769 : }
779 peter 770 0 : { int ret = slice_from_s(z, 4, s_13);
5710 tgl 771 0 : if (ret < 0) return ret;
772 : }
773 0 : break;
774 0 : case 6:
779 peter 775 0 : { int ret = r_R1(z);
1658 tgl 776 0 : if (ret <= 0) return ret;
777 : }
779 peter 778 0 : { int ret = slice_del(z);
5710 tgl 779 0 : if (ret < 0) return ret;
780 : }
779 peter 781 0 : { int m2 = z->l - z->c; (void)m2;
782 0 : z->ket = z->c;
783 0 : if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4718616 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m2; goto lab1; }
1658 tgl 784 0 : among_var = find_among_b(z, a_3, 4);
785 0 : if (!(among_var)) { z->c = z->l - m2; goto lab1; }
779 peter 786 0 : z->bra = z->c;
787 0 : { int ret = r_R2(z);
1658 tgl 788 0 : if (ret == 0) { z->c = z->l - m2; goto lab1; }
5710 789 0 : if (ret < 0) return ret;
790 : }
779 peter 791 0 : { int ret = slice_del(z);
5710 tgl 792 0 : if (ret < 0) return ret;
793 : }
794 : switch (among_var) {
795 0 : case 1:
779 peter 796 0 : z->ket = z->c;
797 0 : if (!(eq_s_b(z, 2, s_14))) { z->c = z->l - m2; goto lab1; }
798 0 : z->bra = z->c;
799 0 : { int ret = r_R2(z);
1658 tgl 800 0 : if (ret == 0) { z->c = z->l - m2; goto lab1; }
5710 801 0 : if (ret < 0) return ret;
802 : }
779 peter 803 0 : { int ret = slice_del(z);
5710 tgl 804 0 : if (ret < 0) return ret;
805 : }
806 0 : break;
807 : }
808 0 : lab1:
809 : ;
810 : }
811 0 : break;
812 0 : case 7:
779 peter 813 0 : { int ret = r_R2(z);
1658 tgl 814 0 : if (ret <= 0) return ret;
815 : }
779 peter 816 0 : { int ret = slice_del(z);
5710 tgl 817 0 : if (ret < 0) return ret;
818 : }
779 peter 819 0 : { int m3 = z->l - z->c; (void)m3;
820 0 : z->ket = z->c;
821 0 : if (z->c - 3 <= z->lb || z->p[z->c - 1] != 101) { z->c = z->l - m3; goto lab2; }
1658 tgl 822 0 : if (!(find_among_b(z, a_4, 3))) { z->c = z->l - m3; goto lab2; }
779 peter 823 0 : z->bra = z->c;
824 0 : { int ret = r_R2(z);
1658 tgl 825 0 : if (ret == 0) { z->c = z->l - m3; goto lab2; }
826 0 : if (ret < 0) return ret;
827 : }
779 peter 828 0 : { int ret = slice_del(z);
1658 tgl 829 0 : if (ret < 0) return ret;
830 : }
5710 831 0 : lab2:
832 : ;
833 : }
834 0 : break;
835 0 : case 8:
779 peter 836 0 : { int ret = r_R2(z);
1658 tgl 837 0 : if (ret <= 0) return ret;
838 : }
779 peter 839 0 : { int ret = slice_del(z);
5710 tgl 840 0 : if (ret < 0) return ret;
841 : }
779 peter 842 0 : { int m4 = z->l - z->c; (void)m4;
843 0 : z->ket = z->c;
844 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 - m4; goto lab3; }
1658 tgl 845 0 : if (!(find_among_b(z, a_5, 3))) { z->c = z->l - m4; goto lab3; }
779 peter 846 0 : z->bra = z->c;
847 0 : { int ret = r_R2(z);
1658 tgl 848 0 : if (ret == 0) { z->c = z->l - m4; goto lab3; }
849 0 : if (ret < 0) return ret;
850 : }
779 peter 851 0 : { int ret = slice_del(z);
1658 tgl 852 0 : if (ret < 0) return ret;
853 : }
5710 854 0 : lab3:
855 : ;
856 : }
857 0 : break;
858 0 : case 9:
779 peter 859 0 : { int ret = r_R2(z);
1658 tgl 860 0 : if (ret <= 0) return ret;
861 : }
779 peter 862 0 : { int ret = slice_del(z);
5710 tgl 863 0 : if (ret < 0) return ret;
864 : }
779 peter 865 0 : { int m5 = z->l - z->c; (void)m5;
866 0 : z->ket = z->c;
867 0 : if (!(eq_s_b(z, 2, s_15))) { z->c = z->l - m5; goto lab4; }
868 0 : z->bra = z->c;
869 0 : { int ret = r_R2(z);
1658 tgl 870 0 : if (ret == 0) { z->c = z->l - m5; goto lab4; }
5710 871 0 : if (ret < 0) return ret;
872 : }
779 peter 873 0 : { int ret = slice_del(z);
5710 tgl 874 0 : if (ret < 0) return ret;
875 : }
876 0 : lab4:
877 : ;
878 : }
879 0 : break;
880 : }
881 0 : return 1;
882 : }
883 :
779 peter 884 0 : static int r_y_verb_suffix(struct SN_env * z) {
885 :
886 : { int mlimit1;
887 0 : if (z->c < z->I[2]) return 0;
888 0 : mlimit1 = z->lb; z->lb = z->I[2];
889 0 : z->ket = z->c;
890 0 : if (!(find_among_b(z, a_7, 12))) { z->lb = mlimit1; return 0; }
891 0 : z->bra = z->c;
1658 tgl 892 0 : z->lb = mlimit1;
893 : }
779 peter 894 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') return 0;
1658 tgl 895 0 : z->c--;
779 peter 896 0 : { int ret = slice_del(z);
1658 tgl 897 0 : if (ret < 0) return ret;
898 : }
5710 899 0 : return 1;
900 : }
901 :
779 peter 902 0 : static int r_verb_suffix(struct SN_env * z) {
903 : int among_var;
904 :
905 : { int mlimit1;
906 0 : if (z->c < z->I[2]) return 0;
907 0 : mlimit1 = z->lb; z->lb = z->I[2];
908 0 : z->ket = z->c;
909 0 : among_var = find_among_b(z, a_8, 96);
1658 tgl 910 0 : if (!(among_var)) { z->lb = mlimit1; return 0; }
779 peter 911 0 : z->bra = z->c;
1658 tgl 912 0 : z->lb = mlimit1;
913 : }
779 peter 914 0 : switch (among_var) {
5710 tgl 915 0 : case 1:
779 peter 916 0 : { int m2 = z->l - z->c; (void)m2;
917 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') { z->c = z->l - m2; goto lab0; }
1658 tgl 918 0 : z->c--;
779 peter 919 0 : { int m_test3 = z->l - z->c;
920 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'g') { z->c = z->l - m2; goto lab0; }
1658 tgl 921 0 : z->c--;
922 0 : z->c = z->l - m_test3;
923 : }
5710 924 0 : lab0:
925 : ;
926 : }
779 peter 927 0 : z->bra = z->c;
928 0 : { int ret = slice_del(z);
5710 tgl 929 0 : if (ret < 0) return ret;
930 : }
931 0 : break;
932 0 : case 2:
779 peter 933 0 : { int ret = slice_del(z);
5710 tgl 934 0 : if (ret < 0) return ret;
935 : }
936 0 : break;
937 : }
938 0 : return 1;
939 : }
940 :
779 peter 941 0 : static int r_residual_suffix(struct SN_env * z) {
942 : int among_var;
943 0 : z->ket = z->c;
944 0 : among_var = find_among_b(z, a_9, 8);
5710 tgl 945 0 : if (!(among_var)) return 0;
779 peter 946 0 : z->bra = z->c;
947 0 : switch (among_var) {
5710 tgl 948 0 : case 1:
779 peter 949 0 : { int ret = r_RV(z);
1658 tgl 950 0 : if (ret <= 0) return ret;
951 : }
779 peter 952 0 : { int ret = slice_del(z);
5710 tgl 953 0 : if (ret < 0) return ret;
954 : }
955 0 : break;
956 0 : case 2:
779 peter 957 0 : { int ret = r_RV(z);
1658 tgl 958 0 : if (ret <= 0) return ret;
959 : }
779 peter 960 0 : { int ret = slice_del(z);
5710 tgl 961 0 : if (ret < 0) return ret;
962 : }
779 peter 963 0 : { int m1 = z->l - z->c; (void)m1;
964 0 : z->ket = z->c;
965 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') { z->c = z->l - m1; goto lab0; }
1658 tgl 966 0 : z->c--;
779 peter 967 0 : z->bra = z->c;
968 0 : { int m_test2 = z->l - z->c;
969 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'g') { z->c = z->l - m1; goto lab0; }
1658 tgl 970 0 : z->c--;
971 0 : z->c = z->l - m_test2;
972 : }
779 peter 973 0 : { int ret = r_RV(z);
1658 tgl 974 0 : if (ret == 0) { z->c = z->l - m1; goto lab0; }
5710 975 0 : if (ret < 0) return ret;
976 : }
779 peter 977 0 : { int ret = slice_del(z);
5710 tgl 978 0 : if (ret < 0) return ret;
979 : }
980 0 : lab0:
981 : ;
982 : }
983 0 : break;
984 : }
985 0 : return 1;
986 : }
987 :
779 peter 988 0 : extern int spanish_UTF_8_stem(struct SN_env * z) {
989 :
990 0 : { int ret = r_mark_regions(z);
1658 tgl 991 0 : if (ret < 0) return ret;
992 : }
779 peter 993 0 : z->lb = z->c; z->c = z->l;
994 :
995 0 : { int m1 = z->l - z->c; (void)m1;
996 0 : { int ret = r_attached_pronoun(z);
5710 tgl 997 0 : if (ret < 0) return ret;
998 : }
1658 999 0 : z->c = z->l - m1;
1000 : }
779 peter 1001 0 : { int m2 = z->l - z->c; (void)m2;
1002 0 : { int m3 = z->l - z->c; (void)m3;
1003 0 : { int ret = r_standard_suffix(z);
1035 1004 0 : if (ret == 0) goto lab2;
5710 tgl 1005 0 : if (ret < 0) return ret;
1006 : }
1035 peter 1007 0 : goto lab1;
1008 0 : lab2:
1658 tgl 1009 0 : z->c = z->l - m3;
779 peter 1010 0 : { int ret = r_y_verb_suffix(z);
1035 1011 0 : if (ret == 0) goto lab3;
5710 tgl 1012 0 : if (ret < 0) return ret;
1013 : }
1035 peter 1014 0 : goto lab1;
1015 0 : lab3:
1658 tgl 1016 0 : z->c = z->l - m3;
779 peter 1017 0 : { int ret = r_verb_suffix(z);
1035 1018 0 : if (ret == 0) goto lab0;
5710 tgl 1019 0 : if (ret < 0) return ret;
1020 : }
1021 : }
1035 peter 1022 0 : lab1:
1023 0 : lab0:
1658 tgl 1024 0 : z->c = z->l - m2;
1025 : }
779 peter 1026 0 : { int m4 = z->l - z->c; (void)m4;
1027 0 : { int ret = r_residual_suffix(z);
5710 tgl 1028 0 : if (ret < 0) return ret;
1029 : }
1658 1030 0 : z->c = z->l - m4;
1031 : }
5710 1032 0 : z->c = z->lb;
779 peter 1033 0 : { int c5 = z->c;
1034 0 : { int ret = r_postlude(z);
5710 tgl 1035 0 : if (ret < 0) return ret;
1036 : }
1658 1037 0 : z->c = c5;
1038 : }
5710 1039 0 : return 1;
1040 : }
1041 :
779 peter 1042 0 : extern struct SN_env * spanish_UTF_8_create_env(void) { return SN_create_env(0, 3); }
1043 :
5710 tgl 1044 0 : extern void spanish_UTF_8_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1045 :
|
