src_c/stem_ISO_8859_1_italian.c

   1
   2 /* This file was generated automatically by the Snowball to ANSI C compiler */
   3
   4 #include "../runtime/header.h"
   5
   6 #ifdef __cplusplus
   7 extern "C" {
   8 #endif
   9 extern int italian_ISO_8859_1_stem(struct SN_env * z);
  10 #ifdef __cplusplus
  11 }
  12 #endif
  13 static int r_vowel_suffix(struct SN_env * z);
  14 static int r_verb_suffix(struct SN_env * z);
  15 static int r_standard_suffix(struct SN_env * z);
  16 static int r_attached_pronoun(struct SN_env * z);
  17 static int r_R2(struct SN_env * z);
  18 static int r_R1(struct SN_env * z);
  19 static int r_RV(struct SN_env * z);
  20 static int r_mark_regions(struct SN_env * z);
  21 static int r_postlude(struct SN_env * z);
  22 static int r_prelude(struct SN_env * z);
  23 #ifdef __cplusplus
  24 extern "C" {
  25 #endif
  26
  27
  28 extern struct SN_env * italian_ISO_8859_1_create_env(void);
  29 extern void italian_ISO_8859_1_close_env(struct SN_env * z);
  30
  31
  32 #ifdef __cplusplus
  33 }
  34 #endif
  35 static const symbol s_0_1[2] = { 'q', 'u' };
  36 static const symbol s_0_2[1] = { 0xE1 };
  37 static const symbol s_0_3[1] = { 0xE9 };
  38 static const symbol s_0_4[1] = { 0xED };
  39 static const symbol s_0_5[1] = { 0xF3 };
  40 static const symbol s_0_6[1] = { 0xFA };
  41
  42 static const struct among a_0[7] =
  43 {
  44 /*  0 */ { 0, 0, -1, 7, 0},
  45 /*  1 */ { 2, s_0_1, 0, 6, 0},
  46 /*  2 */ { 1, s_0_2, 0, 1, 0},
  47 /*  3 */ { 1, s_0_3, 0, 2, 0},
  48 /*  4 */ { 1, s_0_4, 0, 3, 0},
  49 /*  5 */ { 1, s_0_5, 0, 4, 0},
  50 /*  6 */ { 1, s_0_6, 0, 5, 0}
  51 };
  52
  53 static const symbol s_1_1[1] = { 'I' };
  54 static const symbol s_1_2[1] = { 'U' };
  55
  56 static const struct among a_1[3] =
  57 {
  58 /*  0 */ { 0, 0, -1, 3, 0},
  59 /*  1 */ { 1, s_1_1, 0, 1, 0},
  60 /*  2 */ { 1, s_1_2, 0, 2, 0}
  61 };
  62
  63 static const symbol s_2_0[2] = { 'l', 'a' };
  64 static const symbol s_2_1[4] = { 'c', 'e', 'l', 'a' };
  65 static const symbol s_2_2[6] = { 'g', 'l', 'i', 'e', 'l', 'a' };
  66 static const symbol s_2_3[4] = { 'm', 'e', 'l', 'a' };
  67 static const symbol s_2_4[4] = { 't', 'e', 'l', 'a' };
  68 static const symbol s_2_5[4] = { 'v', 'e', 'l', 'a' };
  69 static const symbol s_2_6[2] = { 'l', 'e' };
  70 static const symbol s_2_7[4] = { 'c', 'e', 'l', 'e' };
  71 static const symbol s_2_8[6] = { 'g', 'l', 'i', 'e', 'l', 'e' };
  72 static const symbol s_2_9[4] = { 'm', 'e', 'l', 'e' };
  73 static const symbol s_2_10[4] = { 't', 'e', 'l', 'e' };
  74 static const symbol s_2_11[4] = { 'v', 'e', 'l', 'e' };
  75 static const symbol s_2_12[2] = { 'n', 'e' };
  76 static const symbol s_2_13[4] = { 'c', 'e', 'n', 'e' };
  77 static const symbol s_2_14[6] = { 'g', 'l', 'i', 'e', 'n', 'e' };
  78 static const symbol s_2_15[4] = { 'm', 'e', 'n', 'e' };
  79 static const symbol s_2_16[4] = { 's', 'e', 'n', 'e' };
  80 static const symbol s_2_17[4] = { 't', 'e', 'n', 'e' };
  81 static const symbol s_2_18[4] = { 'v', 'e', 'n', 'e' };
  82 static const symbol s_2_19[2] = { 'c', 'i' };
  83 static const symbol s_2_20[2] = { 'l', 'i' };
  84 static const symbol s_2_21[4] = { 'c', 'e', 'l', 'i' };
  85 static const symbol s_2_22[6] = { 'g', 'l', 'i', 'e', 'l', 'i' };
  86 static const symbol s_2_23[4] = { 'm', 'e', 'l', 'i' };
  87 static const symbol s_2_24[4] = { 't', 'e', 'l', 'i' };
  88 static const symbol s_2_25[4] = { 'v', 'e', 'l', 'i' };
  89 static const symbol s_2_26[3] = { 'g', 'l', 'i' };
  90 static const symbol s_2_27[2] = { 'm', 'i' };
  91 static const symbol s_2_28[2] = { 's', 'i' };
  92 static const symbol s_2_29[2] = { 't', 'i' };
  93 static const symbol s_2_30[2] = { 'v', 'i' };
  94 static const symbol s_2_31[2] = { 'l', 'o' };
  95 static const symbol s_2_32[4] = { 'c', 'e', 'l', 'o' };
  96 static const symbol s_2_33[6] = { 'g', 'l', 'i', 'e', 'l', 'o' };
  97 static const symbol s_2_34[4] = { 'm', 'e', 'l', 'o' };
  98 static const symbol s_2_35[4] = { 't', 'e', 'l', 'o' };
  99 static const symbol s_2_36[4] = { 'v', 'e', 'l', 'o' };
 100
 101 static const struct among a_2[37] =
 102 {
 103 /*  0 */ { 2, s_2_0, -1, -1, 0},
 104 /*  1 */ { 4, s_2_1, 0, -1, 0},
 105 /*  2 */ { 6, s_2_2, 0, -1, 0},
 106 /*  3 */ { 4, s_2_3, 0, -1, 0},
 107 /*  4 */ { 4, s_2_4, 0, -1, 0},
 108 /*  5 */ { 4, s_2_5, 0, -1, 0},
 109 /*  6 */ { 2, s_2_6, -1, -1, 0},
 110 /*  7 */ { 4, s_2_7, 6, -1, 0},
 111 /*  8 */ { 6, s_2_8, 6, -1, 0},
 112 /*  9 */ { 4, s_2_9, 6, -1, 0},
 113 /* 10 */ { 4, s_2_10, 6, -1, 0},
 114 /* 11 */ { 4, s_2_11, 6, -1, 0},
 115 /* 12 */ { 2, s_2_12, -1, -1, 0},
 116 /* 13 */ { 4, s_2_13, 12, -1, 0},
 117 /* 14 */ { 6, s_2_14, 12, -1, 0},
 118 /* 15 */ { 4, s_2_15, 12, -1, 0},
 119 /* 16 */ { 4, s_2_16, 12, -1, 0},
 120 /* 17 */ { 4, s_2_17, 12, -1, 0},
 121 /* 18 */ { 4, s_2_18, 12, -1, 0},
 122 /* 19 */ { 2, s_2_19, -1, -1, 0},
 123 /* 20 */ { 2, s_2_20, -1, -1, 0},
 124 /* 21 */ { 4, s_2_21, 20, -1, 0},
 125 /* 22 */ { 6, s_2_22, 20, -1, 0},
 126 /* 23 */ { 4, s_2_23, 20, -1, 0},
 127 /* 24 */ { 4, s_2_24, 20, -1, 0},
 128 /* 25 */ { 4, s_2_25, 20, -1, 0},
 129 /* 26 */ { 3, s_2_26, 20, -1, 0},
 130 /* 27 */ { 2, s_2_27, -1, -1, 0},
 131 /* 28 */ { 2, s_2_28, -1, -1, 0},
 132 /* 29 */ { 2, s_2_29, -1, -1, 0},
 133 /* 30 */ { 2, s_2_30, -1, -1, 0},
 134 /* 31 */ { 2, s_2_31, -1, -1, 0},
 135 /* 32 */ { 4, s_2_32, 31, -1, 0},
 136 /* 33 */ { 6, s_2_33, 31, -1, 0},
 137 /* 34 */ { 4, s_2_34, 31, -1, 0},
 138 /* 35 */ { 4, s_2_35, 31, -1, 0},
 139 /* 36 */ { 4, s_2_36, 31, -1, 0}
 140 };
 141
 142 static const symbol s_3_0[4] = { 'a', 'n', 'd', 'o' };
 143 static const symbol s_3_1[4] = { 'e', 'n', 'd', 'o' };
 144 static const symbol s_3_2[2] = { 'a', 'r' };
 145 static const symbol s_3_3[2] = { 'e', 'r' };
 146 static const symbol s_3_4[2] = { 'i', 'r' };
 147
 148 static const struct among a_3[5] =
 149 {
 150 /*  0 */ { 4, s_3_0, -1, 1, 0},
 151 /*  1 */ { 4, s_3_1, -1, 1, 0},
 152 /*  2 */ { 2, s_3_2, -1, 2, 0},
 153 /*  3 */ { 2, s_3_3, -1, 2, 0},
 154 /*  4 */ { 2, s_3_4, -1, 2, 0}
 155 };
 156
 157 static const symbol s_4_0[2] = { 'i', 'c' };
 158 static const symbol s_4_1[4] = { 'a', 'b', 'i', 'l' };
 159 static const symbol s_4_2[2] = { 'o', 's' };
 160 static const symbol s_4_3[2] = { 'i', 'v' };
 161
 162 static const struct among a_4[4] =
 163 {
 164 /*  0 */ { 2, s_4_0, -1, -1, 0},
 165 /*  1 */ { 4, s_4_1, -1, -1, 0},
 166 /*  2 */ { 2, s_4_2, -1, -1, 0},
 167 /*  3 */ { 2, s_4_3, -1, 1, 0}
 168 };
 169
 170 static const symbol s_5_0[2] = { 'i', 'c' };
 171 static const symbol s_5_1[4] = { 'a', 'b', 'i', 'l' };
 172 static const symbol s_5_2[2] = { 'i', 'v' };
 173
 174 static const struct among a_5[3] =
 175 {
 176 /*  0 */ { 2, s_5_0, -1, 1, 0},
 177 /*  1 */ { 4, s_5_1, -1, 1, 0},
 178 /*  2 */ { 2, s_5_2, -1, 1, 0}
 179 };
 180
 181 static const symbol s_6_0[3] = { 'i', 'c', 'a' };
 182 static const symbol s_6_1[5] = { 'l', 'o', 'g', 'i', 'a' };
 183 static const symbol s_6_2[3] = { 'o', 's', 'a' };
 184 static const symbol s_6_3[4] = { 'i', 's', 't', 'a' };
 185 static const symbol s_6_4[3] = { 'i', 'v', 'a' };
 186 static const symbol s_6_5[4] = { 'a', 'n', 'z', 'a' };
 187 static const symbol s_6_6[4] = { 'e', 'n', 'z', 'a' };
 188 static const symbol s_6_7[3] = { 'i', 'c', 'e' };
 189 static const symbol s_6_8[6] = { 'a', 't', 'r', 'i', 'c', 'e' };
 190 static const symbol s_6_9[4] = { 'i', 'c', 'h', 'e' };
 191 static const symbol s_6_10[5] = { 'l', 'o', 'g', 'i', 'e' };
 192 static const symbol s_6_11[5] = { 'a', 'b', 'i', 'l', 'e' };
 193 static const symbol s_6_12[5] = { 'i', 'b', 'i', 'l', 'e' };
 194 static const symbol s_6_13[6] = { 'u', 's', 'i', 'o', 'n', 'e' };
 195 static const symbol s_6_14[6] = { 'a', 'z', 'i', 'o', 'n', 'e' };
 196 static const symbol s_6_15[6] = { 'u', 'z', 'i', 'o', 'n', 'e' };
 197 static const symbol s_6_16[5] = { 'a', 't', 'o', 'r', 'e' };
 198 static const symbol s_6_17[3] = { 'o', 's', 'e' };
 199 static const symbol s_6_18[4] = { 'a', 'n', 't', 'e' };
 200 static const symbol s_6_19[5] = { 'm', 'e', 'n', 't', 'e' };
 201 static const symbol s_6_20[6] = { 'a', 'm', 'e', 'n', 't', 'e' };
 202 static const symbol s_6_21[4] = { 'i', 's', 't', 'e' };
 203 static const symbol s_6_22[3] = { 'i', 'v', 'e' };
 204 static const symbol s_6_23[4] = { 'a', 'n', 'z', 'e' };
 205 static const symbol s_6_24[4] = { 'e', 'n', 'z', 'e' };
 206 static const symbol s_6_25[3] = { 'i', 'c', 'i' };
 207 static const symbol s_6_26[6] = { 'a', 't', 'r', 'i', 'c', 'i' };
 208 static const symbol s_6_27[4] = { 'i', 'c', 'h', 'i' };
 209 static const symbol s_6_28[5] = { 'a', 'b', 'i', 'l', 'i' };
 210 static const symbol s_6_29[5] = { 'i', 'b', 'i', 'l', 'i' };
 211 static const symbol s_6_30[4] = { 'i', 's', 'm', 'i' };
 212 static const symbol s_6_31[6] = { 'u', 's', 'i', 'o', 'n', 'i' };
 213 static const symbol s_6_32[6] = { 'a', 'z', 'i', 'o', 'n', 'i' };
 214 static const symbol s_6_33[6] = { 'u', 'z', 'i', 'o', 'n', 'i' };
 215 static const symbol s_6_34[5] = { 'a', 't', 'o', 'r', 'i' };
 216 static const symbol s_6_35[3] = { 'o', 's', 'i' };
 217 static const symbol s_6_36[4] = { 'a', 'n', 't', 'i' };
 218 static const symbol s_6_37[6] = { 'a', 'm', 'e', 'n', 't', 'i' };
 219 static const symbol s_6_38[6] = { 'i', 'm', 'e', 'n', 't', 'i' };
 220 static const symbol s_6_39[4] = { 'i', 's', 't', 'i' };
 221 static const symbol s_6_40[3] = { 'i', 'v', 'i' };
 222 static const symbol s_6_41[3] = { 'i', 'c', 'o' };
 223 static const symbol s_6_42[4] = { 'i', 's', 'm', 'o' };
 224 static const symbol s_6_43[3] = { 'o', 's', 'o' };
 225 static const symbol s_6_44[6] = { 'a', 'm', 'e', 'n', 't', 'o' };
 226 static const symbol s_6_45[6] = { 'i', 'm', 'e', 'n', 't', 'o' };
 227 static const symbol s_6_46[3] = { 'i', 'v', 'o' };
 228 static const symbol s_6_47[3] = { 'i', 't', 0xE0 };
 229 static const symbol s_6_48[4] = { 'i', 's', 't', 0xE0 };
 230 static const symbol s_6_49[4] = { 'i', 's', 't', 0xE8 };
 231 static const symbol s_6_50[4] = { 'i', 's', 't', 0xEC };
 232
 233 static const struct among a_6[51] =
 234 {
 235 /*  0 */ { 3, s_6_0, -1, 1, 0},
 236 /*  1 */ { 5, s_6_1, -1, 3, 0},
 237 /*  2 */ { 3, s_6_2, -1, 1, 0},
 238 /*  3 */ { 4, s_6_3, -1, 1, 0},
 239 /*  4 */ { 3, s_6_4, -1, 9, 0},
 240 /*  5 */ { 4, s_6_5, -1, 1, 0},
 241 /*  6 */ { 4, s_6_6, -1, 5, 0},
 242 /*  7 */ { 3, s_6_7, -1, 1, 0},
 243 /*  8 */ { 6, s_6_8, 7, 1, 0},
 244 /*  9 */ { 4, s_6_9, -1, 1, 0},
 245 /* 10 */ { 5, s_6_10, -1, 3, 0},
 246 /* 11 */ { 5, s_6_11, -1, 1, 0},
 247 /* 12 */ { 5, s_6_12, -1, 1, 0},
 248 /* 13 */ { 6, s_6_13, -1, 4, 0},
 249 /* 14 */ { 6, s_6_14, -1, 2, 0},
 250 /* 15 */ { 6, s_6_15, -1, 4, 0},
 251 /* 16 */ { 5, s_6_16, -1, 2, 0},
 252 /* 17 */ { 3, s_6_17, -1, 1, 0},
 253 /* 18 */ { 4, s_6_18, -1, 1, 0},
 254 /* 19 */ { 5, s_6_19, -1, 1, 0},
 255 /* 20 */ { 6, s_6_20, 19, 7, 0},
 256 /* 21 */ { 4, s_6_21, -1, 1, 0},
 257 /* 22 */ { 3, s_6_22, -1, 9, 0},
 258 /* 23 */ { 4, s_6_23, -1, 1, 0},
 259 /* 24 */ { 4, s_6_24, -1, 5, 0},
 260 /* 25 */ { 3, s_6_25, -1, 1, 0},
 261 /* 26 */ { 6, s_6_26, 25, 1, 0},
 262 /* 27 */ { 4, s_6_27, -1, 1, 0},
 263 /* 28 */ { 5, s_6_28, -1, 1, 0},
 264 /* 29 */ { 5, s_6_29, -1, 1, 0},
 265 /* 30 */ { 4, s_6_30, -1, 1, 0},
 266 /* 31 */ { 6, s_6_31, -1, 4, 0},
 267 /* 32 */ { 6, s_6_32, -1, 2, 0},
 268 /* 33 */ { 6, s_6_33, -1, 4, 0},
 269 /* 34 */ { 5, s_6_34, -1, 2, 0},
 270 /* 35 */ { 3, s_6_35, -1, 1, 0},
 271 /* 36 */ { 4, s_6_36, -1, 1, 0},
 272 /* 37 */ { 6, s_6_37, -1, 6, 0},
 273 /* 38 */ { 6, s_6_38, -1, 6, 0},
 274 /* 39 */ { 4, s_6_39, -1, 1, 0},
 275 /* 40 */ { 3, s_6_40, -1, 9, 0},
 276 /* 41 */ { 3, s_6_41, -1, 1, 0},
 277 /* 42 */ { 4, s_6_42, -1, 1, 0},
 278 /* 43 */ { 3, s_6_43, -1, 1, 0},
 279 /* 44 */ { 6, s_6_44, -1, 6, 0},
 280 /* 45 */ { 6, s_6_45, -1, 6, 0},
 281 /* 46 */ { 3, s_6_46, -1, 9, 0},
 282 /* 47 */ { 3, s_6_47, -1, 8, 0},
 283 /* 48 */ { 4, s_6_48, -1, 1, 0},
 284 /* 49 */ { 4, s_6_49, -1, 1, 0},
 285 /* 50 */ { 4, s_6_50, -1, 1, 0}
 286 };
 287
 288 static const symbol s_7_0[4] = { 'i', 's', 'c', 'a' };
 289 static const symbol s_7_1[4] = { 'e', 'n', 'd', 'a' };
 290 static const symbol s_7_2[3] = { 'a', 't', 'a' };
 291 static const symbol s_7_3[3] = { 'i', 't', 'a' };
 292 static const symbol s_7_4[3] = { 'u', 't', 'a' };
 293 static const symbol s_7_5[3] = { 'a', 'v', 'a' };
 294 static const symbol s_7_6[3] = { 'e', 'v', 'a' };
 295 static const symbol s_7_7[3] = { 'i', 'v', 'a' };
 296 static const symbol s_7_8[6] = { 'e', 'r', 'e', 'b', 'b', 'e' };
 297 static const symbol s_7_9[6] = { 'i', 'r', 'e', 'b', 'b', 'e' };
 298 static const symbol s_7_10[4] = { 'i', 's', 'c', 'e' };
 299 static const symbol s_7_11[4] = { 'e', 'n', 'd', 'e' };
 300 static const symbol s_7_12[3] = { 'a', 'r', 'e' };
 301 static const symbol s_7_13[3] = { 'e', 'r', 'e' };
 302 static const symbol s_7_14[3] = { 'i', 'r', 'e' };
 303 static const symbol s_7_15[4] = { 'a', 's', 's', 'e' };
 304 static const symbol s_7_16[3] = { 'a', 't', 'e' };
 305 static const symbol s_7_17[5] = { 'a', 'v', 'a', 't', 'e' };
 306 static const symbol s_7_18[5] = { 'e', 'v', 'a', 't', 'e' };
 307 static const symbol s_7_19[5] = { 'i', 'v', 'a', 't', 'e' };
 308 static const symbol s_7_20[3] = { 'e', 't', 'e' };
 309 static const symbol s_7_21[5] = { 'e', 'r', 'e', 't', 'e' };
 310 static const symbol s_7_22[5] = { 'i', 'r', 'e', 't', 'e' };
 311 static const symbol s_7_23[3] = { 'i', 't', 'e' };
 312 static const symbol s_7_24[6] = { 'e', 'r', 'e', 's', 't', 'e' };
 313 static const symbol s_7_25[6] = { 'i', 'r', 'e', 's', 't', 'e' };
 314 static const symbol s_7_26[3] = { 'u', 't', 'e' };
 315 static const symbol s_7_27[4] = { 'e', 'r', 'a', 'i' };
 316 static const symbol s_7_28[4] = { 'i', 'r', 'a', 'i' };
 317 static const symbol s_7_29[4] = { 'i', 's', 'c', 'i' };
 318 static const symbol s_7_30[4] = { 'e', 'n', 'd', 'i' };
 319 static const symbol s_7_31[4] = { 'e', 'r', 'e', 'i' };
 320 static const symbol s_7_32[4] = { 'i', 'r', 'e', 'i' };
 321 static const symbol s_7_33[4] = { 'a', 's', 's', 'i' };
 322 static const symbol s_7_34[3] = { 'a', 't', 'i' };
 323 static const symbol s_7_35[3] = { 'i', 't', 'i' };
 324 static const symbol s_7_36[6] = { 'e', 'r', 'e', 's', 't', 'i' };
 325 static const symbol s_7_37[6] = { 'i', 'r', 'e', 's', 't', 'i' };
 326 static const symbol s_7_38[3] = { 'u', 't', 'i' };
 327 static const symbol s_7_39[3] = { 'a', 'v', 'i' };
 328 static const symbol s_7_40[3] = { 'e', 'v', 'i' };
 329 static const symbol s_7_41[3] = { 'i', 'v', 'i' };
 330 static const symbol s_7_42[4] = { 'i', 's', 'c', 'o' };
 331 static const symbol s_7_43[4] = { 'a', 'n', 'd', 'o' };
 332 static const symbol s_7_44[4] = { 'e', 'n', 'd', 'o' };
 333 static const symbol s_7_45[4] = { 'Y', 'a', 'm', 'o' };
 334 static const symbol s_7_46[4] = { 'i', 'a', 'm', 'o' };
 335 static const symbol s_7_47[5] = { 'a', 'v', 'a', 'm', 'o' };
 336 static const symbol s_7_48[5] = { 'e', 'v', 'a', 'm', 'o' };
 337 static const symbol s_7_49[5] = { 'i', 'v', 'a', 'm', 'o' };
 338 static const symbol s_7_50[5] = { 'e', 'r', 'e', 'm', 'o' };
 339 static const symbol s_7_51[5] = { 'i', 'r', 'e', 'm', 'o' };
 340 static const symbol s_7_52[6] = { 'a', 's', 's', 'i', 'm', 'o' };
 341 static const symbol s_7_53[4] = { 'a', 'm', 'm', 'o' };
 342 static const symbol s_7_54[4] = { 'e', 'm', 'm', 'o' };
 343 static const symbol s_7_55[6] = { 'e', 'r', 'e', 'm', 'm', 'o' };
 344 static const symbol s_7_56[6] = { 'i', 'r', 'e', 'm', 'm', 'o' };
 345 static const symbol s_7_57[4] = { 'i', 'm', 'm', 'o' };
 346 static const symbol s_7_58[3] = { 'a', 'n', 'o' };
 347 static const symbol s_7_59[6] = { 'i', 's', 'c', 'a', 'n', 'o' };
 348 static const symbol s_7_60[5] = { 'a', 'v', 'a', 'n', 'o' };
 349 static const symbol s_7_61[5] = { 'e', 'v', 'a', 'n', 'o' };
 350 static const symbol s_7_62[5] = { 'i', 'v', 'a', 'n', 'o' };
 351 static const symbol s_7_63[6] = { 'e', 'r', 'a', 'n', 'n', 'o' };
 352 static const symbol s_7_64[6] = { 'i', 'r', 'a', 'n', 'n', 'o' };
 353 static const symbol s_7_65[3] = { 'o', 'n', 'o' };
 354 static const symbol s_7_66[6] = { 'i', 's', 'c', 'o', 'n', 'o' };
 355 static const symbol s_7_67[5] = { 'a', 'r', 'o', 'n', 'o' };
 356 static const symbol s_7_68[5] = { 'e', 'r', 'o', 'n', 'o' };
 357 static const symbol s_7_69[5] = { 'i', 'r', 'o', 'n', 'o' };
 358 static const symbol s_7_70[8] = { 'e', 'r', 'e', 'b', 'b', 'e', 'r', 'o' };
 359 static const symbol s_7_71[8] = { 'i', 'r', 'e', 'b', 'b', 'e', 'r', 'o' };
 360 static const symbol s_7_72[6] = { 'a', 's', 's', 'e', 'r', 'o' };
 361 static const symbol s_7_73[6] = { 'e', 's', 's', 'e', 'r', 'o' };
 362 static const symbol s_7_74[6] = { 'i', 's', 's', 'e', 'r', 'o' };
 363 static const symbol s_7_75[3] = { 'a', 't', 'o' };
 364 static const symbol s_7_76[3] = { 'i', 't', 'o' };
 365 static const symbol s_7_77[3] = { 'u', 't', 'o' };
 366 static const symbol s_7_78[3] = { 'a', 'v', 'o' };
 367 static const symbol s_7_79[3] = { 'e', 'v', 'o' };
 368 static const symbol s_7_80[3] = { 'i', 'v', 'o' };
 369 static const symbol s_7_81[2] = { 'a', 'r' };
 370 static const symbol s_7_82[2] = { 'i', 'r' };
 371 static const symbol s_7_83[3] = { 'e', 'r', 0xE0 };
 372 static const symbol s_7_84[3] = { 'i', 'r', 0xE0 };
 373 static const symbol s_7_85[3] = { 'e', 'r', 0xF2 };
 374 static const symbol s_7_86[3] = { 'i', 'r', 0xF2 };
 375
 376 static const struct among a_7[87] =
 377 {
 378 /*  0 */ { 4, s_7_0, -1, 1, 0},
 379 /*  1 */ { 4, s_7_1, -1, 1, 0},
 380 /*  2 */ { 3, s_7_2, -1, 1, 0},
 381 /*  3 */ { 3, s_7_3, -1, 1, 0},
 382 /*  4 */ { 3, s_7_4, -1, 1, 0},
 383 /*  5 */ { 3, s_7_5, -1, 1, 0},
 384 /*  6 */ { 3, s_7_6, -1, 1, 0},
 385 /*  7 */ { 3, s_7_7, -1, 1, 0},
 386 /*  8 */ { 6, s_7_8, -1, 1, 0},
 387 /*  9 */ { 6, s_7_9, -1, 1, 0},
 388 /* 10 */ { 4, s_7_10, -1, 1, 0},
 389 /* 11 */ { 4, s_7_11, -1, 1, 0},
 390 /* 12 */ { 3, s_7_12, -1, 1, 0},
 391 /* 13 */ { 3, s_7_13, -1, 1, 0},
 392 /* 14 */ { 3, s_7_14, -1, 1, 0},
 393 /* 15 */ { 4, s_7_15, -1, 1, 0},
 394 /* 16 */ { 3, s_7_16, -1, 1, 0},
 395 /* 17 */ { 5, s_7_17, 16, 1, 0},
 396 /* 18 */ { 5, s_7_18, 16, 1, 0},
 397 /* 19 */ { 5, s_7_19, 16, 1, 0},
 398 /* 20 */ { 3, s_7_20, -1, 1, 0},
 399 /* 21 */ { 5, s_7_21, 20, 1, 0},
 400 /* 22 */ { 5, s_7_22, 20, 1, 0},
 401 /* 23 */ { 3, s_7_23, -1, 1, 0},
 402 /* 24 */ { 6, s_7_24, -1, 1, 0},
 403 /* 25 */ { 6, s_7_25, -1, 1, 0},
 404 /* 26 */ { 3, s_7_26, -1, 1, 0},
 405 /* 27 */ { 4, s_7_27, -1, 1, 0},
 406 /* 28 */ { 4, s_7_28, -1, 1, 0},
 407 /* 29 */ { 4, s_7_29, -1, 1, 0},
 408 /* 30 */ { 4, s_7_30, -1, 1, 0},
 409 /* 31 */ { 4, s_7_31, -1, 1, 0},
 410 /* 32 */ { 4, s_7_32, -1, 1, 0},
 411 /* 33 */ { 4, s_7_33, -1, 1, 0},
 412 /* 34 */ { 3, s_7_34, -1, 1, 0},
 413 /* 35 */ { 3, s_7_35, -1, 1, 0},
 414 /* 36 */ { 6, s_7_36, -1, 1, 0},
 415 /* 37 */ { 6, s_7_37, -1, 1, 0},
 416 /* 38 */ { 3, s_7_38, -1, 1, 0},
 417 /* 39 */ { 3, s_7_39, -1, 1, 0},
 418 /* 40 */ { 3, s_7_40, -1, 1, 0},
 419 /* 41 */ { 3, s_7_41, -1, 1, 0},
 420 /* 42 */ { 4, s_7_42, -1, 1, 0},
 421 /* 43 */ { 4, s_7_43, -1, 1, 0},
 422 /* 44 */ { 4, s_7_44, -1, 1, 0},
 423 /* 45 */ { 4, s_7_45, -1, 1, 0},
 424 /* 46 */ { 4, s_7_46, -1, 1, 0},
 425 /* 47 */ { 5, s_7_47, -1, 1, 0},
 426 /* 48 */ { 5, s_7_48, -1, 1, 0},
 427 /* 49 */ { 5, s_7_49, -1, 1, 0},
 428 /* 50 */ { 5, s_7_50, -1, 1, 0},
 429 /* 51 */ { 5, s_7_51, -1, 1, 0},
 430 /* 52 */ { 6, s_7_52, -1, 1, 0},
 431 /* 53 */ { 4, s_7_53, -1, 1, 0},
 432 /* 54 */ { 4, s_7_54, -1, 1, 0},
 433 /* 55 */ { 6, s_7_55, 54, 1, 0},
 434 /* 56 */ { 6, s_7_56, 54, 1, 0},
 435 /* 57 */ { 4, s_7_57, -1, 1, 0},
 436 /* 58 */ { 3, s_7_58, -1, 1, 0},
 437 /* 59 */ { 6, s_7_59, 58, 1, 0},
 438 /* 60 */ { 5, s_7_60, 58, 1, 0},
 439 /* 61 */ { 5, s_7_61, 58, 1, 0},
 440 /* 62 */ { 5, s_7_62, 58, 1, 0},
 441 /* 63 */ { 6, s_7_63, -1, 1, 0},
 442 /* 64 */ { 6, s_7_64, -1, 1, 0},
 443 /* 65 */ { 3, s_7_65, -1, 1, 0},
 444 /* 66 */ { 6, s_7_66, 65, 1, 0},
 445 /* 67 */ { 5, s_7_67, 65, 1, 0},
 446 /* 68 */ { 5, s_7_68, 65, 1, 0},
 447 /* 69 */ { 5, s_7_69, 65, 1, 0},
 448 /* 70 */ { 8, s_7_70, -1, 1, 0},
 449 /* 71 */ { 8, s_7_71, -1, 1, 0},
 450 /* 72 */ { 6, s_7_72, -1, 1, 0},
 451 /* 73 */ { 6, s_7_73, -1, 1, 0},
 452 /* 74 */ { 6, s_7_74, -1, 1, 0},
 453 /* 75 */ { 3, s_7_75, -1, 1, 0},
 454 /* 76 */ { 3, s_7_76, -1, 1, 0},
 455 /* 77 */ { 3, s_7_77, -1, 1, 0},
 456 /* 78 */ { 3, s_7_78, -1, 1, 0},
 457 /* 79 */ { 3, s_7_79, -1, 1, 0},
 458 /* 80 */ { 3, s_7_80, -1, 1, 0},
 459 /* 81 */ { 2, s_7_81, -1, 1, 0},
 460 /* 82 */ { 2, s_7_82, -1, 1, 0},
 461 /* 83 */ { 3, s_7_83, -1, 1, 0},
 462 /* 84 */ { 3, s_7_84, -1, 1, 0},
 463 /* 85 */ { 3, s_7_85, -1, 1, 0},
 464 /* 86 */ { 3, s_7_86, -1, 1, 0}
 465 };
 466
 467 static const unsigned char g_v[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 128, 8, 2, 1 };
 468
 469 static const unsigned char g_AEIO[] = { 17, 65, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 128, 8, 2 };
 470
 471 static const unsigned char g_CG[] = { 17 };
 472
 473 static const symbol s_0[] = { 0xE0 };
 474 static const symbol s_1[] = { 0xE8 };
 475 static const symbol s_2[] = { 0xEC };
 476 static const symbol s_3[] = { 0xF2 };
 477 static const symbol s_4[] = { 0xF9 };
 478 static const symbol s_5[] = { 'q', 'U' };
 479 static const symbol s_6[] = { 'u' };
 480 static const symbol s_7[] = { 'U' };
 481 static const symbol s_8[] = { 'i' };
 482 static const symbol s_9[] = { 'I' };
 483 static const symbol s_10[] = { 'i' };
 484 static const symbol s_11[] = { 'u' };
 485 static const symbol s_12[] = { 'e' };
 486 static const symbol s_13[] = { 'i', 'c' };
 487 static const symbol s_14[] = { 'l', 'o', 'g' };
 488 static const symbol s_15[] = { 'u' };
 489 static const symbol s_16[] = { 'e', 'n', 't', 'e' };
 490 static const symbol s_17[] = { 'a', 't' };
 491 static const symbol s_18[] = { 'a', 't' };
 492 static const symbol s_19[] = { 'i', 'c' };
 493 static const symbol s_20[] = { 'i' };
 494 static const symbol s_21[] = { 'h' };
 495
 496 static int r_prelude(struct SN_env * z) {
 497     int among_var;
 498     {   int c_test = z->c; /* test, line 35 */
 499         while(1) { /* repeat, line 35 */
 500             int c1 = z->c;
 501             z->bra = z->c; /* [, line 36 */
 502             among_var = find_among(z, a_0, 7); /* substring, line 36 */
 503             if (!(among_var)) goto lab0;
 504             z->ket = z->c; /* ], line 36 */
 505             switch(among_var) {
 506                 case 0: goto lab0;
 507                 case 1:
 508                     {   int ret = slice_from_s(z, 1, s_0); /* <-, line 37 */
 509                         if (ret < 0) return ret;
 510                     }
 511                     break;
 512                 case 2:
 513                     {   int ret = slice_from_s(z, 1, s_1); /* <-, line 38 */
 514                         if (ret < 0) return ret;
 515                     }
 516                     break;
 517                 case 3:
 518                     {   int ret = slice_from_s(z, 1, s_2); /* <-, line 39 */
 519                         if (ret < 0) return ret;
 520                     }
 521                     break;
 522                 case 4:
 523                     {   int ret = slice_from_s(z, 1, s_3); /* <-, line 40 */
 524                         if (ret < 0) return ret;
 525                     }
 526                     break;
 527                 case 5:
 528                     {   int ret = slice_from_s(z, 1, s_4); /* <-, line 41 */
 529                         if (ret < 0) return ret;
 530                     }
 531                     break;
 532                 case 6:
 533                     {   int ret = slice_from_s(z, 2, s_5); /* <-, line 42 */
 534                         if (ret < 0) return ret;
 535                     }
 536                     break;
 537                 case 7:
 538                     if (z->c >= z->l) goto lab0;
 539                     z->c++; /* next, line 43 */
 540                     break;
 541             }
 542             continue;
 543         lab0:
 544             z->c = c1;
 545             break;
 546         }
 547         z->c = c_test;
 548     }
 549     while(1) { /* repeat, line 46 */
 550         int c2 = z->c;
 551         while(1) { /* goto, line 46 */
 552             int c3 = z->c;
 553             if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
 554             z->bra = z->c; /* [, line 47 */
 555             {   int c4 = z->c; /* or, line 47 */
 556                 if (!(eq_s(z, 1, s_6))) goto lab4;
 557                 z->ket = z->c; /* ], line 47 */
 558                 if (in_grouping(z, g_v, 97, 249, 0)) goto lab4;
 559                 {   int ret = slice_from_s(z, 1, s_7); /* <-, line 47 */
 560                     if (ret < 0) return ret;
 561                 }
 562                 goto lab3;
 563             lab4:
 564                 z->c = c4;
 565                 if (!(eq_s(z, 1, s_8))) goto lab2;
 566                 z->ket = z->c; /* ], line 48 */
 567                 if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
 568                 {   int ret = slice_from_s(z, 1, s_9); /* <-, line 48 */
 569                     if (ret < 0) return ret;
 570                 }
 571             }
 572         lab3:
 573             z->c = c3;
 574             break;
 575         lab2:
 576             z->c = c3;
 577             if (z->c >= z->l) goto lab1;
 578             z->c++; /* goto, line 46 */
 579         }
 580         continue;
 581     lab1:
 582         z->c = c2;
 583         break;
 584     }
 585     return 1;
 586 }
 587
 588 static int r_mark_regions(struct SN_env * z) {
 589     z->I[0] = z->l;
 590     z->I[1] = z->l;
 591     z->I[2] = z->l;
 592     {   int c1 = z->c; /* do, line 58 */
 593         {   int c2 = z->c; /* or, line 60 */
 594             if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
 595             {   int c3 = z->c; /* or, line 59 */
 596                 if (out_grouping(z, g_v, 97, 249, 0)) goto lab4;
 597                 {    /* gopast */ /* grouping v, line 59 */
 598                     int ret = out_grouping(z, g_v, 97, 249, 1);
 599                     if (ret < 0) goto lab4;
 600                     z->c += ret;
 601                 }
 602                 goto lab3;
 603             lab4:
 604                 z->c = c3;
 605                 if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
 606                 {    /* gopast */ /* non v, line 59 */
 607                     int ret = in_grouping(z, g_v, 97, 249, 1);
 608                     if (ret < 0) goto lab2;
 609                     z->c += ret;
 610                 }
 611             }
 612         lab3:
 613             goto lab1;
 614         lab2:
 615             z->c = c2;
 616             if (out_grouping(z, g_v, 97, 249, 0)) goto lab0;
 617             {   int c4 = z->c; /* or, line 61 */
 618                 if (out_grouping(z, g_v, 97, 249, 0)) goto lab6;
 619                 {    /* gopast */ /* grouping v, line 61 */
 620                     int ret = out_grouping(z, g_v, 97, 249, 1);
 621                     if (ret < 0) goto lab6;
 622                     z->c += ret;
 623                 }
 624                 goto lab5;
 625             lab6:
 626                 z->c = c4;
 627                 if (in_grouping(z, g_v, 97, 249, 0)) goto lab0;
 628                 if (z->c >= z->l) goto lab0;
 629                 z->c++; /* next, line 61 */
 630             }
 631         lab5:
 632             ;
 633         }
 634     lab1:
 635         z->I[0] = z->c; /* setmark pV, line 62 */
 636     lab0:
 637         z->c = c1;
 638     }
 639     {   int c5 = z->c; /* do, line 64 */
 640         {    /* gopast */ /* grouping v, line 65 */
 641             int ret = out_grouping(z, g_v, 97, 249, 1);
 642             if (ret < 0) goto lab7;
 643             z->c += ret;
 644         }
 645         {    /* gopast */ /* non v, line 65 */
 646             int ret = in_grouping(z, g_v, 97, 249, 1);
 647             if (ret < 0) goto lab7;
 648             z->c += ret;
 649         }
 650         z->I[1] = z->c; /* setmark p1, line 65 */
 651         {    /* gopast */ /* grouping v, line 66 */
 652             int ret = out_grouping(z, g_v, 97, 249, 1);
 653             if (ret < 0) goto lab7;
 654             z->c += ret;
 655         }
 656         {    /* gopast */ /* non v, line 66 */
 657             int ret = in_grouping(z, g_v, 97, 249, 1);
 658             if (ret < 0) goto lab7;
 659             z->c += ret;
 660         }
 661         z->I[2] = z->c; /* setmark p2, line 66 */
 662     lab7:
 663         z->c = c5;
 664     }
 665     return 1;
 666 }
 667
 668 static int r_postlude(struct SN_env * z) {
 669     int among_var;
 670     while(1) { /* repeat, line 70 */
 671         int c1 = z->c;
 672         z->bra = z->c; /* [, line 72 */
 673         if (z->c >= z->l || (z->p[z->c + 0] != 73 && z->p[z->c + 0] != 85)) among_var = 3; else
 674         among_var = find_among(z, a_1, 3); /* substring, line 72 */
 675         if (!(among_var)) goto lab0;
 676         z->ket = z->c; /* ], line 72 */
 677         switch(among_var) {
 678             case 0: goto lab0;
 679             case 1:
 680                 {   int ret = slice_from_s(z, 1, s_10); /* <-, line 73 */
 681                     if (ret < 0) return ret;
 682                 }
 683                 break;
 684             case 2:
 685                 {   int ret = slice_from_s(z, 1, s_11); /* <-, line 74 */
 686                     if (ret < 0) return ret;
 687                 }
 688                 break;
 689             case 3:
 690                 if (z->c >= z->l) goto lab0;
 691                 z->c++; /* next, line 75 */
 692                 break;
 693         }
 694         continue;
 695     lab0:
 696         z->c = c1;
 697         break;
 698     }
 699     return 1;
 700 }
 701
 702 static int r_RV(struct SN_env * z) {
 703     if (!(z->I[0] <= z->c)) return 0;
 704     return 1;
 705 }
 706
 707 static int r_R1(struct SN_env * z) {
 708     if (!(z->I[1] <= z->c)) return 0;
 709     return 1;
 710 }
 711
 712 static int r_R2(struct SN_env * z) {
 713     if (!(z->I[2] <= z->c)) return 0;
 714     return 1;
 715 }
 716
 717 static int r_attached_pronoun(struct SN_env * z) {
 718     int among_var;
 719     z->ket = z->c; /* [, line 87 */
 720     if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((33314 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
 721     if (!(find_among_b(z, a_2, 37))) return 0; /* substring, line 87 */
 722     z->bra = z->c; /* ], line 87 */
 723     if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 111 && z->p[z->c - 1] != 114)) return 0;
 724     among_var = find_among_b(z, a_3, 5); /* among, line 97 */
 725     if (!(among_var)) return 0;
 726     {   int ret = r_RV(z);
 727         if (ret == 0) return 0; /* call RV, line 97 */
 728         if (ret < 0) return ret;
 729     }
 730     switch(among_var) {
 731         case 0: return 0;
 732         case 1:
 733             {   int ret = slice_del(z); /* delete, line 98 */
 734                 if (ret < 0) return ret;
 735             }
 736             break;
 737         case 2:
 738             {   int ret = slice_from_s(z, 1, s_12); /* <-, line 99 */
 739                 if (ret < 0) return ret;
 740             }
 741             break;
 742     }
 743     return 1;
 744 }
 745
 746 static int r_standard_suffix(struct SN_env * z) {
 747     int among_var;
 748     z->ket = z->c; /* [, line 104 */
 749     among_var = find_among_b(z, a_6, 51); /* substring, line 104 */
 750     if (!(among_var)) return 0;
 751     z->bra = z->c; /* ], line 104 */
 752     switch(among_var) {
 753         case 0: return 0;
 754         case 1:
 755             {   int ret = r_R2(z);
 756                 if (ret == 0) return 0; /* call R2, line 111 */
 757                 if (ret < 0) return ret;
 758             }
 759             {   int ret = slice_del(z); /* delete, line 111 */
 760                 if (ret < 0) return ret;
 761             }
 762             break;
 763         case 2:
 764             {   int ret = r_R2(z);
 765                 if (ret == 0) return 0; /* call R2, line 113 */
 766                 if (ret < 0) return ret;
 767             }
 768             {   int ret = slice_del(z); /* delete, line 113 */
 769                 if (ret < 0) return ret;
 770             }
 771             {   int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 114 */
 772                 z->ket = z->c; /* [, line 114 */
 773                 if (!(eq_s_b(z, 2, s_13))) { z->c = z->l - m_keep; goto lab0; }
 774                 z->bra = z->c; /* ], line 114 */
 775                 {   int ret = r_R2(z);
 776                     if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call R2, line 114 */
 777                     if (ret < 0) return ret;
 778                 }
 779                 {   int ret = slice_del(z); /* delete, line 114 */
 780                     if (ret < 0) return ret;
 781                 }
 782             lab0:
 783                 ;
 784             }
 785             break;
 786         case 3:
 787             {   int ret = r_R2(z);
 788                 if (ret == 0) return 0; /* call R2, line 117 */
 789                 if (ret < 0) return ret;
 790             }
 791             {   int ret = slice_from_s(z, 3, s_14); /* <-, line 117 */
 792                 if (ret < 0) return ret;
 793             }
 794             break;
 795         case 4:
 796             {   int ret = r_R2(z);
 797                 if (ret == 0) return 0; /* call R2, line 119 */
 798                 if (ret < 0) return ret;
 799             }
 800             {   int ret = slice_from_s(z, 1, s_15); /* <-, line 119 */
 801                 if (ret < 0) return ret;
 802             }
 803             break;
 804         case 5:
 805             {   int ret = r_R2(z);
 806                 if (ret == 0) return 0; /* call R2, line 121 */
 807                 if (ret < 0) return ret;
 808             }
 809             {   int ret = slice_from_s(z, 4, s_16); /* <-, line 121 */
 810                 if (ret < 0) return ret;
 811             }
 812             break;
 813         case 6:
 814             {   int ret = r_RV(z);
 815                 if (ret == 0) return 0; /* call RV, line 123 */
 816                 if (ret < 0) return ret;
 817             }
 818             {   int ret = slice_del(z); /* delete, line 123 */
 819                 if (ret < 0) return ret;
 820             }
 821             break;
 822         case 7:
 823             {   int ret = r_R1(z);
 824                 if (ret == 0) return 0; /* call R1, line 125 */
 825                 if (ret < 0) return ret;
 826             }
 827             {   int ret = slice_del(z); /* delete, line 125 */
 828                 if (ret < 0) return ret;
 829             }
 830             {   int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 126 */
 831                 z->ket = z->c; /* [, line 127 */
 832                 if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4722696 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m_keep; goto lab1; }
 833                 among_var = find_among_b(z, a_4, 4); /* substring, line 127 */
 834                 if (!(among_var)) { z->c = z->l - m_keep; goto lab1; }
 835                 z->bra = z->c; /* ], line 127 */
 836                 {   int ret = r_R2(z);
 837                     if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call R2, line 127 */
 838                     if (ret < 0) return ret;
 839                 }
 840                 {   int ret = slice_del(z); /* delete, line 127 */
 841                     if (ret < 0) return ret;
 842                 }
 843                 switch(among_var) {
 844                     case 0: { z->c = z->l - m_keep; goto lab1; }
 845                     case 1:
 846                         z->ket = z->c; /* [, line 128 */
 847                         if (!(eq_s_b(z, 2, s_17))) { z->c = z->l - m_keep; goto lab1; }
 848                         z->bra = z->c; /* ], line 128 */
 849                         {   int ret = r_R2(z);
 850                             if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call R2, line 128 */
 851                             if (ret < 0) return ret;
 852                         }
 853                         {   int ret = slice_del(z); /* delete, line 128 */
 854                             if (ret < 0) return ret;
 855                         }
 856                         break;
 857                 }
 858             lab1:
 859                 ;
 860             }
 861             break;
 862         case 8:
 863             {   int ret = r_R2(z);
 864                 if (ret == 0) return 0; /* call R2, line 134 */
 865                 if (ret < 0) return ret;
 866             }
 867             {   int ret = slice_del(z); /* delete, line 134 */
 868                 if (ret < 0) return ret;
 869             }
 870             {   int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 135 */
 871                 z->ket = z->c; /* [, line 136 */
 872                 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; }
 873                 among_var = find_among_b(z, a_5, 3); /* substring, line 136 */
 874                 if (!(among_var)) { z->c = z->l - m_keep; goto lab2; }
 875                 z->bra = z->c; /* ], line 136 */
 876                 switch(among_var) {
 877                     case 0: { z->c = z->l - m_keep; goto lab2; }
 878                     case 1:
 879                         {   int ret = r_R2(z);
 880                             if (ret == 0) { z->c = z->l - m_keep; goto lab2; } /* call R2, line 137 */
 881                             if (ret < 0) return ret;
 882                         }
 883                         {   int ret = slice_del(z); /* delete, line 137 */
 884                             if (ret < 0) return ret;
 885                         }
 886                         break;
 887                 }
 888             lab2:
 889                 ;
 890             }
 891             break;
 892         case 9:
 893             {   int ret = r_R2(z);
 894                 if (ret == 0) return 0; /* call R2, line 142 */
 895                 if (ret < 0) return ret;
 896             }
 897             {   int ret = slice_del(z); /* delete, line 142 */
 898                 if (ret < 0) return ret;
 899             }
 900             {   int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 143 */
 901                 z->ket = z->c; /* [, line 143 */
 902                 if (!(eq_s_b(z, 2, s_18))) { z->c = z->l - m_keep; goto lab3; }
 903                 z->bra = z->c; /* ], line 143 */
 904                 {   int ret = r_R2(z);
 905                     if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 143 */
 906                     if (ret < 0) return ret;
 907                 }
 908                 {   int ret = slice_del(z); /* delete, line 143 */
 909                     if (ret < 0) return ret;
 910                 }
 911                 z->ket = z->c; /* [, line 143 */
 912                 if (!(eq_s_b(z, 2, s_19))) { z->c = z->l - m_keep; goto lab3; }
 913                 z->bra = z->c; /* ], line 143 */
 914                 {   int ret = r_R2(z);
 915                     if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 143 */
 916                     if (ret < 0) return ret;
 917                 }
 918                 {   int ret = slice_del(z); /* delete, line 143 */
 919                     if (ret < 0) return ret;
 920                 }
 921             lab3:
 922                 ;
 923             }
 924             break;
 925     }
 926     return 1;
 927 }
 928
 929 static int r_verb_suffix(struct SN_env * z) {
 930     int among_var;
 931     {   int mlimit; /* setlimit, line 148 */
 932         int m1 = z->l - z->c; (void)m1;
 933         if (z->c < z->I[0]) return 0;
 934         z->c = z->I[0]; /* tomark, line 148 */
 935         mlimit = z->lb; z->lb = z->c;
 936         z->c = z->l - m1;
 937         z->ket = z->c; /* [, line 149 */
 938         among_var = find_among_b(z, a_7, 87); /* substring, line 149 */
 939         if (!(among_var)) { z->lb = mlimit; return 0; }
 940         z->bra = z->c; /* ], line 149 */
 941         switch(among_var) {
 942             case 0: { z->lb = mlimit; return 0; }
 943             case 1:
 944                 {   int ret = slice_del(z); /* delete, line 163 */
 945                     if (ret < 0) return ret;
 946                 }
 947                 break;
 948         }
 949         z->lb = mlimit;
 950     }
 951     return 1;
 952 }
 953
 954 static int r_vowel_suffix(struct SN_env * z) {
 955     {   int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 171 */
 956         z->ket = z->c; /* [, line 172 */
 957         if (in_grouping_b(z, g_AEIO, 97, 242, 0)) { z->c = z->l - m_keep; goto lab0; }
 958         z->bra = z->c; /* ], line 172 */
 959         {   int ret = r_RV(z);
 960             if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call RV, line 172 */
 961             if (ret < 0) return ret;
 962         }
 963         {   int ret = slice_del(z); /* delete, line 172 */
 964             if (ret < 0) return ret;
 965         }
 966         z->ket = z->c; /* [, line 173 */
 967         if (!(eq_s_b(z, 1, s_20))) { z->c = z->l - m_keep; goto lab0; }
 968         z->bra = z->c; /* ], line 173 */
 969         {   int ret = r_RV(z);
 970             if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call RV, line 173 */
 971             if (ret < 0) return ret;
 972         }
 973         {   int ret = slice_del(z); /* delete, line 173 */
 974             if (ret < 0) return ret;
 975         }
 976     lab0:
 977         ;
 978     }
 979     {   int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 175 */
 980         z->ket = z->c; /* [, line 176 */
 981         if (!(eq_s_b(z, 1, s_21))) { z->c = z->l - m_keep; goto lab1; }
 982         z->bra = z->c; /* ], line 176 */
 983         if (in_grouping_b(z, g_CG, 99, 103, 0)) { z->c = z->l - m_keep; goto lab1; }
 984         {   int ret = r_RV(z);
 985             if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call RV, line 176 */
 986             if (ret < 0) return ret;
 987         }
 988         {   int ret = slice_del(z); /* delete, line 176 */
 989             if (ret < 0) return ret;
 990         }
 991     lab1:
 992         ;
 993     }
 994     return 1;
 995 }
 996
 997 extern int italian_ISO_8859_1_stem(struct SN_env * z) {
 998     {   int c1 = z->c; /* do, line 182 */
 999         {   int ret = r_prelude(z);
1000             if (ret == 0) goto lab0; /* call prelude, line 182 */
1001             if (ret < 0) return ret;
1002         }
1003     lab0:
1004         z->c = c1;
1005     }
1006     {   int c2 = z->c; /* do, line 183 */
1007         {   int ret = r_mark_regions(z);
1008             if (ret == 0) goto lab1; /* call mark_regions, line 183 */
1009             if (ret < 0) return ret;
1010         }
1011     lab1:
1012         z->c = c2;
1013     }
1014     z->lb = z->c; z->c = z->l; /* backwards, line 184 */
1015
1016     {   int m3 = z->l - z->c; (void)m3; /* do, line 185 */
1017         {   int ret = r_attached_pronoun(z);
1018             if (ret == 0) goto lab2; /* call attached_pronoun, line 185 */
1019             if (ret < 0) return ret;
1020         }
1021     lab2:
1022         z->c = z->l - m3;
1023     }
1024     {   int m4 = z->l - z->c; (void)m4; /* do, line 186 */
1025         {   int m5 = z->l - z->c; (void)m5; /* or, line 186 */
1026             {   int ret = r_standard_suffix(z);
1027                 if (ret == 0) goto lab5; /* call standard_suffix, line 186 */
1028                 if (ret < 0) return ret;
1029             }
1030             goto lab4;
1031         lab5:
1032             z->c = z->l - m5;
1033             {   int ret = r_verb_suffix(z);
1034                 if (ret == 0) goto lab3; /* call verb_suffix, line 186 */
1035                 if (ret < 0) return ret;
1036             }
1037         }
1038     lab4:
1039     lab3:
1040         z->c = z->l - m4;
1041     }
1042     {   int m6 = z->l - z->c; (void)m6; /* do, line 187 */
1043         {   int ret = r_vowel_suffix(z);
1044             if (ret == 0) goto lab6; /* call vowel_suffix, line 187 */
1045             if (ret < 0) return ret;
1046         }
1047     lab6:
1048         z->c = z->l - m6;
1049     }
1050     z->c = z->lb;
1051     {   int c7 = z->c; /* do, line 189 */
1052         {   int ret = r_postlude(z);
1053             if (ret == 0) goto lab7; /* call postlude, line 189 */
1054             if (ret < 0) return ret;
1055         }
1056     lab7:
1057         z->c = c7;
1058     }
1059     return 1;
1060 }
1061
1062 extern struct SN_env * italian_ISO_8859_1_create_env(void) { return SN_create_env(0, 3, 0); }
1063
1064 extern void italian_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1065