Line data Source code
1 :
2 : /* This file was generated automatically by the Snowball to ANSI C compiler */
3 :
4 : #include "header.h"
5 :
6 : #ifdef __cplusplus
7 : extern "C" {
8 : #endif
9 : extern int portuguese_ISO_8859_1_stem(struct SN_env * z);
10 : #ifdef __cplusplus
11 : }
12 : #endif
13 : static int r_residual_form(struct SN_env * z);
14 : static int r_residual_suffix(struct SN_env * z);
15 : static int r_verb_suffix(struct SN_env * z);
16 : static int r_standard_suffix(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 : static int r_prelude(struct SN_env * z);
23 : #ifdef __cplusplus
24 : extern "C" {
25 : #endif
26 :
27 :
28 : extern struct SN_env * portuguese_ISO_8859_1_create_env(void);
29 : extern void portuguese_ISO_8859_1_close_env(struct SN_env * z);
30 :
31 :
32 : #ifdef __cplusplus
33 : }
34 : #endif
35 : static const symbol s_0_1[1] = { 0xE3 };
36 : static const symbol s_0_2[1] = { 0xF5 };
37 :
38 : static const struct among a_0[3] =
39 : {
40 : /* 0 */ { 0, 0, -1, 3, 0},
41 : /* 1 */ { 1, s_0_1, 0, 1, 0},
42 : /* 2 */ { 1, s_0_2, 0, 2, 0}
43 : };
44 :
45 : static const symbol s_1_1[2] = { 'a', '~' };
46 : static const symbol s_1_2[2] = { 'o', '~' };
47 :
48 : static const struct among a_1[3] =
49 : {
50 : /* 0 */ { 0, 0, -1, 3, 0},
51 : /* 1 */ { 2, s_1_1, 0, 1, 0},
52 : /* 2 */ { 2, s_1_2, 0, 2, 0}
53 : };
54 :
55 : static const symbol s_2_0[2] = { 'i', 'c' };
56 : static const symbol s_2_1[2] = { 'a', 'd' };
57 : static const symbol s_2_2[2] = { 'o', 's' };
58 : static const symbol s_2_3[2] = { 'i', 'v' };
59 :
60 : static const struct among a_2[4] =
61 : {
62 : /* 0 */ { 2, s_2_0, -1, -1, 0},
63 : /* 1 */ { 2, s_2_1, -1, -1, 0},
64 : /* 2 */ { 2, s_2_2, -1, -1, 0},
65 : /* 3 */ { 2, s_2_3, -1, 1, 0}
66 : };
67 :
68 : static const symbol s_3_0[4] = { 'a', 'n', 't', 'e' };
69 : static const symbol s_3_1[4] = { 'a', 'v', 'e', 'l' };
70 : static const symbol s_3_2[4] = { 0xED, 'v', 'e', 'l' };
71 :
72 : static const struct among a_3[3] =
73 : {
74 : /* 0 */ { 4, s_3_0, -1, 1, 0},
75 : /* 1 */ { 4, s_3_1, -1, 1, 0},
76 : /* 2 */ { 4, s_3_2, -1, 1, 0}
77 : };
78 :
79 : static const symbol s_4_0[2] = { 'i', 'c' };
80 : static const symbol s_4_1[4] = { 'a', 'b', 'i', 'l' };
81 : static const symbol s_4_2[2] = { 'i', 'v' };
82 :
83 : static const struct among a_4[3] =
84 : {
85 : /* 0 */ { 2, s_4_0, -1, 1, 0},
86 : /* 1 */ { 4, s_4_1, -1, 1, 0},
87 : /* 2 */ { 2, s_4_2, -1, 1, 0}
88 : };
89 :
90 : static const symbol s_5_0[3] = { 'i', 'c', 'a' };
91 : static const symbol s_5_1[5] = { 0xE2, 'n', 'c', 'i', 'a' };
92 : static const symbol s_5_2[5] = { 0xEA, 'n', 'c', 'i', 'a' };
93 : static const symbol s_5_3[3] = { 'i', 'r', 'a' };
94 : static const symbol s_5_4[5] = { 'a', 'd', 'o', 'r', 'a' };
95 : static const symbol s_5_5[3] = { 'o', 's', 'a' };
96 : static const symbol s_5_6[4] = { 'i', 's', 't', 'a' };
97 : static const symbol s_5_7[3] = { 'i', 'v', 'a' };
98 : static const symbol s_5_8[3] = { 'e', 'z', 'a' };
99 : static const symbol s_5_9[5] = { 'l', 'o', 'g', 0xED, 'a' };
100 : static const symbol s_5_10[5] = { 'i', 'd', 'a', 'd', 'e' };
101 : static const symbol s_5_11[4] = { 'a', 'n', 't', 'e' };
102 : static const symbol s_5_12[5] = { 'm', 'e', 'n', 't', 'e' };
103 : static const symbol s_5_13[6] = { 'a', 'm', 'e', 'n', 't', 'e' };
104 : static const symbol s_5_14[4] = { 0xE1, 'v', 'e', 'l' };
105 : static const symbol s_5_15[4] = { 0xED, 'v', 'e', 'l' };
106 : static const symbol s_5_16[5] = { 'u', 'c', 'i', 0xF3, 'n' };
107 : static const symbol s_5_17[3] = { 'i', 'c', 'o' };
108 : static const symbol s_5_18[4] = { 'i', 's', 'm', 'o' };
109 : static const symbol s_5_19[3] = { 'o', 's', 'o' };
110 : static const symbol s_5_20[6] = { 'a', 'm', 'e', 'n', 't', 'o' };
111 : static const symbol s_5_21[6] = { 'i', 'm', 'e', 'n', 't', 'o' };
112 : static const symbol s_5_22[3] = { 'i', 'v', 'o' };
113 : static const symbol s_5_23[5] = { 'a', 0xE7, 'a', '~', 'o' };
114 : static const symbol s_5_24[4] = { 'a', 'd', 'o', 'r' };
115 : static const symbol s_5_25[4] = { 'i', 'c', 'a', 's' };
116 : static const symbol s_5_26[6] = { 0xEA, 'n', 'c', 'i', 'a', 's' };
117 : static const symbol s_5_27[4] = { 'i', 'r', 'a', 's' };
118 : static const symbol s_5_28[6] = { 'a', 'd', 'o', 'r', 'a', 's' };
119 : static const symbol s_5_29[4] = { 'o', 's', 'a', 's' };
120 : static const symbol s_5_30[5] = { 'i', 's', 't', 'a', 's' };
121 : static const symbol s_5_31[4] = { 'i', 'v', 'a', 's' };
122 : static const symbol s_5_32[4] = { 'e', 'z', 'a', 's' };
123 : static const symbol s_5_33[6] = { 'l', 'o', 'g', 0xED, 'a', 's' };
124 : static const symbol s_5_34[6] = { 'i', 'd', 'a', 'd', 'e', 's' };
125 : static const symbol s_5_35[7] = { 'u', 'c', 'i', 'o', 'n', 'e', 's' };
126 : static const symbol s_5_36[6] = { 'a', 'd', 'o', 'r', 'e', 's' };
127 : static const symbol s_5_37[5] = { 'a', 'n', 't', 'e', 's' };
128 : static const symbol s_5_38[6] = { 'a', 0xE7, 'o', '~', 'e', 's' };
129 : static const symbol s_5_39[4] = { 'i', 'c', 'o', 's' };
130 : static const symbol s_5_40[5] = { 'i', 's', 'm', 'o', 's' };
131 : static const symbol s_5_41[4] = { 'o', 's', 'o', 's' };
132 : static const symbol s_5_42[7] = { 'a', 'm', 'e', 'n', 't', 'o', 's' };
133 : static const symbol s_5_43[7] = { 'i', 'm', 'e', 'n', 't', 'o', 's' };
134 : static const symbol s_5_44[4] = { 'i', 'v', 'o', 's' };
135 :
136 : static const struct among a_5[45] =
137 : {
138 : /* 0 */ { 3, s_5_0, -1, 1, 0},
139 : /* 1 */ { 5, s_5_1, -1, 1, 0},
140 : /* 2 */ { 5, s_5_2, -1, 4, 0},
141 : /* 3 */ { 3, s_5_3, -1, 9, 0},
142 : /* 4 */ { 5, s_5_4, -1, 1, 0},
143 : /* 5 */ { 3, s_5_5, -1, 1, 0},
144 : /* 6 */ { 4, s_5_6, -1, 1, 0},
145 : /* 7 */ { 3, s_5_7, -1, 8, 0},
146 : /* 8 */ { 3, s_5_8, -1, 1, 0},
147 : /* 9 */ { 5, s_5_9, -1, 2, 0},
148 : /* 10 */ { 5, s_5_10, -1, 7, 0},
149 : /* 11 */ { 4, s_5_11, -1, 1, 0},
150 : /* 12 */ { 5, s_5_12, -1, 6, 0},
151 : /* 13 */ { 6, s_5_13, 12, 5, 0},
152 : /* 14 */ { 4, s_5_14, -1, 1, 0},
153 : /* 15 */ { 4, s_5_15, -1, 1, 0},
154 : /* 16 */ { 5, s_5_16, -1, 3, 0},
155 : /* 17 */ { 3, s_5_17, -1, 1, 0},
156 : /* 18 */ { 4, s_5_18, -1, 1, 0},
157 : /* 19 */ { 3, s_5_19, -1, 1, 0},
158 : /* 20 */ { 6, s_5_20, -1, 1, 0},
159 : /* 21 */ { 6, s_5_21, -1, 1, 0},
160 : /* 22 */ { 3, s_5_22, -1, 8, 0},
161 : /* 23 */ { 5, s_5_23, -1, 1, 0},
162 : /* 24 */ { 4, s_5_24, -1, 1, 0},
163 : /* 25 */ { 4, s_5_25, -1, 1, 0},
164 : /* 26 */ { 6, s_5_26, -1, 4, 0},
165 : /* 27 */ { 4, s_5_27, -1, 9, 0},
166 : /* 28 */ { 6, s_5_28, -1, 1, 0},
167 : /* 29 */ { 4, s_5_29, -1, 1, 0},
168 : /* 30 */ { 5, s_5_30, -1, 1, 0},
169 : /* 31 */ { 4, s_5_31, -1, 8, 0},
170 : /* 32 */ { 4, s_5_32, -1, 1, 0},
171 : /* 33 */ { 6, s_5_33, -1, 2, 0},
172 : /* 34 */ { 6, s_5_34, -1, 7, 0},
173 : /* 35 */ { 7, s_5_35, -1, 3, 0},
174 : /* 36 */ { 6, s_5_36, -1, 1, 0},
175 : /* 37 */ { 5, s_5_37, -1, 1, 0},
176 : /* 38 */ { 6, s_5_38, -1, 1, 0},
177 : /* 39 */ { 4, s_5_39, -1, 1, 0},
178 : /* 40 */ { 5, s_5_40, -1, 1, 0},
179 : /* 41 */ { 4, s_5_41, -1, 1, 0},
180 : /* 42 */ { 7, s_5_42, -1, 1, 0},
181 : /* 43 */ { 7, s_5_43, -1, 1, 0},
182 : /* 44 */ { 4, s_5_44, -1, 8, 0}
183 : };
184 :
185 : static const symbol s_6_0[3] = { 'a', 'd', 'a' };
186 : static const symbol s_6_1[3] = { 'i', 'd', 'a' };
187 : static const symbol s_6_2[2] = { 'i', 'a' };
188 : static const symbol s_6_3[4] = { 'a', 'r', 'i', 'a' };
189 : static const symbol s_6_4[4] = { 'e', 'r', 'i', 'a' };
190 : static const symbol s_6_5[4] = { 'i', 'r', 'i', 'a' };
191 : static const symbol s_6_6[3] = { 'a', 'r', 'a' };
192 : static const symbol s_6_7[3] = { 'e', 'r', 'a' };
193 : static const symbol s_6_8[3] = { 'i', 'r', 'a' };
194 : static const symbol s_6_9[3] = { 'a', 'v', 'a' };
195 : static const symbol s_6_10[4] = { 'a', 's', 's', 'e' };
196 : static const symbol s_6_11[4] = { 'e', 's', 's', 'e' };
197 : static const symbol s_6_12[4] = { 'i', 's', 's', 'e' };
198 : static const symbol s_6_13[4] = { 'a', 's', 't', 'e' };
199 : static const symbol s_6_14[4] = { 'e', 's', 't', 'e' };
200 : static const symbol s_6_15[4] = { 'i', 's', 't', 'e' };
201 : static const symbol s_6_16[2] = { 'e', 'i' };
202 : static const symbol s_6_17[4] = { 'a', 'r', 'e', 'i' };
203 : static const symbol s_6_18[4] = { 'e', 'r', 'e', 'i' };
204 : static const symbol s_6_19[4] = { 'i', 'r', 'e', 'i' };
205 : static const symbol s_6_20[2] = { 'a', 'm' };
206 : static const symbol s_6_21[3] = { 'i', 'a', 'm' };
207 : static const symbol s_6_22[5] = { 'a', 'r', 'i', 'a', 'm' };
208 : static const symbol s_6_23[5] = { 'e', 'r', 'i', 'a', 'm' };
209 : static const symbol s_6_24[5] = { 'i', 'r', 'i', 'a', 'm' };
210 : static const symbol s_6_25[4] = { 'a', 'r', 'a', 'm' };
211 : static const symbol s_6_26[4] = { 'e', 'r', 'a', 'm' };
212 : static const symbol s_6_27[4] = { 'i', 'r', 'a', 'm' };
213 : static const symbol s_6_28[4] = { 'a', 'v', 'a', 'm' };
214 : static const symbol s_6_29[2] = { 'e', 'm' };
215 : static const symbol s_6_30[4] = { 'a', 'r', 'e', 'm' };
216 : static const symbol s_6_31[4] = { 'e', 'r', 'e', 'm' };
217 : static const symbol s_6_32[4] = { 'i', 'r', 'e', 'm' };
218 : static const symbol s_6_33[5] = { 'a', 's', 's', 'e', 'm' };
219 : static const symbol s_6_34[5] = { 'e', 's', 's', 'e', 'm' };
220 : static const symbol s_6_35[5] = { 'i', 's', 's', 'e', 'm' };
221 : static const symbol s_6_36[3] = { 'a', 'd', 'o' };
222 : static const symbol s_6_37[3] = { 'i', 'd', 'o' };
223 : static const symbol s_6_38[4] = { 'a', 'n', 'd', 'o' };
224 : static const symbol s_6_39[4] = { 'e', 'n', 'd', 'o' };
225 : static const symbol s_6_40[4] = { 'i', 'n', 'd', 'o' };
226 : static const symbol s_6_41[5] = { 'a', 'r', 'a', '~', 'o' };
227 : static const symbol s_6_42[5] = { 'e', 'r', 'a', '~', 'o' };
228 : static const symbol s_6_43[5] = { 'i', 'r', 'a', '~', 'o' };
229 : static const symbol s_6_44[2] = { 'a', 'r' };
230 : static const symbol s_6_45[2] = { 'e', 'r' };
231 : static const symbol s_6_46[2] = { 'i', 'r' };
232 : static const symbol s_6_47[2] = { 'a', 's' };
233 : static const symbol s_6_48[4] = { 'a', 'd', 'a', 's' };
234 : static const symbol s_6_49[4] = { 'i', 'd', 'a', 's' };
235 : static const symbol s_6_50[3] = { 'i', 'a', 's' };
236 : static const symbol s_6_51[5] = { 'a', 'r', 'i', 'a', 's' };
237 : static const symbol s_6_52[5] = { 'e', 'r', 'i', 'a', 's' };
238 : static const symbol s_6_53[5] = { 'i', 'r', 'i', 'a', 's' };
239 : static const symbol s_6_54[4] = { 'a', 'r', 'a', 's' };
240 : static const symbol s_6_55[4] = { 'e', 'r', 'a', 's' };
241 : static const symbol s_6_56[4] = { 'i', 'r', 'a', 's' };
242 : static const symbol s_6_57[4] = { 'a', 'v', 'a', 's' };
243 : static const symbol s_6_58[2] = { 'e', 's' };
244 : static const symbol s_6_59[5] = { 'a', 'r', 'd', 'e', 's' };
245 : static const symbol s_6_60[5] = { 'e', 'r', 'd', 'e', 's' };
246 : static const symbol s_6_61[5] = { 'i', 'r', 'd', 'e', 's' };
247 : static const symbol s_6_62[4] = { 'a', 'r', 'e', 's' };
248 : static const symbol s_6_63[4] = { 'e', 'r', 'e', 's' };
249 : static const symbol s_6_64[4] = { 'i', 'r', 'e', 's' };
250 : static const symbol s_6_65[5] = { 'a', 's', 's', 'e', 's' };
251 : static const symbol s_6_66[5] = { 'e', 's', 's', 'e', 's' };
252 : static const symbol s_6_67[5] = { 'i', 's', 's', 'e', 's' };
253 : static const symbol s_6_68[5] = { 'a', 's', 't', 'e', 's' };
254 : static const symbol s_6_69[5] = { 'e', 's', 't', 'e', 's' };
255 : static const symbol s_6_70[5] = { 'i', 's', 't', 'e', 's' };
256 : static const symbol s_6_71[2] = { 'i', 's' };
257 : static const symbol s_6_72[3] = { 'a', 'i', 's' };
258 : static const symbol s_6_73[3] = { 'e', 'i', 's' };
259 : static const symbol s_6_74[5] = { 'a', 'r', 'e', 'i', 's' };
260 : static const symbol s_6_75[5] = { 'e', 'r', 'e', 'i', 's' };
261 : static const symbol s_6_76[5] = { 'i', 'r', 'e', 'i', 's' };
262 : static const symbol s_6_77[5] = { 0xE1, 'r', 'e', 'i', 's' };
263 : static const symbol s_6_78[5] = { 0xE9, 'r', 'e', 'i', 's' };
264 : static const symbol s_6_79[5] = { 0xED, 'r', 'e', 'i', 's' };
265 : static const symbol s_6_80[6] = { 0xE1, 's', 's', 'e', 'i', 's' };
266 : static const symbol s_6_81[6] = { 0xE9, 's', 's', 'e', 'i', 's' };
267 : static const symbol s_6_82[6] = { 0xED, 's', 's', 'e', 'i', 's' };
268 : static const symbol s_6_83[5] = { 0xE1, 'v', 'e', 'i', 's' };
269 : static const symbol s_6_84[4] = { 0xED, 'e', 'i', 's' };
270 : static const symbol s_6_85[6] = { 'a', 'r', 0xED, 'e', 'i', 's' };
271 : static const symbol s_6_86[6] = { 'e', 'r', 0xED, 'e', 'i', 's' };
272 : static const symbol s_6_87[6] = { 'i', 'r', 0xED, 'e', 'i', 's' };
273 : static const symbol s_6_88[4] = { 'a', 'd', 'o', 's' };
274 : static const symbol s_6_89[4] = { 'i', 'd', 'o', 's' };
275 : static const symbol s_6_90[4] = { 'a', 'm', 'o', 's' };
276 : static const symbol s_6_91[6] = { 0xE1, 'r', 'a', 'm', 'o', 's' };
277 : static const symbol s_6_92[6] = { 0xE9, 'r', 'a', 'm', 'o', 's' };
278 : static const symbol s_6_93[6] = { 0xED, 'r', 'a', 'm', 'o', 's' };
279 : static const symbol s_6_94[6] = { 0xE1, 'v', 'a', 'm', 'o', 's' };
280 : static const symbol s_6_95[5] = { 0xED, 'a', 'm', 'o', 's' };
281 : static const symbol s_6_96[7] = { 'a', 'r', 0xED, 'a', 'm', 'o', 's' };
282 : static const symbol s_6_97[7] = { 'e', 'r', 0xED, 'a', 'm', 'o', 's' };
283 : static const symbol s_6_98[7] = { 'i', 'r', 0xED, 'a', 'm', 'o', 's' };
284 : static const symbol s_6_99[4] = { 'e', 'm', 'o', 's' };
285 : static const symbol s_6_100[6] = { 'a', 'r', 'e', 'm', 'o', 's' };
286 : static const symbol s_6_101[6] = { 'e', 'r', 'e', 'm', 'o', 's' };
287 : static const symbol s_6_102[6] = { 'i', 'r', 'e', 'm', 'o', 's' };
288 : static const symbol s_6_103[7] = { 0xE1, 's', 's', 'e', 'm', 'o', 's' };
289 : static const symbol s_6_104[7] = { 0xEA, 's', 's', 'e', 'm', 'o', 's' };
290 : static const symbol s_6_105[7] = { 0xED, 's', 's', 'e', 'm', 'o', 's' };
291 : static const symbol s_6_106[4] = { 'i', 'm', 'o', 's' };
292 : static const symbol s_6_107[5] = { 'a', 'r', 'm', 'o', 's' };
293 : static const symbol s_6_108[5] = { 'e', 'r', 'm', 'o', 's' };
294 : static const symbol s_6_109[5] = { 'i', 'r', 'm', 'o', 's' };
295 : static const symbol s_6_110[4] = { 0xE1, 'm', 'o', 's' };
296 : static const symbol s_6_111[4] = { 'a', 'r', 0xE1, 's' };
297 : static const symbol s_6_112[4] = { 'e', 'r', 0xE1, 's' };
298 : static const symbol s_6_113[4] = { 'i', 'r', 0xE1, 's' };
299 : static const symbol s_6_114[2] = { 'e', 'u' };
300 : static const symbol s_6_115[2] = { 'i', 'u' };
301 : static const symbol s_6_116[2] = { 'o', 'u' };
302 : static const symbol s_6_117[3] = { 'a', 'r', 0xE1 };
303 : static const symbol s_6_118[3] = { 'e', 'r', 0xE1 };
304 : static const symbol s_6_119[3] = { 'i', 'r', 0xE1 };
305 :
306 : static const struct among a_6[120] =
307 : {
308 : /* 0 */ { 3, s_6_0, -1, 1, 0},
309 : /* 1 */ { 3, s_6_1, -1, 1, 0},
310 : /* 2 */ { 2, s_6_2, -1, 1, 0},
311 : /* 3 */ { 4, s_6_3, 2, 1, 0},
312 : /* 4 */ { 4, s_6_4, 2, 1, 0},
313 : /* 5 */ { 4, s_6_5, 2, 1, 0},
314 : /* 6 */ { 3, s_6_6, -1, 1, 0},
315 : /* 7 */ { 3, s_6_7, -1, 1, 0},
316 : /* 8 */ { 3, s_6_8, -1, 1, 0},
317 : /* 9 */ { 3, s_6_9, -1, 1, 0},
318 : /* 10 */ { 4, s_6_10, -1, 1, 0},
319 : /* 11 */ { 4, s_6_11, -1, 1, 0},
320 : /* 12 */ { 4, s_6_12, -1, 1, 0},
321 : /* 13 */ { 4, s_6_13, -1, 1, 0},
322 : /* 14 */ { 4, s_6_14, -1, 1, 0},
323 : /* 15 */ { 4, s_6_15, -1, 1, 0},
324 : /* 16 */ { 2, s_6_16, -1, 1, 0},
325 : /* 17 */ { 4, s_6_17, 16, 1, 0},
326 : /* 18 */ { 4, s_6_18, 16, 1, 0},
327 : /* 19 */ { 4, s_6_19, 16, 1, 0},
328 : /* 20 */ { 2, s_6_20, -1, 1, 0},
329 : /* 21 */ { 3, s_6_21, 20, 1, 0},
330 : /* 22 */ { 5, s_6_22, 21, 1, 0},
331 : /* 23 */ { 5, s_6_23, 21, 1, 0},
332 : /* 24 */ { 5, s_6_24, 21, 1, 0},
333 : /* 25 */ { 4, s_6_25, 20, 1, 0},
334 : /* 26 */ { 4, s_6_26, 20, 1, 0},
335 : /* 27 */ { 4, s_6_27, 20, 1, 0},
336 : /* 28 */ { 4, s_6_28, 20, 1, 0},
337 : /* 29 */ { 2, s_6_29, -1, 1, 0},
338 : /* 30 */ { 4, s_6_30, 29, 1, 0},
339 : /* 31 */ { 4, s_6_31, 29, 1, 0},
340 : /* 32 */ { 4, s_6_32, 29, 1, 0},
341 : /* 33 */ { 5, s_6_33, 29, 1, 0},
342 : /* 34 */ { 5, s_6_34, 29, 1, 0},
343 : /* 35 */ { 5, s_6_35, 29, 1, 0},
344 : /* 36 */ { 3, s_6_36, -1, 1, 0},
345 : /* 37 */ { 3, s_6_37, -1, 1, 0},
346 : /* 38 */ { 4, s_6_38, -1, 1, 0},
347 : /* 39 */ { 4, s_6_39, -1, 1, 0},
348 : /* 40 */ { 4, s_6_40, -1, 1, 0},
349 : /* 41 */ { 5, s_6_41, -1, 1, 0},
350 : /* 42 */ { 5, s_6_42, -1, 1, 0},
351 : /* 43 */ { 5, s_6_43, -1, 1, 0},
352 : /* 44 */ { 2, s_6_44, -1, 1, 0},
353 : /* 45 */ { 2, s_6_45, -1, 1, 0},
354 : /* 46 */ { 2, s_6_46, -1, 1, 0},
355 : /* 47 */ { 2, s_6_47, -1, 1, 0},
356 : /* 48 */ { 4, s_6_48, 47, 1, 0},
357 : /* 49 */ { 4, s_6_49, 47, 1, 0},
358 : /* 50 */ { 3, s_6_50, 47, 1, 0},
359 : /* 51 */ { 5, s_6_51, 50, 1, 0},
360 : /* 52 */ { 5, s_6_52, 50, 1, 0},
361 : /* 53 */ { 5, s_6_53, 50, 1, 0},
362 : /* 54 */ { 4, s_6_54, 47, 1, 0},
363 : /* 55 */ { 4, s_6_55, 47, 1, 0},
364 : /* 56 */ { 4, s_6_56, 47, 1, 0},
365 : /* 57 */ { 4, s_6_57, 47, 1, 0},
366 : /* 58 */ { 2, s_6_58, -1, 1, 0},
367 : /* 59 */ { 5, s_6_59, 58, 1, 0},
368 : /* 60 */ { 5, s_6_60, 58, 1, 0},
369 : /* 61 */ { 5, s_6_61, 58, 1, 0},
370 : /* 62 */ { 4, s_6_62, 58, 1, 0},
371 : /* 63 */ { 4, s_6_63, 58, 1, 0},
372 : /* 64 */ { 4, s_6_64, 58, 1, 0},
373 : /* 65 */ { 5, s_6_65, 58, 1, 0},
374 : /* 66 */ { 5, s_6_66, 58, 1, 0},
375 : /* 67 */ { 5, s_6_67, 58, 1, 0},
376 : /* 68 */ { 5, s_6_68, 58, 1, 0},
377 : /* 69 */ { 5, s_6_69, 58, 1, 0},
378 : /* 70 */ { 5, s_6_70, 58, 1, 0},
379 : /* 71 */ { 2, s_6_71, -1, 1, 0},
380 : /* 72 */ { 3, s_6_72, 71, 1, 0},
381 : /* 73 */ { 3, s_6_73, 71, 1, 0},
382 : /* 74 */ { 5, s_6_74, 73, 1, 0},
383 : /* 75 */ { 5, s_6_75, 73, 1, 0},
384 : /* 76 */ { 5, s_6_76, 73, 1, 0},
385 : /* 77 */ { 5, s_6_77, 73, 1, 0},
386 : /* 78 */ { 5, s_6_78, 73, 1, 0},
387 : /* 79 */ { 5, s_6_79, 73, 1, 0},
388 : /* 80 */ { 6, s_6_80, 73, 1, 0},
389 : /* 81 */ { 6, s_6_81, 73, 1, 0},
390 : /* 82 */ { 6, s_6_82, 73, 1, 0},
391 : /* 83 */ { 5, s_6_83, 73, 1, 0},
392 : /* 84 */ { 4, s_6_84, 73, 1, 0},
393 : /* 85 */ { 6, s_6_85, 84, 1, 0},
394 : /* 86 */ { 6, s_6_86, 84, 1, 0},
395 : /* 87 */ { 6, s_6_87, 84, 1, 0},
396 : /* 88 */ { 4, s_6_88, -1, 1, 0},
397 : /* 89 */ { 4, s_6_89, -1, 1, 0},
398 : /* 90 */ { 4, s_6_90, -1, 1, 0},
399 : /* 91 */ { 6, s_6_91, 90, 1, 0},
400 : /* 92 */ { 6, s_6_92, 90, 1, 0},
401 : /* 93 */ { 6, s_6_93, 90, 1, 0},
402 : /* 94 */ { 6, s_6_94, 90, 1, 0},
403 : /* 95 */ { 5, s_6_95, 90, 1, 0},
404 : /* 96 */ { 7, s_6_96, 95, 1, 0},
405 : /* 97 */ { 7, s_6_97, 95, 1, 0},
406 : /* 98 */ { 7, s_6_98, 95, 1, 0},
407 : /* 99 */ { 4, s_6_99, -1, 1, 0},
408 : /*100 */ { 6, s_6_100, 99, 1, 0},
409 : /*101 */ { 6, s_6_101, 99, 1, 0},
410 : /*102 */ { 6, s_6_102, 99, 1, 0},
411 : /*103 */ { 7, s_6_103, 99, 1, 0},
412 : /*104 */ { 7, s_6_104, 99, 1, 0},
413 : /*105 */ { 7, s_6_105, 99, 1, 0},
414 : /*106 */ { 4, s_6_106, -1, 1, 0},
415 : /*107 */ { 5, s_6_107, -1, 1, 0},
416 : /*108 */ { 5, s_6_108, -1, 1, 0},
417 : /*109 */ { 5, s_6_109, -1, 1, 0},
418 : /*110 */ { 4, s_6_110, -1, 1, 0},
419 : /*111 */ { 4, s_6_111, -1, 1, 0},
420 : /*112 */ { 4, s_6_112, -1, 1, 0},
421 : /*113 */ { 4, s_6_113, -1, 1, 0},
422 : /*114 */ { 2, s_6_114, -1, 1, 0},
423 : /*115 */ { 2, s_6_115, -1, 1, 0},
424 : /*116 */ { 2, s_6_116, -1, 1, 0},
425 : /*117 */ { 3, s_6_117, -1, 1, 0},
426 : /*118 */ { 3, s_6_118, -1, 1, 0},
427 : /*119 */ { 3, s_6_119, -1, 1, 0}
428 : };
429 :
430 : static const symbol s_7_0[1] = { 'a' };
431 : static const symbol s_7_1[1] = { 'i' };
432 : static const symbol s_7_2[1] = { 'o' };
433 : static const symbol s_7_3[2] = { 'o', 's' };
434 : static const symbol s_7_4[1] = { 0xE1 };
435 : static const symbol s_7_5[1] = { 0xED };
436 : static const symbol s_7_6[1] = { 0xF3 };
437 :
438 : static const struct among a_7[7] =
439 : {
440 : /* 0 */ { 1, s_7_0, -1, 1, 0},
441 : /* 1 */ { 1, s_7_1, -1, 1, 0},
442 : /* 2 */ { 1, s_7_2, -1, 1, 0},
443 : /* 3 */ { 2, s_7_3, -1, 1, 0},
444 : /* 4 */ { 1, s_7_4, -1, 1, 0},
445 : /* 5 */ { 1, s_7_5, -1, 1, 0},
446 : /* 6 */ { 1, s_7_6, -1, 1, 0}
447 : };
448 :
449 : static const symbol s_8_0[1] = { 'e' };
450 : static const symbol s_8_1[1] = { 0xE7 };
451 : static const symbol s_8_2[1] = { 0xE9 };
452 : static const symbol s_8_3[1] = { 0xEA };
453 :
454 : static const struct among a_8[4] =
455 : {
456 : /* 0 */ { 1, s_8_0, -1, 1, 0},
457 : /* 1 */ { 1, s_8_1, -1, 2, 0},
458 : /* 2 */ { 1, s_8_2, -1, 1, 0},
459 : /* 3 */ { 1, s_8_3, -1, 1, 0}
460 : };
461 :
462 : static const unsigned char g_v[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 19, 12, 2 };
463 :
464 : static const symbol s_0[] = { 'a', '~' };
465 : static const symbol s_1[] = { 'o', '~' };
466 : static const symbol s_2[] = { 0xE3 };
467 : static const symbol s_3[] = { 0xF5 };
468 : static const symbol s_4[] = { 'l', 'o', 'g' };
469 : static const symbol s_5[] = { 'u' };
470 : static const symbol s_6[] = { 'e', 'n', 't', 'e' };
471 : static const symbol s_7[] = { 'a', 't' };
472 : static const symbol s_8[] = { 'a', 't' };
473 : static const symbol s_9[] = { 'e' };
474 : static const symbol s_10[] = { 'i', 'r' };
475 : static const symbol s_11[] = { 'u' };
476 : static const symbol s_12[] = { 'g' };
477 : static const symbol s_13[] = { 'i' };
478 : static const symbol s_14[] = { 'c' };
479 : static const symbol s_15[] = { 'c' };
480 : static const symbol s_16[] = { 'i' };
481 : static const symbol s_17[] = { 'c' };
482 :
483 0 : static int r_prelude(struct SN_env * z) {
484 : int among_var;
485 : while(1) { /* repeat, line 36 */
486 0 : int c1 = z->c;
487 0 : z->bra = z->c; /* [, line 37 */
488 0 : if (z->c >= z->l || (z->p[z->c + 0] != 227 && z->p[z->c + 0] != 245)) among_var = 3; else
489 0 : among_var = find_among(z, a_0, 3); /* substring, line 37 */
490 0 : if (!(among_var)) goto lab0;
491 0 : z->ket = z->c; /* ], line 37 */
492 0 : switch(among_var) {
493 0 : case 0: goto lab0;
494 : case 1:
495 0 : { int ret = slice_from_s(z, 2, s_0); /* <-, line 38 */
496 0 : if (ret < 0) return ret;
497 : }
498 0 : break;
499 : case 2:
500 0 : { int ret = slice_from_s(z, 2, s_1); /* <-, line 39 */
501 0 : if (ret < 0) return ret;
502 : }
503 0 : break;
504 : case 3:
505 0 : if (z->c >= z->l) goto lab0;
506 0 : z->c++; /* next, line 40 */
507 0 : break;
508 : }
509 0 : continue;
510 : lab0:
511 0 : z->c = c1;
512 0 : break;
513 0 : }
514 0 : return 1;
515 : }
516 :
517 0 : static int r_mark_regions(struct SN_env * z) {
518 0 : z->I[0] = z->l;
519 0 : z->I[1] = z->l;
520 0 : z->I[2] = z->l;
521 0 : { int c1 = z->c; /* do, line 50 */
522 0 : { int c2 = z->c; /* or, line 52 */
523 0 : if (in_grouping(z, g_v, 97, 250, 0)) goto lab2;
524 0 : { int c3 = z->c; /* or, line 51 */
525 0 : if (out_grouping(z, g_v, 97, 250, 0)) goto lab4;
526 : { /* gopast */ /* grouping v, line 51 */
527 0 : int ret = out_grouping(z, g_v, 97, 250, 1);
528 0 : if (ret < 0) goto lab4;
529 0 : z->c += ret;
530 : }
531 0 : goto lab3;
532 : lab4:
533 0 : z->c = c3;
534 0 : if (in_grouping(z, g_v, 97, 250, 0)) goto lab2;
535 : { /* gopast */ /* non v, line 51 */
536 0 : int ret = in_grouping(z, g_v, 97, 250, 1);
537 0 : if (ret < 0) goto lab2;
538 0 : z->c += ret;
539 : }
540 : }
541 : lab3:
542 0 : goto lab1;
543 : lab2:
544 0 : z->c = c2;
545 0 : if (out_grouping(z, g_v, 97, 250, 0)) goto lab0;
546 0 : { int c4 = z->c; /* or, line 53 */
547 0 : if (out_grouping(z, g_v, 97, 250, 0)) goto lab6;
548 : { /* gopast */ /* grouping v, line 53 */
549 0 : int ret = out_grouping(z, g_v, 97, 250, 1);
550 0 : if (ret < 0) goto lab6;
551 0 : z->c += ret;
552 : }
553 0 : goto lab5;
554 : lab6:
555 0 : z->c = c4;
556 0 : if (in_grouping(z, g_v, 97, 250, 0)) goto lab0;
557 0 : if (z->c >= z->l) goto lab0;
558 0 : z->c++; /* next, line 53 */
559 : }
560 : lab5:
561 : ;
562 : }
563 : lab1:
564 0 : z->I[0] = z->c; /* setmark pV, line 54 */
565 : lab0:
566 0 : z->c = c1;
567 : }
568 0 : { int c5 = z->c; /* do, line 56 */
569 : { /* gopast */ /* grouping v, line 57 */
570 0 : int ret = out_grouping(z, g_v, 97, 250, 1);
571 0 : if (ret < 0) goto lab7;
572 0 : z->c += ret;
573 : }
574 : { /* gopast */ /* non v, line 57 */
575 0 : int ret = in_grouping(z, g_v, 97, 250, 1);
576 0 : if (ret < 0) goto lab7;
577 0 : z->c += ret;
578 : }
579 0 : z->I[1] = z->c; /* setmark p1, line 57 */
580 : { /* gopast */ /* grouping v, line 58 */
581 0 : int ret = out_grouping(z, g_v, 97, 250, 1);
582 0 : if (ret < 0) goto lab7;
583 0 : z->c += ret;
584 : }
585 : { /* gopast */ /* non v, line 58 */
586 0 : int ret = in_grouping(z, g_v, 97, 250, 1);
587 0 : if (ret < 0) goto lab7;
588 0 : z->c += ret;
589 : }
590 0 : z->I[2] = z->c; /* setmark p2, line 58 */
591 : lab7:
592 0 : z->c = c5;
593 : }
594 0 : return 1;
595 : }
596 :
597 0 : static int r_postlude(struct SN_env * z) {
598 : int among_var;
599 : while(1) { /* repeat, line 62 */
600 0 : int c1 = z->c;
601 0 : z->bra = z->c; /* [, line 63 */
602 0 : if (z->c + 1 >= z->l || z->p[z->c + 1] != 126) among_var = 3; else
603 0 : among_var = find_among(z, a_1, 3); /* substring, line 63 */
604 0 : if (!(among_var)) goto lab0;
605 0 : z->ket = z->c; /* ], line 63 */
606 0 : switch(among_var) {
607 0 : case 0: goto lab0;
608 : case 1:
609 0 : { int ret = slice_from_s(z, 1, s_2); /* <-, line 64 */
610 0 : if (ret < 0) return ret;
611 : }
612 0 : break;
613 : case 2:
614 0 : { int ret = slice_from_s(z, 1, s_3); /* <-, line 65 */
615 0 : if (ret < 0) return ret;
616 : }
617 0 : break;
618 : case 3:
619 0 : if (z->c >= z->l) goto lab0;
620 0 : z->c++; /* next, line 66 */
621 0 : break;
622 : }
623 0 : continue;
624 : lab0:
625 0 : z->c = c1;
626 0 : break;
627 0 : }
628 0 : return 1;
629 : }
630 :
631 0 : static int r_RV(struct SN_env * z) {
632 0 : if (!(z->I[0] <= z->c)) return 0;
633 0 : return 1;
634 : }
635 :
636 0 : static int r_R1(struct SN_env * z) {
637 0 : if (!(z->I[1] <= z->c)) return 0;
638 0 : return 1;
639 : }
640 :
641 0 : static int r_R2(struct SN_env * z) {
642 0 : if (!(z->I[2] <= z->c)) return 0;
643 0 : return 1;
644 : }
645 :
646 0 : static int r_standard_suffix(struct SN_env * z) {
647 : int among_var;
648 0 : z->ket = z->c; /* [, line 77 */
649 0 : if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((839714 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
650 0 : among_var = find_among_b(z, a_5, 45); /* substring, line 77 */
651 0 : if (!(among_var)) return 0;
652 0 : z->bra = z->c; /* ], line 77 */
653 0 : switch(among_var) {
654 0 : case 0: return 0;
655 : case 1:
656 0 : { int ret = r_R2(z);
657 0 : if (ret == 0) return 0; /* call R2, line 93 */
658 0 : if (ret < 0) return ret;
659 : }
660 0 : { int ret = slice_del(z); /* delete, line 93 */
661 0 : if (ret < 0) return ret;
662 : }
663 0 : break;
664 : case 2:
665 0 : { int ret = r_R2(z);
666 0 : if (ret == 0) return 0; /* call R2, line 98 */
667 0 : if (ret < 0) return ret;
668 : }
669 0 : { int ret = slice_from_s(z, 3, s_4); /* <-, line 98 */
670 0 : if (ret < 0) return ret;
671 : }
672 0 : break;
673 : case 3:
674 0 : { int ret = r_R2(z);
675 0 : if (ret == 0) return 0; /* call R2, line 102 */
676 0 : if (ret < 0) return ret;
677 : }
678 0 : { int ret = slice_from_s(z, 1, s_5); /* <-, line 102 */
679 0 : if (ret < 0) return ret;
680 : }
681 0 : break;
682 : case 4:
683 0 : { int ret = r_R2(z);
684 0 : if (ret == 0) return 0; /* call R2, line 106 */
685 0 : if (ret < 0) return ret;
686 : }
687 0 : { int ret = slice_from_s(z, 4, s_6); /* <-, line 106 */
688 0 : if (ret < 0) return ret;
689 : }
690 0 : break;
691 : case 5:
692 0 : { int ret = r_R1(z);
693 0 : if (ret == 0) return 0; /* call R1, line 110 */
694 0 : if (ret < 0) return ret;
695 : }
696 0 : { int ret = slice_del(z); /* delete, line 110 */
697 0 : if (ret < 0) return ret;
698 : }
699 0 : { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 111 */
700 0 : z->ket = z->c; /* [, line 112 */
701 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 - m_keep; goto lab0; }
702 0 : among_var = find_among_b(z, a_2, 4); /* substring, line 112 */
703 0 : if (!(among_var)) { z->c = z->l - m_keep; goto lab0; }
704 0 : z->bra = z->c; /* ], line 112 */
705 0 : { int ret = r_R2(z);
706 0 : if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call R2, line 112 */
707 0 : if (ret < 0) return ret;
708 : }
709 0 : { int ret = slice_del(z); /* delete, line 112 */
710 0 : if (ret < 0) return ret;
711 : }
712 0 : switch(among_var) {
713 0 : case 0: { z->c = z->l - m_keep; goto lab0; }
714 : case 1:
715 0 : z->ket = z->c; /* [, line 113 */
716 0 : if (!(eq_s_b(z, 2, s_7))) { z->c = z->l - m_keep; goto lab0; }
717 0 : z->bra = z->c; /* ], line 113 */
718 0 : { int ret = r_R2(z);
719 0 : if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call R2, line 113 */
720 0 : if (ret < 0) return ret;
721 : }
722 0 : { int ret = slice_del(z); /* delete, line 113 */
723 0 : if (ret < 0) return ret;
724 : }
725 0 : break;
726 : }
727 : lab0:
728 : ;
729 : }
730 0 : break;
731 : case 6:
732 0 : { int ret = r_R2(z);
733 0 : if (ret == 0) return 0; /* call R2, line 122 */
734 0 : if (ret < 0) return ret;
735 : }
736 0 : { int ret = slice_del(z); /* delete, line 122 */
737 0 : if (ret < 0) return ret;
738 : }
739 0 : { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 123 */
740 0 : z->ket = z->c; /* [, line 124 */
741 0 : if (z->c - 3 <= z->lb || (z->p[z->c - 1] != 101 && z->p[z->c - 1] != 108)) { z->c = z->l - m_keep; goto lab1; }
742 0 : among_var = find_among_b(z, a_3, 3); /* substring, line 124 */
743 0 : if (!(among_var)) { z->c = z->l - m_keep; goto lab1; }
744 0 : z->bra = z->c; /* ], line 124 */
745 0 : switch(among_var) {
746 0 : case 0: { z->c = z->l - m_keep; goto lab1; }
747 : case 1:
748 0 : { int ret = r_R2(z);
749 0 : if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call R2, line 127 */
750 0 : if (ret < 0) return ret;
751 : }
752 0 : { int ret = slice_del(z); /* delete, line 127 */
753 0 : if (ret < 0) return ret;
754 : }
755 0 : break;
756 : }
757 : lab1:
758 : ;
759 : }
760 0 : break;
761 : case 7:
762 0 : { int ret = r_R2(z);
763 0 : if (ret == 0) return 0; /* call R2, line 134 */
764 0 : if (ret < 0) return ret;
765 : }
766 0 : { int ret = slice_del(z); /* delete, line 134 */
767 0 : if (ret < 0) return ret;
768 : }
769 0 : { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 135 */
770 0 : z->ket = z->c; /* [, line 136 */
771 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 - m_keep; goto lab2; }
772 0 : among_var = find_among_b(z, a_4, 3); /* substring, line 136 */
773 0 : if (!(among_var)) { z->c = z->l - m_keep; goto lab2; }
774 0 : z->bra = z->c; /* ], line 136 */
775 0 : switch(among_var) {
776 0 : case 0: { z->c = z->l - m_keep; goto lab2; }
777 : case 1:
778 0 : { int ret = r_R2(z);
779 0 : if (ret == 0) { z->c = z->l - m_keep; goto lab2; } /* call R2, line 139 */
780 0 : if (ret < 0) return ret;
781 : }
782 0 : { int ret = slice_del(z); /* delete, line 139 */
783 0 : if (ret < 0) return ret;
784 : }
785 0 : break;
786 : }
787 : lab2:
788 : ;
789 : }
790 0 : break;
791 : case 8:
792 0 : { int ret = r_R2(z);
793 0 : if (ret == 0) return 0; /* call R2, line 146 */
794 0 : if (ret < 0) return ret;
795 : }
796 0 : { int ret = slice_del(z); /* delete, line 146 */
797 0 : if (ret < 0) return ret;
798 : }
799 0 : { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 147 */
800 0 : z->ket = z->c; /* [, line 148 */
801 0 : if (!(eq_s_b(z, 2, s_8))) { z->c = z->l - m_keep; goto lab3; }
802 0 : z->bra = z->c; /* ], line 148 */
803 0 : { int ret = r_R2(z);
804 0 : if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 148 */
805 0 : if (ret < 0) return ret;
806 : }
807 0 : { int ret = slice_del(z); /* delete, line 148 */
808 0 : if (ret < 0) return ret;
809 : }
810 : lab3:
811 : ;
812 : }
813 0 : break;
814 : case 9:
815 0 : { int ret = r_RV(z);
816 0 : if (ret == 0) return 0; /* call RV, line 153 */
817 0 : if (ret < 0) return ret;
818 : }
819 0 : if (!(eq_s_b(z, 1, s_9))) return 0;
820 0 : { int ret = slice_from_s(z, 2, s_10); /* <-, line 154 */
821 0 : if (ret < 0) return ret;
822 : }
823 0 : break;
824 : }
825 0 : return 1;
826 : }
827 :
828 0 : static int r_verb_suffix(struct SN_env * z) {
829 : int among_var;
830 : { int mlimit; /* setlimit, line 159 */
831 0 : int m1 = z->l - z->c; (void)m1;
832 0 : if (z->c < z->I[0]) return 0;
833 0 : z->c = z->I[0]; /* tomark, line 159 */
834 0 : mlimit = z->lb; z->lb = z->c;
835 0 : z->c = z->l - m1;
836 0 : z->ket = z->c; /* [, line 160 */
837 0 : among_var = find_among_b(z, a_6, 120); /* substring, line 160 */
838 0 : if (!(among_var)) { z->lb = mlimit; return 0; }
839 0 : z->bra = z->c; /* ], line 160 */
840 0 : switch(among_var) {
841 0 : case 0: { z->lb = mlimit; return 0; }
842 : case 1:
843 0 : { int ret = slice_del(z); /* delete, line 179 */
844 0 : if (ret < 0) return ret;
845 : }
846 0 : break;
847 : }
848 0 : z->lb = mlimit;
849 : }
850 0 : return 1;
851 : }
852 :
853 0 : static int r_residual_suffix(struct SN_env * z) {
854 : int among_var;
855 0 : z->ket = z->c; /* [, line 184 */
856 0 : among_var = find_among_b(z, a_7, 7); /* substring, line 184 */
857 0 : if (!(among_var)) return 0;
858 0 : z->bra = z->c; /* ], line 184 */
859 0 : switch(among_var) {
860 0 : case 0: return 0;
861 : case 1:
862 0 : { int ret = r_RV(z);
863 0 : if (ret == 0) return 0; /* call RV, line 187 */
864 0 : if (ret < 0) return ret;
865 : }
866 0 : { int ret = slice_del(z); /* delete, line 187 */
867 0 : if (ret < 0) return ret;
868 : }
869 0 : break;
870 : }
871 0 : return 1;
872 : }
873 :
874 0 : static int r_residual_form(struct SN_env * z) {
875 : int among_var;
876 0 : z->ket = z->c; /* [, line 192 */
877 0 : among_var = find_among_b(z, a_8, 4); /* substring, line 192 */
878 0 : if (!(among_var)) return 0;
879 0 : z->bra = z->c; /* ], line 192 */
880 0 : switch(among_var) {
881 0 : case 0: return 0;
882 : case 1:
883 0 : { int ret = r_RV(z);
884 0 : if (ret == 0) return 0; /* call RV, line 194 */
885 0 : if (ret < 0) return ret;
886 : }
887 0 : { int ret = slice_del(z); /* delete, line 194 */
888 0 : if (ret < 0) return ret;
889 : }
890 0 : z->ket = z->c; /* [, line 194 */
891 0 : { int m1 = z->l - z->c; (void)m1; /* or, line 194 */
892 0 : if (!(eq_s_b(z, 1, s_11))) goto lab1;
893 0 : z->bra = z->c; /* ], line 194 */
894 0 : { int m_test = z->l - z->c; /* test, line 194 */
895 0 : if (!(eq_s_b(z, 1, s_12))) goto lab1;
896 0 : z->c = z->l - m_test;
897 : }
898 0 : goto lab0;
899 : lab1:
900 0 : z->c = z->l - m1;
901 0 : if (!(eq_s_b(z, 1, s_13))) return 0;
902 0 : z->bra = z->c; /* ], line 195 */
903 0 : { int m_test = z->l - z->c; /* test, line 195 */
904 0 : if (!(eq_s_b(z, 1, s_14))) return 0;
905 0 : z->c = z->l - m_test;
906 : }
907 : }
908 : lab0:
909 0 : { int ret = r_RV(z);
910 0 : if (ret == 0) return 0; /* call RV, line 195 */
911 0 : if (ret < 0) return ret;
912 : }
913 0 : { int ret = slice_del(z); /* delete, line 195 */
914 0 : if (ret < 0) return ret;
915 : }
916 0 : break;
917 : case 2:
918 0 : { int ret = slice_from_s(z, 1, s_15); /* <-, line 196 */
919 0 : if (ret < 0) return ret;
920 : }
921 0 : break;
922 : }
923 0 : return 1;
924 : }
925 :
926 0 : extern int portuguese_ISO_8859_1_stem(struct SN_env * z) {
927 0 : { int c1 = z->c; /* do, line 202 */
928 0 : { int ret = r_prelude(z);
929 0 : if (ret == 0) goto lab0; /* call prelude, line 202 */
930 0 : if (ret < 0) return ret;
931 : }
932 : lab0:
933 0 : z->c = c1;
934 : }
935 0 : { int c2 = z->c; /* do, line 203 */
936 0 : { int ret = r_mark_regions(z);
937 0 : if (ret == 0) goto lab1; /* call mark_regions, line 203 */
938 0 : if (ret < 0) return ret;
939 : }
940 : lab1:
941 0 : z->c = c2;
942 : }
943 0 : z->lb = z->c; z->c = z->l; /* backwards, line 204 */
944 :
945 0 : { int m3 = z->l - z->c; (void)m3; /* do, line 205 */
946 0 : { int m4 = z->l - z->c; (void)m4; /* or, line 209 */
947 0 : { int m5 = z->l - z->c; (void)m5; /* and, line 207 */
948 0 : { int m6 = z->l - z->c; (void)m6; /* or, line 206 */
949 0 : { int ret = r_standard_suffix(z);
950 0 : if (ret == 0) goto lab6; /* call standard_suffix, line 206 */
951 0 : if (ret < 0) return ret;
952 : }
953 0 : goto lab5;
954 : lab6:
955 0 : z->c = z->l - m6;
956 0 : { int ret = r_verb_suffix(z);
957 0 : if (ret == 0) goto lab4; /* call verb_suffix, line 206 */
958 0 : if (ret < 0) return ret;
959 : }
960 : }
961 : lab5:
962 0 : z->c = z->l - m5;
963 0 : { int m7 = z->l - z->c; (void)m7; /* do, line 207 */
964 0 : z->ket = z->c; /* [, line 207 */
965 0 : if (!(eq_s_b(z, 1, s_16))) goto lab7;
966 0 : z->bra = z->c; /* ], line 207 */
967 0 : { int m_test = z->l - z->c; /* test, line 207 */
968 0 : if (!(eq_s_b(z, 1, s_17))) goto lab7;
969 0 : z->c = z->l - m_test;
970 : }
971 0 : { int ret = r_RV(z);
972 0 : if (ret == 0) goto lab7; /* call RV, line 207 */
973 0 : if (ret < 0) return ret;
974 : }
975 0 : { int ret = slice_del(z); /* delete, line 207 */
976 0 : if (ret < 0) return ret;
977 : }
978 : lab7:
979 0 : z->c = z->l - m7;
980 : }
981 : }
982 0 : goto lab3;
983 : lab4:
984 0 : z->c = z->l - m4;
985 0 : { int ret = r_residual_suffix(z);
986 0 : if (ret == 0) goto lab2; /* call residual_suffix, line 209 */
987 0 : if (ret < 0) return ret;
988 : }
989 : }
990 : lab3:
991 : lab2:
992 0 : z->c = z->l - m3;
993 : }
994 0 : { int m8 = z->l - z->c; (void)m8; /* do, line 211 */
995 0 : { int ret = r_residual_form(z);
996 0 : if (ret == 0) goto lab8; /* call residual_form, line 211 */
997 0 : if (ret < 0) return ret;
998 : }
999 : lab8:
1000 0 : z->c = z->l - m8;
1001 : }
1002 0 : z->c = z->lb;
1003 0 : { int c9 = z->c; /* do, line 213 */
1004 0 : { int ret = r_postlude(z);
1005 0 : if (ret == 0) goto lab9; /* call postlude, line 213 */
1006 0 : if (ret < 0) return ret;
1007 : }
1008 : lab9:
1009 0 : z->c = c9;
1010 : }
1011 0 : return 1;
1012 : }
1013 :
1014 0 : extern struct SN_env * portuguese_ISO_8859_1_create_env(void) { return SN_create_env(0, 3, 0); }
1015 :
1016 0 : extern void portuguese_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1017 :
|
