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,1104 @@
1
+
2
+ /* This file was generated automatically by the Snowball to ANSI C compiler */
3
+
4
+ #include "stem_header.h"
5
+
6
+ extern int english_ISO_8859_1_stem(struct SN_env * z);
7
+
8
+ static int r_exception2(struct SN_env * z);
9
+ static int r_exception1(struct SN_env * z);
10
+ static int r_Step_5(struct SN_env * z);
11
+ static int r_Step_4(struct SN_env * z);
12
+ static int r_Step_3(struct SN_env * z);
13
+ static int r_Step_2(struct SN_env * z);
14
+ static int r_Step_1c(struct SN_env * z);
15
+ static int r_Step_1b(struct SN_env * z);
16
+ static int r_Step_1a(struct SN_env * z);
17
+ static int r_R2(struct SN_env * z);
18
+ static int r_R1(struct SN_env * z);
19
+ static int r_shortv(struct SN_env * z);
20
+ static int r_mark_regions(struct SN_env * z);
21
+ static int r_postlude(struct SN_env * z);
22
+ static int r_prelude(struct SN_env * z);
23
+
24
+ extern struct SN_env * english_ISO_8859_1_create_env(void);
25
+ extern void english_ISO_8859_1_close_env(struct SN_env * z);
26
+
27
+ static const symbol s_0_0[5] = { 'a', 'r', 's', 'e', 'n' };
28
+ static const symbol s_0_1[6] = { 'c', 'o', 'm', 'm', 'u', 'n' };
29
+ static const symbol s_0_2[5] = { 'g', 'e', 'n', 'e', 'r' };
30
+
31
+ static const struct among a_0[3] =
32
+ {
33
+ /* 0 */ { 5, s_0_0, -1, -1, 0},
34
+ /* 1 */ { 6, s_0_1, -1, -1, 0},
35
+ /* 2 */ { 5, s_0_2, -1, -1, 0}
36
+ };
37
+
38
+ static const symbol s_1_0[1] = { '\'' };
39
+ static const symbol s_1_1[3] = { '\'', 's', '\'' };
40
+ static const symbol s_1_2[2] = { '\'', 's' };
41
+
42
+ static const struct among a_1[3] =
43
+ {
44
+ /* 0 */ { 1, s_1_0, -1, 1, 0},
45
+ /* 1 */ { 3, s_1_1, 0, 1, 0},
46
+ /* 2 */ { 2, s_1_2, -1, 1, 0}
47
+ };
48
+
49
+ static const symbol s_2_0[3] = { 'i', 'e', 'd' };
50
+ static const symbol s_2_1[1] = { 's' };
51
+ static const symbol s_2_2[3] = { 'i', 'e', 's' };
52
+ static const symbol s_2_3[4] = { 's', 's', 'e', 's' };
53
+ static const symbol s_2_4[2] = { 's', 's' };
54
+ static const symbol s_2_5[2] = { 'u', 's' };
55
+
56
+ static const struct among a_2[6] =
57
+ {
58
+ /* 0 */ { 3, s_2_0, -1, 2, 0},
59
+ /* 1 */ { 1, s_2_1, -1, 3, 0},
60
+ /* 2 */ { 3, s_2_2, 1, 2, 0},
61
+ /* 3 */ { 4, s_2_3, 1, 1, 0},
62
+ /* 4 */ { 2, s_2_4, 1, -1, 0},
63
+ /* 5 */ { 2, s_2_5, 1, -1, 0}
64
+ };
65
+
66
+ static const symbol s_3_1[2] = { 'b', 'b' };
67
+ static const symbol s_3_2[2] = { 'd', 'd' };
68
+ static const symbol s_3_3[2] = { 'f', 'f' };
69
+ static const symbol s_3_4[2] = { 'g', 'g' };
70
+ static const symbol s_3_5[2] = { 'b', 'l' };
71
+ static const symbol s_3_6[2] = { 'm', 'm' };
72
+ static const symbol s_3_7[2] = { 'n', 'n' };
73
+ static const symbol s_3_8[2] = { 'p', 'p' };
74
+ static const symbol s_3_9[2] = { 'r', 'r' };
75
+ static const symbol s_3_10[2] = { 'a', 't' };
76
+ static const symbol s_3_11[2] = { 't', 't' };
77
+ static const symbol s_3_12[2] = { 'i', 'z' };
78
+
79
+ static const struct among a_3[13] =
80
+ {
81
+ /* 0 */ { 0, 0, -1, 3, 0},
82
+ /* 1 */ { 2, s_3_1, 0, 2, 0},
83
+ /* 2 */ { 2, s_3_2, 0, 2, 0},
84
+ /* 3 */ { 2, s_3_3, 0, 2, 0},
85
+ /* 4 */ { 2, s_3_4, 0, 2, 0},
86
+ /* 5 */ { 2, s_3_5, 0, 1, 0},
87
+ /* 6 */ { 2, s_3_6, 0, 2, 0},
88
+ /* 7 */ { 2, s_3_7, 0, 2, 0},
89
+ /* 8 */ { 2, s_3_8, 0, 2, 0},
90
+ /* 9 */ { 2, s_3_9, 0, 2, 0},
91
+ /* 10 */ { 2, s_3_10, 0, 1, 0},
92
+ /* 11 */ { 2, s_3_11, 0, 2, 0},
93
+ /* 12 */ { 2, s_3_12, 0, 1, 0}
94
+ };
95
+
96
+ static const symbol s_4_0[2] = { 'e', 'd' };
97
+ static const symbol s_4_1[3] = { 'e', 'e', 'd' };
98
+ static const symbol s_4_2[3] = { 'i', 'n', 'g' };
99
+ static const symbol s_4_3[4] = { 'e', 'd', 'l', 'y' };
100
+ static const symbol s_4_4[5] = { 'e', 'e', 'd', 'l', 'y' };
101
+ static const symbol s_4_5[5] = { 'i', 'n', 'g', 'l', 'y' };
102
+
103
+ static const struct among a_4[6] =
104
+ {
105
+ /* 0 */ { 2, s_4_0, -1, 2, 0},
106
+ /* 1 */ { 3, s_4_1, 0, 1, 0},
107
+ /* 2 */ { 3, s_4_2, -1, 2, 0},
108
+ /* 3 */ { 4, s_4_3, -1, 2, 0},
109
+ /* 4 */ { 5, s_4_4, 3, 1, 0},
110
+ /* 5 */ { 5, s_4_5, -1, 2, 0}
111
+ };
112
+
113
+ static const symbol s_5_0[4] = { 'a', 'n', 'c', 'i' };
114
+ static const symbol s_5_1[4] = { 'e', 'n', 'c', 'i' };
115
+ static const symbol s_5_2[3] = { 'o', 'g', 'i' };
116
+ static const symbol s_5_3[2] = { 'l', 'i' };
117
+ static const symbol s_5_4[3] = { 'b', 'l', 'i' };
118
+ static const symbol s_5_5[4] = { 'a', 'b', 'l', 'i' };
119
+ static const symbol s_5_6[4] = { 'a', 'l', 'l', 'i' };
120
+ static const symbol s_5_7[5] = { 'f', 'u', 'l', 'l', 'i' };
121
+ static const symbol s_5_8[6] = { 'l', 'e', 's', 's', 'l', 'i' };
122
+ static const symbol s_5_9[5] = { 'o', 'u', 's', 'l', 'i' };
123
+ static const symbol s_5_10[5] = { 'e', 'n', 't', 'l', 'i' };
124
+ static const symbol s_5_11[5] = { 'a', 'l', 'i', 't', 'i' };
125
+ static const symbol s_5_12[6] = { 'b', 'i', 'l', 'i', 't', 'i' };
126
+ static const symbol s_5_13[5] = { 'i', 'v', 'i', 't', 'i' };
127
+ static const symbol s_5_14[6] = { 't', 'i', 'o', 'n', 'a', 'l' };
128
+ static const symbol s_5_15[7] = { 'a', 't', 'i', 'o', 'n', 'a', 'l' };
129
+ static const symbol s_5_16[5] = { 'a', 'l', 'i', 's', 'm' };
130
+ static const symbol s_5_17[5] = { 'a', 't', 'i', 'o', 'n' };
131
+ static const symbol s_5_18[7] = { 'i', 'z', 'a', 't', 'i', 'o', 'n' };
132
+ static const symbol s_5_19[4] = { 'i', 'z', 'e', 'r' };
133
+ static const symbol s_5_20[4] = { 'a', 't', 'o', 'r' };
134
+ static const symbol s_5_21[7] = { 'i', 'v', 'e', 'n', 'e', 's', 's' };
135
+ static const symbol s_5_22[7] = { 'f', 'u', 'l', 'n', 'e', 's', 's' };
136
+ static const symbol s_5_23[7] = { 'o', 'u', 's', 'n', 'e', 's', 's' };
137
+
138
+ static const struct among a_5[24] =
139
+ {
140
+ /* 0 */ { 4, s_5_0, -1, 3, 0},
141
+ /* 1 */ { 4, s_5_1, -1, 2, 0},
142
+ /* 2 */ { 3, s_5_2, -1, 13, 0},
143
+ /* 3 */ { 2, s_5_3, -1, 16, 0},
144
+ /* 4 */ { 3, s_5_4, 3, 12, 0},
145
+ /* 5 */ { 4, s_5_5, 4, 4, 0},
146
+ /* 6 */ { 4, s_5_6, 3, 8, 0},
147
+ /* 7 */ { 5, s_5_7, 3, 14, 0},
148
+ /* 8 */ { 6, s_5_8, 3, 15, 0},
149
+ /* 9 */ { 5, s_5_9, 3, 10, 0},
150
+ /* 10 */ { 5, s_5_10, 3, 5, 0},
151
+ /* 11 */ { 5, s_5_11, -1, 8, 0},
152
+ /* 12 */ { 6, s_5_12, -1, 12, 0},
153
+ /* 13 */ { 5, s_5_13, -1, 11, 0},
154
+ /* 14 */ { 6, s_5_14, -1, 1, 0},
155
+ /* 15 */ { 7, s_5_15, 14, 7, 0},
156
+ /* 16 */ { 5, s_5_16, -1, 8, 0},
157
+ /* 17 */ { 5, s_5_17, -1, 7, 0},
158
+ /* 18 */ { 7, s_5_18, 17, 6, 0},
159
+ /* 19 */ { 4, s_5_19, -1, 6, 0},
160
+ /* 20 */ { 4, s_5_20, -1, 7, 0},
161
+ /* 21 */ { 7, s_5_21, -1, 11, 0},
162
+ /* 22 */ { 7, s_5_22, -1, 9, 0},
163
+ /* 23 */ { 7, s_5_23, -1, 10, 0}
164
+ };
165
+
166
+ static const symbol s_6_0[5] = { 'i', 'c', 'a', 't', 'e' };
167
+ static const symbol s_6_1[5] = { 'a', 't', 'i', 'v', 'e' };
168
+ static const symbol s_6_2[5] = { 'a', 'l', 'i', 'z', 'e' };
169
+ static const symbol s_6_3[5] = { 'i', 'c', 'i', 't', 'i' };
170
+ static const symbol s_6_4[4] = { 'i', 'c', 'a', 'l' };
171
+ static const symbol s_6_5[6] = { 't', 'i', 'o', 'n', 'a', 'l' };
172
+ static const symbol s_6_6[7] = { 'a', 't', 'i', 'o', 'n', 'a', 'l' };
173
+ static const symbol s_6_7[3] = { 'f', 'u', 'l' };
174
+ static const symbol s_6_8[4] = { 'n', 'e', 's', 's' };
175
+
176
+ static const struct among a_6[9] =
177
+ {
178
+ /* 0 */ { 5, s_6_0, -1, 4, 0},
179
+ /* 1 */ { 5, s_6_1, -1, 6, 0},
180
+ /* 2 */ { 5, s_6_2, -1, 3, 0},
181
+ /* 3 */ { 5, s_6_3, -1, 4, 0},
182
+ /* 4 */ { 4, s_6_4, -1, 4, 0},
183
+ /* 5 */ { 6, s_6_5, -1, 1, 0},
184
+ /* 6 */ { 7, s_6_6, 5, 2, 0},
185
+ /* 7 */ { 3, s_6_7, -1, 5, 0},
186
+ /* 8 */ { 4, s_6_8, -1, 5, 0}
187
+ };
188
+
189
+ static const symbol s_7_0[2] = { 'i', 'c' };
190
+ static const symbol s_7_1[4] = { 'a', 'n', 'c', 'e' };
191
+ static const symbol s_7_2[4] = { 'e', 'n', 'c', 'e' };
192
+ static const symbol s_7_3[4] = { 'a', 'b', 'l', 'e' };
193
+ static const symbol s_7_4[4] = { 'i', 'b', 'l', 'e' };
194
+ static const symbol s_7_5[3] = { 'a', 't', 'e' };
195
+ static const symbol s_7_6[3] = { 'i', 'v', 'e' };
196
+ static const symbol s_7_7[3] = { 'i', 'z', 'e' };
197
+ static const symbol s_7_8[3] = { 'i', 't', 'i' };
198
+ static const symbol s_7_9[2] = { 'a', 'l' };
199
+ static const symbol s_7_10[3] = { 'i', 's', 'm' };
200
+ static const symbol s_7_11[3] = { 'i', 'o', 'n' };
201
+ static const symbol s_7_12[2] = { 'e', 'r' };
202
+ static const symbol s_7_13[3] = { 'o', 'u', 's' };
203
+ static const symbol s_7_14[3] = { 'a', 'n', 't' };
204
+ static const symbol s_7_15[3] = { 'e', 'n', 't' };
205
+ static const symbol s_7_16[4] = { 'm', 'e', 'n', 't' };
206
+ static const symbol s_7_17[5] = { 'e', 'm', 'e', 'n', 't' };
207
+
208
+ static const struct among a_7[18] =
209
+ {
210
+ /* 0 */ { 2, s_7_0, -1, 1, 0},
211
+ /* 1 */ { 4, s_7_1, -1, 1, 0},
212
+ /* 2 */ { 4, s_7_2, -1, 1, 0},
213
+ /* 3 */ { 4, s_7_3, -1, 1, 0},
214
+ /* 4 */ { 4, s_7_4, -1, 1, 0},
215
+ /* 5 */ { 3, s_7_5, -1, 1, 0},
216
+ /* 6 */ { 3, s_7_6, -1, 1, 0},
217
+ /* 7 */ { 3, s_7_7, -1, 1, 0},
218
+ /* 8 */ { 3, s_7_8, -1, 1, 0},
219
+ /* 9 */ { 2, s_7_9, -1, 1, 0},
220
+ /* 10 */ { 3, s_7_10, -1, 1, 0},
221
+ /* 11 */ { 3, s_7_11, -1, 2, 0},
222
+ /* 12 */ { 2, s_7_12, -1, 1, 0},
223
+ /* 13 */ { 3, s_7_13, -1, 1, 0},
224
+ /* 14 */ { 3, s_7_14, -1, 1, 0},
225
+ /* 15 */ { 3, s_7_15, -1, 1, 0},
226
+ /* 16 */ { 4, s_7_16, 15, 1, 0},
227
+ /* 17 */ { 5, s_7_17, 16, 1, 0}
228
+ };
229
+
230
+ static const symbol s_8_0[1] = { 'e' };
231
+ static const symbol s_8_1[1] = { 'l' };
232
+
233
+ static const struct among a_8[2] =
234
+ {
235
+ /* 0 */ { 1, s_8_0, -1, 1, 0},
236
+ /* 1 */ { 1, s_8_1, -1, 2, 0}
237
+ };
238
+
239
+ static const symbol s_9_0[7] = { 's', 'u', 'c', 'c', 'e', 'e', 'd' };
240
+ static const symbol s_9_1[7] = { 'p', 'r', 'o', 'c', 'e', 'e', 'd' };
241
+ static const symbol s_9_2[6] = { 'e', 'x', 'c', 'e', 'e', 'd' };
242
+ static const symbol s_9_3[7] = { 'c', 'a', 'n', 'n', 'i', 'n', 'g' };
243
+ static const symbol s_9_4[6] = { 'i', 'n', 'n', 'i', 'n', 'g' };
244
+ static const symbol s_9_5[7] = { 'e', 'a', 'r', 'r', 'i', 'n', 'g' };
245
+ static const symbol s_9_6[7] = { 'h', 'e', 'r', 'r', 'i', 'n', 'g' };
246
+ static const symbol s_9_7[6] = { 'o', 'u', 't', 'i', 'n', 'g' };
247
+
248
+ static const struct among a_9[8] =
249
+ {
250
+ /* 0 */ { 7, s_9_0, -1, -1, 0},
251
+ /* 1 */ { 7, s_9_1, -1, -1, 0},
252
+ /* 2 */ { 6, s_9_2, -1, -1, 0},
253
+ /* 3 */ { 7, s_9_3, -1, -1, 0},
254
+ /* 4 */ { 6, s_9_4, -1, -1, 0},
255
+ /* 5 */ { 7, s_9_5, -1, -1, 0},
256
+ /* 6 */ { 7, s_9_6, -1, -1, 0},
257
+ /* 7 */ { 6, s_9_7, -1, -1, 0}
258
+ };
259
+
260
+ static const symbol s_10_0[5] = { 'a', 'n', 'd', 'e', 's' };
261
+ static const symbol s_10_1[5] = { 'a', 't', 'l', 'a', 's' };
262
+ static const symbol s_10_2[4] = { 'b', 'i', 'a', 's' };
263
+ static const symbol s_10_3[6] = { 'c', 'o', 's', 'm', 'o', 's' };
264
+ static const symbol s_10_4[5] = { 'd', 'y', 'i', 'n', 'g' };
265
+ static const symbol s_10_5[5] = { 'e', 'a', 'r', 'l', 'y' };
266
+ static const symbol s_10_6[6] = { 'g', 'e', 'n', 't', 'l', 'y' };
267
+ static const symbol s_10_7[4] = { 'h', 'o', 'w', 'e' };
268
+ static const symbol s_10_8[4] = { 'i', 'd', 'l', 'y' };
269
+ static const symbol s_10_9[5] = { 'l', 'y', 'i', 'n', 'g' };
270
+ static const symbol s_10_10[4] = { 'n', 'e', 'w', 's' };
271
+ static const symbol s_10_11[4] = { 'o', 'n', 'l', 'y' };
272
+ static const symbol s_10_12[6] = { 's', 'i', 'n', 'g', 'l', 'y' };
273
+ static const symbol s_10_13[5] = { 's', 'k', 'i', 'e', 's' };
274
+ static const symbol s_10_14[4] = { 's', 'k', 'i', 's' };
275
+ static const symbol s_10_15[3] = { 's', 'k', 'y' };
276
+ static const symbol s_10_16[5] = { 't', 'y', 'i', 'n', 'g' };
277
+ static const symbol s_10_17[4] = { 'u', 'g', 'l', 'y' };
278
+
279
+ static const struct among a_10[18] =
280
+ {
281
+ /* 0 */ { 5, s_10_0, -1, -1, 0},
282
+ /* 1 */ { 5, s_10_1, -1, -1, 0},
283
+ /* 2 */ { 4, s_10_2, -1, -1, 0},
284
+ /* 3 */ { 6, s_10_3, -1, -1, 0},
285
+ /* 4 */ { 5, s_10_4, -1, 3, 0},
286
+ /* 5 */ { 5, s_10_5, -1, 9, 0},
287
+ /* 6 */ { 6, s_10_6, -1, 7, 0},
288
+ /* 7 */ { 4, s_10_7, -1, -1, 0},
289
+ /* 8 */ { 4, s_10_8, -1, 6, 0},
290
+ /* 9 */ { 5, s_10_9, -1, 4, 0},
291
+ /* 10 */ { 4, s_10_10, -1, -1, 0},
292
+ /* 11 */ { 4, s_10_11, -1, 10, 0},
293
+ /* 12 */ { 6, s_10_12, -1, 11, 0},
294
+ /* 13 */ { 5, s_10_13, -1, 2, 0},
295
+ /* 14 */ { 4, s_10_14, -1, 1, 0},
296
+ /* 15 */ { 3, s_10_15, -1, -1, 0},
297
+ /* 16 */ { 5, s_10_16, -1, 5, 0},
298
+ /* 17 */ { 4, s_10_17, -1, 8, 0}
299
+ };
300
+
301
+ static const unsigned char g_v[] = { 17, 65, 16, 1 };
302
+
303
+ static const unsigned char g_v_WXY[] = { 1, 17, 65, 208, 1 };
304
+
305
+ static const unsigned char g_valid_LI[] = { 55, 141, 2 };
306
+
307
+ static const symbol s_0[] = { '\'' };
308
+ static const symbol s_1[] = { 'y' };
309
+ static const symbol s_2[] = { 'Y' };
310
+ static const symbol s_3[] = { 'y' };
311
+ static const symbol s_4[] = { 'Y' };
312
+ static const symbol s_5[] = { 's', 's' };
313
+ static const symbol s_6[] = { 'i' };
314
+ static const symbol s_7[] = { 'i', 'e' };
315
+ static const symbol s_8[] = { 'e', 'e' };
316
+ static const symbol s_9[] = { 'e' };
317
+ static const symbol s_10[] = { 'e' };
318
+ static const symbol s_11[] = { 'y' };
319
+ static const symbol s_12[] = { 'Y' };
320
+ static const symbol s_13[] = { 'i' };
321
+ static const symbol s_14[] = { 't', 'i', 'o', 'n' };
322
+ static const symbol s_15[] = { 'e', 'n', 'c', 'e' };
323
+ static const symbol s_16[] = { 'a', 'n', 'c', 'e' };
324
+ static const symbol s_17[] = { 'a', 'b', 'l', 'e' };
325
+ static const symbol s_18[] = { 'e', 'n', 't' };
326
+ static const symbol s_19[] = { 'i', 'z', 'e' };
327
+ static const symbol s_20[] = { 'a', 't', 'e' };
328
+ static const symbol s_21[] = { 'a', 'l' };
329
+ static const symbol s_22[] = { 'f', 'u', 'l' };
330
+ static const symbol s_23[] = { 'o', 'u', 's' };
331
+ static const symbol s_24[] = { 'i', 'v', 'e' };
332
+ static const symbol s_25[] = { 'b', 'l', 'e' };
333
+ static const symbol s_26[] = { 'l' };
334
+ static const symbol s_27[] = { 'o', 'g' };
335
+ static const symbol s_28[] = { 'f', 'u', 'l' };
336
+ static const symbol s_29[] = { 'l', 'e', 's', 's' };
337
+ static const symbol s_30[] = { 't', 'i', 'o', 'n' };
338
+ static const symbol s_31[] = { 'a', 't', 'e' };
339
+ static const symbol s_32[] = { 'a', 'l' };
340
+ static const symbol s_33[] = { 'i', 'c' };
341
+ static const symbol s_34[] = { 's' };
342
+ static const symbol s_35[] = { 't' };
343
+ static const symbol s_36[] = { 'l' };
344
+ static const symbol s_37[] = { 's', 'k', 'i' };
345
+ static const symbol s_38[] = { 's', 'k', 'y' };
346
+ static const symbol s_39[] = { 'd', 'i', 'e' };
347
+ static const symbol s_40[] = { 'l', 'i', 'e' };
348
+ static const symbol s_41[] = { 't', 'i', 'e' };
349
+ static const symbol s_42[] = { 'i', 'd', 'l' };
350
+ static const symbol s_43[] = { 'g', 'e', 'n', 't', 'l' };
351
+ static const symbol s_44[] = { 'u', 'g', 'l', 'i' };
352
+ static const symbol s_45[] = { 'e', 'a', 'r', 'l', 'i' };
353
+ static const symbol s_46[] = { 'o', 'n', 'l', 'i' };
354
+ static const symbol s_47[] = { 's', 'i', 'n', 'g', 'l' };
355
+ static const symbol s_48[] = { 'Y' };
356
+ static const symbol s_49[] = { 'y' };
357
+
358
+ static int r_prelude(struct SN_env * z) {
359
+ z->B[0] = 0; /* unset Y_found, line 26 */
360
+ { int c1 = z->c; /* do, line 27 */
361
+ z->bra = z->c; /* [, line 27 */
362
+ if (!(eq_s(z, 1, s_0))) goto lab0;
363
+ z->ket = z->c; /* ], line 27 */
364
+ { int ret = slice_del(z); /* delete, line 27 */
365
+ if (ret < 0) return ret;
366
+ }
367
+ lab0:
368
+ z->c = c1;
369
+ }
370
+ { int c2 = z->c; /* do, line 28 */
371
+ z->bra = z->c; /* [, line 28 */
372
+ if (!(eq_s(z, 1, s_1))) goto lab1;
373
+ z->ket = z->c; /* ], line 28 */
374
+ { int ret = slice_from_s(z, 1, s_2); /* <-, line 28 */
375
+ if (ret < 0) return ret;
376
+ }
377
+ z->B[0] = 1; /* set Y_found, line 28 */
378
+ lab1:
379
+ z->c = c2;
380
+ }
381
+ { int c3 = z->c; /* do, line 29 */
382
+ while(1) { /* repeat, line 29 */
383
+ int c4 = z->c;
384
+ while(1) { /* goto, line 29 */
385
+ int c5 = z->c;
386
+ if (in_grouping(z, g_v, 97, 121, 0)) goto lab4;
387
+ z->bra = z->c; /* [, line 29 */
388
+ if (!(eq_s(z, 1, s_3))) goto lab4;
389
+ z->ket = z->c; /* ], line 29 */
390
+ z->c = c5;
391
+ break;
392
+ lab4:
393
+ z->c = c5;
394
+ if (z->c >= z->l) goto lab3;
395
+ z->c++; /* goto, line 29 */
396
+ }
397
+ { int ret = slice_from_s(z, 1, s_4); /* <-, line 29 */
398
+ if (ret < 0) return ret;
399
+ }
400
+ z->B[0] = 1; /* set Y_found, line 29 */
401
+ continue;
402
+ lab3:
403
+ z->c = c4;
404
+ break;
405
+ }
406
+ z->c = c3;
407
+ }
408
+ return 1;
409
+ }
410
+
411
+ static int r_mark_regions(struct SN_env * z) {
412
+ z->I[0] = z->l;
413
+ z->I[1] = z->l;
414
+ { int c1 = z->c; /* do, line 35 */
415
+ { int c2 = z->c; /* or, line 41 */
416
+ if (z->c + 4 >= z->l || z->p[z->c + 4] >> 5 != 3 || !((2375680 >> (z->p[z->c + 4] & 0x1f)) & 1)) goto lab2;
417
+ if (!(find_among(z, a_0, 3))) goto lab2; /* among, line 36 */
418
+ goto lab1;
419
+ lab2:
420
+ z->c = c2;
421
+ { /* gopast */ /* grouping v, line 41 */
422
+ int ret = out_grouping(z, g_v, 97, 121, 1);
423
+ if (ret < 0) goto lab0;
424
+ z->c += ret;
425
+ }
426
+ { /* gopast */ /* non v, line 41 */
427
+ int ret = in_grouping(z, g_v, 97, 121, 1);
428
+ if (ret < 0) goto lab0;
429
+ z->c += ret;
430
+ }
431
+ }
432
+ lab1:
433
+ z->I[0] = z->c; /* setmark p1, line 42 */
434
+ { /* gopast */ /* grouping v, line 43 */
435
+ int ret = out_grouping(z, g_v, 97, 121, 1);
436
+ if (ret < 0) goto lab0;
437
+ z->c += ret;
438
+ }
439
+ { /* gopast */ /* non v, line 43 */
440
+ int ret = in_grouping(z, g_v, 97, 121, 1);
441
+ if (ret < 0) goto lab0;
442
+ z->c += ret;
443
+ }
444
+ z->I[1] = z->c; /* setmark p2, line 43 */
445
+ lab0:
446
+ z->c = c1;
447
+ }
448
+ return 1;
449
+ }
450
+
451
+ static int r_shortv(struct SN_env * z) {
452
+ { int m1 = z->l - z->c; (void)m1; /* or, line 51 */
453
+ if (out_grouping_b(z, g_v_WXY, 89, 121, 0)) goto lab1;
454
+ if (in_grouping_b(z, g_v, 97, 121, 0)) goto lab1;
455
+ if (out_grouping_b(z, g_v, 97, 121, 0)) goto lab1;
456
+ goto lab0;
457
+ lab1:
458
+ z->c = z->l - m1;
459
+ if (out_grouping_b(z, g_v, 97, 121, 0)) return 0;
460
+ if (in_grouping_b(z, g_v, 97, 121, 0)) return 0;
461
+ if (z->c > z->lb) return 0; /* atlimit, line 52 */
462
+ }
463
+ lab0:
464
+ return 1;
465
+ }
466
+
467
+ static int r_R1(struct SN_env * z) {
468
+ if (!(z->I[0] <= z->c)) return 0;
469
+ return 1;
470
+ }
471
+
472
+ static int r_R2(struct SN_env * z) {
473
+ if (!(z->I[1] <= z->c)) return 0;
474
+ return 1;
475
+ }
476
+
477
+ static int r_Step_1a(struct SN_env * z) {
478
+ int among_var;
479
+ { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 59 */
480
+ z->ket = z->c; /* [, line 60 */
481
+ if (z->c <= z->lb || (z->p[z->c - 1] != 39 && z->p[z->c - 1] != 115)) { z->c = z->l - m_keep; goto lab0; }
482
+ among_var = find_among_b(z, a_1, 3); /* substring, line 60 */
483
+ if (!(among_var)) { z->c = z->l - m_keep; goto lab0; }
484
+ z->bra = z->c; /* ], line 60 */
485
+ switch(among_var) {
486
+ case 0: { z->c = z->l - m_keep; goto lab0; }
487
+ case 1:
488
+ { int ret = slice_del(z); /* delete, line 62 */
489
+ if (ret < 0) return ret;
490
+ }
491
+ break;
492
+ }
493
+ lab0:
494
+ ;
495
+ }
496
+ z->ket = z->c; /* [, line 65 */
497
+ if (z->c <= z->lb || (z->p[z->c - 1] != 100 && z->p[z->c - 1] != 115)) return 0;
498
+ among_var = find_among_b(z, a_2, 6); /* substring, line 65 */
499
+ if (!(among_var)) return 0;
500
+ z->bra = z->c; /* ], line 65 */
501
+ switch(among_var) {
502
+ case 0: return 0;
503
+ case 1:
504
+ { int ret = slice_from_s(z, 2, s_5); /* <-, line 66 */
505
+ if (ret < 0) return ret;
506
+ }
507
+ break;
508
+ case 2:
509
+ { int m1 = z->l - z->c; (void)m1; /* or, line 68 */
510
+ { int ret = z->c - 2;
511
+ if (z->lb > ret || ret > z->l) goto lab2;
512
+ z->c = ret; /* hop, line 68 */
513
+ }
514
+ { int ret = slice_from_s(z, 1, s_6); /* <-, line 68 */
515
+ if (ret < 0) return ret;
516
+ }
517
+ goto lab1;
518
+ lab2:
519
+ z->c = z->l - m1;
520
+ { int ret = slice_from_s(z, 2, s_7); /* <-, line 68 */
521
+ if (ret < 0) return ret;
522
+ }
523
+ }
524
+ lab1:
525
+ break;
526
+ case 3:
527
+ if (z->c <= z->lb) return 0;
528
+ z->c--; /* next, line 69 */
529
+ { /* gopast */ /* grouping v, line 69 */
530
+ int ret = out_grouping_b(z, g_v, 97, 121, 1);
531
+ if (ret < 0) return 0;
532
+ z->c -= ret;
533
+ }
534
+ { int ret = slice_del(z); /* delete, line 69 */
535
+ if (ret < 0) return ret;
536
+ }
537
+ break;
538
+ }
539
+ return 1;
540
+ }
541
+
542
+ static int r_Step_1b(struct SN_env * z) {
543
+ int among_var;
544
+ z->ket = z->c; /* [, line 75 */
545
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((33554576 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
546
+ among_var = find_among_b(z, a_4, 6); /* substring, line 75 */
547
+ if (!(among_var)) return 0;
548
+ z->bra = z->c; /* ], line 75 */
549
+ switch(among_var) {
550
+ case 0: return 0;
551
+ case 1:
552
+ { int ret = r_R1(z);
553
+ if (ret == 0) return 0; /* call R1, line 77 */
554
+ if (ret < 0) return ret;
555
+ }
556
+ { int ret = slice_from_s(z, 2, s_8); /* <-, line 77 */
557
+ if (ret < 0) return ret;
558
+ }
559
+ break;
560
+ case 2:
561
+ { int m_test = z->l - z->c; /* test, line 80 */
562
+ { /* gopast */ /* grouping v, line 80 */
563
+ int ret = out_grouping_b(z, g_v, 97, 121, 1);
564
+ if (ret < 0) return 0;
565
+ z->c -= ret;
566
+ }
567
+ z->c = z->l - m_test;
568
+ }
569
+ { int ret = slice_del(z); /* delete, line 80 */
570
+ if (ret < 0) return ret;
571
+ }
572
+ { int m_test = z->l - z->c; /* test, line 81 */
573
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((68514004 >> (z->p[z->c - 1] & 0x1f)) & 1)) among_var = 3; else
574
+ among_var = find_among_b(z, a_3, 13); /* substring, line 81 */
575
+ if (!(among_var)) return 0;
576
+ z->c = z->l - m_test;
577
+ }
578
+ switch(among_var) {
579
+ case 0: return 0;
580
+ case 1:
581
+ { int c_keep = z->c;
582
+ int ret = insert_s(z, z->c, z->c, 1, s_9); /* <+, line 83 */
583
+ z->c = c_keep;
584
+ if (ret < 0) return ret;
585
+ }
586
+ break;
587
+ case 2:
588
+ z->ket = z->c; /* [, line 86 */
589
+ if (z->c <= z->lb) return 0;
590
+ z->c--; /* next, line 86 */
591
+ z->bra = z->c; /* ], line 86 */
592
+ { int ret = slice_del(z); /* delete, line 86 */
593
+ if (ret < 0) return ret;
594
+ }
595
+ break;
596
+ case 3:
597
+ if (z->c != z->I[0]) return 0; /* atmark, line 87 */
598
+ { int m_test = z->l - z->c; /* test, line 87 */
599
+ { int ret = r_shortv(z);
600
+ if (ret == 0) return 0; /* call shortv, line 87 */
601
+ if (ret < 0) return ret;
602
+ }
603
+ z->c = z->l - m_test;
604
+ }
605
+ { int c_keep = z->c;
606
+ int ret = insert_s(z, z->c, z->c, 1, s_10); /* <+, line 87 */
607
+ z->c = c_keep;
608
+ if (ret < 0) return ret;
609
+ }
610
+ break;
611
+ }
612
+ break;
613
+ }
614
+ return 1;
615
+ }
616
+
617
+ static int r_Step_1c(struct SN_env * z) {
618
+ z->ket = z->c; /* [, line 94 */
619
+ { int m1 = z->l - z->c; (void)m1; /* or, line 94 */
620
+ if (!(eq_s_b(z, 1, s_11))) goto lab1;
621
+ goto lab0;
622
+ lab1:
623
+ z->c = z->l - m1;
624
+ if (!(eq_s_b(z, 1, s_12))) return 0;
625
+ }
626
+ lab0:
627
+ z->bra = z->c; /* ], line 94 */
628
+ if (out_grouping_b(z, g_v, 97, 121, 0)) return 0;
629
+ { int m2 = z->l - z->c; (void)m2; /* not, line 95 */
630
+ if (z->c > z->lb) goto lab2; /* atlimit, line 95 */
631
+ return 0;
632
+ lab2:
633
+ z->c = z->l - m2;
634
+ }
635
+ { int ret = slice_from_s(z, 1, s_13); /* <-, line 96 */
636
+ if (ret < 0) return ret;
637
+ }
638
+ return 1;
639
+ }
640
+
641
+ static int r_Step_2(struct SN_env * z) {
642
+ int among_var;
643
+ z->ket = z->c; /* [, line 100 */
644
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((815616 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
645
+ among_var = find_among_b(z, a_5, 24); /* substring, line 100 */
646
+ if (!(among_var)) return 0;
647
+ z->bra = z->c; /* ], line 100 */
648
+ { int ret = r_R1(z);
649
+ if (ret == 0) return 0; /* call R1, line 100 */
650
+ if (ret < 0) return ret;
651
+ }
652
+ switch(among_var) {
653
+ case 0: return 0;
654
+ case 1:
655
+ { int ret = slice_from_s(z, 4, s_14); /* <-, line 101 */
656
+ if (ret < 0) return ret;
657
+ }
658
+ break;
659
+ case 2:
660
+ { int ret = slice_from_s(z, 4, s_15); /* <-, line 102 */
661
+ if (ret < 0) return ret;
662
+ }
663
+ break;
664
+ case 3:
665
+ { int ret = slice_from_s(z, 4, s_16); /* <-, line 103 */
666
+ if (ret < 0) return ret;
667
+ }
668
+ break;
669
+ case 4:
670
+ { int ret = slice_from_s(z, 4, s_17); /* <-, line 104 */
671
+ if (ret < 0) return ret;
672
+ }
673
+ break;
674
+ case 5:
675
+ { int ret = slice_from_s(z, 3, s_18); /* <-, line 105 */
676
+ if (ret < 0) return ret;
677
+ }
678
+ break;
679
+ case 6:
680
+ { int ret = slice_from_s(z, 3, s_19); /* <-, line 107 */
681
+ if (ret < 0) return ret;
682
+ }
683
+ break;
684
+ case 7:
685
+ { int ret = slice_from_s(z, 3, s_20); /* <-, line 109 */
686
+ if (ret < 0) return ret;
687
+ }
688
+ break;
689
+ case 8:
690
+ { int ret = slice_from_s(z, 2, s_21); /* <-, line 111 */
691
+ if (ret < 0) return ret;
692
+ }
693
+ break;
694
+ case 9:
695
+ { int ret = slice_from_s(z, 3, s_22); /* <-, line 112 */
696
+ if (ret < 0) return ret;
697
+ }
698
+ break;
699
+ case 10:
700
+ { int ret = slice_from_s(z, 3, s_23); /* <-, line 114 */
701
+ if (ret < 0) return ret;
702
+ }
703
+ break;
704
+ case 11:
705
+ { int ret = slice_from_s(z, 3, s_24); /* <-, line 116 */
706
+ if (ret < 0) return ret;
707
+ }
708
+ break;
709
+ case 12:
710
+ { int ret = slice_from_s(z, 3, s_25); /* <-, line 118 */
711
+ if (ret < 0) return ret;
712
+ }
713
+ break;
714
+ case 13:
715
+ if (!(eq_s_b(z, 1, s_26))) return 0;
716
+ { int ret = slice_from_s(z, 2, s_27); /* <-, line 119 */
717
+ if (ret < 0) return ret;
718
+ }
719
+ break;
720
+ case 14:
721
+ { int ret = slice_from_s(z, 3, s_28); /* <-, line 120 */
722
+ if (ret < 0) return ret;
723
+ }
724
+ break;
725
+ case 15:
726
+ { int ret = slice_from_s(z, 4, s_29); /* <-, line 121 */
727
+ if (ret < 0) return ret;
728
+ }
729
+ break;
730
+ case 16:
731
+ if (in_grouping_b(z, g_valid_LI, 99, 116, 0)) return 0;
732
+ { int ret = slice_del(z); /* delete, line 122 */
733
+ if (ret < 0) return ret;
734
+ }
735
+ break;
736
+ }
737
+ return 1;
738
+ }
739
+
740
+ static int r_Step_3(struct SN_env * z) {
741
+ int among_var;
742
+ z->ket = z->c; /* [, line 127 */
743
+ if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((528928 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
744
+ among_var = find_among_b(z, a_6, 9); /* substring, line 127 */
745
+ if (!(among_var)) return 0;
746
+ z->bra = z->c; /* ], line 127 */
747
+ { int ret = r_R1(z);
748
+ if (ret == 0) return 0; /* call R1, line 127 */
749
+ if (ret < 0) return ret;
750
+ }
751
+ switch(among_var) {
752
+ case 0: return 0;
753
+ case 1:
754
+ { int ret = slice_from_s(z, 4, s_30); /* <-, line 128 */
755
+ if (ret < 0) return ret;
756
+ }
757
+ break;
758
+ case 2:
759
+ { int ret = slice_from_s(z, 3, s_31); /* <-, line 129 */
760
+ if (ret < 0) return ret;
761
+ }
762
+ break;
763
+ case 3:
764
+ { int ret = slice_from_s(z, 2, s_32); /* <-, line 130 */
765
+ if (ret < 0) return ret;
766
+ }
767
+ break;
768
+ case 4:
769
+ { int ret = slice_from_s(z, 2, s_33); /* <-, line 132 */
770
+ if (ret < 0) return ret;
771
+ }
772
+ break;
773
+ case 5:
774
+ { int ret = slice_del(z); /* delete, line 134 */
775
+ if (ret < 0) return ret;
776
+ }
777
+ break;
778
+ case 6:
779
+ { int ret = r_R2(z);
780
+ if (ret == 0) return 0; /* call R2, line 136 */
781
+ if (ret < 0) return ret;
782
+ }
783
+ { int ret = slice_del(z); /* delete, line 136 */
784
+ if (ret < 0) return ret;
785
+ }
786
+ break;
787
+ }
788
+ return 1;
789
+ }
790
+
791
+ static int r_Step_4(struct SN_env * z) {
792
+ int among_var;
793
+ z->ket = z->c; /* [, line 141 */
794
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1864232 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
795
+ among_var = find_among_b(z, a_7, 18); /* substring, line 141 */
796
+ if (!(among_var)) return 0;
797
+ z->bra = z->c; /* ], line 141 */
798
+ { int ret = r_R2(z);
799
+ if (ret == 0) return 0; /* call R2, line 141 */
800
+ if (ret < 0) return ret;
801
+ }
802
+ switch(among_var) {
803
+ case 0: return 0;
804
+ case 1:
805
+ { int ret = slice_del(z); /* delete, line 144 */
806
+ if (ret < 0) return ret;
807
+ }
808
+ break;
809
+ case 2:
810
+ { int m1 = z->l - z->c; (void)m1; /* or, line 145 */
811
+ if (!(eq_s_b(z, 1, s_34))) goto lab1;
812
+ goto lab0;
813
+ lab1:
814
+ z->c = z->l - m1;
815
+ if (!(eq_s_b(z, 1, s_35))) return 0;
816
+ }
817
+ lab0:
818
+ { int ret = slice_del(z); /* delete, line 145 */
819
+ if (ret < 0) return ret;
820
+ }
821
+ break;
822
+ }
823
+ return 1;
824
+ }
825
+
826
+ static int r_Step_5(struct SN_env * z) {
827
+ int among_var;
828
+ z->ket = z->c; /* [, line 150 */
829
+ if (z->c <= z->lb || (z->p[z->c - 1] != 101 && z->p[z->c - 1] != 108)) return 0;
830
+ among_var = find_among_b(z, a_8, 2); /* substring, line 150 */
831
+ if (!(among_var)) return 0;
832
+ z->bra = z->c; /* ], line 150 */
833
+ switch(among_var) {
834
+ case 0: return 0;
835
+ case 1:
836
+ { int m1 = z->l - z->c; (void)m1; /* or, line 151 */
837
+ { int ret = r_R2(z);
838
+ if (ret == 0) goto lab1; /* call R2, line 151 */
839
+ if (ret < 0) return ret;
840
+ }
841
+ goto lab0;
842
+ lab1:
843
+ z->c = z->l - m1;
844
+ { int ret = r_R1(z);
845
+ if (ret == 0) return 0; /* call R1, line 151 */
846
+ if (ret < 0) return ret;
847
+ }
848
+ { int m2 = z->l - z->c; (void)m2; /* not, line 151 */
849
+ { int ret = r_shortv(z);
850
+ if (ret == 0) goto lab2; /* call shortv, line 151 */
851
+ if (ret < 0) return ret;
852
+ }
853
+ return 0;
854
+ lab2:
855
+ z->c = z->l - m2;
856
+ }
857
+ }
858
+ lab0:
859
+ { int ret = slice_del(z); /* delete, line 151 */
860
+ if (ret < 0) return ret;
861
+ }
862
+ break;
863
+ case 2:
864
+ { int ret = r_R2(z);
865
+ if (ret == 0) return 0; /* call R2, line 152 */
866
+ if (ret < 0) return ret;
867
+ }
868
+ if (!(eq_s_b(z, 1, s_36))) return 0;
869
+ { int ret = slice_del(z); /* delete, line 152 */
870
+ if (ret < 0) return ret;
871
+ }
872
+ break;
873
+ }
874
+ return 1;
875
+ }
876
+
877
+ static int r_exception2(struct SN_env * z) {
878
+ z->ket = z->c; /* [, line 158 */
879
+ if (z->c - 5 <= z->lb || (z->p[z->c - 1] != 100 && z->p[z->c - 1] != 103)) return 0;
880
+ if (!(find_among_b(z, a_9, 8))) return 0; /* substring, line 158 */
881
+ z->bra = z->c; /* ], line 158 */
882
+ if (z->c > z->lb) return 0; /* atlimit, line 158 */
883
+ return 1;
884
+ }
885
+
886
+ static int r_exception1(struct SN_env * z) {
887
+ int among_var;
888
+ z->bra = z->c; /* [, line 170 */
889
+ if (z->c + 2 >= z->l || z->p[z->c + 2] >> 5 != 3 || !((42750482 >> (z->p[z->c + 2] & 0x1f)) & 1)) return 0;
890
+ among_var = find_among(z, a_10, 18); /* substring, line 170 */
891
+ if (!(among_var)) return 0;
892
+ z->ket = z->c; /* ], line 170 */
893
+ if (z->c < z->l) return 0; /* atlimit, line 170 */
894
+ switch(among_var) {
895
+ case 0: return 0;
896
+ case 1:
897
+ { int ret = slice_from_s(z, 3, s_37); /* <-, line 174 */
898
+ if (ret < 0) return ret;
899
+ }
900
+ break;
901
+ case 2:
902
+ { int ret = slice_from_s(z, 3, s_38); /* <-, line 175 */
903
+ if (ret < 0) return ret;
904
+ }
905
+ break;
906
+ case 3:
907
+ { int ret = slice_from_s(z, 3, s_39); /* <-, line 176 */
908
+ if (ret < 0) return ret;
909
+ }
910
+ break;
911
+ case 4:
912
+ { int ret = slice_from_s(z, 3, s_40); /* <-, line 177 */
913
+ if (ret < 0) return ret;
914
+ }
915
+ break;
916
+ case 5:
917
+ { int ret = slice_from_s(z, 3, s_41); /* <-, line 178 */
918
+ if (ret < 0) return ret;
919
+ }
920
+ break;
921
+ case 6:
922
+ { int ret = slice_from_s(z, 3, s_42); /* <-, line 182 */
923
+ if (ret < 0) return ret;
924
+ }
925
+ break;
926
+ case 7:
927
+ { int ret = slice_from_s(z, 5, s_43); /* <-, line 183 */
928
+ if (ret < 0) return ret;
929
+ }
930
+ break;
931
+ case 8:
932
+ { int ret = slice_from_s(z, 4, s_44); /* <-, line 184 */
933
+ if (ret < 0) return ret;
934
+ }
935
+ break;
936
+ case 9:
937
+ { int ret = slice_from_s(z, 5, s_45); /* <-, line 185 */
938
+ if (ret < 0) return ret;
939
+ }
940
+ break;
941
+ case 10:
942
+ { int ret = slice_from_s(z, 4, s_46); /* <-, line 186 */
943
+ if (ret < 0) return ret;
944
+ }
945
+ break;
946
+ case 11:
947
+ { int ret = slice_from_s(z, 5, s_47); /* <-, line 187 */
948
+ if (ret < 0) return ret;
949
+ }
950
+ break;
951
+ }
952
+ return 1;
953
+ }
954
+
955
+ static int r_postlude(struct SN_env * z) {
956
+ if (!(z->B[0])) return 0; /* Boolean test Y_found, line 203 */
957
+ while(1) { /* repeat, line 203 */
958
+ int c1 = z->c;
959
+ while(1) { /* goto, line 203 */
960
+ int c2 = z->c;
961
+ z->bra = z->c; /* [, line 203 */
962
+ if (!(eq_s(z, 1, s_48))) goto lab1;
963
+ z->ket = z->c; /* ], line 203 */
964
+ z->c = c2;
965
+ break;
966
+ lab1:
967
+ z->c = c2;
968
+ if (z->c >= z->l) goto lab0;
969
+ z->c++; /* goto, line 203 */
970
+ }
971
+ { int ret = slice_from_s(z, 1, s_49); /* <-, line 203 */
972
+ if (ret < 0) return ret;
973
+ }
974
+ continue;
975
+ lab0:
976
+ z->c = c1;
977
+ break;
978
+ }
979
+ return 1;
980
+ }
981
+
982
+ extern int english_ISO_8859_1_stem(struct SN_env * z) {
983
+ { int c1 = z->c; /* or, line 207 */
984
+ { int ret = r_exception1(z);
985
+ if (ret == 0) goto lab1; /* call exception1, line 207 */
986
+ if (ret < 0) return ret;
987
+ }
988
+ goto lab0;
989
+ lab1:
990
+ z->c = c1;
991
+ { int c2 = z->c; /* not, line 208 */
992
+ { int ret = z->c + 3;
993
+ if (0 > ret || ret > z->l) goto lab3;
994
+ z->c = ret; /* hop, line 208 */
995
+ }
996
+ goto lab2;
997
+ lab3:
998
+ z->c = c2;
999
+ }
1000
+ goto lab0;
1001
+ lab2:
1002
+ z->c = c1;
1003
+ { int c3 = z->c; /* do, line 209 */
1004
+ { int ret = r_prelude(z);
1005
+ if (ret == 0) goto lab4; /* call prelude, line 209 */
1006
+ if (ret < 0) return ret;
1007
+ }
1008
+ lab4:
1009
+ z->c = c3;
1010
+ }
1011
+ { int c4 = z->c; /* do, line 210 */
1012
+ { int ret = r_mark_regions(z);
1013
+ if (ret == 0) goto lab5; /* call mark_regions, line 210 */
1014
+ if (ret < 0) return ret;
1015
+ }
1016
+ lab5:
1017
+ z->c = c4;
1018
+ }
1019
+ z->lb = z->c; z->c = z->l; /* backwards, line 211 */
1020
+
1021
+ { int m5 = z->l - z->c; (void)m5; /* do, line 213 */
1022
+ { int ret = r_Step_1a(z);
1023
+ if (ret == 0) goto lab6; /* call Step_1a, line 213 */
1024
+ if (ret < 0) return ret;
1025
+ }
1026
+ lab6:
1027
+ z->c = z->l - m5;
1028
+ }
1029
+ { int m6 = z->l - z->c; (void)m6; /* or, line 215 */
1030
+ { int ret = r_exception2(z);
1031
+ if (ret == 0) goto lab8; /* call exception2, line 215 */
1032
+ if (ret < 0) return ret;
1033
+ }
1034
+ goto lab7;
1035
+ lab8:
1036
+ z->c = z->l - m6;
1037
+ { int m7 = z->l - z->c; (void)m7; /* do, line 217 */
1038
+ { int ret = r_Step_1b(z);
1039
+ if (ret == 0) goto lab9; /* call Step_1b, line 217 */
1040
+ if (ret < 0) return ret;
1041
+ }
1042
+ lab9:
1043
+ z->c = z->l - m7;
1044
+ }
1045
+ { int m8 = z->l - z->c; (void)m8; /* do, line 218 */
1046
+ { int ret = r_Step_1c(z);
1047
+ if (ret == 0) goto lab10; /* call Step_1c, line 218 */
1048
+ if (ret < 0) return ret;
1049
+ }
1050
+ lab10:
1051
+ z->c = z->l - m8;
1052
+ }
1053
+ { int m9 = z->l - z->c; (void)m9; /* do, line 220 */
1054
+ { int ret = r_Step_2(z);
1055
+ if (ret == 0) goto lab11; /* call Step_2, line 220 */
1056
+ if (ret < 0) return ret;
1057
+ }
1058
+ lab11:
1059
+ z->c = z->l - m9;
1060
+ }
1061
+ { int m10 = z->l - z->c; (void)m10; /* do, line 221 */
1062
+ { int ret = r_Step_3(z);
1063
+ if (ret == 0) goto lab12; /* call Step_3, line 221 */
1064
+ if (ret < 0) return ret;
1065
+ }
1066
+ lab12:
1067
+ z->c = z->l - m10;
1068
+ }
1069
+ { int m11 = z->l - z->c; (void)m11; /* do, line 222 */
1070
+ { int ret = r_Step_4(z);
1071
+ if (ret == 0) goto lab13; /* call Step_4, line 222 */
1072
+ if (ret < 0) return ret;
1073
+ }
1074
+ lab13:
1075
+ z->c = z->l - m11;
1076
+ }
1077
+ { int m12 = z->l - z->c; (void)m12; /* do, line 224 */
1078
+ { int ret = r_Step_5(z);
1079
+ if (ret == 0) goto lab14; /* call Step_5, line 224 */
1080
+ if (ret < 0) return ret;
1081
+ }
1082
+ lab14:
1083
+ z->c = z->l - m12;
1084
+ }
1085
+ }
1086
+ lab7:
1087
+ z->c = z->lb;
1088
+ { int c13 = z->c; /* do, line 227 */
1089
+ { int ret = r_postlude(z);
1090
+ if (ret == 0) goto lab15; /* call postlude, line 227 */
1091
+ if (ret < 0) return ret;
1092
+ }
1093
+ lab15:
1094
+ z->c = c13;
1095
+ }
1096
+ }
1097
+ lab0:
1098
+ return 1;
1099
+ }
1100
+
1101
+ extern struct SN_env * english_ISO_8859_1_create_env(void) { return SN_create_env(0, 2, 1); }
1102
+
1103
+ extern void english_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1104
+