isomorfeus-ferret 0.12.0

Sign up to get free protection for your applications and to get access to all the features.
Files changed (222) hide show
  1. checksums.yaml +7 -0
  2. data/LICENSE +612 -0
  3. data/README.md +44 -0
  4. data/ext/isomorfeus_ferret_ext/benchmark.c +223 -0
  5. data/ext/isomorfeus_ferret_ext/benchmark.h +45 -0
  6. data/ext/isomorfeus_ferret_ext/benchmarks_all.h +25 -0
  7. data/ext/isomorfeus_ferret_ext/bm_bitvector.c +123 -0
  8. data/ext/isomorfeus_ferret_ext/bm_hash.c +118 -0
  9. data/ext/isomorfeus_ferret_ext/bm_micro_string.c +40 -0
  10. data/ext/isomorfeus_ferret_ext/bm_store.c +93 -0
  11. data/ext/isomorfeus_ferret_ext/email.rl +21 -0
  12. data/ext/isomorfeus_ferret_ext/extconf.rb +5 -0
  13. data/ext/isomorfeus_ferret_ext/fio_tmpfile.h +53 -0
  14. data/ext/isomorfeus_ferret_ext/frb_analysis.c +2577 -0
  15. data/ext/isomorfeus_ferret_ext/frb_index.c +3457 -0
  16. data/ext/isomorfeus_ferret_ext/frb_lang.c +9 -0
  17. data/ext/isomorfeus_ferret_ext/frb_lang.h +17 -0
  18. data/ext/isomorfeus_ferret_ext/frb_qparser.c +629 -0
  19. data/ext/isomorfeus_ferret_ext/frb_search.c +4460 -0
  20. data/ext/isomorfeus_ferret_ext/frb_store.c +515 -0
  21. data/ext/isomorfeus_ferret_ext/frb_threading.h +30 -0
  22. data/ext/isomorfeus_ferret_ext/frb_utils.c +1127 -0
  23. data/ext/isomorfeus_ferret_ext/frt_analysis.c +1644 -0
  24. data/ext/isomorfeus_ferret_ext/frt_analysis.h +247 -0
  25. data/ext/isomorfeus_ferret_ext/frt_array.c +124 -0
  26. data/ext/isomorfeus_ferret_ext/frt_array.h +54 -0
  27. data/ext/isomorfeus_ferret_ext/frt_bitvector.c +95 -0
  28. data/ext/isomorfeus_ferret_ext/frt_bitvector.h +586 -0
  29. data/ext/isomorfeus_ferret_ext/frt_compound_io.c +374 -0
  30. data/ext/isomorfeus_ferret_ext/frt_config.h +44 -0
  31. data/ext/isomorfeus_ferret_ext/frt_document.c +134 -0
  32. data/ext/isomorfeus_ferret_ext/frt_document.h +52 -0
  33. data/ext/isomorfeus_ferret_ext/frt_except.c +95 -0
  34. data/ext/isomorfeus_ferret_ext/frt_except.h +188 -0
  35. data/ext/isomorfeus_ferret_ext/frt_field_index.c +233 -0
  36. data/ext/isomorfeus_ferret_ext/frt_field_index.h +42 -0
  37. data/ext/isomorfeus_ferret_ext/frt_filter.c +157 -0
  38. data/ext/isomorfeus_ferret_ext/frt_fs_store.c +502 -0
  39. data/ext/isomorfeus_ferret_ext/frt_global.c +427 -0
  40. data/ext/isomorfeus_ferret_ext/frt_global.h +290 -0
  41. data/ext/isomorfeus_ferret_ext/frt_hash.c +518 -0
  42. data/ext/isomorfeus_ferret_ext/frt_hash.h +466 -0
  43. data/ext/isomorfeus_ferret_ext/frt_hashset.c +191 -0
  44. data/ext/isomorfeus_ferret_ext/frt_hashset.h +206 -0
  45. data/ext/isomorfeus_ferret_ext/frt_helper.c +62 -0
  46. data/ext/isomorfeus_ferret_ext/frt_helper.h +13 -0
  47. data/ext/isomorfeus_ferret_ext/frt_ind.c +353 -0
  48. data/ext/isomorfeus_ferret_ext/frt_ind.h +54 -0
  49. data/ext/isomorfeus_ferret_ext/frt_index.c +6377 -0
  50. data/ext/isomorfeus_ferret_ext/frt_index.h +880 -0
  51. data/ext/isomorfeus_ferret_ext/frt_lang.c +104 -0
  52. data/ext/isomorfeus_ferret_ext/frt_lang.h +44 -0
  53. data/ext/isomorfeus_ferret_ext/frt_mempool.c +87 -0
  54. data/ext/isomorfeus_ferret_ext/frt_mempool.h +33 -0
  55. data/ext/isomorfeus_ferret_ext/frt_multimapper.c +349 -0
  56. data/ext/isomorfeus_ferret_ext/frt_multimapper.h +52 -0
  57. data/ext/isomorfeus_ferret_ext/frt_posh.c +1006 -0
  58. data/ext/isomorfeus_ferret_ext/frt_posh.h +973 -0
  59. data/ext/isomorfeus_ferret_ext/frt_priorityqueue.c +147 -0
  60. data/ext/isomorfeus_ferret_ext/frt_priorityqueue.h +147 -0
  61. data/ext/isomorfeus_ferret_ext/frt_q_boolean.c +1612 -0
  62. data/ext/isomorfeus_ferret_ext/frt_q_const_score.c +157 -0
  63. data/ext/isomorfeus_ferret_ext/frt_q_filtered_query.c +209 -0
  64. data/ext/isomorfeus_ferret_ext/frt_q_fuzzy.c +281 -0
  65. data/ext/isomorfeus_ferret_ext/frt_q_match_all.c +147 -0
  66. data/ext/isomorfeus_ferret_ext/frt_q_multi_term.c +672 -0
  67. data/ext/isomorfeus_ferret_ext/frt_q_parser.c +3084 -0
  68. data/ext/isomorfeus_ferret_ext/frt_q_phrase.c +1182 -0
  69. data/ext/isomorfeus_ferret_ext/frt_q_prefix.c +98 -0
  70. data/ext/isomorfeus_ferret_ext/frt_q_range.c +665 -0
  71. data/ext/isomorfeus_ferret_ext/frt_q_span.c +2386 -0
  72. data/ext/isomorfeus_ferret_ext/frt_q_term.c +311 -0
  73. data/ext/isomorfeus_ferret_ext/frt_q_wildcard.c +166 -0
  74. data/ext/isomorfeus_ferret_ext/frt_ram_store.c +460 -0
  75. data/ext/isomorfeus_ferret_ext/frt_scanner.c +899 -0
  76. data/ext/isomorfeus_ferret_ext/frt_scanner.h +28 -0
  77. data/ext/isomorfeus_ferret_ext/frt_scanner_mb.c +6705 -0
  78. data/ext/isomorfeus_ferret_ext/frt_scanner_utf8.c +4419 -0
  79. data/ext/isomorfeus_ferret_ext/frt_search.c +1824 -0
  80. data/ext/isomorfeus_ferret_ext/frt_search.h +924 -0
  81. data/ext/isomorfeus_ferret_ext/frt_similarity.c +150 -0
  82. data/ext/isomorfeus_ferret_ext/frt_similarity.h +79 -0
  83. data/ext/isomorfeus_ferret_ext/frt_sort.c +796 -0
  84. data/ext/isomorfeus_ferret_ext/frt_stopwords.c +395 -0
  85. data/ext/isomorfeus_ferret_ext/frt_store.c +680 -0
  86. data/ext/isomorfeus_ferret_ext/frt_store.h +789 -0
  87. data/ext/isomorfeus_ferret_ext/frt_term_vectors.c +72 -0
  88. data/ext/isomorfeus_ferret_ext/frt_threading.h +23 -0
  89. data/ext/isomorfeus_ferret_ext/frt_win32.h +54 -0
  90. data/ext/isomorfeus_ferret_ext/isomorfeus_ferret.c +409 -0
  91. data/ext/isomorfeus_ferret_ext/isomorfeus_ferret.h +95 -0
  92. data/ext/isomorfeus_ferret_ext/libstemmer.c +93 -0
  93. data/ext/isomorfeus_ferret_ext/libstemmer.h +73 -0
  94. data/ext/isomorfeus_ferret_ext/q_parser.y +1366 -0
  95. data/ext/isomorfeus_ferret_ext/scanner.h +28 -0
  96. data/ext/isomorfeus_ferret_ext/scanner.in +43 -0
  97. data/ext/isomorfeus_ferret_ext/scanner.rl +84 -0
  98. data/ext/isomorfeus_ferret_ext/scanner_mb.rl +200 -0
  99. data/ext/isomorfeus_ferret_ext/scanner_utf8.rl +85 -0
  100. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.c +324 -0
  101. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.h +7 -0
  102. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.c +610 -0
  103. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.h +6 -0
  104. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.c +1104 -0
  105. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.h +6 -0
  106. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.c +749 -0
  107. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.h +7 -0
  108. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.c +1233 -0
  109. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.h +6 -0
  110. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.c +490 -0
  111. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.h +6 -0
  112. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_hungarian.c +1217 -0
  113. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_hungarian.h +7 -0
  114. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.c +1052 -0
  115. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.h +6 -0
  116. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.c +283 -0
  117. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.h +6 -0
  118. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.c +735 -0
  119. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.h +6 -0
  120. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.c +1003 -0
  121. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.h +7 -0
  122. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.c +1079 -0
  123. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.h +6 -0
  124. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.c +293 -0
  125. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.h +6 -0
  126. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.c +984 -0
  127. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.h +6 -0
  128. data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.c +686 -0
  129. data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.h +6 -0
  130. data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.c +325 -0
  131. data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.h +6 -0
  132. data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.c +620 -0
  133. data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.h +6 -0
  134. data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.c +1111 -0
  135. data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.h +6 -0
  136. data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.c +754 -0
  137. data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.h +6 -0
  138. data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.c +1242 -0
  139. data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.h +6 -0
  140. data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.c +495 -0
  141. data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.h +6 -0
  142. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.c +1220 -0
  143. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.h +6 -0
  144. data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.c +1059 -0
  145. data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.h +6 -0
  146. data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.c +285 -0
  147. data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.h +6 -0
  148. data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.c +741 -0
  149. data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.h +6 -0
  150. data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.c +1009 -0
  151. data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.h +6 -0
  152. data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.c +990 -0
  153. data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.h +6 -0
  154. data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.c +680 -0
  155. data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.h +6 -0
  156. data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.c +1083 -0
  157. data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.h +6 -0
  158. data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.c +294 -0
  159. data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.h +6 -0
  160. data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.c +2191 -0
  161. data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.h +6 -0
  162. data/ext/isomorfeus_ferret_ext/stem_api.c +66 -0
  163. data/ext/isomorfeus_ferret_ext/stem_api.h +26 -0
  164. data/ext/isomorfeus_ferret_ext/stem_header.h +57 -0
  165. data/ext/isomorfeus_ferret_ext/stem_modules.h +190 -0
  166. data/ext/isomorfeus_ferret_ext/stem_modules.txt +50 -0
  167. data/ext/isomorfeus_ferret_ext/stem_utilities.c +478 -0
  168. data/ext/isomorfeus_ferret_ext/test.c +850 -0
  169. data/ext/isomorfeus_ferret_ext/test.h +416 -0
  170. data/ext/isomorfeus_ferret_ext/test_1710.c +63 -0
  171. data/ext/isomorfeus_ferret_ext/test_analysis.c +1221 -0
  172. data/ext/isomorfeus_ferret_ext/test_array.c +272 -0
  173. data/ext/isomorfeus_ferret_ext/test_bitvector.c +600 -0
  174. data/ext/isomorfeus_ferret_ext/test_compound_io.c +170 -0
  175. data/ext/isomorfeus_ferret_ext/test_document.c +156 -0
  176. data/ext/isomorfeus_ferret_ext/test_except.c +244 -0
  177. data/ext/isomorfeus_ferret_ext/test_fields.c +522 -0
  178. data/ext/isomorfeus_ferret_ext/test_file_deleter.c +185 -0
  179. data/ext/isomorfeus_ferret_ext/test_filter.c +331 -0
  180. data/ext/isomorfeus_ferret_ext/test_fs_store.c +25 -0
  181. data/ext/isomorfeus_ferret_ext/test_global.c +299 -0
  182. data/ext/isomorfeus_ferret_ext/test_hash.c +485 -0
  183. data/ext/isomorfeus_ferret_ext/test_hashset.c +288 -0
  184. data/ext/isomorfeus_ferret_ext/test_helper.c +47 -0
  185. data/ext/isomorfeus_ferret_ext/test_highlighter.c +548 -0
  186. data/ext/isomorfeus_ferret_ext/test_index.c +2323 -0
  187. data/ext/isomorfeus_ferret_ext/test_lang.c +74 -0
  188. data/ext/isomorfeus_ferret_ext/test_mempool.c +102 -0
  189. data/ext/isomorfeus_ferret_ext/test_multimapper.c +64 -0
  190. data/ext/isomorfeus_ferret_ext/test_priorityqueue.c +213 -0
  191. data/ext/isomorfeus_ferret_ext/test_q_const_score.c +84 -0
  192. data/ext/isomorfeus_ferret_ext/test_q_filtered.c +61 -0
  193. data/ext/isomorfeus_ferret_ext/test_q_fuzzy.c +241 -0
  194. data/ext/isomorfeus_ferret_ext/test_q_parser.c +464 -0
  195. data/ext/isomorfeus_ferret_ext/test_q_span.c +575 -0
  196. data/ext/isomorfeus_ferret_ext/test_ram_store.c +77 -0
  197. data/ext/isomorfeus_ferret_ext/test_search.c +1874 -0
  198. data/ext/isomorfeus_ferret_ext/test_segments.c +167 -0
  199. data/ext/isomorfeus_ferret_ext/test_similarity.c +25 -0
  200. data/ext/isomorfeus_ferret_ext/test_sort.c +333 -0
  201. data/ext/isomorfeus_ferret_ext/test_store.c +591 -0
  202. data/ext/isomorfeus_ferret_ext/test_store.h +3 -0
  203. data/ext/isomorfeus_ferret_ext/test_term.c +351 -0
  204. data/ext/isomorfeus_ferret_ext/test_term_vectors.c +373 -0
  205. data/ext/isomorfeus_ferret_ext/test_test.c +83 -0
  206. data/ext/isomorfeus_ferret_ext/test_threading.c +188 -0
  207. data/ext/isomorfeus_ferret_ext/testhelper.c +561 -0
  208. data/ext/isomorfeus_ferret_ext/testhelper.h +25 -0
  209. data/ext/isomorfeus_ferret_ext/tests_all.h +87 -0
  210. data/ext/isomorfeus_ferret_ext/uchar-ucs4.rl +1854 -0
  211. data/ext/isomorfeus_ferret_ext/uchar-utf8.rl +1999 -0
  212. data/ext/isomorfeus_ferret_ext/url.rl +27 -0
  213. data/ext/isomorfeus_ferret_ext/word_list.h +15156 -0
  214. data/lib/isomorfeus/ferret/document.rb +132 -0
  215. data/lib/isomorfeus/ferret/field_symbol.rb +85 -0
  216. data/lib/isomorfeus/ferret/index/field_infos.rb +48 -0
  217. data/lib/isomorfeus/ferret/index/index.rb +970 -0
  218. data/lib/isomorfeus/ferret/monitor.rb +323 -0
  219. data/lib/isomorfeus/ferret/stdlib_patches.rb +151 -0
  220. data/lib/isomorfeus/ferret/version.rb +5 -0
  221. data/lib/isomorfeus-ferret.rb +8 -0
  222. metadata +307 -0
@@ -0,0 +1,1242 @@
1
+ /* This file was generated automatically by the Snowball to ANSI C compiler */
2
+
3
+ #include "stem_header.h"
4
+
5
+ extern int french_UTF_8_stem(struct SN_env * z);
6
+
7
+ static int r_un_accent(struct SN_env * z);
8
+ static int r_un_double(struct SN_env * z);
9
+ static int r_residual_suffix(struct SN_env * z);
10
+ static int r_verb_suffix(struct SN_env * z);
11
+ static int r_i_verb_suffix(struct SN_env * z);
12
+ static int r_standard_suffix(struct SN_env * z);
13
+ static int r_R2(struct SN_env * z);
14
+ static int r_R1(struct SN_env * z);
15
+ static int r_RV(struct SN_env * z);
16
+ static int r_mark_regions(struct SN_env * z);
17
+ static int r_postlude(struct SN_env * z);
18
+ static int r_prelude(struct SN_env * z);
19
+
20
+ extern struct SN_env * french_UTF_8_create_env(void);
21
+ extern void french_UTF_8_close_env(struct SN_env * z);
22
+
23
+ static const symbol s_0_0[3] = { 'c', 'o', 'l' };
24
+ static const symbol s_0_1[3] = { 'p', 'a', 'r' };
25
+ static const symbol s_0_2[3] = { 't', 'a', 'p' };
26
+
27
+ static const struct among a_0[3] =
28
+ {
29
+ /* 0 */ { 3, s_0_0, -1, -1, 0},
30
+ /* 1 */ { 3, s_0_1, -1, -1, 0},
31
+ /* 2 */ { 3, s_0_2, -1, -1, 0}
32
+ };
33
+
34
+ static const symbol s_1_1[1] = { 'I' };
35
+ static const symbol s_1_2[1] = { 'U' };
36
+ static const symbol s_1_3[1] = { 'Y' };
37
+
38
+ static const struct among a_1[4] =
39
+ {
40
+ /* 0 */ { 0, 0, -1, 4, 0},
41
+ /* 1 */ { 1, s_1_1, 0, 1, 0},
42
+ /* 2 */ { 1, s_1_2, 0, 2, 0},
43
+ /* 3 */ { 1, s_1_3, 0, 3, 0}
44
+ };
45
+
46
+ static const symbol s_2_0[3] = { 'i', 'q', 'U' };
47
+ static const symbol s_2_1[3] = { 'a', 'b', 'l' };
48
+ static const symbol s_2_2[4] = { 'I', 0xC3, 0xA8, 'r' };
49
+ static const symbol s_2_3[4] = { 'i', 0xC3, 0xA8, 'r' };
50
+ static const symbol s_2_4[3] = { 'e', 'u', 's' };
51
+ static const symbol s_2_5[2] = { 'i', 'v' };
52
+
53
+ static const struct among a_2[6] =
54
+ {
55
+ /* 0 */ { 3, s_2_0, -1, 3, 0},
56
+ /* 1 */ { 3, s_2_1, -1, 3, 0},
57
+ /* 2 */ { 4, s_2_2, -1, 4, 0},
58
+ /* 3 */ { 4, s_2_3, -1, 4, 0},
59
+ /* 4 */ { 3, s_2_4, -1, 2, 0},
60
+ /* 5 */ { 2, s_2_5, -1, 1, 0}
61
+ };
62
+
63
+ static const symbol s_3_0[2] = { 'i', 'c' };
64
+ static const symbol s_3_1[4] = { 'a', 'b', 'i', 'l' };
65
+ static const symbol s_3_2[2] = { 'i', 'v' };
66
+
67
+ static const struct among a_3[3] =
68
+ {
69
+ /* 0 */ { 2, s_3_0, -1, 2, 0},
70
+ /* 1 */ { 4, s_3_1, -1, 1, 0},
71
+ /* 2 */ { 2, s_3_2, -1, 3, 0}
72
+ };
73
+
74
+ static const symbol s_4_0[4] = { 'i', 'q', 'U', 'e' };
75
+ static const symbol s_4_1[6] = { 'a', 't', 'r', 'i', 'c', 'e' };
76
+ static const symbol s_4_2[4] = { 'a', 'n', 'c', 'e' };
77
+ static const symbol s_4_3[4] = { 'e', 'n', 'c', 'e' };
78
+ static const symbol s_4_4[5] = { 'l', 'o', 'g', 'i', 'e' };
79
+ static const symbol s_4_5[4] = { 'a', 'b', 'l', 'e' };
80
+ static const symbol s_4_6[4] = { 'i', 's', 'm', 'e' };
81
+ static const symbol s_4_7[4] = { 'e', 'u', 's', 'e' };
82
+ static const symbol s_4_8[4] = { 'i', 's', 't', 'e' };
83
+ static const symbol s_4_9[3] = { 'i', 'v', 'e' };
84
+ static const symbol s_4_10[2] = { 'i', 'f' };
85
+ static const symbol s_4_11[5] = { 'u', 's', 'i', 'o', 'n' };
86
+ static const symbol s_4_12[5] = { 'a', 't', 'i', 'o', 'n' };
87
+ static const symbol s_4_13[5] = { 'u', 't', 'i', 'o', 'n' };
88
+ static const symbol s_4_14[5] = { 'a', 't', 'e', 'u', 'r' };
89
+ static const symbol s_4_15[5] = { 'i', 'q', 'U', 'e', 's' };
90
+ static const symbol s_4_16[7] = { 'a', 't', 'r', 'i', 'c', 'e', 's' };
91
+ static const symbol s_4_17[5] = { 'a', 'n', 'c', 'e', 's' };
92
+ static const symbol s_4_18[5] = { 'e', 'n', 'c', 'e', 's' };
93
+ static const symbol s_4_19[6] = { 'l', 'o', 'g', 'i', 'e', 's' };
94
+ static const symbol s_4_20[5] = { 'a', 'b', 'l', 'e', 's' };
95
+ static const symbol s_4_21[5] = { 'i', 's', 'm', 'e', 's' };
96
+ static const symbol s_4_22[5] = { 'e', 'u', 's', 'e', 's' };
97
+ static const symbol s_4_23[5] = { 'i', 's', 't', 'e', 's' };
98
+ static const symbol s_4_24[4] = { 'i', 'v', 'e', 's' };
99
+ static const symbol s_4_25[3] = { 'i', 'f', 's' };
100
+ static const symbol s_4_26[6] = { 'u', 's', 'i', 'o', 'n', 's' };
101
+ static const symbol s_4_27[6] = { 'a', 't', 'i', 'o', 'n', 's' };
102
+ static const symbol s_4_28[6] = { 'u', 't', 'i', 'o', 'n', 's' };
103
+ static const symbol s_4_29[6] = { 'a', 't', 'e', 'u', 'r', 's' };
104
+ static const symbol s_4_30[5] = { 'm', 'e', 'n', 't', 's' };
105
+ static const symbol s_4_31[6] = { 'e', 'm', 'e', 'n', 't', 's' };
106
+ static const symbol s_4_32[9] = { 'i', 's', 's', 'e', 'm', 'e', 'n', 't', 's' };
107
+ static const symbol s_4_33[5] = { 'i', 't', 0xC3, 0xA9, 's' };
108
+ static const symbol s_4_34[4] = { 'm', 'e', 'n', 't' };
109
+ static const symbol s_4_35[5] = { 'e', 'm', 'e', 'n', 't' };
110
+ static const symbol s_4_36[8] = { 'i', 's', 's', 'e', 'm', 'e', 'n', 't' };
111
+ static const symbol s_4_37[6] = { 'a', 'm', 'm', 'e', 'n', 't' };
112
+ static const symbol s_4_38[6] = { 'e', 'm', 'm', 'e', 'n', 't' };
113
+ static const symbol s_4_39[3] = { 'a', 'u', 'x' };
114
+ static const symbol s_4_40[4] = { 'e', 'a', 'u', 'x' };
115
+ static const symbol s_4_41[3] = { 'e', 'u', 'x' };
116
+ static const symbol s_4_42[4] = { 'i', 't', 0xC3, 0xA9 };
117
+
118
+ static const struct among a_4[43] =
119
+ {
120
+ /* 0 */ { 4, s_4_0, -1, 1, 0},
121
+ /* 1 */ { 6, s_4_1, -1, 2, 0},
122
+ /* 2 */ { 4, s_4_2, -1, 1, 0},
123
+ /* 3 */ { 4, s_4_3, -1, 5, 0},
124
+ /* 4 */ { 5, s_4_4, -1, 3, 0},
125
+ /* 5 */ { 4, s_4_5, -1, 1, 0},
126
+ /* 6 */ { 4, s_4_6, -1, 1, 0},
127
+ /* 7 */ { 4, s_4_7, -1, 11, 0},
128
+ /* 8 */ { 4, s_4_8, -1, 1, 0},
129
+ /* 9 */ { 3, s_4_9, -1, 8, 0},
130
+ /* 10 */ { 2, s_4_10, -1, 8, 0},
131
+ /* 11 */ { 5, s_4_11, -1, 4, 0},
132
+ /* 12 */ { 5, s_4_12, -1, 2, 0},
133
+ /* 13 */ { 5, s_4_13, -1, 4, 0},
134
+ /* 14 */ { 5, s_4_14, -1, 2, 0},
135
+ /* 15 */ { 5, s_4_15, -1, 1, 0},
136
+ /* 16 */ { 7, s_4_16, -1, 2, 0},
137
+ /* 17 */ { 5, s_4_17, -1, 1, 0},
138
+ /* 18 */ { 5, s_4_18, -1, 5, 0},
139
+ /* 19 */ { 6, s_4_19, -1, 3, 0},
140
+ /* 20 */ { 5, s_4_20, -1, 1, 0},
141
+ /* 21 */ { 5, s_4_21, -1, 1, 0},
142
+ /* 22 */ { 5, s_4_22, -1, 11, 0},
143
+ /* 23 */ { 5, s_4_23, -1, 1, 0},
144
+ /* 24 */ { 4, s_4_24, -1, 8, 0},
145
+ /* 25 */ { 3, s_4_25, -1, 8, 0},
146
+ /* 26 */ { 6, s_4_26, -1, 4, 0},
147
+ /* 27 */ { 6, s_4_27, -1, 2, 0},
148
+ /* 28 */ { 6, s_4_28, -1, 4, 0},
149
+ /* 29 */ { 6, s_4_29, -1, 2, 0},
150
+ /* 30 */ { 5, s_4_30, -1, 15, 0},
151
+ /* 31 */ { 6, s_4_31, 30, 6, 0},
152
+ /* 32 */ { 9, s_4_32, 31, 12, 0},
153
+ /* 33 */ { 5, s_4_33, -1, 7, 0},
154
+ /* 34 */ { 4, s_4_34, -1, 15, 0},
155
+ /* 35 */ { 5, s_4_35, 34, 6, 0},
156
+ /* 36 */ { 8, s_4_36, 35, 12, 0},
157
+ /* 37 */ { 6, s_4_37, 34, 13, 0},
158
+ /* 38 */ { 6, s_4_38, 34, 14, 0},
159
+ /* 39 */ { 3, s_4_39, -1, 10, 0},
160
+ /* 40 */ { 4, s_4_40, 39, 9, 0},
161
+ /* 41 */ { 3, s_4_41, -1, 1, 0},
162
+ /* 42 */ { 4, s_4_42, -1, 7, 0}
163
+ };
164
+
165
+ static const symbol s_5_0[3] = { 'i', 'r', 'a' };
166
+ static const symbol s_5_1[2] = { 'i', 'e' };
167
+ static const symbol s_5_2[4] = { 'i', 's', 's', 'e' };
168
+ static const symbol s_5_3[7] = { 'i', 's', 's', 'a', 'n', 't', 'e' };
169
+ static const symbol s_5_4[1] = { 'i' };
170
+ static const symbol s_5_5[4] = { 'i', 'r', 'a', 'i' };
171
+ static const symbol s_5_6[2] = { 'i', 'r' };
172
+ static const symbol s_5_7[4] = { 'i', 'r', 'a', 's' };
173
+ static const symbol s_5_8[3] = { 'i', 'e', 's' };
174
+ static const symbol s_5_9[5] = { 0xC3, 0xAE, 'm', 'e', 's' };
175
+ static const symbol s_5_10[5] = { 'i', 's', 's', 'e', 's' };
176
+ static const symbol s_5_11[8] = { 'i', 's', 's', 'a', 'n', 't', 'e', 's' };
177
+ static const symbol s_5_12[5] = { 0xC3, 0xAE, 't', 'e', 's' };
178
+ static const symbol s_5_13[2] = { 'i', 's' };
179
+ static const symbol s_5_14[5] = { 'i', 'r', 'a', 'i', 's' };
180
+ static const symbol s_5_15[6] = { 'i', 's', 's', 'a', 'i', 's' };
181
+ static const symbol s_5_16[6] = { 'i', 'r', 'i', 'o', 'n', 's' };
182
+ static const symbol s_5_17[7] = { 'i', 's', 's', 'i', 'o', 'n', 's' };
183
+ static const symbol s_5_18[5] = { 'i', 'r', 'o', 'n', 's' };
184
+ static const symbol s_5_19[6] = { 'i', 's', 's', 'o', 'n', 's' };
185
+ static const symbol s_5_20[7] = { 'i', 's', 's', 'a', 'n', 't', 's' };
186
+ static const symbol s_5_21[2] = { 'i', 't' };
187
+ static const symbol s_5_22[5] = { 'i', 'r', 'a', 'i', 't' };
188
+ static const symbol s_5_23[6] = { 'i', 's', 's', 'a', 'i', 't' };
189
+ static const symbol s_5_24[6] = { 'i', 's', 's', 'a', 'n', 't' };
190
+ static const symbol s_5_25[7] = { 'i', 'r', 'a', 'I', 'e', 'n', 't' };
191
+ static const symbol s_5_26[8] = { 'i', 's', 's', 'a', 'I', 'e', 'n', 't' };
192
+ static const symbol s_5_27[5] = { 'i', 'r', 'e', 'n', 't' };
193
+ static const symbol s_5_28[6] = { 'i', 's', 's', 'e', 'n', 't' };
194
+ static const symbol s_5_29[5] = { 'i', 'r', 'o', 'n', 't' };
195
+ static const symbol s_5_30[3] = { 0xC3, 0xAE, 't' };
196
+ static const symbol s_5_31[5] = { 'i', 'r', 'i', 'e', 'z' };
197
+ static const symbol s_5_32[6] = { 'i', 's', 's', 'i', 'e', 'z' };
198
+ static const symbol s_5_33[4] = { 'i', 'r', 'e', 'z' };
199
+ static const symbol s_5_34[5] = { 'i', 's', 's', 'e', 'z' };
200
+
201
+ static const struct among a_5[35] =
202
+ {
203
+ /* 0 */ { 3, s_5_0, -1, 1, 0},
204
+ /* 1 */ { 2, s_5_1, -1, 1, 0},
205
+ /* 2 */ { 4, s_5_2, -1, 1, 0},
206
+ /* 3 */ { 7, s_5_3, -1, 1, 0},
207
+ /* 4 */ { 1, s_5_4, -1, 1, 0},
208
+ /* 5 */ { 4, s_5_5, 4, 1, 0},
209
+ /* 6 */ { 2, s_5_6, -1, 1, 0},
210
+ /* 7 */ { 4, s_5_7, -1, 1, 0},
211
+ /* 8 */ { 3, s_5_8, -1, 1, 0},
212
+ /* 9 */ { 5, s_5_9, -1, 1, 0},
213
+ /* 10 */ { 5, s_5_10, -1, 1, 0},
214
+ /* 11 */ { 8, s_5_11, -1, 1, 0},
215
+ /* 12 */ { 5, s_5_12, -1, 1, 0},
216
+ /* 13 */ { 2, s_5_13, -1, 1, 0},
217
+ /* 14 */ { 5, s_5_14, 13, 1, 0},
218
+ /* 15 */ { 6, s_5_15, 13, 1, 0},
219
+ /* 16 */ { 6, s_5_16, -1, 1, 0},
220
+ /* 17 */ { 7, s_5_17, -1, 1, 0},
221
+ /* 18 */ { 5, s_5_18, -1, 1, 0},
222
+ /* 19 */ { 6, s_5_19, -1, 1, 0},
223
+ /* 20 */ { 7, s_5_20, -1, 1, 0},
224
+ /* 21 */ { 2, s_5_21, -1, 1, 0},
225
+ /* 22 */ { 5, s_5_22, 21, 1, 0},
226
+ /* 23 */ { 6, s_5_23, 21, 1, 0},
227
+ /* 24 */ { 6, s_5_24, -1, 1, 0},
228
+ /* 25 */ { 7, s_5_25, -1, 1, 0},
229
+ /* 26 */ { 8, s_5_26, -1, 1, 0},
230
+ /* 27 */ { 5, s_5_27, -1, 1, 0},
231
+ /* 28 */ { 6, s_5_28, -1, 1, 0},
232
+ /* 29 */ { 5, s_5_29, -1, 1, 0},
233
+ /* 30 */ { 3, s_5_30, -1, 1, 0},
234
+ /* 31 */ { 5, s_5_31, -1, 1, 0},
235
+ /* 32 */ { 6, s_5_32, -1, 1, 0},
236
+ /* 33 */ { 4, s_5_33, -1, 1, 0},
237
+ /* 34 */ { 5, s_5_34, -1, 1, 0}
238
+ };
239
+
240
+ static const symbol s_6_0[1] = { 'a' };
241
+ static const symbol s_6_1[3] = { 'e', 'r', 'a' };
242
+ static const symbol s_6_2[4] = { 'a', 's', 's', 'e' };
243
+ static const symbol s_6_3[4] = { 'a', 'n', 't', 'e' };
244
+ static const symbol s_6_4[3] = { 0xC3, 0xA9, 'e' };
245
+ static const symbol s_6_5[2] = { 'a', 'i' };
246
+ static const symbol s_6_6[4] = { 'e', 'r', 'a', 'i' };
247
+ static const symbol s_6_7[2] = { 'e', 'r' };
248
+ static const symbol s_6_8[2] = { 'a', 's' };
249
+ static const symbol s_6_9[4] = { 'e', 'r', 'a', 's' };
250
+ static const symbol s_6_10[5] = { 0xC3, 0xA2, 'm', 'e', 's' };
251
+ static const symbol s_6_11[5] = { 'a', 's', 's', 'e', 's' };
252
+ static const symbol s_6_12[5] = { 'a', 'n', 't', 'e', 's' };
253
+ static const symbol s_6_13[5] = { 0xC3, 0xA2, 't', 'e', 's' };
254
+ static const symbol s_6_14[4] = { 0xC3, 0xA9, 'e', 's' };
255
+ static const symbol s_6_15[3] = { 'a', 'i', 's' };
256
+ static const symbol s_6_16[5] = { 'e', 'r', 'a', 'i', 's' };
257
+ static const symbol s_6_17[4] = { 'i', 'o', 'n', 's' };
258
+ static const symbol s_6_18[6] = { 'e', 'r', 'i', 'o', 'n', 's' };
259
+ static const symbol s_6_19[7] = { 'a', 's', 's', 'i', 'o', 'n', 's' };
260
+ static const symbol s_6_20[5] = { 'e', 'r', 'o', 'n', 's' };
261
+ static const symbol s_6_21[4] = { 'a', 'n', 't', 's' };
262
+ static const symbol s_6_22[3] = { 0xC3, 0xA9, 's' };
263
+ static const symbol s_6_23[3] = { 'a', 'i', 't' };
264
+ static const symbol s_6_24[5] = { 'e', 'r', 'a', 'i', 't' };
265
+ static const symbol s_6_25[3] = { 'a', 'n', 't' };
266
+ static const symbol s_6_26[5] = { 'a', 'I', 'e', 'n', 't' };
267
+ static const symbol s_6_27[7] = { 'e', 'r', 'a', 'I', 'e', 'n', 't' };
268
+ static const symbol s_6_28[6] = { 0xC3, 0xA8, 'r', 'e', 'n', 't' };
269
+ static const symbol s_6_29[6] = { 'a', 's', 's', 'e', 'n', 't' };
270
+ static const symbol s_6_30[5] = { 'e', 'r', 'o', 'n', 't' };
271
+ static const symbol s_6_31[3] = { 0xC3, 0xA2, 't' };
272
+ static const symbol s_6_32[2] = { 'e', 'z' };
273
+ static const symbol s_6_33[3] = { 'i', 'e', 'z' };
274
+ static const symbol s_6_34[5] = { 'e', 'r', 'i', 'e', 'z' };
275
+ static const symbol s_6_35[6] = { 'a', 's', 's', 'i', 'e', 'z' };
276
+ static const symbol s_6_36[4] = { 'e', 'r', 'e', 'z' };
277
+ static const symbol s_6_37[2] = { 0xC3, 0xA9 };
278
+
279
+ static const struct among a_6[38] =
280
+ {
281
+ /* 0 */ { 1, s_6_0, -1, 3, 0},
282
+ /* 1 */ { 3, s_6_1, 0, 2, 0},
283
+ /* 2 */ { 4, s_6_2, -1, 3, 0},
284
+ /* 3 */ { 4, s_6_3, -1, 3, 0},
285
+ /* 4 */ { 3, s_6_4, -1, 2, 0},
286
+ /* 5 */ { 2, s_6_5, -1, 3, 0},
287
+ /* 6 */ { 4, s_6_6, 5, 2, 0},
288
+ /* 7 */ { 2, s_6_7, -1, 2, 0},
289
+ /* 8 */ { 2, s_6_8, -1, 3, 0},
290
+ /* 9 */ { 4, s_6_9, 8, 2, 0},
291
+ /* 10 */ { 5, s_6_10, -1, 3, 0},
292
+ /* 11 */ { 5, s_6_11, -1, 3, 0},
293
+ /* 12 */ { 5, s_6_12, -1, 3, 0},
294
+ /* 13 */ { 5, s_6_13, -1, 3, 0},
295
+ /* 14 */ { 4, s_6_14, -1, 2, 0},
296
+ /* 15 */ { 3, s_6_15, -1, 3, 0},
297
+ /* 16 */ { 5, s_6_16, 15, 2, 0},
298
+ /* 17 */ { 4, s_6_17, -1, 1, 0},
299
+ /* 18 */ { 6, s_6_18, 17, 2, 0},
300
+ /* 19 */ { 7, s_6_19, 17, 3, 0},
301
+ /* 20 */ { 5, s_6_20, -1, 2, 0},
302
+ /* 21 */ { 4, s_6_21, -1, 3, 0},
303
+ /* 22 */ { 3, s_6_22, -1, 2, 0},
304
+ /* 23 */ { 3, s_6_23, -1, 3, 0},
305
+ /* 24 */ { 5, s_6_24, 23, 2, 0},
306
+ /* 25 */ { 3, s_6_25, -1, 3, 0},
307
+ /* 26 */ { 5, s_6_26, -1, 3, 0},
308
+ /* 27 */ { 7, s_6_27, 26, 2, 0},
309
+ /* 28 */ { 6, s_6_28, -1, 2, 0},
310
+ /* 29 */ { 6, s_6_29, -1, 3, 0},
311
+ /* 30 */ { 5, s_6_30, -1, 2, 0},
312
+ /* 31 */ { 3, s_6_31, -1, 3, 0},
313
+ /* 32 */ { 2, s_6_32, -1, 2, 0},
314
+ /* 33 */ { 3, s_6_33, 32, 2, 0},
315
+ /* 34 */ { 5, s_6_34, 33, 2, 0},
316
+ /* 35 */ { 6, s_6_35, 33, 3, 0},
317
+ /* 36 */ { 4, s_6_36, 32, 2, 0},
318
+ /* 37 */ { 2, s_6_37, -1, 2, 0}
319
+ };
320
+
321
+ static const symbol s_7_0[1] = { 'e' };
322
+ static const symbol s_7_1[5] = { 'I', 0xC3, 0xA8, 'r', 'e' };
323
+ static const symbol s_7_2[5] = { 'i', 0xC3, 0xA8, 'r', 'e' };
324
+ static const symbol s_7_3[3] = { 'i', 'o', 'n' };
325
+ static const symbol s_7_4[3] = { 'I', 'e', 'r' };
326
+ static const symbol s_7_5[3] = { 'i', 'e', 'r' };
327
+ static const symbol s_7_6[2] = { 0xC3, 0xAB };
328
+
329
+ static const struct among a_7[7] =
330
+ {
331
+ /* 0 */ { 1, s_7_0, -1, 3, 0},
332
+ /* 1 */ { 5, s_7_1, 0, 2, 0},
333
+ /* 2 */ { 5, s_7_2, 0, 2, 0},
334
+ /* 3 */ { 3, s_7_3, -1, 1, 0},
335
+ /* 4 */ { 3, s_7_4, -1, 2, 0},
336
+ /* 5 */ { 3, s_7_5, -1, 2, 0},
337
+ /* 6 */ { 2, s_7_6, -1, 4, 0}
338
+ };
339
+
340
+ static const symbol s_8_0[3] = { 'e', 'l', 'l' };
341
+ static const symbol s_8_1[4] = { 'e', 'i', 'l', 'l' };
342
+ static const symbol s_8_2[3] = { 'e', 'n', 'n' };
343
+ static const symbol s_8_3[3] = { 'o', 'n', 'n' };
344
+ static const symbol s_8_4[3] = { 'e', 't', 't' };
345
+
346
+ static const struct among a_8[5] =
347
+ {
348
+ /* 0 */ { 3, s_8_0, -1, -1, 0},
349
+ /* 1 */ { 4, s_8_1, -1, -1, 0},
350
+ /* 2 */ { 3, s_8_2, -1, -1, 0},
351
+ /* 3 */ { 3, s_8_3, -1, -1, 0},
352
+ /* 4 */ { 3, s_8_4, -1, -1, 0}
353
+ };
354
+
355
+ static const unsigned char g_v[] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 130, 103, 8, 5 };
356
+
357
+ static const unsigned char g_keep_with_s[] = { 1, 65, 20, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128 };
358
+
359
+ static const symbol s_0[] = { 'u' };
360
+ static const symbol s_1[] = { 'U' };
361
+ static const symbol s_2[] = { 'i' };
362
+ static const symbol s_3[] = { 'I' };
363
+ static const symbol s_4[] = { 'y' };
364
+ static const symbol s_5[] = { 'Y' };
365
+ static const symbol s_6[] = { 'y' };
366
+ static const symbol s_7[] = { 'Y' };
367
+ static const symbol s_8[] = { 'q' };
368
+ static const symbol s_9[] = { 'u' };
369
+ static const symbol s_10[] = { 'U' };
370
+ static const symbol s_11[] = { 'i' };
371
+ static const symbol s_12[] = { 'u' };
372
+ static const symbol s_13[] = { 'y' };
373
+ static const symbol s_14[] = { 'i', 'c' };
374
+ static const symbol s_15[] = { 'i', 'q', 'U' };
375
+ static const symbol s_16[] = { 'l', 'o', 'g' };
376
+ static const symbol s_17[] = { 'u' };
377
+ static const symbol s_18[] = { 'e', 'n', 't' };
378
+ static const symbol s_19[] = { 'a', 't' };
379
+ static const symbol s_20[] = { 'e', 'u', 'x' };
380
+ static const symbol s_21[] = { 'i' };
381
+ static const symbol s_22[] = { 'a', 'b', 'l' };
382
+ static const symbol s_23[] = { 'i', 'q', 'U' };
383
+ static const symbol s_24[] = { 'a', 't' };
384
+ static const symbol s_25[] = { 'i', 'c' };
385
+ static const symbol s_26[] = { 'i', 'q', 'U' };
386
+ static const symbol s_27[] = { 'e', 'a', 'u' };
387
+ static const symbol s_28[] = { 'a', 'l' };
388
+ static const symbol s_29[] = { 'e', 'u', 'x' };
389
+ static const symbol s_30[] = { 'a', 'n', 't' };
390
+ static const symbol s_31[] = { 'e', 'n', 't' };
391
+ static const symbol s_32[] = { 'e' };
392
+ static const symbol s_33[] = { 's' };
393
+ static const symbol s_34[] = { 's' };
394
+ static const symbol s_35[] = { 't' };
395
+ static const symbol s_36[] = { 'i' };
396
+ static const symbol s_37[] = { 'g', 'u' };
397
+ static const symbol s_38[] = { 0xC3, 0xA9 };
398
+ static const symbol s_39[] = { 0xC3, 0xA8 };
399
+ static const symbol s_40[] = { 'e' };
400
+ static const symbol s_41[] = { 'Y' };
401
+ static const symbol s_42[] = { 'i' };
402
+ static const symbol s_43[] = { 0xC3, 0xA7 };
403
+ static const symbol s_44[] = { 'c' };
404
+
405
+ static int r_prelude(struct SN_env * z) {
406
+ while(1) { /* repeat, line 38 */
407
+ int c1 = z->c;
408
+ while(1) { /* goto, line 38 */
409
+ int c2 = z->c;
410
+ { int c3 = z->c; /* or, line 44 */
411
+ if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab3;
412
+ z->bra = z->c; /* [, line 40 */
413
+ { int c4 = z->c; /* or, line 40 */
414
+ if (!(eq_s(z, 1, s_0))) goto lab5;
415
+ z->ket = z->c; /* ], line 40 */
416
+ if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab5;
417
+ { int ret = slice_from_s(z, 1, s_1); /* <-, line 40 */
418
+ if (ret < 0) return ret;
419
+ }
420
+ goto lab4;
421
+ lab5:
422
+ z->c = c4;
423
+ if (!(eq_s(z, 1, s_2))) goto lab6;
424
+ z->ket = z->c; /* ], line 41 */
425
+ if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab6;
426
+ { int ret = slice_from_s(z, 1, s_3); /* <-, line 41 */
427
+ if (ret < 0) return ret;
428
+ }
429
+ goto lab4;
430
+ lab6:
431
+ z->c = c4;
432
+ if (!(eq_s(z, 1, s_4))) goto lab3;
433
+ z->ket = z->c; /* ], line 42 */
434
+ { int ret = slice_from_s(z, 1, s_5); /* <-, line 42 */
435
+ if (ret < 0) return ret;
436
+ }
437
+ }
438
+ lab4:
439
+ goto lab2;
440
+ lab3:
441
+ z->c = c3;
442
+ z->bra = z->c; /* [, line 45 */
443
+ if (!(eq_s(z, 1, s_6))) goto lab7;
444
+ z->ket = z->c; /* ], line 45 */
445
+ if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab7;
446
+ { int ret = slice_from_s(z, 1, s_7); /* <-, line 45 */
447
+ if (ret < 0) return ret;
448
+ }
449
+ goto lab2;
450
+ lab7:
451
+ z->c = c3;
452
+ if (!(eq_s(z, 1, s_8))) goto lab1;
453
+ z->bra = z->c; /* [, line 47 */
454
+ if (!(eq_s(z, 1, s_9))) goto lab1;
455
+ z->ket = z->c; /* ], line 47 */
456
+ { int ret = slice_from_s(z, 1, s_10); /* <-, line 47 */
457
+ if (ret < 0) return ret;
458
+ }
459
+ }
460
+ lab2:
461
+ z->c = c2;
462
+ break;
463
+ lab1:
464
+ z->c = c2;
465
+ { int ret = skip_utf8(z->p, z->c, 0, z->l, 1);
466
+ if (ret < 0) goto lab0;
467
+ z->c = ret; /* goto, line 38 */
468
+ }
469
+ }
470
+ continue;
471
+ lab0:
472
+ z->c = c1;
473
+ break;
474
+ }
475
+ return 1;
476
+ }
477
+
478
+ static int r_mark_regions(struct SN_env * z) {
479
+ z->I[0] = z->l;
480
+ z->I[1] = z->l;
481
+ z->I[2] = z->l;
482
+ { int c1 = z->c; /* do, line 56 */
483
+ { int c2 = z->c; /* or, line 58 */
484
+ if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab2;
485
+ if (in_grouping_U(z, g_v, 97, 251, 0)) goto lab2;
486
+ { int ret = skip_utf8(z->p, z->c, 0, z->l, 1);
487
+ if (ret < 0) goto lab2;
488
+ z->c = ret; /* next, line 57 */
489
+ }
490
+ goto lab1;
491
+ lab2:
492
+ z->c = c2;
493
+ if (z->c + 2 >= z->l || z->p[z->c + 2] >> 5 != 3 || !((331776 >> (z->p[z->c + 2] & 0x1f)) & 1)) goto lab3;
494
+ if (!(find_among(z, a_0, 3))) goto lab3; /* among, line 59 */
495
+ goto lab1;
496
+ lab3:
497
+ z->c = c2;
498
+ { int ret = skip_utf8(z->p, z->c, 0, z->l, 1);
499
+ if (ret < 0) goto lab0;
500
+ z->c = ret; /* next, line 66 */
501
+ }
502
+ { /* gopast */ /* grouping v, line 66 */
503
+ int ret = out_grouping_U(z, g_v, 97, 251, 1);
504
+ if (ret < 0) goto lab0;
505
+ z->c += ret;
506
+ }
507
+ }
508
+ lab1:
509
+ z->I[0] = z->c; /* setmark pV, line 67 */
510
+ lab0:
511
+ z->c = c1;
512
+ }
513
+ { int c3 = z->c; /* do, line 69 */
514
+ { /* gopast */ /* grouping v, line 70 */
515
+ int ret = out_grouping_U(z, g_v, 97, 251, 1);
516
+ if (ret < 0) goto lab4;
517
+ z->c += ret;
518
+ }
519
+ { /* gopast */ /* non v, line 70 */
520
+ int ret = in_grouping_U(z, g_v, 97, 251, 1);
521
+ if (ret < 0) goto lab4;
522
+ z->c += ret;
523
+ }
524
+ z->I[1] = z->c; /* setmark p1, line 70 */
525
+ { /* gopast */ /* grouping v, line 71 */
526
+ int ret = out_grouping_U(z, g_v, 97, 251, 1);
527
+ if (ret < 0) goto lab4;
528
+ z->c += ret;
529
+ }
530
+ { /* gopast */ /* non v, line 71 */
531
+ int ret = in_grouping_U(z, g_v, 97, 251, 1);
532
+ if (ret < 0) goto lab4;
533
+ z->c += ret;
534
+ }
535
+ z->I[2] = z->c; /* setmark p2, line 71 */
536
+ lab4:
537
+ z->c = c3;
538
+ }
539
+ return 1;
540
+ }
541
+
542
+ static int r_postlude(struct SN_env * z) {
543
+ int among_var;
544
+ while(1) { /* repeat, line 75 */
545
+ int c1 = z->c;
546
+ z->bra = z->c; /* [, line 77 */
547
+ if (z->c >= z->l || z->p[z->c + 0] >> 5 != 2 || !((35652096 >> (z->p[z->c + 0] & 0x1f)) & 1)) among_var = 4; else
548
+ among_var = find_among(z, a_1, 4); /* substring, line 77 */
549
+ if (!(among_var)) goto lab0;
550
+ z->ket = z->c; /* ], line 77 */
551
+ switch(among_var) {
552
+ case 0: goto lab0;
553
+ case 1:
554
+ { int ret = slice_from_s(z, 1, s_11); /* <-, line 78 */
555
+ if (ret < 0) return ret;
556
+ }
557
+ break;
558
+ case 2:
559
+ { int ret = slice_from_s(z, 1, s_12); /* <-, line 79 */
560
+ if (ret < 0) return ret;
561
+ }
562
+ break;
563
+ case 3:
564
+ { int ret = slice_from_s(z, 1, s_13); /* <-, line 80 */
565
+ if (ret < 0) return ret;
566
+ }
567
+ break;
568
+ case 4:
569
+ { int ret = skip_utf8(z->p, z->c, 0, z->l, 1);
570
+ if (ret < 0) goto lab0;
571
+ z->c = ret; /* next, line 81 */
572
+ }
573
+ break;
574
+ }
575
+ continue;
576
+ lab0:
577
+ z->c = c1;
578
+ break;
579
+ }
580
+ return 1;
581
+ }
582
+
583
+ static int r_RV(struct SN_env * z) {
584
+ if (!(z->I[0] <= z->c)) return 0;
585
+ return 1;
586
+ }
587
+
588
+ static int r_R1(struct SN_env * z) {
589
+ if (!(z->I[1] <= z->c)) return 0;
590
+ return 1;
591
+ }
592
+
593
+ static int r_R2(struct SN_env * z) {
594
+ if (!(z->I[2] <= z->c)) return 0;
595
+ return 1;
596
+ }
597
+
598
+ static int r_standard_suffix(struct SN_env * z) {
599
+ int among_var;
600
+ z->ket = z->c; /* [, line 92 */
601
+ among_var = find_among_b(z, a_4, 43); /* substring, line 92 */
602
+ if (!(among_var)) return 0;
603
+ z->bra = z->c; /* ], line 92 */
604
+ switch(among_var) {
605
+ case 0: return 0;
606
+ case 1:
607
+ { int ret = r_R2(z);
608
+ if (ret == 0) return 0; /* call R2, line 96 */
609
+ if (ret < 0) return ret;
610
+ }
611
+ { int ret = slice_del(z); /* delete, line 96 */
612
+ if (ret < 0) return ret;
613
+ }
614
+ break;
615
+ case 2:
616
+ { int ret = r_R2(z);
617
+ if (ret == 0) return 0; /* call R2, line 99 */
618
+ if (ret < 0) return ret;
619
+ }
620
+ { int ret = slice_del(z); /* delete, line 99 */
621
+ if (ret < 0) return ret;
622
+ }
623
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 100 */
624
+ z->ket = z->c; /* [, line 100 */
625
+ if (!(eq_s_b(z, 2, s_14))) { z->c = z->l - m_keep; goto lab0; }
626
+ z->bra = z->c; /* ], line 100 */
627
+ { int m1 = z->l - z->c; (void)m1; /* or, line 100 */
628
+ { int ret = r_R2(z);
629
+ if (ret == 0) goto lab2; /* call R2, line 100 */
630
+ if (ret < 0) return ret;
631
+ }
632
+ { int ret = slice_del(z); /* delete, line 100 */
633
+ if (ret < 0) return ret;
634
+ }
635
+ goto lab1;
636
+ lab2:
637
+ z->c = z->l - m1;
638
+ { int ret = slice_from_s(z, 3, s_15); /* <-, line 100 */
639
+ if (ret < 0) return ret;
640
+ }
641
+ }
642
+ lab1:
643
+ lab0:
644
+ ;
645
+ }
646
+ break;
647
+ case 3:
648
+ { int ret = r_R2(z);
649
+ if (ret == 0) return 0; /* call R2, line 104 */
650
+ if (ret < 0) return ret;
651
+ }
652
+ { int ret = slice_from_s(z, 3, s_16); /* <-, line 104 */
653
+ if (ret < 0) return ret;
654
+ }
655
+ break;
656
+ case 4:
657
+ { int ret = r_R2(z);
658
+ if (ret == 0) return 0; /* call R2, line 107 */
659
+ if (ret < 0) return ret;
660
+ }
661
+ { int ret = slice_from_s(z, 1, s_17); /* <-, line 107 */
662
+ if (ret < 0) return ret;
663
+ }
664
+ break;
665
+ case 5:
666
+ { int ret = r_R2(z);
667
+ if (ret == 0) return 0; /* call R2, line 110 */
668
+ if (ret < 0) return ret;
669
+ }
670
+ { int ret = slice_from_s(z, 3, s_18); /* <-, line 110 */
671
+ if (ret < 0) return ret;
672
+ }
673
+ break;
674
+ case 6:
675
+ { int ret = r_RV(z);
676
+ if (ret == 0) return 0; /* call RV, line 114 */
677
+ if (ret < 0) return ret;
678
+ }
679
+ { int ret = slice_del(z); /* delete, line 114 */
680
+ if (ret < 0) return ret;
681
+ }
682
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 115 */
683
+ z->ket = z->c; /* [, line 116 */
684
+ among_var = find_among_b(z, a_2, 6); /* substring, line 116 */
685
+ if (!(among_var)) { z->c = z->l - m_keep; goto lab3; }
686
+ z->bra = z->c; /* ], line 116 */
687
+ switch(among_var) {
688
+ case 0: { z->c = z->l - m_keep; goto lab3; }
689
+ case 1:
690
+ { int ret = r_R2(z);
691
+ if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 117 */
692
+ if (ret < 0) return ret;
693
+ }
694
+ { int ret = slice_del(z); /* delete, line 117 */
695
+ if (ret < 0) return ret;
696
+ }
697
+ z->ket = z->c; /* [, line 117 */
698
+ if (!(eq_s_b(z, 2, s_19))) { z->c = z->l - m_keep; goto lab3; }
699
+ z->bra = z->c; /* ], line 117 */
700
+ { int ret = r_R2(z);
701
+ if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 117 */
702
+ if (ret < 0) return ret;
703
+ }
704
+ { int ret = slice_del(z); /* delete, line 117 */
705
+ if (ret < 0) return ret;
706
+ }
707
+ break;
708
+ case 2:
709
+ { int m2 = z->l - z->c; (void)m2; /* or, line 118 */
710
+ { int ret = r_R2(z);
711
+ if (ret == 0) goto lab5; /* call R2, line 118 */
712
+ if (ret < 0) return ret;
713
+ }
714
+ { int ret = slice_del(z); /* delete, line 118 */
715
+ if (ret < 0) return ret;
716
+ }
717
+ goto lab4;
718
+ lab5:
719
+ z->c = z->l - m2;
720
+ { int ret = r_R1(z);
721
+ if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R1, line 118 */
722
+ if (ret < 0) return ret;
723
+ }
724
+ { int ret = slice_from_s(z, 3, s_20); /* <-, line 118 */
725
+ if (ret < 0) return ret;
726
+ }
727
+ }
728
+ lab4:
729
+ break;
730
+ case 3:
731
+ { int ret = r_R2(z);
732
+ if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 120 */
733
+ if (ret < 0) return ret;
734
+ }
735
+ { int ret = slice_del(z); /* delete, line 120 */
736
+ if (ret < 0) return ret;
737
+ }
738
+ break;
739
+ case 4:
740
+ { int ret = r_RV(z);
741
+ if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call RV, line 122 */
742
+ if (ret < 0) return ret;
743
+ }
744
+ { int ret = slice_from_s(z, 1, s_21); /* <-, line 122 */
745
+ if (ret < 0) return ret;
746
+ }
747
+ break;
748
+ }
749
+ lab3:
750
+ ;
751
+ }
752
+ break;
753
+ case 7:
754
+ { int ret = r_R2(z);
755
+ if (ret == 0) return 0; /* call R2, line 129 */
756
+ if (ret < 0) return ret;
757
+ }
758
+ { int ret = slice_del(z); /* delete, line 129 */
759
+ if (ret < 0) return ret;
760
+ }
761
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 130 */
762
+ z->ket = z->c; /* [, line 131 */
763
+ 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 lab6; }
764
+ among_var = find_among_b(z, a_3, 3); /* substring, line 131 */
765
+ if (!(among_var)) { z->c = z->l - m_keep; goto lab6; }
766
+ z->bra = z->c; /* ], line 131 */
767
+ switch(among_var) {
768
+ case 0: { z->c = z->l - m_keep; goto lab6; }
769
+ case 1:
770
+ { int m3 = z->l - z->c; (void)m3; /* or, line 132 */
771
+ { int ret = r_R2(z);
772
+ if (ret == 0) goto lab8; /* call R2, line 132 */
773
+ if (ret < 0) return ret;
774
+ }
775
+ { int ret = slice_del(z); /* delete, line 132 */
776
+ if (ret < 0) return ret;
777
+ }
778
+ goto lab7;
779
+ lab8:
780
+ z->c = z->l - m3;
781
+ { int ret = slice_from_s(z, 3, s_22); /* <-, line 132 */
782
+ if (ret < 0) return ret;
783
+ }
784
+ }
785
+ lab7:
786
+ break;
787
+ case 2:
788
+ { int m4 = z->l - z->c; (void)m4; /* or, line 133 */
789
+ { int ret = r_R2(z);
790
+ if (ret == 0) goto lab10; /* call R2, line 133 */
791
+ if (ret < 0) return ret;
792
+ }
793
+ { int ret = slice_del(z); /* delete, line 133 */
794
+ if (ret < 0) return ret;
795
+ }
796
+ goto lab9;
797
+ lab10:
798
+ z->c = z->l - m4;
799
+ { int ret = slice_from_s(z, 3, s_23); /* <-, line 133 */
800
+ if (ret < 0) return ret;
801
+ }
802
+ }
803
+ lab9:
804
+ break;
805
+ case 3:
806
+ { int ret = r_R2(z);
807
+ if (ret == 0) { z->c = z->l - m_keep; goto lab6; } /* call R2, line 134 */
808
+ if (ret < 0) return ret;
809
+ }
810
+ { int ret = slice_del(z); /* delete, line 134 */
811
+ if (ret < 0) return ret;
812
+ }
813
+ break;
814
+ }
815
+ lab6:
816
+ ;
817
+ }
818
+ break;
819
+ case 8:
820
+ { int ret = r_R2(z);
821
+ if (ret == 0) return 0; /* call R2, line 141 */
822
+ if (ret < 0) return ret;
823
+ }
824
+ { int ret = slice_del(z); /* delete, line 141 */
825
+ if (ret < 0) return ret;
826
+ }
827
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 142 */
828
+ z->ket = z->c; /* [, line 142 */
829
+ if (!(eq_s_b(z, 2, s_24))) { z->c = z->l - m_keep; goto lab11; }
830
+ z->bra = z->c; /* ], line 142 */
831
+ { int ret = r_R2(z);
832
+ if (ret == 0) { z->c = z->l - m_keep; goto lab11; } /* call R2, line 142 */
833
+ if (ret < 0) return ret;
834
+ }
835
+ { int ret = slice_del(z); /* delete, line 142 */
836
+ if (ret < 0) return ret;
837
+ }
838
+ z->ket = z->c; /* [, line 142 */
839
+ if (!(eq_s_b(z, 2, s_25))) { z->c = z->l - m_keep; goto lab11; }
840
+ z->bra = z->c; /* ], line 142 */
841
+ { int m5 = z->l - z->c; (void)m5; /* or, line 142 */
842
+ { int ret = r_R2(z);
843
+ if (ret == 0) goto lab13; /* call R2, line 142 */
844
+ if (ret < 0) return ret;
845
+ }
846
+ { int ret = slice_del(z); /* delete, line 142 */
847
+ if (ret < 0) return ret;
848
+ }
849
+ goto lab12;
850
+ lab13:
851
+ z->c = z->l - m5;
852
+ { int ret = slice_from_s(z, 3, s_26); /* <-, line 142 */
853
+ if (ret < 0) return ret;
854
+ }
855
+ }
856
+ lab12:
857
+ lab11:
858
+ ;
859
+ }
860
+ break;
861
+ case 9:
862
+ { int ret = slice_from_s(z, 3, s_27); /* <-, line 144 */
863
+ if (ret < 0) return ret;
864
+ }
865
+ break;
866
+ case 10:
867
+ { int ret = r_R1(z);
868
+ if (ret == 0) return 0; /* call R1, line 145 */
869
+ if (ret < 0) return ret;
870
+ }
871
+ { int ret = slice_from_s(z, 2, s_28); /* <-, line 145 */
872
+ if (ret < 0) return ret;
873
+ }
874
+ break;
875
+ case 11:
876
+ { int m6 = z->l - z->c; (void)m6; /* or, line 147 */
877
+ { int ret = r_R2(z);
878
+ if (ret == 0) goto lab15; /* call R2, line 147 */
879
+ if (ret < 0) return ret;
880
+ }
881
+ { int ret = slice_del(z); /* delete, line 147 */
882
+ if (ret < 0) return ret;
883
+ }
884
+ goto lab14;
885
+ lab15:
886
+ z->c = z->l - m6;
887
+ { int ret = r_R1(z);
888
+ if (ret == 0) return 0; /* call R1, line 147 */
889
+ if (ret < 0) return ret;
890
+ }
891
+ { int ret = slice_from_s(z, 3, s_29); /* <-, line 147 */
892
+ if (ret < 0) return ret;
893
+ }
894
+ }
895
+ lab14:
896
+ break;
897
+ case 12:
898
+ { int ret = r_R1(z);
899
+ if (ret == 0) return 0; /* call R1, line 150 */
900
+ if (ret < 0) return ret;
901
+ }
902
+ if (out_grouping_b_U(z, g_v, 97, 251, 0)) return 0;
903
+ { int ret = slice_del(z); /* delete, line 150 */
904
+ if (ret < 0) return ret;
905
+ }
906
+ break;
907
+ case 13:
908
+ { int ret = r_RV(z);
909
+ if (ret == 0) return 0; /* call RV, line 155 */
910
+ if (ret < 0) return ret;
911
+ }
912
+ { int ret = slice_from_s(z, 3, s_30); /* <-, line 155 */
913
+ if (ret < 0) return ret;
914
+ }
915
+ return 0; /* fail, line 155 */
916
+ break;
917
+ case 14:
918
+ { int ret = r_RV(z);
919
+ if (ret == 0) return 0; /* call RV, line 156 */
920
+ if (ret < 0) return ret;
921
+ }
922
+ { int ret = slice_from_s(z, 3, s_31); /* <-, line 156 */
923
+ if (ret < 0) return ret;
924
+ }
925
+ return 0; /* fail, line 156 */
926
+ break;
927
+ case 15:
928
+ { int m_test = z->l - z->c; /* test, line 158 */
929
+ if (in_grouping_b_U(z, g_v, 97, 251, 0)) return 0;
930
+ { int ret = r_RV(z);
931
+ if (ret == 0) return 0; /* call RV, line 158 */
932
+ if (ret < 0) return ret;
933
+ }
934
+ z->c = z->l - m_test;
935
+ }
936
+ { int ret = slice_del(z); /* delete, line 158 */
937
+ if (ret < 0) return ret;
938
+ }
939
+ return 0; /* fail, line 158 */
940
+ break;
941
+ }
942
+ return 1;
943
+ }
944
+
945
+ static int r_i_verb_suffix(struct SN_env * z) {
946
+ int among_var;
947
+ { int mlimit; /* setlimit, line 163 */
948
+ int m1 = z->l - z->c; (void)m1;
949
+ if (z->c < z->I[0]) return 0;
950
+ z->c = z->I[0]; /* tomark, line 163 */
951
+ mlimit = z->lb; z->lb = z->c;
952
+ z->c = z->l - m1;
953
+ z->ket = z->c; /* [, line 164 */
954
+ if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((68944418 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->lb = mlimit; return 0; }
955
+ among_var = find_among_b(z, a_5, 35); /* substring, line 164 */
956
+ if (!(among_var)) { z->lb = mlimit; return 0; }
957
+ z->bra = z->c; /* ], line 164 */
958
+ switch(among_var) {
959
+ case 0: { z->lb = mlimit; return 0; }
960
+ case 1:
961
+ if (out_grouping_b_U(z, g_v, 97, 251, 0)) { z->lb = mlimit; return 0; }
962
+ { int ret = slice_del(z); /* delete, line 170 */
963
+ if (ret < 0) return ret;
964
+ }
965
+ break;
966
+ }
967
+ z->lb = mlimit;
968
+ }
969
+ return 1;
970
+ }
971
+
972
+ static int r_verb_suffix(struct SN_env * z) {
973
+ int among_var;
974
+ { int mlimit; /* setlimit, line 174 */
975
+ int m1 = z->l - z->c; (void)m1;
976
+ if (z->c < z->I[0]) return 0;
977
+ z->c = z->I[0]; /* tomark, line 174 */
978
+ mlimit = z->lb; z->lb = z->c;
979
+ z->c = z->l - m1;
980
+ z->ket = z->c; /* [, line 175 */
981
+ among_var = find_among_b(z, a_6, 38); /* substring, line 175 */
982
+ if (!(among_var)) { z->lb = mlimit; return 0; }
983
+ z->bra = z->c; /* ], line 175 */
984
+ switch(among_var) {
985
+ case 0: { z->lb = mlimit; return 0; }
986
+ case 1:
987
+ { int ret = r_R2(z);
988
+ if (ret == 0) { z->lb = mlimit; return 0; } /* call R2, line 177 */
989
+ if (ret < 0) return ret;
990
+ }
991
+ { int ret = slice_del(z); /* delete, line 177 */
992
+ if (ret < 0) return ret;
993
+ }
994
+ break;
995
+ case 2:
996
+ { int ret = slice_del(z); /* delete, line 185 */
997
+ if (ret < 0) return ret;
998
+ }
999
+ break;
1000
+ case 3:
1001
+ { int ret = slice_del(z); /* delete, line 190 */
1002
+ if (ret < 0) return ret;
1003
+ }
1004
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 191 */
1005
+ z->ket = z->c; /* [, line 191 */
1006
+ if (!(eq_s_b(z, 1, s_32))) { z->c = z->l - m_keep; goto lab0; }
1007
+ z->bra = z->c; /* ], line 191 */
1008
+ { int ret = slice_del(z); /* delete, line 191 */
1009
+ if (ret < 0) return ret;
1010
+ }
1011
+ lab0:
1012
+ ;
1013
+ }
1014
+ break;
1015
+ }
1016
+ z->lb = mlimit;
1017
+ }
1018
+ return 1;
1019
+ }
1020
+
1021
+ static int r_residual_suffix(struct SN_env * z) {
1022
+ int among_var;
1023
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 199 */
1024
+ z->ket = z->c; /* [, line 199 */
1025
+ if (!(eq_s_b(z, 1, s_33))) { z->c = z->l - m_keep; goto lab0; }
1026
+ z->bra = z->c; /* ], line 199 */
1027
+ { int m_test = z->l - z->c; /* test, line 199 */
1028
+ if (out_grouping_b_U(z, g_keep_with_s, 97, 232, 0)) { z->c = z->l - m_keep; goto lab0; }
1029
+ z->c = z->l - m_test;
1030
+ }
1031
+ { int ret = slice_del(z); /* delete, line 199 */
1032
+ if (ret < 0) return ret;
1033
+ }
1034
+ lab0:
1035
+ ;
1036
+ }
1037
+ { int mlimit; /* setlimit, line 200 */
1038
+ int m1 = z->l - z->c; (void)m1;
1039
+ if (z->c < z->I[0]) return 0;
1040
+ z->c = z->I[0]; /* tomark, line 200 */
1041
+ mlimit = z->lb; z->lb = z->c;
1042
+ z->c = z->l - m1;
1043
+ z->ket = z->c; /* [, line 201 */
1044
+ among_var = find_among_b(z, a_7, 7); /* substring, line 201 */
1045
+ if (!(among_var)) { z->lb = mlimit; return 0; }
1046
+ z->bra = z->c; /* ], line 201 */
1047
+ switch(among_var) {
1048
+ case 0: { z->lb = mlimit; return 0; }
1049
+ case 1:
1050
+ { int ret = r_R2(z);
1051
+ if (ret == 0) { z->lb = mlimit; return 0; } /* call R2, line 202 */
1052
+ if (ret < 0) return ret;
1053
+ }
1054
+ { int m2 = z->l - z->c; (void)m2; /* or, line 202 */
1055
+ if (!(eq_s_b(z, 1, s_34))) goto lab2;
1056
+ goto lab1;
1057
+ lab2:
1058
+ z->c = z->l - m2;
1059
+ if (!(eq_s_b(z, 1, s_35))) { z->lb = mlimit; return 0; }
1060
+ }
1061
+ lab1:
1062
+ { int ret = slice_del(z); /* delete, line 202 */
1063
+ if (ret < 0) return ret;
1064
+ }
1065
+ break;
1066
+ case 2:
1067
+ { int ret = slice_from_s(z, 1, s_36); /* <-, line 204 */
1068
+ if (ret < 0) return ret;
1069
+ }
1070
+ break;
1071
+ case 3:
1072
+ { int ret = slice_del(z); /* delete, line 205 */
1073
+ if (ret < 0) return ret;
1074
+ }
1075
+ break;
1076
+ case 4:
1077
+ if (!(eq_s_b(z, 2, s_37))) { z->lb = mlimit; return 0; }
1078
+ { int ret = slice_del(z); /* delete, line 206 */
1079
+ if (ret < 0) return ret;
1080
+ }
1081
+ break;
1082
+ }
1083
+ z->lb = mlimit;
1084
+ }
1085
+ return 1;
1086
+ }
1087
+
1088
+ static int r_un_double(struct SN_env * z) {
1089
+ { int m_test = z->l - z->c; /* test, line 212 */
1090
+ if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1069056 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1091
+ if (!(find_among_b(z, a_8, 5))) return 0; /* among, line 212 */
1092
+ z->c = z->l - m_test;
1093
+ }
1094
+ z->ket = z->c; /* [, line 212 */
1095
+ { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
1096
+ if (ret < 0) return 0;
1097
+ z->c = ret; /* next, line 212 */
1098
+ }
1099
+ z->bra = z->c; /* ], line 212 */
1100
+ { int ret = slice_del(z); /* delete, line 212 */
1101
+ if (ret < 0) return ret;
1102
+ }
1103
+ return 1;
1104
+ }
1105
+
1106
+ static int r_un_accent(struct SN_env * z) {
1107
+ { int i = 1;
1108
+ while(1) { /* atleast, line 216 */
1109
+ if (out_grouping_b_U(z, g_v, 97, 251, 0)) goto lab0;
1110
+ i--;
1111
+ continue;
1112
+ lab0:
1113
+ break;
1114
+ }
1115
+ if (i > 0) return 0;
1116
+ }
1117
+ z->ket = z->c; /* [, line 217 */
1118
+ { int m1 = z->l - z->c; (void)m1; /* or, line 217 */
1119
+ if (!(eq_s_b(z, 2, s_38))) goto lab2;
1120
+ goto lab1;
1121
+ lab2:
1122
+ z->c = z->l - m1;
1123
+ if (!(eq_s_b(z, 2, s_39))) return 0;
1124
+ }
1125
+ lab1:
1126
+ z->bra = z->c; /* ], line 217 */
1127
+ { int ret = slice_from_s(z, 1, s_40); /* <-, line 217 */
1128
+ if (ret < 0) return ret;
1129
+ }
1130
+ return 1;
1131
+ }
1132
+
1133
+ extern int french_UTF_8_stem(struct SN_env * z) {
1134
+ { int c1 = z->c; /* do, line 223 */
1135
+ { int ret = r_prelude(z);
1136
+ if (ret == 0) goto lab0; /* call prelude, line 223 */
1137
+ if (ret < 0) return ret;
1138
+ }
1139
+ lab0:
1140
+ z->c = c1;
1141
+ }
1142
+ { int c2 = z->c; /* do, line 224 */
1143
+ { int ret = r_mark_regions(z);
1144
+ if (ret == 0) goto lab1; /* call mark_regions, line 224 */
1145
+ if (ret < 0) return ret;
1146
+ }
1147
+ lab1:
1148
+ z->c = c2;
1149
+ }
1150
+ z->lb = z->c; z->c = z->l; /* backwards, line 225 */
1151
+
1152
+ { int m3 = z->l - z->c; (void)m3; /* do, line 227 */
1153
+ { int m4 = z->l - z->c; (void)m4; /* or, line 237 */
1154
+ { int m5 = z->l - z->c; (void)m5; /* and, line 233 */
1155
+ { int m6 = z->l - z->c; (void)m6; /* or, line 229 */
1156
+ { int ret = r_standard_suffix(z);
1157
+ if (ret == 0) goto lab6; /* call standard_suffix, line 229 */
1158
+ if (ret < 0) return ret;
1159
+ }
1160
+ goto lab5;
1161
+ lab6:
1162
+ z->c = z->l - m6;
1163
+ { int ret = r_i_verb_suffix(z);
1164
+ if (ret == 0) goto lab7; /* call i_verb_suffix, line 230 */
1165
+ if (ret < 0) return ret;
1166
+ }
1167
+ goto lab5;
1168
+ lab7:
1169
+ z->c = z->l - m6;
1170
+ { int ret = r_verb_suffix(z);
1171
+ if (ret == 0) goto lab4; /* call verb_suffix, line 231 */
1172
+ if (ret < 0) return ret;
1173
+ }
1174
+ }
1175
+ lab5:
1176
+ z->c = z->l - m5;
1177
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 234 */
1178
+ z->ket = z->c; /* [, line 234 */
1179
+ { int m7 = z->l - z->c; (void)m7; /* or, line 234 */
1180
+ if (!(eq_s_b(z, 1, s_41))) goto lab10;
1181
+ z->bra = z->c; /* ], line 234 */
1182
+ { int ret = slice_from_s(z, 1, s_42); /* <-, line 234 */
1183
+ if (ret < 0) return ret;
1184
+ }
1185
+ goto lab9;
1186
+ lab10:
1187
+ z->c = z->l - m7;
1188
+ if (!(eq_s_b(z, 2, s_43))) { z->c = z->l - m_keep; goto lab8; }
1189
+ z->bra = z->c; /* ], line 235 */
1190
+ { int ret = slice_from_s(z, 1, s_44); /* <-, line 235 */
1191
+ if (ret < 0) return ret;
1192
+ }
1193
+ }
1194
+ lab9:
1195
+ lab8:
1196
+ ;
1197
+ }
1198
+ }
1199
+ goto lab3;
1200
+ lab4:
1201
+ z->c = z->l - m4;
1202
+ { int ret = r_residual_suffix(z);
1203
+ if (ret == 0) goto lab2; /* call residual_suffix, line 238 */
1204
+ if (ret < 0) return ret;
1205
+ }
1206
+ }
1207
+ lab3:
1208
+ lab2:
1209
+ z->c = z->l - m3;
1210
+ }
1211
+ { int m8 = z->l - z->c; (void)m8; /* do, line 243 */
1212
+ { int ret = r_un_double(z);
1213
+ if (ret == 0) goto lab11; /* call un_double, line 243 */
1214
+ if (ret < 0) return ret;
1215
+ }
1216
+ lab11:
1217
+ z->c = z->l - m8;
1218
+ }
1219
+ { int m9 = z->l - z->c; (void)m9; /* do, line 244 */
1220
+ { int ret = r_un_accent(z);
1221
+ if (ret == 0) goto lab12; /* call un_accent, line 244 */
1222
+ if (ret < 0) return ret;
1223
+ }
1224
+ lab12:
1225
+ z->c = z->l - m9;
1226
+ }
1227
+ z->c = z->lb;
1228
+ { int c10 = z->c; /* do, line 246 */
1229
+ { int ret = r_postlude(z);
1230
+ if (ret == 0) goto lab13; /* call postlude, line 246 */
1231
+ if (ret < 0) return ret;
1232
+ }
1233
+ lab13:
1234
+ z->c = c10;
1235
+ }
1236
+ return 1;
1237
+ }
1238
+
1239
+ extern struct SN_env * french_UTF_8_create_env(void) { return SN_create_env(0, 3, 0); }
1240
+
1241
+ extern void french_UTF_8_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1242
+