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_ISO_8859_1_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_ISO_8859_1_create_env(void);
28 : extern void spanish_ISO_8859_1_close_env(struct SN_env * z);
29 :
30 :
31 : #ifdef __cplusplus
32 : }
33 : #endif
34 : static const symbol s_0_1[1] = { 0xE1 };
35 : static const symbol s_0_2[1] = { 0xE9 };
36 : static const symbol s_0_3[1] = { 0xED };
37 : static const symbol s_0_4[1] = { 0xF3 };
38 : static const symbol s_0_5[1] = { 0xFA };
39 :
40 : static const struct among a_0[6] =
41 : {
42 : { 0, 0, -1, 6, 0},
43 : { 1, s_0_1, 0, 1, 0},
44 : { 1, s_0_2, 0, 2, 0},
45 : { 1, s_0_3, 0, 3, 0},
46 : { 1, s_0_4, 0, 4, 0},
47 : { 1, 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[4] = { 0xE1, 'n', 'd', 'o' };
85 : static const symbol s_2_4[5] = { 'i', 0xE9, '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[2] = { 0xE1, 'r' };
90 : static const symbol s_2_9[2] = { 0xE9, 'r' };
91 : static const symbol s_2_10[2] = { 0xED, '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 : { 4, s_2_3, -1, 2, 0},
99 : { 5, 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 : { 2, s_2_8, -1, 3, 0},
104 : { 2, s_2_9, -1, 4, 0},
105 : { 2, 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[5] = { 'l', 'o', 'g', 0xED, '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[5] = { 'a', 'c', 'i', 0xF3, 'n' };
159 : static const symbol s_6_16[5] = { 'u', 'c', 'i', 0xF3, '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[6] = { 'l', 'o', 'g', 0xED, '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 : { 5, 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 : { 5, s_6_15, -1, 2, 0},
208 : { 5, 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 : { 6, 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[2] = { 'y', 0xF3 };
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 : { 2, 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[2] = { 0xED, 'a' };
275 : static const symbol s_8_6[4] = { 'a', 'r', 0xED, 'a' };
276 : static const symbol s_8_7[4] = { 'e', 'r', 0xED, 'a' };
277 : static const symbol s_8_8[4] = { 'i', 'r', 0xED, '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[3] = { 0xED, 'a', 'n' };
290 : static const symbol s_8_21[5] = { 'a', 'r', 0xED, 'a', 'n' };
291 : static const symbol s_8_22[5] = { 'e', 'r', 0xED, 'a', 'n' };
292 : static const symbol s_8_23[5] = { 'i', 'r', 0xED, '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[4] = { 'a', 'r', 0xE1, 'n' };
299 : static const symbol s_8_30[4] = { 'e', 'r', 0xE1, 'n' };
300 : static const symbol s_8_31[4] = { 'i', 'r', 0xE1, '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[3] = { 0xED, 'a', 's' };
315 : static const symbol s_8_46[5] = { 'a', 'r', 0xED, 'a', 's' };
316 : static const symbol s_8_47[5] = { 'e', 'r', 0xED, 'a', 's' };
317 : static const symbol s_8_48[5] = { 'i', 'r', 0xED, '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[4] = { 0xED, 'a', 'i', 's' };
325 : static const symbol s_8_56[6] = { 'a', 'r', 0xED, 'a', 'i', 's' };
326 : static const symbol s_8_57[6] = { 'e', 'r', 0xED, 'a', 'i', 's' };
327 : static const symbol s_8_58[6] = { 'i', 'r', 0xED, '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[3] = { 0xE1, 'i', 's' };
333 : static const symbol s_8_64[3] = { 0xE9, 'i', 's' };
334 : static const symbol s_8_65[5] = { 'a', 'r', 0xE9, 'i', 's' };
335 : static const symbol s_8_66[5] = { 'e', 'r', 0xE9, 'i', 's' };
336 : static const symbol s_8_67[5] = { 'i', 'r', 0xE9, '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[6] = { 0xE1, 'b', 'a', 'm', 'o', 's' };
341 : static const symbol s_8_72[6] = { 0xE1, 'r', 'a', 'm', 'o', 's' };
342 : static const symbol s_8_73[7] = { 'i', 0xE9, 'r', 'a', 'm', 'o', 's' };
343 : static const symbol s_8_74[5] = { 0xED, 'a', 'm', 'o', 's' };
344 : static const symbol s_8_75[7] = { 'a', 'r', 0xED, 'a', 'm', 'o', 's' };
345 : static const symbol s_8_76[7] = { 'e', 'r', 0xED, 'a', 'm', 'o', 's' };
346 : static const symbol s_8_77[7] = { 'i', 'r', 0xED, '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[6] = { 0xE1, 's', 'e', 'm', 'o', 's' };
352 : static const symbol s_8_83[7] = { 'i', 0xE9, 's', 'e', 'm', 'o', 's' };
353 : static const symbol s_8_84[4] = { 'i', 'm', 'o', 's' };
354 : static const symbol s_8_85[4] = { 'a', 'r', 0xE1, 's' };
355 : static const symbol s_8_86[4] = { 'e', 'r', 0xE1, 's' };
356 : static const symbol s_8_87[4] = { 'i', 'r', 0xE1, 's' };
357 : static const symbol s_8_88[2] = { 0xED, 's' };
358 : static const symbol s_8_89[3] = { 'a', 'r', 0xE1 };
359 : static const symbol s_8_90[3] = { 'e', 'r', 0xE1 };
360 : static const symbol s_8_91[3] = { 'i', 'r', 0xE1 };
361 : static const symbol s_8_92[3] = { 'a', 'r', 0xE9 };
362 : static const symbol s_8_93[3] = { 'e', 'r', 0xE9 };
363 : static const symbol s_8_94[3] = { 'i', 'r', 0xE9 };
364 : static const symbol s_8_95[2] = { 'i', 0xF3 };
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 : { 2, s_8_5, -1, 2, 0},
374 : { 4, s_8_6, 5, 2, 0},
375 : { 4, s_8_7, 5, 2, 0},
376 : { 4, 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 : { 3, s_8_20, 16, 2, 0},
389 : { 5, s_8_21, 20, 2, 0},
390 : { 5, s_8_22, 20, 2, 0},
391 : { 5, 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 : { 4, s_8_29, -1, 2, 0},
398 : { 4, s_8_30, -1, 2, 0},
399 : { 4, 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 : { 3, s_8_45, 39, 2, 0},
414 : { 5, s_8_46, 45, 2, 0},
415 : { 5, s_8_47, 45, 2, 0},
416 : { 5, 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 : { 4, s_8_55, -1, 2, 0},
424 : { 6, s_8_56, 55, 2, 0},
425 : { 6, s_8_57, 55, 2, 0},
426 : { 6, 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 : { 3, s_8_63, -1, 2, 0},
432 : { 3, s_8_64, -1, 1, 0},
433 : { 5, s_8_65, 64, 2, 0},
434 : { 5, s_8_66, 64, 2, 0},
435 : { 5, 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 : { 6, s_8_71, 70, 2, 0},
440 : { 6, s_8_72, 70, 2, 0},
441 : { 7, s_8_73, 70, 2, 0},
442 : { 5, s_8_74, 70, 2, 0},
443 : { 7, s_8_75, 74, 2, 0},
444 : { 7, s_8_76, 74, 2, 0},
445 : { 7, 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 : { 6, s_8_82, 78, 2, 0},
451 : { 7, s_8_83, 78, 2, 0},
452 : { 4, s_8_84, -1, 2, 0},
453 : { 4, s_8_85, -1, 2, 0},
454 : { 4, s_8_86, -1, 2, 0},
455 : { 4, s_8_87, -1, 2, 0},
456 : { 2, s_8_88, -1, 2, 0},
457 : { 3, s_8_89, -1, 2, 0},
458 : { 3, s_8_90, -1, 2, 0},
459 : { 3, s_8_91, -1, 2, 0},
460 : { 3, s_8_92, -1, 2, 0},
461 : { 3, s_8_93, -1, 2, 0},
462 : { 3, s_8_94, -1, 2, 0},
463 : { 2, 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[1] = { 0xE1 };
471 : static const symbol s_9_5[1] = { 0xE9 };
472 : static const symbol s_9_6[1] = { 0xED };
473 : static const symbol s_9_7[1] = { 0xF3 };
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 : { 1, s_9_4, -1, 1, 0},
482 : { 1, s_9_5, -1, 2, 0},
483 : { 1, s_9_6, -1, 1, 0},
484 : { 1, 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(z, g_v, 97, 252, 0)) goto lab2;
513 0 : { int c3 = z->c;
514 0 : if (out_grouping(z, g_v, 97, 252, 0)) goto lab4;
515 : {
5710 tgl 516 0 : int ret = out_grouping(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(z, g_v, 97, 252, 0)) goto lab2;
524 : {
5710 tgl 525 0 : int ret = in_grouping(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(z, g_v, 97, 252, 0)) goto lab0;
535 0 : { int c4 = z->c;
536 0 : if (out_grouping(z, g_v, 97, 252, 0)) goto lab6;
537 : {
5710 tgl 538 0 : int ret = out_grouping(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(z, g_v, 97, 252, 0)) goto lab0;
5710 tgl 546 0 : if (z->c >= z->l) goto lab0;
779 peter 547 0 : z->c++;
548 : }
5710 tgl 549 0 : lab5:
550 : ;
551 : }
552 0 : lab1:
779 peter 553 0 : z->I[2] = z->c;
5710 tgl 554 0 : lab0:
555 0 : z->c = c1;
556 : }
779 peter 557 0 : { int c5 = z->c;
558 : {
5710 tgl 559 0 : int ret = out_grouping(z, g_v, 97, 252, 1);
560 0 : if (ret < 0) goto lab7;
561 0 : z->c += ret;
562 : }
563 : {
564 0 : int ret = in_grouping(z, g_v, 97, 252, 1);
565 0 : if (ret < 0) goto lab7;
566 0 : z->c += ret;
567 : }
779 peter 568 0 : z->I[1] = z->c;
569 : {
5710 tgl 570 0 : int ret = out_grouping(z, g_v, 97, 252, 1);
571 0 : if (ret < 0) goto lab7;
572 0 : z->c += ret;
573 : }
574 : {
575 0 : int ret = in_grouping(z, g_v, 97, 252, 1);
576 0 : if (ret < 0) goto lab7;
577 0 : z->c += ret;
578 : }
779 peter 579 0 : z->I[0] = z->c;
5710 tgl 580 0 : lab7:
581 0 : z->c = c5;
582 : }
583 0 : return 1;
584 : }
585 :
779 peter 586 0 : static int r_postlude(struct SN_env * z) {
587 : int among_var;
588 0 : while(1) {
589 0 : int c1 = z->c;
590 0 : z->bra = z->c;
591 0 : if (z->c >= z->l || z->p[z->c + 0] >> 5 != 7 || !((67641858 >> (z->p[z->c + 0] & 0x1f)) & 1)) among_var = 6; else
1658 tgl 592 0 : among_var = find_among(z, a_0, 6);
5710 593 0 : if (!(among_var)) goto lab0;
779 peter 594 0 : z->ket = z->c;
595 0 : switch (among_var) {
5710 tgl 596 0 : case 1:
779 peter 597 0 : { int ret = slice_from_s(z, 1, s_0);
5710 tgl 598 0 : if (ret < 0) return ret;
599 : }
600 0 : break;
601 0 : case 2:
779 peter 602 0 : { int ret = slice_from_s(z, 1, s_1);
5710 tgl 603 0 : if (ret < 0) return ret;
604 : }
605 0 : break;
606 0 : case 3:
779 peter 607 0 : { int ret = slice_from_s(z, 1, s_2);
5710 tgl 608 0 : if (ret < 0) return ret;
609 : }
610 0 : break;
611 0 : case 4:
779 peter 612 0 : { int ret = slice_from_s(z, 1, s_3);
5710 tgl 613 0 : if (ret < 0) return ret;
614 : }
615 0 : break;
616 0 : case 5:
779 peter 617 0 : { int ret = slice_from_s(z, 1, s_4);
5710 tgl 618 0 : if (ret < 0) return ret;
619 : }
620 0 : break;
621 0 : case 6:
622 0 : if (z->c >= z->l) goto lab0;
779 peter 623 0 : z->c++;
5710 tgl 624 0 : break;
625 : }
626 0 : continue;
627 0 : lab0:
628 0 : z->c = c1;
629 0 : break;
630 : }
631 0 : return 1;
632 : }
633 :
779 peter 634 0 : static int r_RV(struct SN_env * z) {
635 0 : if (!(z->I[2] <= z->c)) return 0;
5710 tgl 636 0 : return 1;
637 : }
638 :
779 peter 639 0 : static int r_R1(struct SN_env * z) {
640 0 : if (!(z->I[1] <= z->c)) return 0;
5710 tgl 641 0 : return 1;
642 : }
643 :
779 peter 644 0 : static int r_R2(struct SN_env * z) {
645 0 : if (!(z->I[0] <= z->c)) return 0;
5710 tgl 646 0 : return 1;
647 : }
648 :
779 peter 649 0 : static int r_attached_pronoun(struct SN_env * z) {
650 : int among_var;
651 0 : z->ket = z->c;
652 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 653 0 : if (!(find_among_b(z, a_1, 13))) return 0;
779 peter 654 0 : z->bra = z->c;
655 0 : if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 111 && z->p[z->c - 1] != 114)) return 0;
1658 tgl 656 0 : among_var = find_among_b(z, a_2, 11);
5710 657 0 : if (!(among_var)) return 0;
779 peter 658 0 : { int ret = r_RV(z);
1658 tgl 659 0 : if (ret <= 0) return ret;
660 : }
779 peter 661 0 : switch (among_var) {
5710 tgl 662 0 : case 1:
779 peter 663 0 : z->bra = z->c;
664 0 : { int ret = slice_from_s(z, 5, s_5);
5710 tgl 665 0 : if (ret < 0) return ret;
666 : }
667 0 : break;
668 0 : case 2:
779 peter 669 0 : z->bra = z->c;
670 0 : { int ret = slice_from_s(z, 4, s_6);
5710 tgl 671 0 : if (ret < 0) return ret;
672 : }
673 0 : break;
674 0 : case 3:
779 peter 675 0 : z->bra = z->c;
676 0 : { int ret = slice_from_s(z, 2, s_7);
5710 tgl 677 0 : if (ret < 0) return ret;
678 : }
679 0 : break;
680 0 : case 4:
779 peter 681 0 : z->bra = z->c;
682 0 : { int ret = slice_from_s(z, 2, s_8);
5710 tgl 683 0 : if (ret < 0) return ret;
684 : }
685 0 : break;
686 0 : case 5:
779 peter 687 0 : z->bra = z->c;
688 0 : { int ret = slice_from_s(z, 2, s_9);
5710 tgl 689 0 : if (ret < 0) return ret;
690 : }
691 0 : break;
692 0 : case 6:
779 peter 693 0 : { int ret = slice_del(z);
5710 tgl 694 0 : if (ret < 0) return ret;
695 : }
696 0 : break;
697 0 : case 7:
779 peter 698 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') return 0;
1658 tgl 699 0 : z->c--;
779 peter 700 0 : { int ret = slice_del(z);
5710 tgl 701 0 : if (ret < 0) return ret;
702 : }
703 0 : break;
704 : }
705 0 : return 1;
706 : }
707 :
779 peter 708 0 : static int r_standard_suffix(struct SN_env * z) {
709 : int among_var;
710 0 : z->ket = z->c;
711 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 712 0 : among_var = find_among_b(z, a_6, 46);
5710 713 0 : if (!(among_var)) return 0;
779 peter 714 0 : z->bra = z->c;
715 0 : switch (among_var) {
5710 tgl 716 0 : case 1:
779 peter 717 0 : { int ret = r_R2(z);
1658 tgl 718 0 : if (ret <= 0) return ret;
719 : }
779 peter 720 0 : { int ret = slice_del(z);
5710 tgl 721 0 : if (ret < 0) return ret;
722 : }
723 0 : break;
724 0 : case 2:
779 peter 725 0 : { int ret = r_R2(z);
1658 tgl 726 0 : if (ret <= 0) return ret;
727 : }
779 peter 728 0 : { int ret = slice_del(z);
5710 tgl 729 0 : if (ret < 0) return ret;
730 : }
779 peter 731 0 : { int m1 = z->l - z->c; (void)m1;
732 0 : z->ket = z->c;
733 0 : if (!(eq_s_b(z, 2, s_10))) { z->c = z->l - m1; goto lab0; }
734 0 : z->bra = z->c;
735 0 : { int ret = r_R2(z);
1658 tgl 736 0 : if (ret == 0) { z->c = z->l - m1; goto lab0; }
5710 737 0 : if (ret < 0) return ret;
738 : }
779 peter 739 0 : { int ret = slice_del(z);
5710 tgl 740 0 : if (ret < 0) return ret;
741 : }
742 0 : lab0:
743 : ;
744 : }
745 0 : break;
746 0 : case 3:
779 peter 747 0 : { int ret = r_R2(z);
1658 tgl 748 0 : if (ret <= 0) return ret;
749 : }
779 peter 750 0 : { int ret = slice_from_s(z, 3, s_11);
5710 tgl 751 0 : if (ret < 0) return ret;
752 : }
753 0 : break;
754 0 : case 4:
779 peter 755 0 : { int ret = r_R2(z);
1658 tgl 756 0 : if (ret <= 0) return ret;
757 : }
779 peter 758 0 : { int ret = slice_from_s(z, 1, s_12);
5710 tgl 759 0 : if (ret < 0) return ret;
760 : }
761 0 : break;
762 0 : case 5:
779 peter 763 0 : { int ret = r_R2(z);
1658 tgl 764 0 : if (ret <= 0) return ret;
765 : }
779 peter 766 0 : { int ret = slice_from_s(z, 4, s_13);
5710 tgl 767 0 : if (ret < 0) return ret;
768 : }
769 0 : break;
770 0 : case 6:
779 peter 771 0 : { int ret = r_R1(z);
1658 tgl 772 0 : if (ret <= 0) return ret;
773 : }
779 peter 774 0 : { int ret = slice_del(z);
5710 tgl 775 0 : if (ret < 0) return ret;
776 : }
779 peter 777 0 : { int m2 = z->l - z->c; (void)m2;
778 0 : z->ket = z->c;
779 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 780 0 : among_var = find_among_b(z, a_3, 4);
781 0 : if (!(among_var)) { z->c = z->l - m2; goto lab1; }
779 peter 782 0 : z->bra = z->c;
783 0 : { int ret = r_R2(z);
1658 tgl 784 0 : if (ret == 0) { z->c = z->l - m2; goto lab1; }
5710 785 0 : if (ret < 0) return ret;
786 : }
779 peter 787 0 : { int ret = slice_del(z);
5710 tgl 788 0 : if (ret < 0) return ret;
789 : }
790 : switch (among_var) {
791 0 : case 1:
779 peter 792 0 : z->ket = z->c;
793 0 : if (!(eq_s_b(z, 2, s_14))) { z->c = z->l - m2; goto lab1; }
794 0 : z->bra = z->c;
795 0 : { int ret = r_R2(z);
1658 tgl 796 0 : if (ret == 0) { z->c = z->l - m2; goto lab1; }
5710 797 0 : if (ret < 0) return ret;
798 : }
779 peter 799 0 : { int ret = slice_del(z);
5710 tgl 800 0 : if (ret < 0) return ret;
801 : }
802 0 : break;
803 : }
804 0 : lab1:
805 : ;
806 : }
807 0 : break;
808 0 : case 7:
779 peter 809 0 : { int ret = r_R2(z);
1658 tgl 810 0 : if (ret <= 0) return ret;
811 : }
779 peter 812 0 : { int ret = slice_del(z);
5710 tgl 813 0 : if (ret < 0) return ret;
814 : }
779 peter 815 0 : { int m3 = z->l - z->c; (void)m3;
816 0 : z->ket = z->c;
817 0 : if (z->c - 3 <= z->lb || z->p[z->c - 1] != 101) { z->c = z->l - m3; goto lab2; }
1658 tgl 818 0 : if (!(find_among_b(z, a_4, 3))) { z->c = z->l - m3; goto lab2; }
779 peter 819 0 : z->bra = z->c;
820 0 : { int ret = r_R2(z);
1658 tgl 821 0 : if (ret == 0) { z->c = z->l - m3; goto lab2; }
822 0 : if (ret < 0) return ret;
823 : }
779 peter 824 0 : { int ret = slice_del(z);
1658 tgl 825 0 : if (ret < 0) return ret;
826 : }
5710 827 0 : lab2:
828 : ;
829 : }
830 0 : break;
831 0 : case 8:
779 peter 832 0 : { int ret = r_R2(z);
1658 tgl 833 0 : if (ret <= 0) return ret;
834 : }
779 peter 835 0 : { int ret = slice_del(z);
5710 tgl 836 0 : if (ret < 0) return ret;
837 : }
779 peter 838 0 : { int m4 = z->l - z->c; (void)m4;
839 0 : z->ket = z->c;
840 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 841 0 : if (!(find_among_b(z, a_5, 3))) { z->c = z->l - m4; goto lab3; }
779 peter 842 0 : z->bra = z->c;
843 0 : { int ret = r_R2(z);
1658 tgl 844 0 : if (ret == 0) { z->c = z->l - m4; goto lab3; }
845 0 : if (ret < 0) return ret;
846 : }
779 peter 847 0 : { int ret = slice_del(z);
1658 tgl 848 0 : if (ret < 0) return ret;
849 : }
5710 850 0 : lab3:
851 : ;
852 : }
853 0 : break;
854 0 : case 9:
779 peter 855 0 : { int ret = r_R2(z);
1658 tgl 856 0 : if (ret <= 0) return ret;
857 : }
779 peter 858 0 : { int ret = slice_del(z);
5710 tgl 859 0 : if (ret < 0) return ret;
860 : }
779 peter 861 0 : { int m5 = z->l - z->c; (void)m5;
862 0 : z->ket = z->c;
863 0 : if (!(eq_s_b(z, 2, s_15))) { z->c = z->l - m5; goto lab4; }
864 0 : z->bra = z->c;
865 0 : { int ret = r_R2(z);
1658 tgl 866 0 : if (ret == 0) { z->c = z->l - m5; goto lab4; }
5710 867 0 : if (ret < 0) return ret;
868 : }
779 peter 869 0 : { int ret = slice_del(z);
5710 tgl 870 0 : if (ret < 0) return ret;
871 : }
872 0 : lab4:
873 : ;
874 : }
875 0 : break;
876 : }
877 0 : return 1;
878 : }
879 :
779 peter 880 0 : static int r_y_verb_suffix(struct SN_env * z) {
881 :
882 : { int mlimit1;
883 0 : if (z->c < z->I[2]) return 0;
884 0 : mlimit1 = z->lb; z->lb = z->I[2];
885 0 : z->ket = z->c;
886 0 : if (!(find_among_b(z, a_7, 12))) { z->lb = mlimit1; return 0; }
887 0 : z->bra = z->c;
1658 tgl 888 0 : z->lb = mlimit1;
889 : }
779 peter 890 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') return 0;
1658 tgl 891 0 : z->c--;
779 peter 892 0 : { int ret = slice_del(z);
1658 tgl 893 0 : if (ret < 0) return ret;
894 : }
5710 895 0 : return 1;
896 : }
897 :
779 peter 898 0 : static int r_verb_suffix(struct SN_env * z) {
899 : int among_var;
900 :
901 : { int mlimit1;
902 0 : if (z->c < z->I[2]) return 0;
903 0 : mlimit1 = z->lb; z->lb = z->I[2];
904 0 : z->ket = z->c;
905 0 : among_var = find_among_b(z, a_8, 96);
1658 tgl 906 0 : if (!(among_var)) { z->lb = mlimit1; return 0; }
779 peter 907 0 : z->bra = z->c;
1658 tgl 908 0 : z->lb = mlimit1;
909 : }
779 peter 910 0 : switch (among_var) {
5710 tgl 911 0 : case 1:
779 peter 912 0 : { int m2 = z->l - z->c; (void)m2;
913 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') { z->c = z->l - m2; goto lab0; }
1658 tgl 914 0 : z->c--;
779 peter 915 0 : { int m_test3 = z->l - z->c;
916 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'g') { z->c = z->l - m2; goto lab0; }
1658 tgl 917 0 : z->c--;
918 0 : z->c = z->l - m_test3;
919 : }
5710 920 0 : lab0:
921 : ;
922 : }
779 peter 923 0 : z->bra = z->c;
924 0 : { int ret = slice_del(z);
5710 tgl 925 0 : if (ret < 0) return ret;
926 : }
927 0 : break;
928 0 : case 2:
779 peter 929 0 : { int ret = slice_del(z);
5710 tgl 930 0 : if (ret < 0) return ret;
931 : }
932 0 : break;
933 : }
934 0 : return 1;
935 : }
936 :
779 peter 937 0 : static int r_residual_suffix(struct SN_env * z) {
938 : int among_var;
939 0 : z->ket = z->c;
940 0 : among_var = find_among_b(z, a_9, 8);
5710 tgl 941 0 : if (!(among_var)) return 0;
779 peter 942 0 : z->bra = z->c;
943 0 : switch (among_var) {
5710 tgl 944 0 : case 1:
779 peter 945 0 : { int ret = r_RV(z);
1658 tgl 946 0 : if (ret <= 0) return ret;
947 : }
779 peter 948 0 : { int ret = slice_del(z);
5710 tgl 949 0 : if (ret < 0) return ret;
950 : }
951 0 : break;
952 0 : case 2:
779 peter 953 0 : { int ret = r_RV(z);
1658 tgl 954 0 : if (ret <= 0) return ret;
955 : }
779 peter 956 0 : { int ret = slice_del(z);
5710 tgl 957 0 : if (ret < 0) return ret;
958 : }
779 peter 959 0 : { int m1 = z->l - z->c; (void)m1;
960 0 : z->ket = z->c;
961 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') { z->c = z->l - m1; goto lab0; }
1658 tgl 962 0 : z->c--;
779 peter 963 0 : z->bra = z->c;
964 0 : { int m_test2 = z->l - z->c;
965 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'g') { z->c = z->l - m1; goto lab0; }
1658 tgl 966 0 : z->c--;
967 0 : z->c = z->l - m_test2;
968 : }
779 peter 969 0 : { int ret = r_RV(z);
1658 tgl 970 0 : if (ret == 0) { z->c = z->l - m1; goto lab0; }
5710 971 0 : if (ret < 0) return ret;
972 : }
779 peter 973 0 : { int ret = slice_del(z);
5710 tgl 974 0 : if (ret < 0) return ret;
975 : }
976 0 : lab0:
977 : ;
978 : }
979 0 : break;
980 : }
981 0 : return 1;
982 : }
983 :
779 peter 984 0 : extern int spanish_ISO_8859_1_stem(struct SN_env * z) {
985 :
986 0 : { int ret = r_mark_regions(z);
1658 tgl 987 0 : if (ret < 0) return ret;
988 : }
779 peter 989 0 : z->lb = z->c; z->c = z->l;
990 :
991 0 : { int m1 = z->l - z->c; (void)m1;
992 0 : { int ret = r_attached_pronoun(z);
5710 tgl 993 0 : if (ret < 0) return ret;
994 : }
1658 995 0 : z->c = z->l - m1;
996 : }
779 peter 997 0 : { int m2 = z->l - z->c; (void)m2;
998 0 : { int m3 = z->l - z->c; (void)m3;
999 0 : { int ret = r_standard_suffix(z);
1035 1000 0 : if (ret == 0) goto lab2;
5710 tgl 1001 0 : if (ret < 0) return ret;
1002 : }
1035 peter 1003 0 : goto lab1;
1004 0 : lab2:
1658 tgl 1005 0 : z->c = z->l - m3;
779 peter 1006 0 : { int ret = r_y_verb_suffix(z);
1035 1007 0 : if (ret == 0) goto lab3;
5710 tgl 1008 0 : if (ret < 0) return ret;
1009 : }
1035 peter 1010 0 : goto lab1;
1011 0 : lab3:
1658 tgl 1012 0 : z->c = z->l - m3;
779 peter 1013 0 : { int ret = r_verb_suffix(z);
1035 1014 0 : if (ret == 0) goto lab0;
5710 tgl 1015 0 : if (ret < 0) return ret;
1016 : }
1017 : }
1035 peter 1018 0 : lab1:
1019 0 : lab0:
1658 tgl 1020 0 : z->c = z->l - m2;
1021 : }
779 peter 1022 0 : { int m4 = z->l - z->c; (void)m4;
1023 0 : { int ret = r_residual_suffix(z);
5710 tgl 1024 0 : if (ret < 0) return ret;
1025 : }
1658 1026 0 : z->c = z->l - m4;
1027 : }
5710 1028 0 : z->c = z->lb;
779 peter 1029 0 : { int c5 = z->c;
1030 0 : { int ret = r_postlude(z);
5710 tgl 1031 0 : if (ret < 0) return ret;
1032 : }
1658 1033 0 : z->c = c5;
1034 : }
5710 1035 0 : return 1;
1036 : }
1037 :
779 peter 1038 0 : extern struct SN_env * spanish_ISO_8859_1_create_env(void) { return SN_create_env(0, 3); }
1039 :
5710 tgl 1040 0 : extern void spanish_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1041 :
|
