isomorfeus-ferret 0.12.4 → 0.12.7

Sign up to get free protection for your applications and to get access to all the features.
Files changed (216) hide show
  1. checksums.yaml +4 -4
  2. data/LICENSE +612 -612
  3. data/README.md +77 -48
  4. data/ext/isomorfeus_ferret_ext/bm_hash.c +9 -6
  5. data/ext/isomorfeus_ferret_ext/bm_micro_string.c +4 -2
  6. data/ext/isomorfeus_ferret_ext/brotli_common_constants.c +15 -0
  7. data/ext/isomorfeus_ferret_ext/brotli_common_constants.h +200 -0
  8. data/ext/isomorfeus_ferret_ext/brotli_common_context.c +156 -0
  9. data/ext/isomorfeus_ferret_ext/brotli_common_context.h +113 -0
  10. data/ext/isomorfeus_ferret_ext/brotli_common_dictionary.c +5914 -0
  11. data/ext/isomorfeus_ferret_ext/brotli_common_dictionary.h +64 -0
  12. data/ext/isomorfeus_ferret_ext/brotli_common_platform.c +22 -0
  13. data/ext/isomorfeus_ferret_ext/brotli_common_platform.h +594 -0
  14. data/ext/isomorfeus_ferret_ext/brotli_common_transform.c +291 -0
  15. data/ext/isomorfeus_ferret_ext/brotli_common_transform.h +85 -0
  16. data/ext/isomorfeus_ferret_ext/brotli_common_version.h +26 -0
  17. data/ext/isomorfeus_ferret_ext/brotli_dec_bit_reader.c +76 -0
  18. data/ext/isomorfeus_ferret_ext/brotli_dec_bit_reader.h +351 -0
  19. data/ext/isomorfeus_ferret_ext/brotli_dec_decode.c +2608 -0
  20. data/ext/isomorfeus_ferret_ext/brotli_dec_huffman.c +339 -0
  21. data/ext/isomorfeus_ferret_ext/brotli_dec_huffman.h +121 -0
  22. data/ext/isomorfeus_ferret_ext/brotli_dec_prefix.h +732 -0
  23. data/ext/isomorfeus_ferret_ext/brotli_dec_state.c +159 -0
  24. data/ext/isomorfeus_ferret_ext/brotli_dec_state.h +365 -0
  25. data/ext/isomorfeus_ferret_ext/brotli_decode.h +344 -0
  26. data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references.c +145 -0
  27. data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references.h +39 -0
  28. data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references_hq.c +843 -0
  29. data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references_hq.h +95 -0
  30. data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references_inc.h +163 -0
  31. data/ext/isomorfeus_ferret_ext/brotli_enc_bit_cost.c +35 -0
  32. data/ext/isomorfeus_ferret_ext/brotli_enc_bit_cost.h +63 -0
  33. data/ext/isomorfeus_ferret_ext/brotli_enc_bit_cost_inc.h +127 -0
  34. data/ext/isomorfeus_ferret_ext/brotli_enc_block_encoder_inc.h +34 -0
  35. data/ext/isomorfeus_ferret_ext/brotli_enc_block_splitter.c +194 -0
  36. data/ext/isomorfeus_ferret_ext/brotli_enc_block_splitter.h +51 -0
  37. data/ext/isomorfeus_ferret_ext/brotli_enc_block_splitter_inc.h +440 -0
  38. data/ext/isomorfeus_ferret_ext/brotli_enc_brotli_bit_stream.c +1314 -0
  39. data/ext/isomorfeus_ferret_ext/brotli_enc_brotli_bit_stream.h +84 -0
  40. data/ext/isomorfeus_ferret_ext/brotli_enc_cluster.c +56 -0
  41. data/ext/isomorfeus_ferret_ext/brotli_enc_cluster.h +48 -0
  42. data/ext/isomorfeus_ferret_ext/brotli_enc_cluster_inc.h +320 -0
  43. data/ext/isomorfeus_ferret_ext/brotli_enc_command.c +28 -0
  44. data/ext/isomorfeus_ferret_ext/brotli_enc_command.h +190 -0
  45. data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment.c +790 -0
  46. data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment.h +61 -0
  47. data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment_two_pass.c +645 -0
  48. data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment_two_pass.h +54 -0
  49. data/ext/isomorfeus_ferret_ext/brotli_enc_dictionary_hash.c +1846 -0
  50. data/ext/isomorfeus_ferret_ext/brotli_enc_dictionary_hash.h +25 -0
  51. data/ext/isomorfeus_ferret_ext/brotli_enc_encode.c +1927 -0
  52. data/ext/isomorfeus_ferret_ext/brotli_enc_encoder_dict.c +33 -0
  53. data/ext/isomorfeus_ferret_ext/brotli_enc_encoder_dict.h +43 -0
  54. data/ext/isomorfeus_ferret_ext/brotli_enc_entropy_encode.c +503 -0
  55. data/ext/isomorfeus_ferret_ext/brotli_enc_entropy_encode.h +122 -0
  56. data/ext/isomorfeus_ferret_ext/brotli_enc_entropy_encode_static.h +539 -0
  57. data/ext/isomorfeus_ferret_ext/brotli_enc_fast_log.c +105 -0
  58. data/ext/isomorfeus_ferret_ext/brotli_enc_fast_log.h +66 -0
  59. data/ext/isomorfeus_ferret_ext/brotli_enc_find_match_length.h +79 -0
  60. data/ext/isomorfeus_ferret_ext/brotli_enc_hash.h +488 -0
  61. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_composite_inc.h +125 -0
  62. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_forgetful_chain_inc.h +293 -0
  63. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_longest_match64_inc.h +267 -0
  64. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_longest_match_inc.h +262 -0
  65. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_longest_match_quickly_inc.h +266 -0
  66. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_rolling_inc.h +212 -0
  67. data/ext/isomorfeus_ferret_ext/brotli_enc_hash_to_binary_tree_inc.h +329 -0
  68. data/ext/isomorfeus_ferret_ext/brotli_enc_histogram.c +100 -0
  69. data/ext/isomorfeus_ferret_ext/brotli_enc_histogram.h +63 -0
  70. data/ext/isomorfeus_ferret_ext/brotli_enc_histogram_inc.h +51 -0
  71. data/ext/isomorfeus_ferret_ext/brotli_enc_literal_cost.c +175 -0
  72. data/ext/isomorfeus_ferret_ext/brotli_enc_literal_cost.h +30 -0
  73. data/ext/isomorfeus_ferret_ext/brotli_enc_memory.c +170 -0
  74. data/ext/isomorfeus_ferret_ext/brotli_enc_memory.h +114 -0
  75. data/ext/isomorfeus_ferret_ext/brotli_enc_metablock.c +663 -0
  76. data/ext/isomorfeus_ferret_ext/brotli_enc_metablock.h +105 -0
  77. data/ext/isomorfeus_ferret_ext/brotli_enc_metablock_inc.h +183 -0
  78. data/ext/isomorfeus_ferret_ext/brotli_enc_params.h +46 -0
  79. data/ext/isomorfeus_ferret_ext/brotli_enc_prefix.h +53 -0
  80. data/ext/isomorfeus_ferret_ext/brotli_enc_quality.h +165 -0
  81. data/ext/isomorfeus_ferret_ext/brotli_enc_ringbuffer.h +167 -0
  82. data/ext/isomorfeus_ferret_ext/brotli_enc_static_dict.c +486 -0
  83. data/ext/isomorfeus_ferret_ext/brotli_enc_static_dict.h +40 -0
  84. data/ext/isomorfeus_ferret_ext/brotli_enc_static_dict_lut.h +5864 -0
  85. data/ext/isomorfeus_ferret_ext/brotli_enc_utf8_util.c +85 -0
  86. data/ext/isomorfeus_ferret_ext/brotli_enc_utf8_util.h +32 -0
  87. data/ext/isomorfeus_ferret_ext/brotli_enc_write_bits.h +87 -0
  88. data/ext/isomorfeus_ferret_ext/brotli_encode.h +448 -0
  89. data/ext/isomorfeus_ferret_ext/brotli_port.h +288 -0
  90. data/ext/isomorfeus_ferret_ext/brotli_types.h +83 -0
  91. data/ext/isomorfeus_ferret_ext/frb_index.c +35 -4
  92. data/ext/isomorfeus_ferret_ext/frb_store.c +34 -5
  93. data/ext/isomorfeus_ferret_ext/frt_document.h +1 -0
  94. data/ext/isomorfeus_ferret_ext/frt_fs_store.c +1 -0
  95. data/ext/isomorfeus_ferret_ext/frt_index.c +174 -25
  96. data/ext/isomorfeus_ferret_ext/frt_index.h +6 -3
  97. data/ext/isomorfeus_ferret_ext/frt_posh.h +11 -19
  98. data/ext/isomorfeus_ferret_ext/frt_q_parser.c +1844 -1911
  99. data/ext/isomorfeus_ferret_ext/frt_q_phrase.c +12 -15
  100. data/ext/isomorfeus_ferret_ext/frt_ram_store.c +1 -0
  101. data/ext/isomorfeus_ferret_ext/frt_scanner.c +1 -0
  102. data/ext/isomorfeus_ferret_ext/frt_scanner_mb.c +1 -0
  103. data/ext/isomorfeus_ferret_ext/frt_scanner_utf8.c +1 -0
  104. data/ext/isomorfeus_ferret_ext/frt_search.h +1 -1
  105. data/ext/isomorfeus_ferret_ext/libstemmer.c +14 -11
  106. data/ext/isomorfeus_ferret_ext/libstemmer.h +4 -9
  107. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_basque.c +1167 -0
  108. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_basque.h +6 -0
  109. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_catalan.c +1433 -0
  110. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_catalan.h +6 -0
  111. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.c +120 -143
  112. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.h +1 -2
  113. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.c +217 -237
  114. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.h +1 -1
  115. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.c +377 -432
  116. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.h +1 -1
  117. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.c +298 -342
  118. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.h +1 -2
  119. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.c +530 -524
  120. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.h +1 -1
  121. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.c +201 -214
  122. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.h +1 -1
  123. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_hungarian.c +1 -1
  124. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_indonesian.c +394 -0
  125. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_indonesian.h +6 -0
  126. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_irish.c +457 -0
  127. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_irish.h +6 -0
  128. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.c +396 -439
  129. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.h +1 -1
  130. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.c +104 -128
  131. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.h +1 -1
  132. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.c +242 -273
  133. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.h +1 -1
  134. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.c +406 -461
  135. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.h +1 -2
  136. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.c +405 -456
  137. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.h +1 -1
  138. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.c +108 -126
  139. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.h +1 -1
  140. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_hungarian.c +849 -0
  141. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_hungarian.h +6 -0
  142. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.c +373 -405
  143. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.h +1 -1
  144. data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.c +288 -305
  145. data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.h +1 -1
  146. data/ext/isomorfeus_ferret_ext/stem_UTF_8_arabic.c +1651 -0
  147. data/ext/isomorfeus_ferret_ext/stem_UTF_8_arabic.h +6 -0
  148. data/ext/isomorfeus_ferret_ext/stem_UTF_8_armenian.c +546 -0
  149. data/ext/isomorfeus_ferret_ext/stem_UTF_8_armenian.h +6 -0
  150. data/ext/isomorfeus_ferret_ext/stem_UTF_8_basque.c +1171 -0
  151. data/ext/isomorfeus_ferret_ext/stem_UTF_8_basque.h +6 -0
  152. data/ext/isomorfeus_ferret_ext/stem_UTF_8_catalan.c +1436 -0
  153. data/ext/isomorfeus_ferret_ext/stem_UTF_8_catalan.h +6 -0
  154. data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.c +121 -141
  155. data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.h +1 -1
  156. data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.c +221 -241
  157. data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.h +1 -1
  158. data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.c +381 -431
  159. data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.h +1 -1
  160. data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.c +300 -345
  161. data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.h +1 -1
  162. data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.c +518 -511
  163. data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.h +1 -1
  164. data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.c +201 -209
  165. data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.h +1 -1
  166. data/ext/isomorfeus_ferret_ext/stem_UTF_8_greek.c +3660 -0
  167. data/ext/isomorfeus_ferret_ext/stem_UTF_8_greek.h +6 -0
  168. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hindi.c +309 -0
  169. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hindi.h +6 -0
  170. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.c +306 -671
  171. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.h +1 -1
  172. data/ext/isomorfeus_ferret_ext/stem_UTF_8_indonesian.c +394 -0
  173. data/ext/isomorfeus_ferret_ext/stem_UTF_8_indonesian.h +6 -0
  174. data/ext/isomorfeus_ferret_ext/stem_UTF_8_irish.c +457 -0
  175. data/ext/isomorfeus_ferret_ext/stem_UTF_8_irish.h +6 -0
  176. data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.c +400 -442
  177. data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.h +1 -1
  178. data/ext/isomorfeus_ferret_ext/stem_UTF_8_lithuanian.c +824 -0
  179. data/ext/isomorfeus_ferret_ext/stem_UTF_8_lithuanian.h +6 -0
  180. data/ext/isomorfeus_ferret_ext/stem_UTF_8_nepali.c +408 -0
  181. data/ext/isomorfeus_ferret_ext/stem_UTF_8_nepali.h +6 -0
  182. data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.c +105 -127
  183. data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.h +1 -1
  184. data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.c +245 -276
  185. data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.h +1 -1
  186. data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.c +409 -464
  187. data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.h +1 -1
  188. data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.c +376 -408
  189. data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.h +1 -1
  190. data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.c +272 -287
  191. data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.h +1 -1
  192. data/ext/isomorfeus_ferret_ext/stem_UTF_8_serbian.c +6530 -0
  193. data/ext/isomorfeus_ferret_ext/stem_UTF_8_serbian.h +6 -0
  194. data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.c +407 -458
  195. data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.h +1 -1
  196. data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.c +110 -125
  197. data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.h +1 -1
  198. data/ext/isomorfeus_ferret_ext/stem_UTF_8_tamil.c +1865 -0
  199. data/ext/isomorfeus_ferret_ext/stem_UTF_8_tamil.h +6 -0
  200. data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.c +698 -806
  201. data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.h +1 -1
  202. data/ext/isomorfeus_ferret_ext/stem_UTF_8_yiddish.c +1220 -0
  203. data/ext/isomorfeus_ferret_ext/stem_UTF_8_yiddish.h +6 -0
  204. data/ext/isomorfeus_ferret_ext/stem_api.c +1 -9
  205. data/ext/isomorfeus_ferret_ext/stem_api.h +1 -3
  206. data/ext/isomorfeus_ferret_ext/stem_header.h +30 -26
  207. data/ext/isomorfeus_ferret_ext/stem_modules.h +113 -26
  208. data/ext/isomorfeus_ferret_ext/stem_modules.txt +18 -5
  209. data/ext/isomorfeus_ferret_ext/stem_utilities.c +167 -132
  210. data/ext/isomorfeus_ferret_ext/test.c +7 -1
  211. data/ext/isomorfeus_ferret_ext/test_fields.c +57 -45
  212. data/ext/isomorfeus_ferret_ext/test_index.c +4 -1
  213. data/ext/isomorfeus_ferret_ext/test_search.c +0 -1
  214. data/lib/isomorfeus/ferret/version.rb +1 -1
  215. metadata +125 -5
  216. data/ext/isomorfeus_ferret_ext/q_parser.y +0 -1366
@@ -1,4 +1,4 @@
1
- /* This file was generated automatically by the Snowball to ANSI C compiler */
1
+ /* Generated by Snowball 2.2.0 - https://snowballstem.org/ */
2
2
 
3
3
  #include "stem_header.h"
4
4
 
@@ -32,16 +32,16 @@ static const symbol s_0_9[3] = { 'k', 0xC3, 0xB6 };
32
32
 
33
33
  static const struct among a_0[10] =
34
34
  {
35
- /* 0 */ { 2, s_0_0, -1, 1, 0},
36
- /* 1 */ { 3, s_0_1, -1, 2, 0},
37
- /* 2 */ { 4, s_0_2, -1, 1, 0},
38
- /* 3 */ { 3, s_0_3, -1, 1, 0},
39
- /* 4 */ { 3, s_0_4, -1, 1, 0},
40
- /* 5 */ { 4, s_0_5, -1, 1, 0},
41
- /* 6 */ { 6, s_0_6, -1, 1, 0},
42
- /* 7 */ { 2, s_0_7, -1, 1, 0},
43
- /* 8 */ { 3, s_0_8, -1, 1, 0},
44
- /* 9 */ { 3, s_0_9, -1, 1, 0}
35
+ { 2, s_0_0, -1, 1, 0},
36
+ { 3, s_0_1, -1, 2, 0},
37
+ { 4, s_0_2, -1, 1, 0},
38
+ { 3, s_0_3, -1, 1, 0},
39
+ { 3, s_0_4, -1, 1, 0},
40
+ { 4, s_0_5, -1, 1, 0},
41
+ { 6, s_0_6, -1, 1, 0},
42
+ { 2, s_0_7, -1, 1, 0},
43
+ { 3, s_0_8, -1, 1, 0},
44
+ { 3, s_0_9, -1, 1, 0}
45
45
  };
46
46
 
47
47
  static const symbol s_1_0[3] = { 'l', 'l', 'a' };
@@ -53,12 +53,12 @@ static const symbol s_1_5[3] = { 's', 't', 'a' };
53
53
 
54
54
  static const struct among a_1[6] =
55
55
  {
56
- /* 0 */ { 3, s_1_0, -1, -1, 0},
57
- /* 1 */ { 2, s_1_1, -1, -1, 0},
58
- /* 2 */ { 3, s_1_2, -1, -1, 0},
59
- /* 3 */ { 2, s_1_3, -1, -1, 0},
60
- /* 4 */ { 3, s_1_4, 3, -1, 0},
61
- /* 5 */ { 3, s_1_5, 3, -1, 0}
56
+ { 3, s_1_0, -1, -1, 0},
57
+ { 2, s_1_1, -1, -1, 0},
58
+ { 3, s_1_2, -1, -1, 0},
59
+ { 2, s_1_3, -1, -1, 0},
60
+ { 3, s_1_4, 3, -1, 0},
61
+ { 3, s_1_5, 3, -1, 0}
62
62
  };
63
63
 
64
64
  static const symbol s_2_0[4] = { 'l', 'l', 0xC3, 0xA4 };
@@ -70,12 +70,12 @@ static const symbol s_2_5[4] = { 's', 't', 0xC3, 0xA4 };
70
70
 
71
71
  static const struct among a_2[6] =
72
72
  {
73
- /* 0 */ { 4, s_2_0, -1, -1, 0},
74
- /* 1 */ { 3, s_2_1, -1, -1, 0},
75
- /* 2 */ { 4, s_2_2, -1, -1, 0},
76
- /* 3 */ { 3, s_2_3, -1, -1, 0},
77
- /* 4 */ { 4, s_2_4, 3, -1, 0},
78
- /* 5 */ { 4, s_2_5, 3, -1, 0}
73
+ { 4, s_2_0, -1, -1, 0},
74
+ { 3, s_2_1, -1, -1, 0},
75
+ { 4, s_2_2, -1, -1, 0},
76
+ { 3, s_2_3, -1, -1, 0},
77
+ { 4, s_2_4, 3, -1, 0},
78
+ { 4, s_2_5, 3, -1, 0}
79
79
  };
80
80
 
81
81
  static const symbol s_3_0[3] = { 'l', 'l', 'e' };
@@ -83,8 +83,8 @@ static const symbol s_3_1[3] = { 'i', 'n', 'e' };
83
83
 
84
84
  static const struct among a_3[2] =
85
85
  {
86
- /* 0 */ { 3, s_3_0, -1, -1, 0},
87
- /* 1 */ { 3, s_3_1, -1, -1, 0}
86
+ { 3, s_3_0, -1, -1, 0},
87
+ { 3, s_3_1, -1, -1, 0}
88
88
  };
89
89
 
90
90
  static const symbol s_4_0[3] = { 'n', 's', 'a' };
@@ -99,15 +99,15 @@ static const symbol s_4_8[4] = { 'n', 's', 0xC3, 0xA4 };
99
99
 
100
100
  static const struct among a_4[9] =
101
101
  {
102
- /* 0 */ { 3, s_4_0, -1, 3, 0},
103
- /* 1 */ { 3, s_4_1, -1, 3, 0},
104
- /* 2 */ { 3, s_4_2, -1, 3, 0},
105
- /* 3 */ { 2, s_4_3, -1, 2, 0},
106
- /* 4 */ { 2, s_4_4, -1, 1, 0},
107
- /* 5 */ { 2, s_4_5, -1, 4, 0},
108
- /* 6 */ { 2, s_4_6, -1, 6, 0},
109
- /* 7 */ { 3, s_4_7, -1, 5, 0},
110
- /* 8 */ { 4, s_4_8, -1, 3, 0}
102
+ { 3, s_4_0, -1, 3, 0},
103
+ { 3, s_4_1, -1, 3, 0},
104
+ { 3, s_4_2, -1, 3, 0},
105
+ { 2, s_4_3, -1, 2, 0},
106
+ { 2, s_4_4, -1, 1, 0},
107
+ { 2, s_4_5, -1, 4, 0},
108
+ { 2, s_4_6, -1, 6, 0},
109
+ { 3, s_4_7, -1, 5, 0},
110
+ { 4, s_4_8, -1, 3, 0}
111
111
  };
112
112
 
113
113
  static const symbol s_5_0[2] = { 'a', 'a' };
@@ -120,13 +120,13 @@ static const symbol s_5_6[4] = { 0xC3, 0xB6, 0xC3, 0xB6 };
120
120
 
121
121
  static const struct among a_5[7] =
122
122
  {
123
- /* 0 */ { 2, s_5_0, -1, -1, 0},
124
- /* 1 */ { 2, s_5_1, -1, -1, 0},
125
- /* 2 */ { 2, s_5_2, -1, -1, 0},
126
- /* 3 */ { 2, s_5_3, -1, -1, 0},
127
- /* 4 */ { 2, s_5_4, -1, -1, 0},
128
- /* 5 */ { 4, s_5_5, -1, -1, 0},
129
- /* 6 */ { 4, s_5_6, -1, -1, 0}
123
+ { 2, s_5_0, -1, -1, 0},
124
+ { 2, s_5_1, -1, -1, 0},
125
+ { 2, s_5_2, -1, -1, 0},
126
+ { 2, s_5_3, -1, -1, 0},
127
+ { 2, s_5_4, -1, -1, 0},
128
+ { 4, s_5_5, -1, -1, 0},
129
+ { 4, s_5_6, -1, -1, 0}
130
130
  };
131
131
 
132
132
  static const symbol s_6_0[1] = { 'a' };
@@ -162,36 +162,36 @@ static const symbol s_6_29[4] = { 't', 't', 0xC3, 0xA4 };
162
162
 
163
163
  static const struct among a_6[30] =
164
164
  {
165
- /* 0 */ { 1, s_6_0, -1, 8, 0},
166
- /* 1 */ { 3, s_6_1, 0, -1, 0},
167
- /* 2 */ { 2, s_6_2, 0, -1, 0},
168
- /* 3 */ { 3, s_6_3, 0, -1, 0},
169
- /* 4 */ { 2, s_6_4, 0, -1, 0},
170
- /* 5 */ { 3, s_6_5, 4, -1, 0},
171
- /* 6 */ { 3, s_6_6, 4, -1, 0},
172
- /* 7 */ { 3, s_6_7, 4, 9, 0},
173
- /* 8 */ { 3, s_6_8, -1, -1, 0},
174
- /* 9 */ { 3, s_6_9, -1, -1, 0},
175
- /* 10 */ { 3, s_6_10, -1, -1, 0},
176
- /* 11 */ { 1, s_6_11, -1, 7, 0},
177
- /* 12 */ { 3, s_6_12, 11, 1, 0},
178
- /* 13 */ { 3, s_6_13, 11, -1, r_VI},
179
- /* 14 */ { 4, s_6_14, 11, -1, r_LONG},
180
- /* 15 */ { 3, s_6_15, 11, 2, 0},
181
- /* 16 */ { 4, s_6_16, 11, -1, r_VI},
182
- /* 17 */ { 3, s_6_17, 11, 3, 0},
183
- /* 18 */ { 4, s_6_18, 11, -1, r_VI},
184
- /* 19 */ { 3, s_6_19, 11, 4, 0},
185
- /* 20 */ { 4, s_6_20, 11, 5, 0},
186
- /* 21 */ { 4, s_6_21, 11, 6, 0},
187
- /* 22 */ { 2, s_6_22, -1, 8, 0},
188
- /* 23 */ { 4, s_6_23, 22, -1, 0},
189
- /* 24 */ { 3, s_6_24, 22, -1, 0},
190
- /* 25 */ { 4, s_6_25, 22, -1, 0},
191
- /* 26 */ { 3, s_6_26, 22, -1, 0},
192
- /* 27 */ { 4, s_6_27, 26, -1, 0},
193
- /* 28 */ { 4, s_6_28, 26, -1, 0},
194
- /* 29 */ { 4, s_6_29, 26, 9, 0}
165
+ { 1, s_6_0, -1, 8, 0},
166
+ { 3, s_6_1, 0, -1, 0},
167
+ { 2, s_6_2, 0, -1, 0},
168
+ { 3, s_6_3, 0, -1, 0},
169
+ { 2, s_6_4, 0, -1, 0},
170
+ { 3, s_6_5, 4, -1, 0},
171
+ { 3, s_6_6, 4, -1, 0},
172
+ { 3, s_6_7, 4, 2, 0},
173
+ { 3, s_6_8, -1, -1, 0},
174
+ { 3, s_6_9, -1, -1, 0},
175
+ { 3, s_6_10, -1, -1, 0},
176
+ { 1, s_6_11, -1, 7, 0},
177
+ { 3, s_6_12, 11, 1, 0},
178
+ { 3, s_6_13, 11, -1, r_VI},
179
+ { 4, s_6_14, 11, -1, r_LONG},
180
+ { 3, s_6_15, 11, 2, 0},
181
+ { 4, s_6_16, 11, -1, r_VI},
182
+ { 3, s_6_17, 11, 3, 0},
183
+ { 4, s_6_18, 11, -1, r_VI},
184
+ { 3, s_6_19, 11, 4, 0},
185
+ { 4, s_6_20, 11, 5, 0},
186
+ { 4, s_6_21, 11, 6, 0},
187
+ { 2, s_6_22, -1, 8, 0},
188
+ { 4, s_6_23, 22, -1, 0},
189
+ { 3, s_6_24, 22, -1, 0},
190
+ { 4, s_6_25, 22, -1, 0},
191
+ { 3, s_6_26, 22, -1, 0},
192
+ { 4, s_6_27, 26, -1, 0},
193
+ { 4, s_6_28, 26, -1, 0},
194
+ { 4, s_6_29, 26, 2, 0}
195
195
  };
196
196
 
197
197
  static const symbol s_7_0[3] = { 'e', 'j', 'a' };
@@ -211,20 +211,20 @@ static const symbol s_7_13[5] = { 'i', 'm', 'p', 0xC3, 0xA4 };
211
211
 
212
212
  static const struct among a_7[14] =
213
213
  {
214
- /* 0 */ { 3, s_7_0, -1, -1, 0},
215
- /* 1 */ { 3, s_7_1, -1, 1, 0},
216
- /* 2 */ { 4, s_7_2, 1, -1, 0},
217
- /* 3 */ { 3, s_7_3, -1, 1, 0},
218
- /* 4 */ { 4, s_7_4, 3, -1, 0},
219
- /* 5 */ { 3, s_7_5, -1, 1, 0},
220
- /* 6 */ { 4, s_7_6, 5, -1, 0},
221
- /* 7 */ { 3, s_7_7, -1, 1, 0},
222
- /* 8 */ { 4, s_7_8, 7, -1, 0},
223
- /* 9 */ { 4, s_7_9, -1, -1, 0},
224
- /* 10 */ { 4, s_7_10, -1, 1, 0},
225
- /* 11 */ { 5, s_7_11, 10, -1, 0},
226
- /* 12 */ { 4, s_7_12, -1, 1, 0},
227
- /* 13 */ { 5, s_7_13, 12, -1, 0}
214
+ { 3, s_7_0, -1, -1, 0},
215
+ { 3, s_7_1, -1, 1, 0},
216
+ { 4, s_7_2, 1, -1, 0},
217
+ { 3, s_7_3, -1, 1, 0},
218
+ { 4, s_7_4, 3, -1, 0},
219
+ { 3, s_7_5, -1, 1, 0},
220
+ { 4, s_7_6, 5, -1, 0},
221
+ { 3, s_7_7, -1, 1, 0},
222
+ { 4, s_7_8, 7, -1, 0},
223
+ { 4, s_7_9, -1, -1, 0},
224
+ { 4, s_7_10, -1, 1, 0},
225
+ { 5, s_7_11, 10, -1, 0},
226
+ { 4, s_7_12, -1, 1, 0},
227
+ { 5, s_7_13, 12, -1, 0}
228
228
  };
229
229
 
230
230
  static const symbol s_8_0[1] = { 'i' };
@@ -232,8 +232,8 @@ static const symbol s_8_1[1] = { 'j' };
232
232
 
233
233
  static const struct among a_8[2] =
234
234
  {
235
- /* 0 */ { 1, s_8_0, -1, -1, 0},
236
- /* 1 */ { 1, s_8_1, -1, -1, 0}
235
+ { 1, s_8_0, -1, -1, 0},
236
+ { 1, s_8_1, -1, -1, 0}
237
237
  };
238
238
 
239
239
  static const symbol s_9_0[3] = { 'm', 'm', 'a' };
@@ -241,91 +241,76 @@ static const symbol s_9_1[4] = { 'i', 'm', 'm', 'a' };
241
241
 
242
242
  static const struct among a_9[2] =
243
243
  {
244
- /* 0 */ { 3, s_9_0, -1, 1, 0},
245
- /* 1 */ { 4, s_9_1, 0, -1, 0}
244
+ { 3, s_9_0, -1, 1, 0},
245
+ { 4, s_9_1, 0, -1, 0}
246
246
  };
247
247
 
248
248
  static const unsigned char g_AEI[] = { 17, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8 };
249
249
 
250
+ static const unsigned char g_C[] = { 119, 223, 119, 1 };
251
+
250
252
  static const unsigned char g_V1[] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 };
251
253
 
252
254
  static const unsigned char g_V2[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 };
253
255
 
254
256
  static const unsigned char g_particle_end[] = { 17, 97, 24, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 };
255
257
 
256
- static const symbol s_0[] = { 'k' };
257
- static const symbol s_1[] = { 'k', 's', 'e' };
258
- static const symbol s_2[] = { 'k', 's', 'i' };
259
- static const symbol s_3[] = { 'i' };
260
- static const symbol s_4[] = { 'a' };
261
- static const symbol s_5[] = { 'e' };
262
- static const symbol s_6[] = { 'i' };
263
- static const symbol s_7[] = { 'o' };
264
- static const symbol s_8[] = { 0xC3, 0xA4 };
265
- static const symbol s_9[] = { 0xC3, 0xB6 };
266
- static const symbol s_10[] = { 'i', 'e' };
267
- static const symbol s_11[] = { 'e' };
268
- static const symbol s_12[] = { 'p', 'o' };
269
- static const symbol s_13[] = { 't' };
270
- static const symbol s_14[] = { 'p', 'o' };
271
- static const symbol s_15[] = { 'j' };
272
- static const symbol s_16[] = { 'o' };
273
- static const symbol s_17[] = { 'u' };
274
- static const symbol s_18[] = { 'o' };
275
- static const symbol s_19[] = { 'j' };
258
+ static const symbol s_0[] = { 'k', 's', 'e' };
259
+ static const symbol s_1[] = { 'k', 's', 'i' };
260
+ static const symbol s_2[] = { 0xC3, 0xA4 };
261
+ static const symbol s_3[] = { 0xC3, 0xB6 };
262
+ static const symbol s_4[] = { 'i', 'e' };
263
+ static const symbol s_5[] = { 'p', 'o' };
264
+ static const symbol s_6[] = { 'p', 'o' };
276
265
 
277
266
  static int r_mark_regions(struct SN_env * z) {
278
- z->I[0] = z->l;
279
267
  z->I[1] = z->l;
280
- if (out_grouping_U(z, g_V1, 97, 246, 1) < 0) return 0; /* goto */ /* grouping V1, line 46 */
281
- { /* gopast */ /* non V1, line 46 */
268
+ z->I[0] = z->l;
269
+ if (out_grouping_U(z, g_V1, 97, 246, 1) < 0) return 0;
270
+ {
282
271
  int ret = in_grouping_U(z, g_V1, 97, 246, 1);
283
272
  if (ret < 0) return 0;
284
273
  z->c += ret;
285
274
  }
286
- z->I[0] = z->c; /* setmark p1, line 46 */
287
- if (out_grouping_U(z, g_V1, 97, 246, 1) < 0) return 0; /* goto */ /* grouping V1, line 47 */
288
- { /* gopast */ /* non V1, line 47 */
275
+ z->I[1] = z->c;
276
+ if (out_grouping_U(z, g_V1, 97, 246, 1) < 0) return 0;
277
+ {
289
278
  int ret = in_grouping_U(z, g_V1, 97, 246, 1);
290
279
  if (ret < 0) return 0;
291
280
  z->c += ret;
292
281
  }
293
- z->I[1] = z->c; /* setmark p2, line 47 */
282
+ z->I[0] = z->c;
294
283
  return 1;
295
284
  }
296
285
 
297
286
  static int r_R2(struct SN_env * z) {
298
- if (!(z->I[1] <= z->c)) return 0;
287
+ if (!(z->I[0] <= z->c)) return 0;
299
288
  return 1;
300
289
  }
301
290
 
302
291
  static int r_particle_etc(struct SN_env * z) {
303
292
  int among_var;
304
- { int mlimit; /* setlimit, line 55 */
305
- int m1 = z->l - z->c; (void)m1;
306
- if (z->c < z->I[0]) return 0;
307
- z->c = z->I[0]; /* tomark, line 55 */
308
- mlimit = z->lb; z->lb = z->c;
309
- z->c = z->l - m1;
310
- z->ket = z->c; /* [, line 55 */
311
- among_var = find_among_b(z, a_0, 10); /* substring, line 55 */
312
- if (!(among_var)) { z->lb = mlimit; return 0; }
313
- z->bra = z->c; /* ], line 55 */
314
- z->lb = mlimit;
293
+
294
+ { int mlimit1;
295
+ if (z->c < z->I[1]) return 0;
296
+ mlimit1 = z->lb; z->lb = z->I[1];
297
+ z->ket = z->c;
298
+ among_var = find_among_b(z, a_0, 10);
299
+ if (!(among_var)) { z->lb = mlimit1; return 0; }
300
+ z->bra = z->c;
301
+ z->lb = mlimit1;
315
302
  }
316
- switch(among_var) {
317
- case 0: return 0;
303
+ switch (among_var) {
318
304
  case 1:
319
305
  if (in_grouping_b_U(z, g_particle_end, 97, 246, 0)) return 0;
320
306
  break;
321
307
  case 2:
322
308
  { int ret = r_R2(z);
323
- if (ret == 0) return 0; /* call R2, line 64 */
324
- if (ret < 0) return ret;
309
+ if (ret <= 0) return ret;
325
310
  }
326
311
  break;
327
312
  }
328
- { int ret = slice_del(z); /* delete, line 66 */
313
+ { int ret = slice_del(z);
329
314
  if (ret < 0) return ret;
330
315
  }
331
316
  return 1;
@@ -333,65 +318,63 @@ static int r_particle_etc(struct SN_env * z) {
333
318
 
334
319
  static int r_possessive(struct SN_env * z) {
335
320
  int among_var;
336
- { int mlimit; /* setlimit, line 69 */
337
- int m1 = z->l - z->c; (void)m1;
338
- if (z->c < z->I[0]) return 0;
339
- z->c = z->I[0]; /* tomark, line 69 */
340
- mlimit = z->lb; z->lb = z->c;
341
- z->c = z->l - m1;
342
- z->ket = z->c; /* [, line 69 */
343
- among_var = find_among_b(z, a_4, 9); /* substring, line 69 */
344
- if (!(among_var)) { z->lb = mlimit; return 0; }
345
- z->bra = z->c; /* ], line 69 */
346
- z->lb = mlimit;
321
+
322
+ { int mlimit1;
323
+ if (z->c < z->I[1]) return 0;
324
+ mlimit1 = z->lb; z->lb = z->I[1];
325
+ z->ket = z->c;
326
+ among_var = find_among_b(z, a_4, 9);
327
+ if (!(among_var)) { z->lb = mlimit1; return 0; }
328
+ z->bra = z->c;
329
+ z->lb = mlimit1;
347
330
  }
348
- switch(among_var) {
349
- case 0: return 0;
331
+ switch (among_var) {
350
332
  case 1:
351
- { int m2 = z->l - z->c; (void)m2; /* not, line 72 */
352
- if (!(eq_s_b(z, 1, s_0))) goto lab0;
333
+ { int m2 = z->l - z->c; (void)m2;
334
+ if (z->c <= z->lb || z->p[z->c - 1] != 'k') goto lab0;
335
+ z->c--;
353
336
  return 0;
354
337
  lab0:
355
338
  z->c = z->l - m2;
356
339
  }
357
- { int ret = slice_del(z); /* delete, line 72 */
340
+ { int ret = slice_del(z);
358
341
  if (ret < 0) return ret;
359
342
  }
360
343
  break;
361
344
  case 2:
362
- { int ret = slice_del(z); /* delete, line 74 */
345
+ { int ret = slice_del(z);
363
346
  if (ret < 0) return ret;
364
347
  }
365
- z->ket = z->c; /* [, line 74 */
366
- if (!(eq_s_b(z, 3, s_1))) return 0;
367
- z->bra = z->c; /* ], line 74 */
368
- { int ret = slice_from_s(z, 3, s_2); /* <-, line 74 */
348
+ z->ket = z->c;
349
+ if (!(eq_s_b(z, 3, s_0))) return 0;
350
+ z->bra = z->c;
351
+ { int ret = slice_from_s(z, 3, s_1);
369
352
  if (ret < 0) return ret;
370
353
  }
371
354
  break;
372
355
  case 3:
373
- { int ret = slice_del(z); /* delete, line 78 */
356
+ { int ret = slice_del(z);
374
357
  if (ret < 0) return ret;
375
358
  }
376
359
  break;
377
360
  case 4:
378
361
  if (z->c - 1 <= z->lb || z->p[z->c - 1] != 97) return 0;
379
- if (!(find_among_b(z, a_1, 6))) return 0; /* among, line 81 */
380
- { int ret = slice_del(z); /* delete, line 81 */
362
+ if (!(find_among_b(z, a_1, 6))) return 0;
363
+ { int ret = slice_del(z);
381
364
  if (ret < 0) return ret;
382
365
  }
383
366
  break;
384
367
  case 5:
385
368
  if (z->c - 2 <= z->lb || z->p[z->c - 1] != 164) return 0;
386
- if (!(find_among_b(z, a_2, 6))) return 0; /* among, line 83 */
387
- { int ret = slice_del(z); /* delete, line 84 */
369
+ if (!(find_among_b(z, a_2, 6))) return 0;
370
+ { int ret = slice_del(z);
388
371
  if (ret < 0) return ret;
389
372
  }
390
373
  break;
391
374
  case 6:
392
375
  if (z->c - 2 <= z->lb || z->p[z->c - 1] != 101) return 0;
393
- if (!(find_among_b(z, a_3, 2))) return 0; /* among, line 86 */
394
- { int ret = slice_del(z); /* delete, line 86 */
376
+ if (!(find_among_b(z, a_3, 2))) return 0;
377
+ { int ret = slice_del(z);
395
378
  if (ret < 0) return ret;
396
379
  }
397
380
  break;
@@ -400,135 +383,129 @@ static int r_possessive(struct SN_env * z) {
400
383
  }
401
384
 
402
385
  static int r_LONG(struct SN_env * z) {
403
- if (!(find_among_b(z, a_5, 7))) return 0; /* among, line 91 */
386
+ if (!(find_among_b(z, a_5, 7))) return 0;
404
387
  return 1;
405
388
  }
406
389
 
407
390
  static int r_VI(struct SN_env * z) {
408
- if (!(eq_s_b(z, 1, s_3))) return 0;
391
+ if (z->c <= z->lb || z->p[z->c - 1] != 'i') return 0;
392
+ z->c--;
409
393
  if (in_grouping_b_U(z, g_V2, 97, 246, 0)) return 0;
410
394
  return 1;
411
395
  }
412
396
 
413
397
  static int r_case_ending(struct SN_env * z) {
414
398
  int among_var;
415
- { int mlimit; /* setlimit, line 96 */
416
- int m1 = z->l - z->c; (void)m1;
417
- if (z->c < z->I[0]) return 0;
418
- z->c = z->I[0]; /* tomark, line 96 */
419
- mlimit = z->lb; z->lb = z->c;
420
- z->c = z->l - m1;
421
- z->ket = z->c; /* [, line 96 */
422
- among_var = find_among_b(z, a_6, 30); /* substring, line 96 */
423
- if (!(among_var)) { z->lb = mlimit; return 0; }
424
- z->bra = z->c; /* ], line 96 */
425
- z->lb = mlimit;
399
+
400
+ { int mlimit1;
401
+ if (z->c < z->I[1]) return 0;
402
+ mlimit1 = z->lb; z->lb = z->I[1];
403
+ z->ket = z->c;
404
+ among_var = find_among_b(z, a_6, 30);
405
+ if (!(among_var)) { z->lb = mlimit1; return 0; }
406
+ z->bra = z->c;
407
+ z->lb = mlimit1;
426
408
  }
427
- switch(among_var) {
428
- case 0: return 0;
409
+ switch (among_var) {
429
410
  case 1:
430
- if (!(eq_s_b(z, 1, s_4))) return 0;
411
+ if (z->c <= z->lb || z->p[z->c - 1] != 'a') return 0;
412
+ z->c--;
431
413
  break;
432
414
  case 2:
433
- if (!(eq_s_b(z, 1, s_5))) return 0;
415
+ if (z->c <= z->lb || z->p[z->c - 1] != 'e') return 0;
416
+ z->c--;
434
417
  break;
435
418
  case 3:
436
- if (!(eq_s_b(z, 1, s_6))) return 0;
419
+ if (z->c <= z->lb || z->p[z->c - 1] != 'i') return 0;
420
+ z->c--;
437
421
  break;
438
422
  case 4:
439
- if (!(eq_s_b(z, 1, s_7))) return 0;
423
+ if (z->c <= z->lb || z->p[z->c - 1] != 'o') return 0;
424
+ z->c--;
440
425
  break;
441
426
  case 5:
442
- if (!(eq_s_b(z, 2, s_8))) return 0;
427
+ if (!(eq_s_b(z, 2, s_2))) return 0;
443
428
  break;
444
429
  case 6:
445
- if (!(eq_s_b(z, 2, s_9))) return 0;
430
+ if (!(eq_s_b(z, 2, s_3))) return 0;
446
431
  break;
447
432
  case 7:
448
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 111 */
449
- { int m2 = z->l - z->c; (void)m2; /* and, line 113 */
450
- { int m3 = z->l - z->c; (void)m3; /* or, line 112 */
433
+ { int m2 = z->l - z->c; (void)m2;
434
+ { int m3 = z->l - z->c; (void)m3;
435
+ { int m4 = z->l - z->c; (void)m4;
451
436
  { int ret = r_LONG(z);
452
- if (ret == 0) goto lab2; /* call LONG, line 111 */
437
+ if (ret == 0) goto lab2;
453
438
  if (ret < 0) return ret;
454
439
  }
455
440
  goto lab1;
456
441
  lab2:
457
- z->c = z->l - m3;
458
- if (!(eq_s_b(z, 2, s_10))) { z->c = z->l - m_keep; goto lab0; }
442
+ z->c = z->l - m4;
443
+ if (!(eq_s_b(z, 2, s_4))) { z->c = z->l - m2; goto lab0; }
459
444
  }
460
445
  lab1:
461
- z->c = z->l - m2;
462
- { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
463
- if (ret < 0) { z->c = z->l - m_keep; goto lab0; }
464
- z->c = ret; /* next, line 113 */
446
+ z->c = z->l - m3;
447
+ { int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
448
+ if (ret < 0) { z->c = z->l - m2; goto lab0; }
449
+ z->c = ret;
465
450
  }
466
451
  }
467
- z->bra = z->c; /* ], line 113 */
452
+ z->bra = z->c;
468
453
  lab0:
469
454
  ;
470
455
  }
471
456
  break;
472
457
  case 8:
473
458
  if (in_grouping_b_U(z, g_V1, 97, 246, 0)) return 0;
474
- if (out_grouping_b_U(z, g_V1, 97, 246, 0)) return 0;
475
- break;
476
- case 9:
477
- if (!(eq_s_b(z, 1, s_11))) return 0;
459
+ if (in_grouping_b_U(z, g_C, 98, 122, 0)) return 0;
478
460
  break;
479
461
  }
480
- { int ret = slice_del(z); /* delete, line 138 */
462
+ { int ret = slice_del(z);
481
463
  if (ret < 0) return ret;
482
464
  }
483
- z->B[0] = 1; /* set ending_removed, line 139 */
465
+ z->I[2] = 1;
484
466
  return 1;
485
467
  }
486
468
 
487
469
  static int r_other_endings(struct SN_env * z) {
488
470
  int among_var;
489
- { int mlimit; /* setlimit, line 142 */
490
- int m1 = z->l - z->c; (void)m1;
491
- if (z->c < z->I[1]) return 0;
492
- z->c = z->I[1]; /* tomark, line 142 */
493
- mlimit = z->lb; z->lb = z->c;
494
- z->c = z->l - m1;
495
- z->ket = z->c; /* [, line 142 */
496
- among_var = find_among_b(z, a_7, 14); /* substring, line 142 */
497
- if (!(among_var)) { z->lb = mlimit; return 0; }
498
- z->bra = z->c; /* ], line 142 */
499
- z->lb = mlimit;
471
+
472
+ { int mlimit1;
473
+ if (z->c < z->I[0]) return 0;
474
+ mlimit1 = z->lb; z->lb = z->I[0];
475
+ z->ket = z->c;
476
+ among_var = find_among_b(z, a_7, 14);
477
+ if (!(among_var)) { z->lb = mlimit1; return 0; }
478
+ z->bra = z->c;
479
+ z->lb = mlimit1;
500
480
  }
501
- switch(among_var) {
502
- case 0: return 0;
481
+ switch (among_var) {
503
482
  case 1:
504
- { int m2 = z->l - z->c; (void)m2; /* not, line 146 */
505
- if (!(eq_s_b(z, 2, s_12))) goto lab0;
483
+ { int m2 = z->l - z->c; (void)m2;
484
+ if (!(eq_s_b(z, 2, s_5))) goto lab0;
506
485
  return 0;
507
486
  lab0:
508
487
  z->c = z->l - m2;
509
488
  }
510
489
  break;
511
490
  }
512
- { int ret = slice_del(z); /* delete, line 151 */
491
+ { int ret = slice_del(z);
513
492
  if (ret < 0) return ret;
514
493
  }
515
494
  return 1;
516
495
  }
517
496
 
518
497
  static int r_i_plural(struct SN_env * z) {
519
- { int mlimit; /* setlimit, line 154 */
520
- int m1 = z->l - z->c; (void)m1;
521
- if (z->c < z->I[0]) return 0;
522
- z->c = z->I[0]; /* tomark, line 154 */
523
- mlimit = z->lb; z->lb = z->c;
524
- z->c = z->l - m1;
525
- z->ket = z->c; /* [, line 154 */
526
- if (z->c <= z->lb || (z->p[z->c - 1] != 105 && z->p[z->c - 1] != 106)) { z->lb = mlimit; return 0; }
527
- if (!(find_among_b(z, a_8, 2))) { z->lb = mlimit; return 0; } /* substring, line 154 */
528
- z->bra = z->c; /* ], line 154 */
529
- z->lb = mlimit;
498
+
499
+ { int mlimit1;
500
+ if (z->c < z->I[1]) return 0;
501
+ mlimit1 = z->lb; z->lb = z->I[1];
502
+ z->ket = z->c;
503
+ if (z->c <= z->lb || (z->p[z->c - 1] != 105 && z->p[z->c - 1] != 106)) { z->lb = mlimit1; return 0; }
504
+ if (!(find_among_b(z, a_8, 2))) { z->lb = mlimit1; return 0; }
505
+ z->bra = z->c;
506
+ z->lb = mlimit1;
530
507
  }
531
- { int ret = slice_del(z); /* delete, line 158 */
508
+ { int ret = slice_del(z);
532
509
  if (ret < 0) return ret;
533
510
  }
534
511
  return 1;
@@ -536,219 +513,197 @@ static int r_i_plural(struct SN_env * z) {
536
513
 
537
514
  static int r_t_plural(struct SN_env * z) {
538
515
  int among_var;
539
- { int mlimit; /* setlimit, line 161 */
540
- int m1 = z->l - z->c; (void)m1;
541
- if (z->c < z->I[0]) return 0;
542
- z->c = z->I[0]; /* tomark, line 161 */
543
- mlimit = z->lb; z->lb = z->c;
544
- z->c = z->l - m1;
545
- z->ket = z->c; /* [, line 162 */
546
- if (!(eq_s_b(z, 1, s_13))) { z->lb = mlimit; return 0; }
547
- z->bra = z->c; /* ], line 162 */
548
- { int m_test = z->l - z->c; /* test, line 162 */
549
- if (in_grouping_b_U(z, g_V1, 97, 246, 0)) { z->lb = mlimit; return 0; }
550
- z->c = z->l - m_test;
516
+
517
+ { int mlimit1;
518
+ if (z->c < z->I[1]) return 0;
519
+ mlimit1 = z->lb; z->lb = z->I[1];
520
+ z->ket = z->c;
521
+ if (z->c <= z->lb || z->p[z->c - 1] != 't') { z->lb = mlimit1; return 0; }
522
+ z->c--;
523
+ z->bra = z->c;
524
+ { int m_test2 = z->l - z->c;
525
+ if (in_grouping_b_U(z, g_V1, 97, 246, 0)) { z->lb = mlimit1; return 0; }
526
+ z->c = z->l - m_test2;
551
527
  }
552
- { int ret = slice_del(z); /* delete, line 163 */
528
+ { int ret = slice_del(z);
553
529
  if (ret < 0) return ret;
554
530
  }
555
- z->lb = mlimit;
531
+ z->lb = mlimit1;
556
532
  }
557
- { int mlimit; /* setlimit, line 165 */
558
- int m2 = z->l - z->c; (void)m2;
559
- if (z->c < z->I[1]) return 0;
560
- z->c = z->I[1]; /* tomark, line 165 */
561
- mlimit = z->lb; z->lb = z->c;
562
- z->c = z->l - m2;
563
- z->ket = z->c; /* [, line 165 */
564
- if (z->c - 2 <= z->lb || z->p[z->c - 1] != 97) { z->lb = mlimit; return 0; }
565
- among_var = find_among_b(z, a_9, 2); /* substring, line 165 */
566
- if (!(among_var)) { z->lb = mlimit; return 0; }
567
- z->bra = z->c; /* ], line 165 */
568
- z->lb = mlimit;
533
+
534
+ { int mlimit3;
535
+ if (z->c < z->I[0]) return 0;
536
+ mlimit3 = z->lb; z->lb = z->I[0];
537
+ z->ket = z->c;
538
+ if (z->c - 2 <= z->lb || z->p[z->c - 1] != 97) { z->lb = mlimit3; return 0; }
539
+ among_var = find_among_b(z, a_9, 2);
540
+ if (!(among_var)) { z->lb = mlimit3; return 0; }
541
+ z->bra = z->c;
542
+ z->lb = mlimit3;
569
543
  }
570
- switch(among_var) {
571
- case 0: return 0;
544
+ switch (among_var) {
572
545
  case 1:
573
- { int m3 = z->l - z->c; (void)m3; /* not, line 167 */
574
- if (!(eq_s_b(z, 2, s_14))) goto lab0;
546
+ { int m4 = z->l - z->c; (void)m4;
547
+ if (!(eq_s_b(z, 2, s_6))) goto lab0;
575
548
  return 0;
576
549
  lab0:
577
- z->c = z->l - m3;
550
+ z->c = z->l - m4;
578
551
  }
579
552
  break;
580
553
  }
581
- { int ret = slice_del(z); /* delete, line 170 */
554
+ { int ret = slice_del(z);
582
555
  if (ret < 0) return ret;
583
556
  }
584
557
  return 1;
585
558
  }
586
559
 
587
560
  static int r_tidy(struct SN_env * z) {
588
- { int mlimit; /* setlimit, line 173 */
589
- int m1 = z->l - z->c; (void)m1;
590
- if (z->c < z->I[0]) return 0;
591
- z->c = z->I[0]; /* tomark, line 173 */
592
- mlimit = z->lb; z->lb = z->c;
593
- z->c = z->l - m1;
594
- { int m2 = z->l - z->c; (void)m2; /* do, line 174 */
595
- { int m3 = z->l - z->c; (void)m3; /* and, line 174 */
561
+
562
+ { int mlimit1;
563
+ if (z->c < z->I[1]) return 0;
564
+ mlimit1 = z->lb; z->lb = z->I[1];
565
+ { int m2 = z->l - z->c; (void)m2;
566
+ { int m3 = z->l - z->c; (void)m3;
596
567
  { int ret = r_LONG(z);
597
- if (ret == 0) goto lab0; /* call LONG, line 174 */
568
+ if (ret == 0) goto lab0;
598
569
  if (ret < 0) return ret;
599
570
  }
600
571
  z->c = z->l - m3;
601
- z->ket = z->c; /* [, line 174 */
602
- { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
572
+ z->ket = z->c;
573
+ { int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
603
574
  if (ret < 0) goto lab0;
604
- z->c = ret; /* next, line 174 */
575
+ z->c = ret;
605
576
  }
606
- z->bra = z->c; /* ], line 174 */
607
- { int ret = slice_del(z); /* delete, line 174 */
577
+ z->bra = z->c;
578
+ { int ret = slice_del(z);
608
579
  if (ret < 0) return ret;
609
580
  }
610
581
  }
611
582
  lab0:
612
583
  z->c = z->l - m2;
613
584
  }
614
- { int m4 = z->l - z->c; (void)m4; /* do, line 175 */
615
- z->ket = z->c; /* [, line 175 */
585
+ { int m4 = z->l - z->c; (void)m4;
586
+ z->ket = z->c;
616
587
  if (in_grouping_b_U(z, g_AEI, 97, 228, 0)) goto lab1;
617
- z->bra = z->c; /* ], line 175 */
618
- if (out_grouping_b_U(z, g_V1, 97, 246, 0)) goto lab1;
619
- { int ret = slice_del(z); /* delete, line 175 */
588
+ z->bra = z->c;
589
+ if (in_grouping_b_U(z, g_C, 98, 122, 0)) goto lab1;
590
+ { int ret = slice_del(z);
620
591
  if (ret < 0) return ret;
621
592
  }
622
593
  lab1:
623
594
  z->c = z->l - m4;
624
595
  }
625
- { int m5 = z->l - z->c; (void)m5; /* do, line 176 */
626
- z->ket = z->c; /* [, line 176 */
627
- if (!(eq_s_b(z, 1, s_15))) goto lab2;
628
- z->bra = z->c; /* ], line 176 */
629
- { int m6 = z->l - z->c; (void)m6; /* or, line 176 */
630
- if (!(eq_s_b(z, 1, s_16))) goto lab4;
596
+ { int m5 = z->l - z->c; (void)m5;
597
+ z->ket = z->c;
598
+ if (z->c <= z->lb || z->p[z->c - 1] != 'j') goto lab2;
599
+ z->c--;
600
+ z->bra = z->c;
601
+ { int m6 = z->l - z->c; (void)m6;
602
+ if (z->c <= z->lb || z->p[z->c - 1] != 'o') goto lab4;
603
+ z->c--;
631
604
  goto lab3;
632
605
  lab4:
633
606
  z->c = z->l - m6;
634
- if (!(eq_s_b(z, 1, s_17))) goto lab2;
607
+ if (z->c <= z->lb || z->p[z->c - 1] != 'u') goto lab2;
608
+ z->c--;
635
609
  }
636
610
  lab3:
637
- { int ret = slice_del(z); /* delete, line 176 */
611
+ { int ret = slice_del(z);
638
612
  if (ret < 0) return ret;
639
613
  }
640
614
  lab2:
641
615
  z->c = z->l - m5;
642
616
  }
643
- { int m7 = z->l - z->c; (void)m7; /* do, line 177 */
644
- z->ket = z->c; /* [, line 177 */
645
- if (!(eq_s_b(z, 1, s_18))) goto lab5;
646
- z->bra = z->c; /* ], line 177 */
647
- if (!(eq_s_b(z, 1, s_19))) goto lab5;
648
- { int ret = slice_del(z); /* delete, line 177 */
617
+ { int m7 = z->l - z->c; (void)m7;
618
+ z->ket = z->c;
619
+ if (z->c <= z->lb || z->p[z->c - 1] != 'o') goto lab5;
620
+ z->c--;
621
+ z->bra = z->c;
622
+ if (z->c <= z->lb || z->p[z->c - 1] != 'j') goto lab5;
623
+ z->c--;
624
+ { int ret = slice_del(z);
649
625
  if (ret < 0) return ret;
650
626
  }
651
627
  lab5:
652
628
  z->c = z->l - m7;
653
629
  }
654
- z->lb = mlimit;
630
+ z->lb = mlimit1;
655
631
  }
656
- if (in_grouping_b_U(z, g_V1, 97, 246, 1) < 0) return 0; /* goto */ /* non V1, line 179 */
657
- z->ket = z->c; /* [, line 179 */
658
- { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
659
- if (ret < 0) return 0;
660
- z->c = ret; /* next, line 179 */
661
- }
662
- z->bra = z->c; /* ], line 179 */
663
- z->S[0] = slice_to(z, z->S[0]); /* -> x, line 179 */
664
- if (z->S[0] == 0) return -1; /* -> x, line 179 */
665
- if (!(eq_v_b(z, z->S[0]))) return 0; /* name x, line 179 */
666
- { int ret = slice_del(z); /* delete, line 179 */
632
+ if (in_grouping_b_U(z, g_V1, 97, 246, 1) < 0) return 0;
633
+ z->ket = z->c;
634
+ if (in_grouping_b_U(z, g_C, 98, 122, 0)) return 0;
635
+ z->bra = z->c;
636
+ z->S[0] = slice_to(z, z->S[0]);
637
+ if (z->S[0] == 0) return -1;
638
+ if (!(eq_v_b(z, z->S[0]))) return 0;
639
+ { int ret = slice_del(z);
667
640
  if (ret < 0) return ret;
668
641
  }
669
642
  return 1;
670
643
  }
671
644
 
672
645
  extern int finnish_UTF_8_stem(struct SN_env * z) {
673
- { int c1 = z->c; /* do, line 185 */
646
+ { int c1 = z->c;
674
647
  { int ret = r_mark_regions(z);
675
- if (ret == 0) goto lab0; /* call mark_regions, line 185 */
676
648
  if (ret < 0) return ret;
677
649
  }
678
- lab0:
679
650
  z->c = c1;
680
651
  }
681
- z->B[0] = 0; /* unset ending_removed, line 186 */
682
- z->lb = z->c; z->c = z->l; /* backwards, line 187 */
652
+ z->I[2] = 0;
653
+ z->lb = z->c; z->c = z->l;
683
654
 
684
- { int m2 = z->l - z->c; (void)m2; /* do, line 188 */
655
+ { int m2 = z->l - z->c; (void)m2;
685
656
  { int ret = r_particle_etc(z);
686
- if (ret == 0) goto lab1; /* call particle_etc, line 188 */
687
657
  if (ret < 0) return ret;
688
658
  }
689
- lab1:
690
659
  z->c = z->l - m2;
691
660
  }
692
- { int m3 = z->l - z->c; (void)m3; /* do, line 189 */
661
+ { int m3 = z->l - z->c; (void)m3;
693
662
  { int ret = r_possessive(z);
694
- if (ret == 0) goto lab2; /* call possessive, line 189 */
695
663
  if (ret < 0) return ret;
696
664
  }
697
- lab2:
698
665
  z->c = z->l - m3;
699
666
  }
700
- { int m4 = z->l - z->c; (void)m4; /* do, line 190 */
667
+ { int m4 = z->l - z->c; (void)m4;
701
668
  { int ret = r_case_ending(z);
702
- if (ret == 0) goto lab3; /* call case_ending, line 190 */
703
669
  if (ret < 0) return ret;
704
670
  }
705
- lab3:
706
671
  z->c = z->l - m4;
707
672
  }
708
- { int m5 = z->l - z->c; (void)m5; /* do, line 191 */
673
+ { int m5 = z->l - z->c; (void)m5;
709
674
  { int ret = r_other_endings(z);
710
- if (ret == 0) goto lab4; /* call other_endings, line 191 */
711
675
  if (ret < 0) return ret;
712
676
  }
713
- lab4:
714
677
  z->c = z->l - m5;
715
678
  }
716
- { int m6 = z->l - z->c; (void)m6; /* or, line 192 */
717
- if (!(z->B[0])) goto lab6; /* Boolean test ending_removed, line 192 */
718
- { int m7 = z->l - z->c; (void)m7; /* do, line 192 */
719
- { int ret = r_i_plural(z);
720
- if (ret == 0) goto lab7; /* call i_plural, line 192 */
721
- if (ret < 0) return ret;
722
- }
723
- lab7:
724
- z->c = z->l - m7;
679
+
680
+ if (!(z->I[2])) goto lab1;
681
+ { int m6 = z->l - z->c; (void)m6;
682
+ { int ret = r_i_plural(z);
683
+ if (ret < 0) return ret;
725
684
  }
726
- goto lab5;
727
- lab6:
728
685
  z->c = z->l - m6;
729
- { int m8 = z->l - z->c; (void)m8; /* do, line 192 */
730
- { int ret = r_t_plural(z);
731
- if (ret == 0) goto lab8; /* call t_plural, line 192 */
732
- if (ret < 0) return ret;
733
- }
734
- lab8:
735
- z->c = z->l - m8;
686
+ }
687
+ goto lab0;
688
+ lab1:
689
+ { int m7 = z->l - z->c; (void)m7;
690
+ { int ret = r_t_plural(z);
691
+ if (ret < 0) return ret;
736
692
  }
693
+ z->c = z->l - m7;
737
694
  }
738
- lab5:
739
- { int m9 = z->l - z->c; (void)m9; /* do, line 193 */
695
+ lab0:
696
+ { int m8 = z->l - z->c; (void)m8;
740
697
  { int ret = r_tidy(z);
741
- if (ret == 0) goto lab9; /* call tidy, line 193 */
742
698
  if (ret < 0) return ret;
743
699
  }
744
- lab9:
745
- z->c = z->l - m9;
700
+ z->c = z->l - m8;
746
701
  }
747
702
  z->c = z->lb;
748
703
  return 1;
749
704
  }
750
705
 
751
- extern struct SN_env * finnish_UTF_8_create_env(void) { return SN_create_env(1, 2, 1); }
706
+ extern struct SN_env * finnish_UTF_8_create_env(void) { return SN_create_env(1, 3); }
752
707
 
753
708
  extern void finnish_UTF_8_close_env(struct SN_env * z) { SN_close_env(z, 1); }
754
709