Age Owner Branch data TLA 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 : :
1850 peter@eisentraut.org 493 :UBC 0 : static int r_mark_regions(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 494 :UNC 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 : : {
6781 tgl@sss.pgh.pa.us 506 :UBC 0 : int ret = out_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 507 [ # # ]:UNC 0 : if (ret < 0) goto lab2;
6781 tgl@sss.pgh.pa.us 508 :UBC 0 : z->c += ret;
509 : : }
69 tgl@sss.pgh.pa.us 510 :UNC 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 : : {
6781 tgl@sss.pgh.pa.us 515 :UBC 0 : int ret = in_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 516 [ # # ]:UNC 0 : if (ret < 0) goto lab1;
6781 tgl@sss.pgh.pa.us 517 :UBC 0 : z->c += ret;
518 : : }
519 : : } while (0);
69 tgl@sss.pgh.pa.us 520 :UNC 0 : break;
521 : 0 : lab1:
522 : 0 : z->c = v_2;
1850 peter@eisentraut.org 523 [ # # ]:UBC 0 : if (out_grouping(z, g_v, 97, 252, 0)) goto lab0;
524 : : do {
69 tgl@sss.pgh.pa.us 525 :UNC 0 : int v_4 = z->c;
526 [ # # ]: 0 : if (out_grouping(z, g_v, 97, 252, 0)) goto lab3;
527 : : {
6781 tgl@sss.pgh.pa.us 528 :UBC 0 : int ret = out_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 529 [ # # ]:UNC 0 : if (ret < 0) goto lab3;
6781 tgl@sss.pgh.pa.us 530 :UBC 0 : z->c += ret;
531 : : }
69 tgl@sss.pgh.pa.us 532 :UNC 0 : break;
533 : 0 : lab3:
534 : 0 : z->c = v_4;
1850 peter@eisentraut.org 535 [ # # ]:UBC 0 : if (in_grouping(z, g_v, 97, 252, 0)) goto lab0;
6781 tgl@sss.pgh.pa.us 536 [ # # ]: 0 : if (z->c >= z->l) goto lab0;
1850 peter@eisentraut.org 537 : 0 : z->c++;
538 : : } while (0);
539 : : } while (0);
69 tgl@sss.pgh.pa.us 540 :UNC 0 : ((SN_local *)z)->i_pV = z->c;
6781 tgl@sss.pgh.pa.us 541 :UBC 0 : lab0:
69 tgl@sss.pgh.pa.us 542 :UNC 0 : z->c = v_1;
543 : : }
544 : : {
545 : 0 : int v_5 = z->c;
546 : : {
6781 tgl@sss.pgh.pa.us 547 :UBC 0 : int ret = out_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 548 [ # # ]:UNC 0 : if (ret < 0) goto lab4;
6781 tgl@sss.pgh.pa.us 549 :UBC 0 : z->c += ret;
550 : : }
551 : : {
552 : 0 : int ret = in_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 553 [ # # ]:UNC 0 : if (ret < 0) goto lab4;
6781 tgl@sss.pgh.pa.us 554 :UBC 0 : z->c += ret;
555 : : }
69 tgl@sss.pgh.pa.us 556 :UNC 0 : ((SN_local *)z)->i_p1 = z->c;
557 : : {
6781 tgl@sss.pgh.pa.us 558 :UBC 0 : int ret = out_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 559 [ # # ]:UNC 0 : if (ret < 0) goto lab4;
6781 tgl@sss.pgh.pa.us 560 :UBC 0 : z->c += ret;
561 : : }
562 : : {
563 : 0 : int ret = in_grouping(z, g_v, 97, 252, 1);
69 tgl@sss.pgh.pa.us 564 [ # # ]:UNC 0 : if (ret < 0) goto lab4;
6781 tgl@sss.pgh.pa.us 565 :UBC 0 : z->c += ret;
566 : : }
69 tgl@sss.pgh.pa.us 567 :UNC 0 : ((SN_local *)z)->i_p2 = z->c;
568 : 0 : lab4:
569 : 0 : z->c = v_5;
570 : : }
6781 tgl@sss.pgh.pa.us 571 :UBC 0 : return 1;
572 : : }
573 : :
1850 peter@eisentraut.org 574 : 0 : static int r_postlude(struct SN_env * z) {
575 : : int among_var;
69 tgl@sss.pgh.pa.us 576 :UNC 0 : while (1) {
577 : 0 : int v_1 = z->c;
1850 peter@eisentraut.org 578 :UBC 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
# # ]
69 tgl@sss.pgh.pa.us 580 :UNC 0 : among_var = find_among(z, a_0, 6, 0);
1850 peter@eisentraut.org 581 :UBC 0 : z->ket = z->c;
582 [ # # # # : 0 : switch (among_var) {
# # # ]
6781 tgl@sss.pgh.pa.us 583 : 0 : case 1:
584 : : {
69 tgl@sss.pgh.pa.us 585 :UNC 0 : int ret = slice_from_s(z, 1, s_0);
6781 tgl@sss.pgh.pa.us 586 [ # # ]:UBC 0 : if (ret < 0) return ret;
587 : : }
588 : 0 : break;
589 : 0 : case 2:
590 : : {
69 tgl@sss.pgh.pa.us 591 :UNC 0 : int ret = slice_from_s(z, 1, s_1);
6781 tgl@sss.pgh.pa.us 592 [ # # ]:UBC 0 : if (ret < 0) return ret;
593 : : }
594 : 0 : break;
595 : 0 : case 3:
596 : : {
69 tgl@sss.pgh.pa.us 597 :UNC 0 : int ret = slice_from_s(z, 1, s_2);
6781 tgl@sss.pgh.pa.us 598 [ # # ]:UBC 0 : if (ret < 0) return ret;
599 : : }
600 : 0 : break;
601 : 0 : case 4:
602 : : {
69 tgl@sss.pgh.pa.us 603 :UNC 0 : int ret = slice_from_s(z, 1, s_3);
6781 tgl@sss.pgh.pa.us 604 [ # # ]:UBC 0 : if (ret < 0) return ret;
605 : : }
606 : 0 : break;
607 : 0 : case 5:
608 : : {
69 tgl@sss.pgh.pa.us 609 :UNC 0 : int ret = slice_from_s(z, 1, s_4);
6781 tgl@sss.pgh.pa.us 610 [ # # ]:UBC 0 : if (ret < 0) return ret;
611 : : }
612 : 0 : break;
613 : 0 : case 6:
614 [ # # ]: 0 : if (z->c >= z->l) goto lab0;
1850 peter@eisentraut.org 615 : 0 : z->c++;
6781 tgl@sss.pgh.pa.us 616 : 0 : break;
617 : : }
618 : 0 : continue;
619 : 0 : lab0:
69 tgl@sss.pgh.pa.us 620 :UNC 0 : z->c = v_1;
6781 tgl@sss.pgh.pa.us 621 :UBC 0 : break;
622 : : }
623 : 0 : return 1;
624 : : }
625 : :
1850 peter@eisentraut.org 626 : 0 : static int r_RV(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 627 :UNC 0 : return ((SN_local *)z)->i_pV <= z->c;
628 : : }
629 : :
1850 peter@eisentraut.org 630 :UBC 0 : static int r_R1(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 631 :UNC 0 : return ((SN_local *)z)->i_p1 <= z->c;
632 : : }
633 : :
1850 peter@eisentraut.org 634 :UBC 0 : static int r_R2(struct SN_env * z) {
69 tgl@sss.pgh.pa.us 635 :UNC 0 : return ((SN_local *)z)->i_p2 <= z->c;
636 : : }
637 : :
1850 peter@eisentraut.org 638 :UBC 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;
# # ]
69 tgl@sss.pgh.pa.us 642 [ # # ]:UNC 0 : if (!find_among_b(z, a_1, 13, 0)) return 0;
1850 peter@eisentraut.org 643 :UBC 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;
# # ]
69 tgl@sss.pgh.pa.us 645 :UNC 0 : among_var = find_among_b(z, a_2, 11, 0);
390 tgl@sss.pgh.pa.us 646 [ # # ]:UBC 0 : if (!among_var) return 0;
647 : : {
69 tgl@sss.pgh.pa.us 648 :UNC 0 : int ret = r_RV(z);
2729 tgl@sss.pgh.pa.us 649 [ # # ]:UBC 0 : if (ret <= 0) return ret;
650 : : }
1850 peter@eisentraut.org 651 [ # # # # : 0 : switch (among_var) {
# # # # ]
6781 tgl@sss.pgh.pa.us 652 : 0 : case 1:
1850 peter@eisentraut.org 653 : 0 : z->bra = z->c;
654 : : {
69 tgl@sss.pgh.pa.us 655 :UNC 0 : int ret = slice_from_s(z, 5, s_5);
6781 tgl@sss.pgh.pa.us 656 [ # # ]:UBC 0 : if (ret < 0) return ret;
657 : : }
658 : 0 : break;
659 : 0 : case 2:
1850 peter@eisentraut.org 660 : 0 : z->bra = z->c;
661 : : {
69 tgl@sss.pgh.pa.us 662 :UNC 0 : int ret = slice_from_s(z, 4, s_6);
6781 tgl@sss.pgh.pa.us 663 [ # # ]:UBC 0 : if (ret < 0) return ret;
664 : : }
665 : 0 : break;
666 : 0 : case 3:
1850 peter@eisentraut.org 667 : 0 : z->bra = z->c;
668 : : {
69 tgl@sss.pgh.pa.us 669 :UNC 0 : int ret = slice_from_s(z, 2, s_7);
6781 tgl@sss.pgh.pa.us 670 [ # # ]:UBC 0 : if (ret < 0) return ret;
671 : : }
672 : 0 : break;
673 : 0 : case 4:
1850 peter@eisentraut.org 674 : 0 : z->bra = z->c;
675 : : {
69 tgl@sss.pgh.pa.us 676 :UNC 0 : int ret = slice_from_s(z, 2, s_8);
6781 tgl@sss.pgh.pa.us 677 [ # # ]:UBC 0 : if (ret < 0) return ret;
678 : : }
679 : 0 : break;
680 : 0 : case 5:
1850 peter@eisentraut.org 681 : 0 : z->bra = z->c;
682 : : {
69 tgl@sss.pgh.pa.us 683 :UNC 0 : int ret = slice_from_s(z, 2, s_9);
6781 tgl@sss.pgh.pa.us 684 [ # # ]:UBC 0 : if (ret < 0) return ret;
685 : : }
686 : 0 : break;
687 : 0 : case 6:
688 : : {
69 tgl@sss.pgh.pa.us 689 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 690 [ # # ]:UBC 0 : if (ret < 0) return ret;
691 : : }
692 : 0 : break;
693 : 0 : case 7:
1850 peter@eisentraut.org 694 [ # # # # ]: 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') return 0;
2729 tgl@sss.pgh.pa.us 695 : 0 : z->c--;
696 : : {
69 tgl@sss.pgh.pa.us 697 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 698 [ # # ]:UBC 0 : if (ret < 0) return ret;
699 : : }
700 : 0 : break;
701 : : }
702 : 0 : return 1;
703 : : }
704 : :
1850 peter@eisentraut.org 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;
# # ]
69 tgl@sss.pgh.pa.us 709 :UNC 0 : among_var = find_among_b(z, a_6, 48, 0);
390 tgl@sss.pgh.pa.us 710 [ # # ]:UBC 0 : if (!among_var) return 0;
1850 peter@eisentraut.org 711 : 0 : z->bra = z->c;
712 [ # # # # : 0 : switch (among_var) {
# # # # #
# ]
6781 tgl@sss.pgh.pa.us 713 : 0 : case 1:
714 : : {
69 tgl@sss.pgh.pa.us 715 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 716 [ # # ]:UBC 0 : if (ret <= 0) return ret;
717 : : }
718 : : {
69 tgl@sss.pgh.pa.us 719 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 720 [ # # ]:UBC 0 : if (ret < 0) return ret;
721 : : }
722 : 0 : break;
723 : 0 : case 2:
724 : : {
69 tgl@sss.pgh.pa.us 725 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 726 [ # # ]:UBC 0 : if (ret <= 0) return ret;
727 : : }
728 : : {
69 tgl@sss.pgh.pa.us 729 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 730 [ # # ]:UBC 0 : if (ret < 0) return ret;
731 : : }
732 : : {
69 tgl@sss.pgh.pa.us 733 :UNC 0 : int v_1 = z->l - z->c;
1850 peter@eisentraut.org 734 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 735 [ # # ]:UNC 0 : if (!(eq_s_b(z, 2, s_10))) { z->c = z->l - v_1; goto lab0; }
1850 peter@eisentraut.org 736 :UBC 0 : z->bra = z->c;
737 : : {
69 tgl@sss.pgh.pa.us 738 :UNC 0 : int ret = r_R2(z);
739 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_1; goto lab0; }
6781 tgl@sss.pgh.pa.us 740 [ # # ]:UBC 0 : if (ret < 0) return ret;
741 : : }
742 : : {
69 tgl@sss.pgh.pa.us 743 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 744 [ # # ]:UBC 0 : if (ret < 0) return ret;
745 : : }
746 : 0 : lab0:
747 : : ;
748 : : }
749 : 0 : break;
750 : 0 : case 3:
751 : : {
69 tgl@sss.pgh.pa.us 752 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 753 [ # # ]:UBC 0 : if (ret <= 0) return ret;
754 : : }
755 : : {
69 tgl@sss.pgh.pa.us 756 :UNC 0 : int ret = slice_from_s(z, 3, s_11);
6781 tgl@sss.pgh.pa.us 757 [ # # ]:UBC 0 : if (ret < 0) return ret;
758 : : }
759 : 0 : break;
760 : 0 : case 4:
761 : : {
69 tgl@sss.pgh.pa.us 762 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 763 [ # # ]:UBC 0 : if (ret <= 0) return ret;
764 : : }
765 : : {
69 tgl@sss.pgh.pa.us 766 :UNC 0 : int ret = slice_from_s(z, 1, s_12);
6781 tgl@sss.pgh.pa.us 767 [ # # ]:UBC 0 : if (ret < 0) return ret;
768 : : }
769 : 0 : break;
770 : 0 : case 5:
771 : : {
69 tgl@sss.pgh.pa.us 772 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 773 [ # # ]:UBC 0 : if (ret <= 0) return ret;
774 : : }
775 : : {
69 tgl@sss.pgh.pa.us 776 :UNC 0 : int ret = slice_from_s(z, 4, s_13);
6781 tgl@sss.pgh.pa.us 777 [ # # ]:UBC 0 : if (ret < 0) return ret;
778 : : }
779 : 0 : break;
780 : 0 : case 6:
781 : : {
69 tgl@sss.pgh.pa.us 782 :UNC 0 : int ret = r_R1(z);
2729 tgl@sss.pgh.pa.us 783 [ # # ]:UBC 0 : if (ret <= 0) return ret;
784 : : }
785 : : {
69 tgl@sss.pgh.pa.us 786 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 787 [ # # ]:UBC 0 : if (ret < 0) return ret;
788 : : }
789 : : {
69 tgl@sss.pgh.pa.us 790 :UNC 0 : int v_2 = z->l - z->c;
1850 peter@eisentraut.org 791 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 792 [ # # # # :UNC 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; }
1850 peter@eisentraut.org 795 :UBC 0 : z->bra = z->c;
796 : : {
69 tgl@sss.pgh.pa.us 797 :UNC 0 : int ret = r_R2(z);
798 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_2; goto lab1; }
6781 tgl@sss.pgh.pa.us 799 [ # # ]:UBC 0 : if (ret < 0) return ret;
800 : : }
801 : : {
69 tgl@sss.pgh.pa.us 802 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 803 [ # # ]:UBC 0 : if (ret < 0) return ret;
804 : : }
1850 peter@eisentraut.org 805 [ # # ]: 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 806 : 0 : case 1:
1850 peter@eisentraut.org 807 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 808 [ # # ]:UNC 0 : if (!(eq_s_b(z, 2, s_14))) { z->c = z->l - v_2; goto lab1; }
1850 peter@eisentraut.org 809 :UBC 0 : z->bra = z->c;
810 : : {
69 tgl@sss.pgh.pa.us 811 :UNC 0 : int ret = r_R2(z);
812 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_2; goto lab1; }
6781 tgl@sss.pgh.pa.us 813 [ # # ]:UBC 0 : if (ret < 0) return ret;
814 : : }
815 : : {
69 tgl@sss.pgh.pa.us 816 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 817 [ # # ]:UBC 0 : if (ret < 0) return ret;
818 : : }
819 : 0 : break;
820 : : }
821 : 0 : lab1:
822 : : ;
823 : : }
824 : 0 : break;
825 : 0 : case 7:
826 : : {
69 tgl@sss.pgh.pa.us 827 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 828 [ # # ]:UBC 0 : if (ret <= 0) return ret;
829 : : }
830 : : {
69 tgl@sss.pgh.pa.us 831 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 832 [ # # ]:UBC 0 : if (ret < 0) return ret;
833 : : }
834 : : {
69 tgl@sss.pgh.pa.us 835 :UNC 0 : int v_3 = z->l - z->c;
1850 peter@eisentraut.org 836 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 837 [ # # # # ]:UNC 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; }
1850 peter@eisentraut.org 839 :UBC 0 : z->bra = z->c;
840 : : {
69 tgl@sss.pgh.pa.us 841 :UNC 0 : int ret = r_R2(z);
842 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_3; goto lab2; }
2729 tgl@sss.pgh.pa.us 843 [ # # ]:UBC 0 : if (ret < 0) return ret;
844 : : }
845 : : {
69 tgl@sss.pgh.pa.us 846 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 847 [ # # ]:UBC 0 : if (ret < 0) return ret;
848 : : }
6781 849 : 0 : lab2:
850 : : ;
851 : : }
852 : 0 : break;
853 : 0 : case 8:
854 : : {
69 tgl@sss.pgh.pa.us 855 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 856 [ # # ]:UBC 0 : if (ret <= 0) return ret;
857 : : }
858 : : {
69 tgl@sss.pgh.pa.us 859 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 860 [ # # ]:UBC 0 : if (ret < 0) return ret;
861 : : }
862 : : {
69 tgl@sss.pgh.pa.us 863 :UNC 0 : int v_4 = z->l - z->c;
1850 peter@eisentraut.org 864 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 865 [ # # # # :UNC 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; }
1850 peter@eisentraut.org 867 :UBC 0 : z->bra = z->c;
868 : : {
69 tgl@sss.pgh.pa.us 869 :UNC 0 : int ret = r_R2(z);
870 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_4; goto lab3; }
2729 tgl@sss.pgh.pa.us 871 [ # # ]:UBC 0 : if (ret < 0) return ret;
872 : : }
873 : : {
69 tgl@sss.pgh.pa.us 874 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 875 [ # # ]:UBC 0 : if (ret < 0) return ret;
876 : : }
6781 877 : 0 : lab3:
878 : : ;
879 : : }
880 : 0 : break;
881 : 0 : case 9:
882 : : {
69 tgl@sss.pgh.pa.us 883 :UNC 0 : int ret = r_R2(z);
2729 tgl@sss.pgh.pa.us 884 [ # # ]:UBC 0 : if (ret <= 0) return ret;
885 : : }
886 : : {
69 tgl@sss.pgh.pa.us 887 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 888 [ # # ]:UBC 0 : if (ret < 0) return ret;
889 : : }
890 : : {
69 tgl@sss.pgh.pa.us 891 :UNC 0 : int v_5 = z->l - z->c;
1850 peter@eisentraut.org 892 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 893 [ # # ]:UNC 0 : if (!(eq_s_b(z, 2, s_15))) { z->c = z->l - v_5; goto lab4; }
1850 peter@eisentraut.org 894 :UBC 0 : z->bra = z->c;
895 : : {
69 tgl@sss.pgh.pa.us 896 :UNC 0 : int ret = r_R2(z);
897 [ # # ]: 0 : if (ret == 0) { z->c = z->l - v_5; goto lab4; }
6781 tgl@sss.pgh.pa.us 898 [ # # ]:UBC 0 : if (ret < 0) return ret;
899 : : }
900 : : {
69 tgl@sss.pgh.pa.us 901 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 902 [ # # ]:UBC 0 : if (ret < 0) return ret;
903 : : }
904 : 0 : lab4:
905 : : ;
906 : : }
907 : 0 : break;
908 : : }
909 : 0 : return 1;
910 : : }
911 : :
1850 peter@eisentraut.org 912 : 0 : static int r_y_verb_suffix(struct SN_env * z) {
913 : : {
914 : : int v_1;
69 tgl@sss.pgh.pa.us 915 [ # # ]:UNC 0 : if (z->c < ((SN_local *)z)->i_pV) return 0;
916 : 0 : v_1 = z->lb; z->lb = ((SN_local *)z)->i_pV;
1850 peter@eisentraut.org 917 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 918 [ # # ]:UNC 0 : if (!find_among_b(z, a_7, 12, 0)) { z->lb = v_1; return 0; }
1850 peter@eisentraut.org 919 :UBC 0 : z->bra = z->c;
69 tgl@sss.pgh.pa.us 920 :UNC 0 : z->lb = v_1;
921 : : }
1850 peter@eisentraut.org 922 [ # # # # ]:UBC 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') return 0;
2729 tgl@sss.pgh.pa.us 923 : 0 : z->c--;
924 : : {
69 tgl@sss.pgh.pa.us 925 :UNC 0 : int ret = slice_del(z);
2729 tgl@sss.pgh.pa.us 926 [ # # ]:UBC 0 : if (ret < 0) return ret;
927 : : }
6781 928 : 0 : return 1;
929 : : }
930 : :
1850 peter@eisentraut.org 931 : 0 : static int r_verb_suffix(struct SN_env * z) {
932 : : int among_var;
933 : : {
934 : : int v_1;
69 tgl@sss.pgh.pa.us 935 [ # # ]:UNC 0 : if (z->c < ((SN_local *)z)->i_pV) return 0;
936 : 0 : v_1 = z->lb; z->lb = ((SN_local *)z)->i_pV;
1850 peter@eisentraut.org 937 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 938 :UNC 0 : among_var = find_among_b(z, a_8, 96, 0);
939 [ # # ]: 0 : if (!among_var) { z->lb = v_1; return 0; }
1850 peter@eisentraut.org 940 :UBC 0 : z->bra = z->c;
69 tgl@sss.pgh.pa.us 941 :UNC 0 : z->lb = v_1;
942 : : }
1850 peter@eisentraut.org 943 [ # # # ]:UBC 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 944 : 0 : case 1:
945 : : {
69 tgl@sss.pgh.pa.us 946 :UNC 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; }
2729 tgl@sss.pgh.pa.us 948 :UBC 0 : z->c--;
949 : : {
69 tgl@sss.pgh.pa.us 950 :UNC 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; }
2729 tgl@sss.pgh.pa.us 952 :UBC 0 : z->c--;
69 tgl@sss.pgh.pa.us 953 :UNC 0 : z->c = z->l - v_3;
954 : : }
6781 tgl@sss.pgh.pa.us 955 :UBC 0 : lab0:
956 : : ;
957 : : }
1850 peter@eisentraut.org 958 : 0 : z->bra = z->c;
959 : : {
69 tgl@sss.pgh.pa.us 960 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 961 [ # # ]:UBC 0 : if (ret < 0) return ret;
962 : : }
963 : 0 : break;
964 : 0 : case 2:
965 : : {
69 tgl@sss.pgh.pa.us 966 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 967 [ # # ]:UBC 0 : if (ret < 0) return ret;
968 : : }
969 : 0 : break;
970 : : }
971 : 0 : return 1;
972 : : }
973 : :
1850 peter@eisentraut.org 974 : 0 : static int r_residual_suffix(struct SN_env * z) {
975 : : int among_var;
976 : 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 977 :UNC 0 : among_var = find_among_b(z, a_9, 8, 0);
390 tgl@sss.pgh.pa.us 978 [ # # ]:UBC 0 : if (!among_var) return 0;
1850 peter@eisentraut.org 979 : 0 : z->bra = z->c;
980 [ # # # ]: 0 : switch (among_var) {
6781 tgl@sss.pgh.pa.us 981 : 0 : case 1:
982 : : {
69 tgl@sss.pgh.pa.us 983 :UNC 0 : int ret = r_RV(z);
2729 tgl@sss.pgh.pa.us 984 [ # # ]:UBC 0 : if (ret <= 0) return ret;
985 : : }
986 : : {
69 tgl@sss.pgh.pa.us 987 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 988 [ # # ]:UBC 0 : if (ret < 0) return ret;
989 : : }
990 : 0 : break;
991 : 0 : case 2:
992 : : {
69 tgl@sss.pgh.pa.us 993 :UNC 0 : int ret = r_RV(z);
2729 tgl@sss.pgh.pa.us 994 [ # # ]:UBC 0 : if (ret <= 0) return ret;
995 : : }
996 : : {
69 tgl@sss.pgh.pa.us 997 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 998 [ # # ]:UBC 0 : if (ret < 0) return ret;
999 : : }
1000 : : {
69 tgl@sss.pgh.pa.us 1001 :UNC 0 : int v_1 = z->l - z->c;
1850 peter@eisentraut.org 1002 :UBC 0 : z->ket = z->c;
69 tgl@sss.pgh.pa.us 1003 [ # # # # ]:UNC 0 : if (z->c <= z->lb || z->p[z->c - 1] != 'u') { z->c = z->l - v_1; goto lab0; }
2729 tgl@sss.pgh.pa.us 1004 :UBC 0 : z->c--;
1850 peter@eisentraut.org 1005 : 0 : z->bra = z->c;
1006 : : {
69 tgl@sss.pgh.pa.us 1007 :UNC 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; }
2729 tgl@sss.pgh.pa.us 1009 :UBC 0 : z->c--;
69 tgl@sss.pgh.pa.us 1010 :UNC 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; }
6781 tgl@sss.pgh.pa.us 1015 [ # # ]:UBC 0 : if (ret < 0) return ret;
1016 : : }
1017 : : {
69 tgl@sss.pgh.pa.us 1018 :UNC 0 : int ret = slice_del(z);
6781 tgl@sss.pgh.pa.us 1019 [ # # ]:UBC 0 : if (ret < 0) return ret;
1020 : : }
1021 : 0 : lab0:
1022 : : ;
1023 : : }
1024 : 0 : break;
1025 : : }
1026 : 0 : return 1;
1027 : : }
1028 : :
1850 peter@eisentraut.org 1029 : 0 : extern int spanish_ISO_8859_1_stem(struct SN_env * z) {
1030 : : {
69 tgl@sss.pgh.pa.us 1031 :UNC 0 : int ret = r_mark_regions(z);
2729 tgl@sss.pgh.pa.us 1032 [ # # ]:UBC 0 : if (ret < 0) return ret;
1033 : : }
1850 peter@eisentraut.org 1034 : 0 : z->lb = z->c; z->c = z->l;
1035 : : {
69 tgl@sss.pgh.pa.us 1036 :UNC 0 : int v_1 = z->l - z->c;
1037 : : {
1038 : 0 : int ret = r_attached_pronoun(z);
6781 tgl@sss.pgh.pa.us 1039 [ # # ]:UBC 0 : if (ret < 0) return ret;
1040 : : }
69 tgl@sss.pgh.pa.us 1041 :UNC 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;
6781 tgl@sss.pgh.pa.us 1050 [ # # ]:UBC 0 : if (ret < 0) return ret;
1051 : : }
69 tgl@sss.pgh.pa.us 1052 :UNC 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;
6781 tgl@sss.pgh.pa.us 1058 [ # # ]:UBC 0 : if (ret < 0) return ret;
1059 : : }
69 tgl@sss.pgh.pa.us 1060 :UNC 0 : break;
1061 : 0 : lab2:
1062 : 0 : z->c = z->l - v_3;
1063 : : {
1064 : 0 : int ret = r_verb_suffix(z);
2106 peter@eisentraut.org 1065 [ # # ]:UBC 0 : if (ret == 0) goto lab0;
6781 tgl@sss.pgh.pa.us 1066 [ # # ]: 0 : if (ret < 0) return ret;
1067 : : }
1068 : : } while (0);
2106 peter@eisentraut.org 1069 : 0 : lab0:
69 tgl@sss.pgh.pa.us 1070 :UNC 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);
6781 tgl@sss.pgh.pa.us 1076 [ # # ]:UBC 0 : if (ret < 0) return ret;
1077 : : }
69 tgl@sss.pgh.pa.us 1078 :UNC 0 : z->c = z->l - v_4;
1079 : : }
6781 tgl@sss.pgh.pa.us 1080 :UBC 0 : z->c = z->lb;
1081 : : {
69 tgl@sss.pgh.pa.us 1082 :UNC 0 : int v_5 = z->c;
1083 : : {
1084 : 0 : int ret = r_postlude(z);
6781 tgl@sss.pgh.pa.us 1085 [ # # ]:UBC 0 : if (ret < 0) return ret;
1086 : : }
69 tgl@sss.pgh.pa.us 1087 :UNC 0 : z->c = v_5;
1088 : : }
6781 tgl@sss.pgh.pa.us 1089 :UBC 0 : return 1;
1090 : : }
1091 : :
69 tgl@sss.pgh.pa.us 1092 :UNC 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 : :
|
