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,6 @@
1
+ /* This file was generated automatically by the Snowball to ANSI C compiler */
2
+
3
+ extern struct SN_env * romanian_ISO_8859_2_create_env(void);
4
+ extern void romanian_ISO_8859_2_close_env(struct SN_env * z);
5
+
6
+ extern int romanian_ISO_8859_2_stem(struct SN_env * z);
@@ -0,0 +1,686 @@
1
+ /* This file was generated automatically by the Snowball to ANSI C compiler */
2
+
3
+ #include "stem_header.h"
4
+
5
+ extern int russian_KOI8_R_stem(struct SN_env * z);
6
+
7
+ static int r_tidy_up(struct SN_env * z);
8
+ static int r_derivational(struct SN_env * z);
9
+ static int r_noun(struct SN_env * z);
10
+ static int r_verb(struct SN_env * z);
11
+ static int r_reflexive(struct SN_env * z);
12
+ static int r_adjectival(struct SN_env * z);
13
+ static int r_adjective(struct SN_env * z);
14
+ static int r_perfective_gerund(struct SN_env * z);
15
+ static int r_R2(struct SN_env * z);
16
+ static int r_mark_regions(struct SN_env * z);
17
+
18
+ extern struct SN_env * russian_KOI8_R_create_env(void);
19
+ extern void russian_KOI8_R_close_env(struct SN_env * z);
20
+
21
+ static const symbol s_0_0[3] = { 0xD7, 0xDB, 0xC9 };
22
+ static const symbol s_0_1[4] = { 0xC9, 0xD7, 0xDB, 0xC9 };
23
+ static const symbol s_0_2[4] = { 0xD9, 0xD7, 0xDB, 0xC9 };
24
+ static const symbol s_0_3[1] = { 0xD7 };
25
+ static const symbol s_0_4[2] = { 0xC9, 0xD7 };
26
+ static const symbol s_0_5[2] = { 0xD9, 0xD7 };
27
+ static const symbol s_0_6[5] = { 0xD7, 0xDB, 0xC9, 0xD3, 0xD8 };
28
+ static const symbol s_0_7[6] = { 0xC9, 0xD7, 0xDB, 0xC9, 0xD3, 0xD8 };
29
+ static const symbol s_0_8[6] = { 0xD9, 0xD7, 0xDB, 0xC9, 0xD3, 0xD8 };
30
+
31
+ static const struct among a_0[9] =
32
+ {
33
+ /* 0 */ { 3, s_0_0, -1, 1, 0},
34
+ /* 1 */ { 4, s_0_1, 0, 2, 0},
35
+ /* 2 */ { 4, s_0_2, 0, 2, 0},
36
+ /* 3 */ { 1, s_0_3, -1, 1, 0},
37
+ /* 4 */ { 2, s_0_4, 3, 2, 0},
38
+ /* 5 */ { 2, s_0_5, 3, 2, 0},
39
+ /* 6 */ { 5, s_0_6, -1, 1, 0},
40
+ /* 7 */ { 6, s_0_7, 6, 2, 0},
41
+ /* 8 */ { 6, s_0_8, 6, 2, 0}
42
+ };
43
+
44
+ static const symbol s_1_0[2] = { 0xC0, 0xC0 };
45
+ static const symbol s_1_1[2] = { 0xC5, 0xC0 };
46
+ static const symbol s_1_2[2] = { 0xCF, 0xC0 };
47
+ static const symbol s_1_3[2] = { 0xD5, 0xC0 };
48
+ static const symbol s_1_4[2] = { 0xC5, 0xC5 };
49
+ static const symbol s_1_5[2] = { 0xC9, 0xC5 };
50
+ static const symbol s_1_6[2] = { 0xCF, 0xC5 };
51
+ static const symbol s_1_7[2] = { 0xD9, 0xC5 };
52
+ static const symbol s_1_8[2] = { 0xC9, 0xC8 };
53
+ static const symbol s_1_9[2] = { 0xD9, 0xC8 };
54
+ static const symbol s_1_10[3] = { 0xC9, 0xCD, 0xC9 };
55
+ static const symbol s_1_11[3] = { 0xD9, 0xCD, 0xC9 };
56
+ static const symbol s_1_12[2] = { 0xC5, 0xCA };
57
+ static const symbol s_1_13[2] = { 0xC9, 0xCA };
58
+ static const symbol s_1_14[2] = { 0xCF, 0xCA };
59
+ static const symbol s_1_15[2] = { 0xD9, 0xCA };
60
+ static const symbol s_1_16[2] = { 0xC5, 0xCD };
61
+ static const symbol s_1_17[2] = { 0xC9, 0xCD };
62
+ static const symbol s_1_18[2] = { 0xCF, 0xCD };
63
+ static const symbol s_1_19[2] = { 0xD9, 0xCD };
64
+ static const symbol s_1_20[3] = { 0xC5, 0xC7, 0xCF };
65
+ static const symbol s_1_21[3] = { 0xCF, 0xC7, 0xCF };
66
+ static const symbol s_1_22[2] = { 0xC1, 0xD1 };
67
+ static const symbol s_1_23[2] = { 0xD1, 0xD1 };
68
+ static const symbol s_1_24[3] = { 0xC5, 0xCD, 0xD5 };
69
+ static const symbol s_1_25[3] = { 0xCF, 0xCD, 0xD5 };
70
+
71
+ static const struct among a_1[26] =
72
+ {
73
+ /* 0 */ { 2, s_1_0, -1, 1, 0},
74
+ /* 1 */ { 2, s_1_1, -1, 1, 0},
75
+ /* 2 */ { 2, s_1_2, -1, 1, 0},
76
+ /* 3 */ { 2, s_1_3, -1, 1, 0},
77
+ /* 4 */ { 2, s_1_4, -1, 1, 0},
78
+ /* 5 */ { 2, s_1_5, -1, 1, 0},
79
+ /* 6 */ { 2, s_1_6, -1, 1, 0},
80
+ /* 7 */ { 2, s_1_7, -1, 1, 0},
81
+ /* 8 */ { 2, s_1_8, -1, 1, 0},
82
+ /* 9 */ { 2, s_1_9, -1, 1, 0},
83
+ /* 10 */ { 3, s_1_10, -1, 1, 0},
84
+ /* 11 */ { 3, s_1_11, -1, 1, 0},
85
+ /* 12 */ { 2, s_1_12, -1, 1, 0},
86
+ /* 13 */ { 2, s_1_13, -1, 1, 0},
87
+ /* 14 */ { 2, s_1_14, -1, 1, 0},
88
+ /* 15 */ { 2, s_1_15, -1, 1, 0},
89
+ /* 16 */ { 2, s_1_16, -1, 1, 0},
90
+ /* 17 */ { 2, s_1_17, -1, 1, 0},
91
+ /* 18 */ { 2, s_1_18, -1, 1, 0},
92
+ /* 19 */ { 2, s_1_19, -1, 1, 0},
93
+ /* 20 */ { 3, s_1_20, -1, 1, 0},
94
+ /* 21 */ { 3, s_1_21, -1, 1, 0},
95
+ /* 22 */ { 2, s_1_22, -1, 1, 0},
96
+ /* 23 */ { 2, s_1_23, -1, 1, 0},
97
+ /* 24 */ { 3, s_1_24, -1, 1, 0},
98
+ /* 25 */ { 3, s_1_25, -1, 1, 0}
99
+ };
100
+
101
+ static const symbol s_2_0[2] = { 0xC5, 0xCD };
102
+ static const symbol s_2_1[2] = { 0xCE, 0xCE };
103
+ static const symbol s_2_2[2] = { 0xD7, 0xDB };
104
+ static const symbol s_2_3[3] = { 0xC9, 0xD7, 0xDB };
105
+ static const symbol s_2_4[3] = { 0xD9, 0xD7, 0xDB };
106
+ static const symbol s_2_5[1] = { 0xDD };
107
+ static const symbol s_2_6[2] = { 0xC0, 0xDD };
108
+ static const symbol s_2_7[3] = { 0xD5, 0xC0, 0xDD };
109
+
110
+ static const struct among a_2[8] =
111
+ {
112
+ /* 0 */ { 2, s_2_0, -1, 1, 0},
113
+ /* 1 */ { 2, s_2_1, -1, 1, 0},
114
+ /* 2 */ { 2, s_2_2, -1, 1, 0},
115
+ /* 3 */ { 3, s_2_3, 2, 2, 0},
116
+ /* 4 */ { 3, s_2_4, 2, 2, 0},
117
+ /* 5 */ { 1, s_2_5, -1, 1, 0},
118
+ /* 6 */ { 2, s_2_6, 5, 1, 0},
119
+ /* 7 */ { 3, s_2_7, 6, 2, 0}
120
+ };
121
+
122
+ static const symbol s_3_0[2] = { 0xD3, 0xD1 };
123
+ static const symbol s_3_1[2] = { 0xD3, 0xD8 };
124
+
125
+ static const struct among a_3[2] =
126
+ {
127
+ /* 0 */ { 2, s_3_0, -1, 1, 0},
128
+ /* 1 */ { 2, s_3_1, -1, 1, 0}
129
+ };
130
+
131
+ static const symbol s_4_0[1] = { 0xC0 };
132
+ static const symbol s_4_1[2] = { 0xD5, 0xC0 };
133
+ static const symbol s_4_2[2] = { 0xCC, 0xC1 };
134
+ static const symbol s_4_3[3] = { 0xC9, 0xCC, 0xC1 };
135
+ static const symbol s_4_4[3] = { 0xD9, 0xCC, 0xC1 };
136
+ static const symbol s_4_5[2] = { 0xCE, 0xC1 };
137
+ static const symbol s_4_6[3] = { 0xC5, 0xCE, 0xC1 };
138
+ static const symbol s_4_7[3] = { 0xC5, 0xD4, 0xC5 };
139
+ static const symbol s_4_8[3] = { 0xC9, 0xD4, 0xC5 };
140
+ static const symbol s_4_9[3] = { 0xCA, 0xD4, 0xC5 };
141
+ static const symbol s_4_10[4] = { 0xC5, 0xCA, 0xD4, 0xC5 };
142
+ static const symbol s_4_11[4] = { 0xD5, 0xCA, 0xD4, 0xC5 };
143
+ static const symbol s_4_12[2] = { 0xCC, 0xC9 };
144
+ static const symbol s_4_13[3] = { 0xC9, 0xCC, 0xC9 };
145
+ static const symbol s_4_14[3] = { 0xD9, 0xCC, 0xC9 };
146
+ static const symbol s_4_15[1] = { 0xCA };
147
+ static const symbol s_4_16[2] = { 0xC5, 0xCA };
148
+ static const symbol s_4_17[2] = { 0xD5, 0xCA };
149
+ static const symbol s_4_18[1] = { 0xCC };
150
+ static const symbol s_4_19[2] = { 0xC9, 0xCC };
151
+ static const symbol s_4_20[2] = { 0xD9, 0xCC };
152
+ static const symbol s_4_21[2] = { 0xC5, 0xCD };
153
+ static const symbol s_4_22[2] = { 0xC9, 0xCD };
154
+ static const symbol s_4_23[2] = { 0xD9, 0xCD };
155
+ static const symbol s_4_24[1] = { 0xCE };
156
+ static const symbol s_4_25[2] = { 0xC5, 0xCE };
157
+ static const symbol s_4_26[2] = { 0xCC, 0xCF };
158
+ static const symbol s_4_27[3] = { 0xC9, 0xCC, 0xCF };
159
+ static const symbol s_4_28[3] = { 0xD9, 0xCC, 0xCF };
160
+ static const symbol s_4_29[2] = { 0xCE, 0xCF };
161
+ static const symbol s_4_30[3] = { 0xC5, 0xCE, 0xCF };
162
+ static const symbol s_4_31[3] = { 0xCE, 0xCE, 0xCF };
163
+ static const symbol s_4_32[2] = { 0xC0, 0xD4 };
164
+ static const symbol s_4_33[3] = { 0xD5, 0xC0, 0xD4 };
165
+ static const symbol s_4_34[2] = { 0xC5, 0xD4 };
166
+ static const symbol s_4_35[3] = { 0xD5, 0xC5, 0xD4 };
167
+ static const symbol s_4_36[2] = { 0xC9, 0xD4 };
168
+ static const symbol s_4_37[2] = { 0xD1, 0xD4 };
169
+ static const symbol s_4_38[2] = { 0xD9, 0xD4 };
170
+ static const symbol s_4_39[2] = { 0xD4, 0xD8 };
171
+ static const symbol s_4_40[3] = { 0xC9, 0xD4, 0xD8 };
172
+ static const symbol s_4_41[3] = { 0xD9, 0xD4, 0xD8 };
173
+ static const symbol s_4_42[3] = { 0xC5, 0xDB, 0xD8 };
174
+ static const symbol s_4_43[3] = { 0xC9, 0xDB, 0xD8 };
175
+ static const symbol s_4_44[2] = { 0xCE, 0xD9 };
176
+ static const symbol s_4_45[3] = { 0xC5, 0xCE, 0xD9 };
177
+
178
+ static const struct among a_4[46] =
179
+ {
180
+ /* 0 */ { 1, s_4_0, -1, 2, 0},
181
+ /* 1 */ { 2, s_4_1, 0, 2, 0},
182
+ /* 2 */ { 2, s_4_2, -1, 1, 0},
183
+ /* 3 */ { 3, s_4_3, 2, 2, 0},
184
+ /* 4 */ { 3, s_4_4, 2, 2, 0},
185
+ /* 5 */ { 2, s_4_5, -1, 1, 0},
186
+ /* 6 */ { 3, s_4_6, 5, 2, 0},
187
+ /* 7 */ { 3, s_4_7, -1, 1, 0},
188
+ /* 8 */ { 3, s_4_8, -1, 2, 0},
189
+ /* 9 */ { 3, s_4_9, -1, 1, 0},
190
+ /* 10 */ { 4, s_4_10, 9, 2, 0},
191
+ /* 11 */ { 4, s_4_11, 9, 2, 0},
192
+ /* 12 */ { 2, s_4_12, -1, 1, 0},
193
+ /* 13 */ { 3, s_4_13, 12, 2, 0},
194
+ /* 14 */ { 3, s_4_14, 12, 2, 0},
195
+ /* 15 */ { 1, s_4_15, -1, 1, 0},
196
+ /* 16 */ { 2, s_4_16, 15, 2, 0},
197
+ /* 17 */ { 2, s_4_17, 15, 2, 0},
198
+ /* 18 */ { 1, s_4_18, -1, 1, 0},
199
+ /* 19 */ { 2, s_4_19, 18, 2, 0},
200
+ /* 20 */ { 2, s_4_20, 18, 2, 0},
201
+ /* 21 */ { 2, s_4_21, -1, 1, 0},
202
+ /* 22 */ { 2, s_4_22, -1, 2, 0},
203
+ /* 23 */ { 2, s_4_23, -1, 2, 0},
204
+ /* 24 */ { 1, s_4_24, -1, 1, 0},
205
+ /* 25 */ { 2, s_4_25, 24, 2, 0},
206
+ /* 26 */ { 2, s_4_26, -1, 1, 0},
207
+ /* 27 */ { 3, s_4_27, 26, 2, 0},
208
+ /* 28 */ { 3, s_4_28, 26, 2, 0},
209
+ /* 29 */ { 2, s_4_29, -1, 1, 0},
210
+ /* 30 */ { 3, s_4_30, 29, 2, 0},
211
+ /* 31 */ { 3, s_4_31, 29, 1, 0},
212
+ /* 32 */ { 2, s_4_32, -1, 1, 0},
213
+ /* 33 */ { 3, s_4_33, 32, 2, 0},
214
+ /* 34 */ { 2, s_4_34, -1, 1, 0},
215
+ /* 35 */ { 3, s_4_35, 34, 2, 0},
216
+ /* 36 */ { 2, s_4_36, -1, 2, 0},
217
+ /* 37 */ { 2, s_4_37, -1, 2, 0},
218
+ /* 38 */ { 2, s_4_38, -1, 2, 0},
219
+ /* 39 */ { 2, s_4_39, -1, 1, 0},
220
+ /* 40 */ { 3, s_4_40, 39, 2, 0},
221
+ /* 41 */ { 3, s_4_41, 39, 2, 0},
222
+ /* 42 */ { 3, s_4_42, -1, 1, 0},
223
+ /* 43 */ { 3, s_4_43, -1, 2, 0},
224
+ /* 44 */ { 2, s_4_44, -1, 1, 0},
225
+ /* 45 */ { 3, s_4_45, 44, 2, 0}
226
+ };
227
+
228
+ static const symbol s_5_0[1] = { 0xC0 };
229
+ static const symbol s_5_1[2] = { 0xC9, 0xC0 };
230
+ static const symbol s_5_2[2] = { 0xD8, 0xC0 };
231
+ static const symbol s_5_3[1] = { 0xC1 };
232
+ static const symbol s_5_4[1] = { 0xC5 };
233
+ static const symbol s_5_5[2] = { 0xC9, 0xC5 };
234
+ static const symbol s_5_6[2] = { 0xD8, 0xC5 };
235
+ static const symbol s_5_7[2] = { 0xC1, 0xC8 };
236
+ static const symbol s_5_8[2] = { 0xD1, 0xC8 };
237
+ static const symbol s_5_9[3] = { 0xC9, 0xD1, 0xC8 };
238
+ static const symbol s_5_10[1] = { 0xC9 };
239
+ static const symbol s_5_11[2] = { 0xC5, 0xC9 };
240
+ static const symbol s_5_12[2] = { 0xC9, 0xC9 };
241
+ static const symbol s_5_13[3] = { 0xC1, 0xCD, 0xC9 };
242
+ static const symbol s_5_14[3] = { 0xD1, 0xCD, 0xC9 };
243
+ static const symbol s_5_15[4] = { 0xC9, 0xD1, 0xCD, 0xC9 };
244
+ static const symbol s_5_16[1] = { 0xCA };
245
+ static const symbol s_5_17[2] = { 0xC5, 0xCA };
246
+ static const symbol s_5_18[3] = { 0xC9, 0xC5, 0xCA };
247
+ static const symbol s_5_19[2] = { 0xC9, 0xCA };
248
+ static const symbol s_5_20[2] = { 0xCF, 0xCA };
249
+ static const symbol s_5_21[2] = { 0xC1, 0xCD };
250
+ static const symbol s_5_22[2] = { 0xC5, 0xCD };
251
+ static const symbol s_5_23[3] = { 0xC9, 0xC5, 0xCD };
252
+ static const symbol s_5_24[2] = { 0xCF, 0xCD };
253
+ static const symbol s_5_25[2] = { 0xD1, 0xCD };
254
+ static const symbol s_5_26[3] = { 0xC9, 0xD1, 0xCD };
255
+ static const symbol s_5_27[1] = { 0xCF };
256
+ static const symbol s_5_28[1] = { 0xD1 };
257
+ static const symbol s_5_29[2] = { 0xC9, 0xD1 };
258
+ static const symbol s_5_30[2] = { 0xD8, 0xD1 };
259
+ static const symbol s_5_31[1] = { 0xD5 };
260
+ static const symbol s_5_32[2] = { 0xC5, 0xD7 };
261
+ static const symbol s_5_33[2] = { 0xCF, 0xD7 };
262
+ static const symbol s_5_34[1] = { 0xD8 };
263
+ static const symbol s_5_35[1] = { 0xD9 };
264
+
265
+ static const struct among a_5[36] =
266
+ {
267
+ /* 0 */ { 1, s_5_0, -1, 1, 0},
268
+ /* 1 */ { 2, s_5_1, 0, 1, 0},
269
+ /* 2 */ { 2, s_5_2, 0, 1, 0},
270
+ /* 3 */ { 1, s_5_3, -1, 1, 0},
271
+ /* 4 */ { 1, s_5_4, -1, 1, 0},
272
+ /* 5 */ { 2, s_5_5, 4, 1, 0},
273
+ /* 6 */ { 2, s_5_6, 4, 1, 0},
274
+ /* 7 */ { 2, s_5_7, -1, 1, 0},
275
+ /* 8 */ { 2, s_5_8, -1, 1, 0},
276
+ /* 9 */ { 3, s_5_9, 8, 1, 0},
277
+ /* 10 */ { 1, s_5_10, -1, 1, 0},
278
+ /* 11 */ { 2, s_5_11, 10, 1, 0},
279
+ /* 12 */ { 2, s_5_12, 10, 1, 0},
280
+ /* 13 */ { 3, s_5_13, 10, 1, 0},
281
+ /* 14 */ { 3, s_5_14, 10, 1, 0},
282
+ /* 15 */ { 4, s_5_15, 14, 1, 0},
283
+ /* 16 */ { 1, s_5_16, -1, 1, 0},
284
+ /* 17 */ { 2, s_5_17, 16, 1, 0},
285
+ /* 18 */ { 3, s_5_18, 17, 1, 0},
286
+ /* 19 */ { 2, s_5_19, 16, 1, 0},
287
+ /* 20 */ { 2, s_5_20, 16, 1, 0},
288
+ /* 21 */ { 2, s_5_21, -1, 1, 0},
289
+ /* 22 */ { 2, s_5_22, -1, 1, 0},
290
+ /* 23 */ { 3, s_5_23, 22, 1, 0},
291
+ /* 24 */ { 2, s_5_24, -1, 1, 0},
292
+ /* 25 */ { 2, s_5_25, -1, 1, 0},
293
+ /* 26 */ { 3, s_5_26, 25, 1, 0},
294
+ /* 27 */ { 1, s_5_27, -1, 1, 0},
295
+ /* 28 */ { 1, s_5_28, -1, 1, 0},
296
+ /* 29 */ { 2, s_5_29, 28, 1, 0},
297
+ /* 30 */ { 2, s_5_30, 28, 1, 0},
298
+ /* 31 */ { 1, s_5_31, -1, 1, 0},
299
+ /* 32 */ { 2, s_5_32, -1, 1, 0},
300
+ /* 33 */ { 2, s_5_33, -1, 1, 0},
301
+ /* 34 */ { 1, s_5_34, -1, 1, 0},
302
+ /* 35 */ { 1, s_5_35, -1, 1, 0}
303
+ };
304
+
305
+ static const symbol s_6_0[3] = { 0xCF, 0xD3, 0xD4 };
306
+ static const symbol s_6_1[4] = { 0xCF, 0xD3, 0xD4, 0xD8 };
307
+
308
+ static const struct among a_6[2] =
309
+ {
310
+ /* 0 */ { 3, s_6_0, -1, 1, 0},
311
+ /* 1 */ { 4, s_6_1, -1, 1, 0}
312
+ };
313
+
314
+ static const symbol s_7_0[4] = { 0xC5, 0xCA, 0xDB, 0xC5 };
315
+ static const symbol s_7_1[1] = { 0xCE };
316
+ static const symbol s_7_2[1] = { 0xD8 };
317
+ static const symbol s_7_3[3] = { 0xC5, 0xCA, 0xDB };
318
+
319
+ static const struct among a_7[4] =
320
+ {
321
+ /* 0 */ { 4, s_7_0, -1, 1, 0},
322
+ /* 1 */ { 1, s_7_1, -1, 2, 0},
323
+ /* 2 */ { 1, s_7_2, -1, 3, 0},
324
+ /* 3 */ { 3, s_7_3, -1, 1, 0}
325
+ };
326
+
327
+ static const unsigned char g_v[] = { 35, 130, 34, 18 };
328
+
329
+ static const symbol s_0[] = { 0xC1 };
330
+ static const symbol s_1[] = { 0xD1 };
331
+ static const symbol s_2[] = { 0xC1 };
332
+ static const symbol s_3[] = { 0xD1 };
333
+ static const symbol s_4[] = { 0xC1 };
334
+ static const symbol s_5[] = { 0xD1 };
335
+ static const symbol s_6[] = { 0xCE };
336
+ static const symbol s_7[] = { 0xCE };
337
+ static const symbol s_8[] = { 0xCE };
338
+ static const symbol s_9[] = { 0xC9 };
339
+
340
+ static int r_mark_regions(struct SN_env * z) {
341
+ z->I[0] = z->l;
342
+ z->I[1] = z->l;
343
+ { int c1 = z->c; /* do, line 63 */
344
+ { /* gopast */ /* grouping v, line 64 */
345
+ int ret = out_grouping(z, g_v, 192, 220, 1);
346
+ if (ret < 0) goto lab0;
347
+ z->c += ret;
348
+ }
349
+ z->I[0] = z->c; /* setmark pV, line 64 */
350
+ { /* gopast */ /* non v, line 64 */
351
+ int ret = in_grouping(z, g_v, 192, 220, 1);
352
+ if (ret < 0) goto lab0;
353
+ z->c += ret;
354
+ }
355
+ { /* gopast */ /* grouping v, line 65 */
356
+ int ret = out_grouping(z, g_v, 192, 220, 1);
357
+ if (ret < 0) goto lab0;
358
+ z->c += ret;
359
+ }
360
+ { /* gopast */ /* non v, line 65 */
361
+ int ret = in_grouping(z, g_v, 192, 220, 1);
362
+ if (ret < 0) goto lab0;
363
+ z->c += ret;
364
+ }
365
+ z->I[1] = z->c; /* setmark p2, line 65 */
366
+ lab0:
367
+ z->c = c1;
368
+ }
369
+ return 1;
370
+ }
371
+
372
+ static int r_R2(struct SN_env * z) {
373
+ if (!(z->I[1] <= z->c)) return 0;
374
+ return 1;
375
+ }
376
+
377
+ static int r_perfective_gerund(struct SN_env * z) {
378
+ int among_var;
379
+ z->ket = z->c; /* [, line 74 */
380
+ if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 6 || !((25166336 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
381
+ among_var = find_among_b(z, a_0, 9); /* substring, line 74 */
382
+ if (!(among_var)) return 0;
383
+ z->bra = z->c; /* ], line 74 */
384
+ switch(among_var) {
385
+ case 0: return 0;
386
+ case 1:
387
+ { int m1 = z->l - z->c; (void)m1; /* or, line 78 */
388
+ if (!(eq_s_b(z, 1, s_0))) goto lab1;
389
+ goto lab0;
390
+ lab1:
391
+ z->c = z->l - m1;
392
+ if (!(eq_s_b(z, 1, s_1))) return 0;
393
+ }
394
+ lab0:
395
+ { int ret = slice_del(z); /* delete, line 78 */
396
+ if (ret < 0) return ret;
397
+ }
398
+ break;
399
+ case 2:
400
+ { int ret = slice_del(z); /* delete, line 85 */
401
+ if (ret < 0) return ret;
402
+ }
403
+ break;
404
+ }
405
+ return 1;
406
+ }
407
+
408
+ static int r_adjective(struct SN_env * z) {
409
+ int among_var;
410
+ z->ket = z->c; /* [, line 90 */
411
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 6 || !((2271009 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
412
+ among_var = find_among_b(z, a_1, 26); /* substring, line 90 */
413
+ if (!(among_var)) return 0;
414
+ z->bra = z->c; /* ], line 90 */
415
+ switch(among_var) {
416
+ case 0: return 0;
417
+ case 1:
418
+ { int ret = slice_del(z); /* delete, line 99 */
419
+ if (ret < 0) return ret;
420
+ }
421
+ break;
422
+ }
423
+ return 1;
424
+ }
425
+
426
+ static int r_adjectival(struct SN_env * z) {
427
+ int among_var;
428
+ { int ret = r_adjective(z);
429
+ if (ret == 0) return 0; /* call adjective, line 104 */
430
+ if (ret < 0) return ret;
431
+ }
432
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 111 */
433
+ z->ket = z->c; /* [, line 112 */
434
+ if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 6 || !((671113216 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m_keep; goto lab0; }
435
+ among_var = find_among_b(z, a_2, 8); /* substring, line 112 */
436
+ if (!(among_var)) { z->c = z->l - m_keep; goto lab0; }
437
+ z->bra = z->c; /* ], line 112 */
438
+ switch(among_var) {
439
+ case 0: { z->c = z->l - m_keep; goto lab0; }
440
+ case 1:
441
+ { int m1 = z->l - z->c; (void)m1; /* or, line 117 */
442
+ if (!(eq_s_b(z, 1, s_2))) goto lab2;
443
+ goto lab1;
444
+ lab2:
445
+ z->c = z->l - m1;
446
+ if (!(eq_s_b(z, 1, s_3))) { z->c = z->l - m_keep; goto lab0; }
447
+ }
448
+ lab1:
449
+ { int ret = slice_del(z); /* delete, line 117 */
450
+ if (ret < 0) return ret;
451
+ }
452
+ break;
453
+ case 2:
454
+ { int ret = slice_del(z); /* delete, line 124 */
455
+ if (ret < 0) return ret;
456
+ }
457
+ break;
458
+ }
459
+ lab0:
460
+ ;
461
+ }
462
+ return 1;
463
+ }
464
+
465
+ static int r_reflexive(struct SN_env * z) {
466
+ int among_var;
467
+ z->ket = z->c; /* [, line 131 */
468
+ if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 209 && z->p[z->c - 1] != 216)) return 0;
469
+ among_var = find_among_b(z, a_3, 2); /* substring, line 131 */
470
+ if (!(among_var)) return 0;
471
+ z->bra = z->c; /* ], line 131 */
472
+ switch(among_var) {
473
+ case 0: return 0;
474
+ case 1:
475
+ { int ret = slice_del(z); /* delete, line 134 */
476
+ if (ret < 0) return ret;
477
+ }
478
+ break;
479
+ }
480
+ return 1;
481
+ }
482
+
483
+ static int r_verb(struct SN_env * z) {
484
+ int among_var;
485
+ z->ket = z->c; /* [, line 139 */
486
+ if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 6 || !((51443235 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
487
+ among_var = find_among_b(z, a_4, 46); /* substring, line 139 */
488
+ if (!(among_var)) return 0;
489
+ z->bra = z->c; /* ], line 139 */
490
+ switch(among_var) {
491
+ case 0: return 0;
492
+ case 1:
493
+ { int m1 = z->l - z->c; (void)m1; /* or, line 145 */
494
+ if (!(eq_s_b(z, 1, s_4))) goto lab1;
495
+ goto lab0;
496
+ lab1:
497
+ z->c = z->l - m1;
498
+ if (!(eq_s_b(z, 1, s_5))) return 0;
499
+ }
500
+ lab0:
501
+ { int ret = slice_del(z); /* delete, line 145 */
502
+ if (ret < 0) return ret;
503
+ }
504
+ break;
505
+ case 2:
506
+ { int ret = slice_del(z); /* delete, line 153 */
507
+ if (ret < 0) return ret;
508
+ }
509
+ break;
510
+ }
511
+ return 1;
512
+ }
513
+
514
+ static int r_noun(struct SN_env * z) {
515
+ int among_var;
516
+ z->ket = z->c; /* [, line 162 */
517
+ if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 6 || !((60991267 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
518
+ among_var = find_among_b(z, a_5, 36); /* substring, line 162 */
519
+ if (!(among_var)) return 0;
520
+ z->bra = z->c; /* ], line 162 */
521
+ switch(among_var) {
522
+ case 0: return 0;
523
+ case 1:
524
+ { int ret = slice_del(z); /* delete, line 169 */
525
+ if (ret < 0) return ret;
526
+ }
527
+ break;
528
+ }
529
+ return 1;
530
+ }
531
+
532
+ static int r_derivational(struct SN_env * z) {
533
+ int among_var;
534
+ z->ket = z->c; /* [, line 178 */
535
+ if (z->c - 2 <= z->lb || (z->p[z->c - 1] != 212 && z->p[z->c - 1] != 216)) return 0;
536
+ among_var = find_among_b(z, a_6, 2); /* substring, line 178 */
537
+ if (!(among_var)) return 0;
538
+ z->bra = z->c; /* ], line 178 */
539
+ { int ret = r_R2(z);
540
+ if (ret == 0) return 0; /* call R2, line 178 */
541
+ if (ret < 0) return ret;
542
+ }
543
+ switch(among_var) {
544
+ case 0: return 0;
545
+ case 1:
546
+ { int ret = slice_del(z); /* delete, line 181 */
547
+ if (ret < 0) return ret;
548
+ }
549
+ break;
550
+ }
551
+ return 1;
552
+ }
553
+
554
+ static int r_tidy_up(struct SN_env * z) {
555
+ int among_var;
556
+ z->ket = z->c; /* [, line 186 */
557
+ if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 6 || !((151011360 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
558
+ among_var = find_among_b(z, a_7, 4); /* substring, line 186 */
559
+ if (!(among_var)) return 0;
560
+ z->bra = z->c; /* ], line 186 */
561
+ switch(among_var) {
562
+ case 0: return 0;
563
+ case 1:
564
+ { int ret = slice_del(z); /* delete, line 190 */
565
+ if (ret < 0) return ret;
566
+ }
567
+ z->ket = z->c; /* [, line 191 */
568
+ if (!(eq_s_b(z, 1, s_6))) return 0;
569
+ z->bra = z->c; /* ], line 191 */
570
+ if (!(eq_s_b(z, 1, s_7))) return 0;
571
+ { int ret = slice_del(z); /* delete, line 191 */
572
+ if (ret < 0) return ret;
573
+ }
574
+ break;
575
+ case 2:
576
+ if (!(eq_s_b(z, 1, s_8))) return 0;
577
+ { int ret = slice_del(z); /* delete, line 194 */
578
+ if (ret < 0) return ret;
579
+ }
580
+ break;
581
+ case 3:
582
+ { int ret = slice_del(z); /* delete, line 196 */
583
+ if (ret < 0) return ret;
584
+ }
585
+ break;
586
+ }
587
+ return 1;
588
+ }
589
+
590
+ extern int russian_KOI8_R_stem(struct SN_env * z) {
591
+ { int c1 = z->c; /* do, line 203 */
592
+ { int ret = r_mark_regions(z);
593
+ if (ret == 0) goto lab0; /* call mark_regions, line 203 */
594
+ if (ret < 0) return ret;
595
+ }
596
+ lab0:
597
+ z->c = c1;
598
+ }
599
+ z->lb = z->c; z->c = z->l; /* backwards, line 204 */
600
+
601
+ { int mlimit; /* setlimit, line 204 */
602
+ int m2 = z->l - z->c; (void)m2;
603
+ if (z->c < z->I[0]) return 0;
604
+ z->c = z->I[0]; /* tomark, line 204 */
605
+ mlimit = z->lb; z->lb = z->c;
606
+ z->c = z->l - m2;
607
+ { int m3 = z->l - z->c; (void)m3; /* do, line 205 */
608
+ { int m4 = z->l - z->c; (void)m4; /* or, line 206 */
609
+ { int ret = r_perfective_gerund(z);
610
+ if (ret == 0) goto lab3; /* call perfective_gerund, line 206 */
611
+ if (ret < 0) return ret;
612
+ }
613
+ goto lab2;
614
+ lab3:
615
+ z->c = z->l - m4;
616
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 207 */
617
+ { int ret = r_reflexive(z);
618
+ if (ret == 0) { z->c = z->l - m_keep; goto lab4; } /* call reflexive, line 207 */
619
+ if (ret < 0) return ret;
620
+ }
621
+ lab4:
622
+ ;
623
+ }
624
+ { int m5 = z->l - z->c; (void)m5; /* or, line 208 */
625
+ { int ret = r_adjectival(z);
626
+ if (ret == 0) goto lab6; /* call adjectival, line 208 */
627
+ if (ret < 0) return ret;
628
+ }
629
+ goto lab5;
630
+ lab6:
631
+ z->c = z->l - m5;
632
+ { int ret = r_verb(z);
633
+ if (ret == 0) goto lab7; /* call verb, line 208 */
634
+ if (ret < 0) return ret;
635
+ }
636
+ goto lab5;
637
+ lab7:
638
+ z->c = z->l - m5;
639
+ { int ret = r_noun(z);
640
+ if (ret == 0) goto lab1; /* call noun, line 208 */
641
+ if (ret < 0) return ret;
642
+ }
643
+ }
644
+ lab5:
645
+ ;
646
+ }
647
+ lab2:
648
+ lab1:
649
+ z->c = z->l - m3;
650
+ }
651
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 211 */
652
+ z->ket = z->c; /* [, line 211 */
653
+ if (!(eq_s_b(z, 1, s_9))) { z->c = z->l - m_keep; goto lab8; }
654
+ z->bra = z->c; /* ], line 211 */
655
+ { int ret = slice_del(z); /* delete, line 211 */
656
+ if (ret < 0) return ret;
657
+ }
658
+ lab8:
659
+ ;
660
+ }
661
+ { int m6 = z->l - z->c; (void)m6; /* do, line 214 */
662
+ { int ret = r_derivational(z);
663
+ if (ret == 0) goto lab9; /* call derivational, line 214 */
664
+ if (ret < 0) return ret;
665
+ }
666
+ lab9:
667
+ z->c = z->l - m6;
668
+ }
669
+ { int m7 = z->l - z->c; (void)m7; /* do, line 215 */
670
+ { int ret = r_tidy_up(z);
671
+ if (ret == 0) goto lab10; /* call tidy_up, line 215 */
672
+ if (ret < 0) return ret;
673
+ }
674
+ lab10:
675
+ z->c = z->l - m7;
676
+ }
677
+ z->lb = mlimit;
678
+ }
679
+ z->c = z->lb;
680
+ return 1;
681
+ }
682
+
683
+ extern struct SN_env * russian_KOI8_R_create_env(void) { return SN_create_env(0, 2, 0); }
684
+
685
+ extern void russian_KOI8_R_close_env(struct SN_env * z) { SN_close_env(z, 0); }
686
+
@@ -0,0 +1,6 @@
1
+ /* This file was generated automatically by the Snowball to ANSI C compiler */
2
+
3
+ extern struct SN_env * russian_KOI8_R_create_env(void);
4
+ extern void russian_KOI8_R_close_env(struct SN_env * z);
5
+
6
+ extern int russian_KOI8_R_stem(struct SN_env * z);