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