ferret 0.11.6 → 0.11.8.4

Sign up to get free protection for your applications and to get access to all the features.
Files changed (185) hide show
  1. data/README +10 -22
  2. data/RELEASE_CHANGES +137 -0
  3. data/RELEASE_NOTES +60 -0
  4. data/Rakefile +379 -274
  5. data/TODO +100 -8
  6. data/bin/ferret-browser +0 -0
  7. data/ext/BZLIB_blocksort.c +1094 -0
  8. data/ext/BZLIB_bzlib.c +1578 -0
  9. data/ext/BZLIB_compress.c +672 -0
  10. data/ext/BZLIB_crctable.c +104 -0
  11. data/ext/BZLIB_decompress.c +626 -0
  12. data/ext/BZLIB_huffman.c +205 -0
  13. data/ext/BZLIB_randtable.c +84 -0
  14. data/ext/{api.c → STEMMER_api.c} +7 -10
  15. data/ext/{libstemmer.c → STEMMER_libstemmer.c} +3 -2
  16. data/ext/{stem_ISO_8859_1_danish.c → STEMMER_stem_ISO_8859_1_danish.c} +123 -124
  17. data/ext/{stem_ISO_8859_1_dutch.c → STEMMER_stem_ISO_8859_1_dutch.c} +177 -188
  18. data/ext/STEMMER_stem_ISO_8859_1_english.c +1117 -0
  19. data/ext/{stem_ISO_8859_1_finnish.c → STEMMER_stem_ISO_8859_1_finnish.c} +276 -306
  20. data/ext/STEMMER_stem_ISO_8859_1_french.c +1246 -0
  21. data/ext/{stem_ISO_8859_1_german.c → STEMMER_stem_ISO_8859_1_german.c} +161 -170
  22. data/ext/STEMMER_stem_ISO_8859_1_hungarian.c +1230 -0
  23. data/ext/STEMMER_stem_ISO_8859_1_italian.c +1065 -0
  24. data/ext/STEMMER_stem_ISO_8859_1_norwegian.c +297 -0
  25. data/ext/{stem_ISO_8859_1_porter.c → STEMMER_stem_ISO_8859_1_porter.c} +263 -290
  26. data/ext/{stem_ISO_8859_1_portuguese.c → STEMMER_stem_ISO_8859_1_portuguese.c} +362 -380
  27. data/ext/STEMMER_stem_ISO_8859_1_spanish.c +1093 -0
  28. data/ext/STEMMER_stem_ISO_8859_1_swedish.c +307 -0
  29. data/ext/STEMMER_stem_ISO_8859_2_romanian.c +998 -0
  30. data/ext/{stem_KOI8_R_russian.c → STEMMER_stem_KOI8_R_russian.c} +244 -245
  31. data/ext/STEMMER_stem_UTF_8_danish.c +339 -0
  32. data/ext/{stem_UTF_8_dutch.c → STEMMER_stem_UTF_8_dutch.c} +192 -211
  33. data/ext/STEMMER_stem_UTF_8_english.c +1125 -0
  34. data/ext/{stem_UTF_8_finnish.c → STEMMER_stem_UTF_8_finnish.c} +284 -324
  35. data/ext/STEMMER_stem_UTF_8_french.c +1256 -0
  36. data/ext/{stem_UTF_8_german.c → STEMMER_stem_UTF_8_german.c} +170 -187
  37. data/ext/STEMMER_stem_UTF_8_hungarian.c +1234 -0
  38. data/ext/STEMMER_stem_UTF_8_italian.c +1073 -0
  39. data/ext/STEMMER_stem_UTF_8_norwegian.c +299 -0
  40. data/ext/{stem_UTF_8_porter.c → STEMMER_stem_UTF_8_porter.c} +271 -310
  41. data/ext/STEMMER_stem_UTF_8_portuguese.c +1023 -0
  42. data/ext/STEMMER_stem_UTF_8_romanian.c +1004 -0
  43. data/ext/STEMMER_stem_UTF_8_russian.c +694 -0
  44. data/ext/STEMMER_stem_UTF_8_spanish.c +1097 -0
  45. data/ext/STEMMER_stem_UTF_8_swedish.c +309 -0
  46. data/ext/STEMMER_stem_UTF_8_turkish.c +2205 -0
  47. data/ext/{utilities.c → STEMMER_utilities.c} +100 -68
  48. data/ext/analysis.c +276 -121
  49. data/ext/analysis.h +190 -143
  50. data/ext/api.h +3 -4
  51. data/ext/array.c +5 -3
  52. data/ext/array.h +52 -43
  53. data/ext/bitvector.c +38 -482
  54. data/ext/bitvector.h +446 -124
  55. data/ext/bzlib.h +282 -0
  56. data/ext/bzlib_private.h +503 -0
  57. data/ext/compound_io.c +23 -22
  58. data/ext/config.h +21 -11
  59. data/ext/document.c +43 -40
  60. data/ext/document.h +31 -21
  61. data/ext/except.c +20 -38
  62. data/ext/except.h +89 -76
  63. data/ext/extconf.rb +3 -2
  64. data/ext/ferret.c +49 -35
  65. data/ext/ferret.h +14 -11
  66. data/ext/field_index.c +262 -0
  67. data/ext/field_index.h +52 -0
  68. data/ext/filter.c +11 -10
  69. data/ext/fs_store.c +65 -47
  70. data/ext/global.c +245 -165
  71. data/ext/global.h +252 -54
  72. data/ext/hash.c +200 -243
  73. data/ext/hash.h +205 -163
  74. data/ext/hashset.c +118 -96
  75. data/ext/hashset.h +110 -82
  76. data/ext/header.h +19 -19
  77. data/ext/helper.c +11 -10
  78. data/ext/helper.h +14 -6
  79. data/ext/index.c +745 -366
  80. data/ext/index.h +503 -529
  81. data/ext/internal.h +1020 -0
  82. data/ext/lang.c +10 -0
  83. data/ext/lang.h +35 -15
  84. data/ext/mempool.c +5 -4
  85. data/ext/mempool.h +30 -22
  86. data/ext/modules.h +35 -7
  87. data/ext/multimapper.c +43 -2
  88. data/ext/multimapper.h +32 -23
  89. data/ext/posh.c +0 -0
  90. data/ext/posh.h +4 -38
  91. data/ext/priorityqueue.c +10 -12
  92. data/ext/priorityqueue.h +33 -21
  93. data/ext/q_boolean.c +22 -9
  94. data/ext/q_const_score.c +3 -2
  95. data/ext/q_filtered_query.c +15 -12
  96. data/ext/q_fuzzy.c +147 -135
  97. data/ext/q_match_all.c +3 -2
  98. data/ext/q_multi_term.c +28 -32
  99. data/ext/q_parser.c +451 -173
  100. data/ext/q_phrase.c +158 -79
  101. data/ext/q_prefix.c +16 -18
  102. data/ext/q_range.c +363 -31
  103. data/ext/q_span.c +130 -141
  104. data/ext/q_term.c +21 -21
  105. data/ext/q_wildcard.c +19 -23
  106. data/ext/r_analysis.c +369 -242
  107. data/ext/r_index.c +421 -434
  108. data/ext/r_qparser.c +142 -92
  109. data/ext/r_search.c +790 -407
  110. data/ext/r_store.c +44 -44
  111. data/ext/r_utils.c +264 -96
  112. data/ext/ram_store.c +29 -23
  113. data/ext/scanner.c +895 -0
  114. data/ext/scanner.h +36 -0
  115. data/ext/scanner_mb.c +6701 -0
  116. data/ext/scanner_utf8.c +4415 -0
  117. data/ext/search.c +210 -87
  118. data/ext/search.h +556 -488
  119. data/ext/similarity.c +17 -16
  120. data/ext/similarity.h +51 -44
  121. data/ext/sort.c +157 -354
  122. data/ext/stem_ISO_8859_1_hungarian.h +16 -0
  123. data/ext/stem_ISO_8859_2_romanian.h +16 -0
  124. data/ext/stem_UTF_8_hungarian.h +16 -0
  125. data/ext/stem_UTF_8_romanian.h +16 -0
  126. data/ext/stem_UTF_8_turkish.h +16 -0
  127. data/ext/stopwords.c +287 -278
  128. data/ext/store.c +57 -51
  129. data/ext/store.h +308 -286
  130. data/ext/symbol.c +10 -0
  131. data/ext/symbol.h +23 -0
  132. data/ext/term_vectors.c +14 -293
  133. data/ext/threading.h +22 -22
  134. data/ext/win32.h +12 -4
  135. data/lib/ferret.rb +2 -1
  136. data/lib/ferret/browser.rb +1 -1
  137. data/lib/ferret/field_symbol.rb +94 -0
  138. data/lib/ferret/index.rb +221 -34
  139. data/lib/ferret/number_tools.rb +6 -6
  140. data/lib/ferret/version.rb +3 -0
  141. data/test/{unit → long_running}/largefile/tc_largefile.rb +1 -1
  142. data/test/test_helper.rb +7 -2
  143. data/test/test_installed.rb +1 -0
  144. data/test/threading/thread_safety_index_test.rb +10 -1
  145. data/test/threading/thread_safety_read_write_test.rb +4 -7
  146. data/test/threading/thread_safety_test.rb +0 -0
  147. data/test/unit/analysis/tc_analyzer.rb +29 -27
  148. data/test/unit/analysis/tc_token_stream.rb +23 -16
  149. data/test/unit/index/tc_index.rb +116 -11
  150. data/test/unit/index/tc_index_reader.rb +27 -27
  151. data/test/unit/index/tc_index_writer.rb +10 -0
  152. data/test/unit/index/th_doc.rb +38 -21
  153. data/test/unit/search/tc_filter.rb +31 -10
  154. data/test/unit/search/tc_index_searcher.rb +6 -0
  155. data/test/unit/search/tm_searcher.rb +53 -1
  156. data/test/unit/store/tc_fs_store.rb +40 -2
  157. data/test/unit/store/tc_ram_store.rb +0 -0
  158. data/test/unit/store/tm_store.rb +0 -0
  159. data/test/unit/store/tm_store_lock.rb +7 -6
  160. data/test/unit/tc_field_symbol.rb +26 -0
  161. data/test/unit/ts_analysis.rb +0 -0
  162. data/test/unit/ts_index.rb +0 -0
  163. data/test/unit/ts_store.rb +0 -0
  164. data/test/unit/ts_utils.rb +0 -0
  165. data/test/unit/utils/tc_number_tools.rb +0 -0
  166. data/test/utils/content_generator.rb +226 -0
  167. metadata +262 -221
  168. data/ext/inc/lang.h +0 -48
  169. data/ext/inc/threading.h +0 -31
  170. data/ext/stem_ISO_8859_1_english.c +0 -1156
  171. data/ext/stem_ISO_8859_1_french.c +0 -1276
  172. data/ext/stem_ISO_8859_1_italian.c +0 -1091
  173. data/ext/stem_ISO_8859_1_norwegian.c +0 -296
  174. data/ext/stem_ISO_8859_1_spanish.c +0 -1119
  175. data/ext/stem_ISO_8859_1_swedish.c +0 -307
  176. data/ext/stem_UTF_8_danish.c +0 -344
  177. data/ext/stem_UTF_8_english.c +0 -1176
  178. data/ext/stem_UTF_8_french.c +0 -1296
  179. data/ext/stem_UTF_8_italian.c +0 -1113
  180. data/ext/stem_UTF_8_norwegian.c +0 -302
  181. data/ext/stem_UTF_8_portuguese.c +0 -1055
  182. data/ext/stem_UTF_8_russian.c +0 -709
  183. data/ext/stem_UTF_8_spanish.c +0 -1137
  184. data/ext/stem_UTF_8_swedish.c +0 -313
  185. data/lib/ferret_version.rb +0 -3
@@ -1,1137 +0,0 @@
1
-
2
- /* This file was generated automatically by the Snowball to ANSI C compiler */
3
-
4
- #include "header.h"
5
-
6
- extern int spanish_UTF_8_stem(struct SN_env * z);
7
- static int r_residual_suffix(struct SN_env * z);
8
- static int r_verb_suffix(struct SN_env * z);
9
- static int r_y_verb_suffix(struct SN_env * z);
10
- static int r_standard_suffix(struct SN_env * z);
11
- static int r_attached_pronoun(struct SN_env * z);
12
- static int r_R2(struct SN_env * z);
13
- static int r_R1(struct SN_env * z);
14
- static int r_RV(struct SN_env * z);
15
- static int r_mark_regions(struct SN_env * z);
16
- static int r_postlude(struct SN_env * z);
17
-
18
- extern struct SN_env * spanish_UTF_8_create_env(void);
19
- extern void spanish_UTF_8_close_env(struct SN_env * z);
20
-
21
- static symbol s_0_1[2] = { 0xC3, 0xA1 };
22
- static symbol s_0_2[2] = { 0xC3, 0xA9 };
23
- static symbol s_0_3[2] = { 0xC3, 0xAD };
24
- static symbol s_0_4[2] = { 0xC3, 0xB3 };
25
- static symbol s_0_5[2] = { 0xC3, 0xBA };
26
-
27
- static struct among a_0[6] =
28
- {
29
- /* 0 */ { 0, 0, -1, 6, 0},
30
- /* 1 */ { 2, s_0_1, 0, 1, 0},
31
- /* 2 */ { 2, s_0_2, 0, 2, 0},
32
- /* 3 */ { 2, s_0_3, 0, 3, 0},
33
- /* 4 */ { 2, s_0_4, 0, 4, 0},
34
- /* 5 */ { 2, s_0_5, 0, 5, 0}
35
- };
36
-
37
- static symbol s_1_0[2] = { 'l', 'a' };
38
- static symbol s_1_1[4] = { 's', 'e', 'l', 'a' };
39
- static symbol s_1_2[2] = { 'l', 'e' };
40
- static symbol s_1_3[2] = { 'm', 'e' };
41
- static symbol s_1_4[2] = { 's', 'e' };
42
- static symbol s_1_5[2] = { 'l', 'o' };
43
- static symbol s_1_6[4] = { 's', 'e', 'l', 'o' };
44
- static symbol s_1_7[3] = { 'l', 'a', 's' };
45
- static symbol s_1_8[5] = { 's', 'e', 'l', 'a', 's' };
46
- static symbol s_1_9[3] = { 'l', 'e', 's' };
47
- static symbol s_1_10[3] = { 'l', 'o', 's' };
48
- static symbol s_1_11[5] = { 's', 'e', 'l', 'o', 's' };
49
- static symbol s_1_12[3] = { 'n', 'o', 's' };
50
-
51
- static struct among a_1[13] =
52
- {
53
- /* 0 */ { 2, s_1_0, -1, -1, 0},
54
- /* 1 */ { 4, s_1_1, 0, -1, 0},
55
- /* 2 */ { 2, s_1_2, -1, -1, 0},
56
- /* 3 */ { 2, s_1_3, -1, -1, 0},
57
- /* 4 */ { 2, s_1_4, -1, -1, 0},
58
- /* 5 */ { 2, s_1_5, -1, -1, 0},
59
- /* 6 */ { 4, s_1_6, 5, -1, 0},
60
- /* 7 */ { 3, s_1_7, -1, -1, 0},
61
- /* 8 */ { 5, s_1_8, 7, -1, 0},
62
- /* 9 */ { 3, s_1_9, -1, -1, 0},
63
- /* 10 */ { 3, s_1_10, -1, -1, 0},
64
- /* 11 */ { 5, s_1_11, 10, -1, 0},
65
- /* 12 */ { 3, s_1_12, -1, -1, 0}
66
- };
67
-
68
- static symbol s_2_0[4] = { 'a', 'n', 'd', 'o' };
69
- static symbol s_2_1[5] = { 'i', 'e', 'n', 'd', 'o' };
70
- static symbol s_2_2[5] = { 'y', 'e', 'n', 'd', 'o' };
71
- static symbol s_2_3[5] = { 0xC3, 0xA1, 'n', 'd', 'o' };
72
- static symbol s_2_4[6] = { 'i', 0xC3, 0xA9, 'n', 'd', 'o' };
73
- static symbol s_2_5[2] = { 'a', 'r' };
74
- static symbol s_2_6[2] = { 'e', 'r' };
75
- static symbol s_2_7[2] = { 'i', 'r' };
76
- static symbol s_2_8[3] = { 0xC3, 0xA1, 'r' };
77
- static symbol s_2_9[3] = { 0xC3, 0xA9, 'r' };
78
- static symbol s_2_10[3] = { 0xC3, 0xAD, 'r' };
79
-
80
- static struct among a_2[11] =
81
- {
82
- /* 0 */ { 4, s_2_0, -1, 6, 0},
83
- /* 1 */ { 5, s_2_1, -1, 6, 0},
84
- /* 2 */ { 5, s_2_2, -1, 7, 0},
85
- /* 3 */ { 5, s_2_3, -1, 2, 0},
86
- /* 4 */ { 6, s_2_4, -1, 1, 0},
87
- /* 5 */ { 2, s_2_5, -1, 6, 0},
88
- /* 6 */ { 2, s_2_6, -1, 6, 0},
89
- /* 7 */ { 2, s_2_7, -1, 6, 0},
90
- /* 8 */ { 3, s_2_8, -1, 3, 0},
91
- /* 9 */ { 3, s_2_9, -1, 4, 0},
92
- /* 10 */ { 3, s_2_10, -1, 5, 0}
93
- };
94
-
95
- static symbol s_3_0[2] = { 'i', 'c' };
96
- static symbol s_3_1[2] = { 'a', 'd' };
97
- static symbol s_3_2[2] = { 'o', 's' };
98
- static symbol s_3_3[2] = { 'i', 'v' };
99
-
100
- static struct among a_3[4] =
101
- {
102
- /* 0 */ { 2, s_3_0, -1, -1, 0},
103
- /* 1 */ { 2, s_3_1, -1, -1, 0},
104
- /* 2 */ { 2, s_3_2, -1, -1, 0},
105
- /* 3 */ { 2, s_3_3, -1, 1, 0}
106
- };
107
-
108
- static symbol s_4_0[4] = { 'a', 'b', 'l', 'e' };
109
- static symbol s_4_1[4] = { 'i', 'b', 'l', 'e' };
110
- static symbol s_4_2[4] = { 'a', 'n', 't', 'e' };
111
-
112
- static struct among a_4[3] =
113
- {
114
- /* 0 */ { 4, s_4_0, -1, 1, 0},
115
- /* 1 */ { 4, s_4_1, -1, 1, 0},
116
- /* 2 */ { 4, s_4_2, -1, 1, 0}
117
- };
118
-
119
- static symbol s_5_0[2] = { 'i', 'c' };
120
- static symbol s_5_1[4] = { 'a', 'b', 'i', 'l' };
121
- static symbol s_5_2[2] = { 'i', 'v' };
122
-
123
- static struct among a_5[3] =
124
- {
125
- /* 0 */ { 2, s_5_0, -1, 1, 0},
126
- /* 1 */ { 4, s_5_1, -1, 1, 0},
127
- /* 2 */ { 2, s_5_2, -1, 1, 0}
128
- };
129
-
130
- static symbol s_6_0[3] = { 'i', 'c', 'a' };
131
- static symbol s_6_1[5] = { 'a', 'n', 'c', 'i', 'a' };
132
- static symbol s_6_2[5] = { 'e', 'n', 'c', 'i', 'a' };
133
- static symbol s_6_3[5] = { 'a', 'd', 'o', 'r', 'a' };
134
- static symbol s_6_4[3] = { 'o', 's', 'a' };
135
- static symbol s_6_5[4] = { 'i', 's', 't', 'a' };
136
- static symbol s_6_6[3] = { 'i', 'v', 'a' };
137
- static symbol s_6_7[4] = { 'a', 'n', 'z', 'a' };
138
- static symbol s_6_8[6] = { 'l', 'o', 'g', 0xC3, 0xAD, 'a' };
139
- static symbol s_6_9[4] = { 'i', 'd', 'a', 'd' };
140
- static symbol s_6_10[4] = { 'a', 'b', 'l', 'e' };
141
- static symbol s_6_11[4] = { 'i', 'b', 'l', 'e' };
142
- static symbol s_6_12[4] = { 'a', 'n', 't', 'e' };
143
- static symbol s_6_13[5] = { 'm', 'e', 'n', 't', 'e' };
144
- static symbol s_6_14[6] = { 'a', 'm', 'e', 'n', 't', 'e' };
145
- static symbol s_6_15[6] = { 'a', 'c', 'i', 0xC3, 0xB3, 'n' };
146
- static symbol s_6_16[6] = { 'u', 'c', 'i', 0xC3, 0xB3, 'n' };
147
- static symbol s_6_17[3] = { 'i', 'c', 'o' };
148
- static symbol s_6_18[4] = { 'i', 's', 'm', 'o' };
149
- static symbol s_6_19[3] = { 'o', 's', 'o' };
150
- static symbol s_6_20[7] = { 'a', 'm', 'i', 'e', 'n', 't', 'o' };
151
- static symbol s_6_21[7] = { 'i', 'm', 'i', 'e', 'n', 't', 'o' };
152
- static symbol s_6_22[3] = { 'i', 'v', 'o' };
153
- static symbol s_6_23[4] = { 'a', 'd', 'o', 'r' };
154
- static symbol s_6_24[4] = { 'i', 'c', 'a', 's' };
155
- static symbol s_6_25[6] = { 'a', 'n', 'c', 'i', 'a', 's' };
156
- static symbol s_6_26[6] = { 'e', 'n', 'c', 'i', 'a', 's' };
157
- static symbol s_6_27[6] = { 'a', 'd', 'o', 'r', 'a', 's' };
158
- static symbol s_6_28[4] = { 'o', 's', 'a', 's' };
159
- static symbol s_6_29[5] = { 'i', 's', 't', 'a', 's' };
160
- static symbol s_6_30[4] = { 'i', 'v', 'a', 's' };
161
- static symbol s_6_31[5] = { 'a', 'n', 'z', 'a', 's' };
162
- static symbol s_6_32[7] = { 'l', 'o', 'g', 0xC3, 0xAD, 'a', 's' };
163
- static symbol s_6_33[6] = { 'i', 'd', 'a', 'd', 'e', 's' };
164
- static symbol s_6_34[5] = { 'a', 'b', 'l', 'e', 's' };
165
- static symbol s_6_35[5] = { 'i', 'b', 'l', 'e', 's' };
166
- static symbol s_6_36[7] = { 'a', 'c', 'i', 'o', 'n', 'e', 's' };
167
- static symbol s_6_37[7] = { 'u', 'c', 'i', 'o', 'n', 'e', 's' };
168
- static symbol s_6_38[6] = { 'a', 'd', 'o', 'r', 'e', 's' };
169
- static symbol s_6_39[5] = { 'a', 'n', 't', 'e', 's' };
170
- static symbol s_6_40[4] = { 'i', 'c', 'o', 's' };
171
- static symbol s_6_41[5] = { 'i', 's', 'm', 'o', 's' };
172
- static symbol s_6_42[4] = { 'o', 's', 'o', 's' };
173
- static symbol s_6_43[8] = { 'a', 'm', 'i', 'e', 'n', 't', 'o', 's' };
174
- static symbol s_6_44[8] = { 'i', 'm', 'i', 'e', 'n', 't', 'o', 's' };
175
- static symbol s_6_45[4] = { 'i', 'v', 'o', 's' };
176
-
177
- static struct among a_6[46] =
178
- {
179
- /* 0 */ { 3, s_6_0, -1, 1, 0},
180
- /* 1 */ { 5, s_6_1, -1, 2, 0},
181
- /* 2 */ { 5, s_6_2, -1, 5, 0},
182
- /* 3 */ { 5, s_6_3, -1, 2, 0},
183
- /* 4 */ { 3, s_6_4, -1, 1, 0},
184
- /* 5 */ { 4, s_6_5, -1, 1, 0},
185
- /* 6 */ { 3, s_6_6, -1, 9, 0},
186
- /* 7 */ { 4, s_6_7, -1, 1, 0},
187
- /* 8 */ { 6, s_6_8, -1, 3, 0},
188
- /* 9 */ { 4, s_6_9, -1, 8, 0},
189
- /* 10 */ { 4, s_6_10, -1, 1, 0},
190
- /* 11 */ { 4, s_6_11, -1, 1, 0},
191
- /* 12 */ { 4, s_6_12, -1, 2, 0},
192
- /* 13 */ { 5, s_6_13, -1, 7, 0},
193
- /* 14 */ { 6, s_6_14, 13, 6, 0},
194
- /* 15 */ { 6, s_6_15, -1, 2, 0},
195
- /* 16 */ { 6, s_6_16, -1, 4, 0},
196
- /* 17 */ { 3, s_6_17, -1, 1, 0},
197
- /* 18 */ { 4, s_6_18, -1, 1, 0},
198
- /* 19 */ { 3, s_6_19, -1, 1, 0},
199
- /* 20 */ { 7, s_6_20, -1, 1, 0},
200
- /* 21 */ { 7, s_6_21, -1, 1, 0},
201
- /* 22 */ { 3, s_6_22, -1, 9, 0},
202
- /* 23 */ { 4, s_6_23, -1, 2, 0},
203
- /* 24 */ { 4, s_6_24, -1, 1, 0},
204
- /* 25 */ { 6, s_6_25, -1, 2, 0},
205
- /* 26 */ { 6, s_6_26, -1, 5, 0},
206
- /* 27 */ { 6, s_6_27, -1, 2, 0},
207
- /* 28 */ { 4, s_6_28, -1, 1, 0},
208
- /* 29 */ { 5, s_6_29, -1, 1, 0},
209
- /* 30 */ { 4, s_6_30, -1, 9, 0},
210
- /* 31 */ { 5, s_6_31, -1, 1, 0},
211
- /* 32 */ { 7, s_6_32, -1, 3, 0},
212
- /* 33 */ { 6, s_6_33, -1, 8, 0},
213
- /* 34 */ { 5, s_6_34, -1, 1, 0},
214
- /* 35 */ { 5, s_6_35, -1, 1, 0},
215
- /* 36 */ { 7, s_6_36, -1, 2, 0},
216
- /* 37 */ { 7, s_6_37, -1, 4, 0},
217
- /* 38 */ { 6, s_6_38, -1, 2, 0},
218
- /* 39 */ { 5, s_6_39, -1, 2, 0},
219
- /* 40 */ { 4, s_6_40, -1, 1, 0},
220
- /* 41 */ { 5, s_6_41, -1, 1, 0},
221
- /* 42 */ { 4, s_6_42, -1, 1, 0},
222
- /* 43 */ { 8, s_6_43, -1, 1, 0},
223
- /* 44 */ { 8, s_6_44, -1, 1, 0},
224
- /* 45 */ { 4, s_6_45, -1, 9, 0}
225
- };
226
-
227
- static symbol s_7_0[2] = { 'y', 'a' };
228
- static symbol s_7_1[2] = { 'y', 'e' };
229
- static symbol s_7_2[3] = { 'y', 'a', 'n' };
230
- static symbol s_7_3[3] = { 'y', 'e', 'n' };
231
- static symbol s_7_4[5] = { 'y', 'e', 'r', 'o', 'n' };
232
- static symbol s_7_5[5] = { 'y', 'e', 'n', 'd', 'o' };
233
- static symbol s_7_6[2] = { 'y', 'o' };
234
- static symbol s_7_7[3] = { 'y', 'a', 's' };
235
- static symbol s_7_8[3] = { 'y', 'e', 's' };
236
- static symbol s_7_9[4] = { 'y', 'a', 'i', 's' };
237
- static symbol s_7_10[5] = { 'y', 'a', 'm', 'o', 's' };
238
- static symbol s_7_11[3] = { 'y', 0xC3, 0xB3 };
239
-
240
- static struct among a_7[12] =
241
- {
242
- /* 0 */ { 2, s_7_0, -1, 1, 0},
243
- /* 1 */ { 2, s_7_1, -1, 1, 0},
244
- /* 2 */ { 3, s_7_2, -1, 1, 0},
245
- /* 3 */ { 3, s_7_3, -1, 1, 0},
246
- /* 4 */ { 5, s_7_4, -1, 1, 0},
247
- /* 5 */ { 5, s_7_5, -1, 1, 0},
248
- /* 6 */ { 2, s_7_6, -1, 1, 0},
249
- /* 7 */ { 3, s_7_7, -1, 1, 0},
250
- /* 8 */ { 3, s_7_8, -1, 1, 0},
251
- /* 9 */ { 4, s_7_9, -1, 1, 0},
252
- /* 10 */ { 5, s_7_10, -1, 1, 0},
253
- /* 11 */ { 3, s_7_11, -1, 1, 0}
254
- };
255
-
256
- static symbol s_8_0[3] = { 'a', 'b', 'a' };
257
- static symbol s_8_1[3] = { 'a', 'd', 'a' };
258
- static symbol s_8_2[3] = { 'i', 'd', 'a' };
259
- static symbol s_8_3[3] = { 'a', 'r', 'a' };
260
- static symbol s_8_4[4] = { 'i', 'e', 'r', 'a' };
261
- static symbol s_8_5[3] = { 0xC3, 0xAD, 'a' };
262
- static symbol s_8_6[5] = { 'a', 'r', 0xC3, 0xAD, 'a' };
263
- static symbol s_8_7[5] = { 'e', 'r', 0xC3, 0xAD, 'a' };
264
- static symbol s_8_8[5] = { 'i', 'r', 0xC3, 0xAD, 'a' };
265
- static symbol s_8_9[2] = { 'a', 'd' };
266
- static symbol s_8_10[2] = { 'e', 'd' };
267
- static symbol s_8_11[2] = { 'i', 'd' };
268
- static symbol s_8_12[3] = { 'a', 's', 'e' };
269
- static symbol s_8_13[4] = { 'i', 'e', 's', 'e' };
270
- static symbol s_8_14[4] = { 'a', 's', 't', 'e' };
271
- static symbol s_8_15[4] = { 'i', 's', 't', 'e' };
272
- static symbol s_8_16[2] = { 'a', 'n' };
273
- static symbol s_8_17[4] = { 'a', 'b', 'a', 'n' };
274
- static symbol s_8_18[4] = { 'a', 'r', 'a', 'n' };
275
- static symbol s_8_19[5] = { 'i', 'e', 'r', 'a', 'n' };
276
- static symbol s_8_20[4] = { 0xC3, 0xAD, 'a', 'n' };
277
- static symbol s_8_21[6] = { 'a', 'r', 0xC3, 0xAD, 'a', 'n' };
278
- static symbol s_8_22[6] = { 'e', 'r', 0xC3, 0xAD, 'a', 'n' };
279
- static symbol s_8_23[6] = { 'i', 'r', 0xC3, 0xAD, 'a', 'n' };
280
- static symbol s_8_24[2] = { 'e', 'n' };
281
- static symbol s_8_25[4] = { 'a', 's', 'e', 'n' };
282
- static symbol s_8_26[5] = { 'i', 'e', 's', 'e', 'n' };
283
- static symbol s_8_27[4] = { 'a', 'r', 'o', 'n' };
284
- static symbol s_8_28[5] = { 'i', 'e', 'r', 'o', 'n' };
285
- static symbol s_8_29[5] = { 'a', 'r', 0xC3, 0xA1, 'n' };
286
- static symbol s_8_30[5] = { 'e', 'r', 0xC3, 0xA1, 'n' };
287
- static symbol s_8_31[5] = { 'i', 'r', 0xC3, 0xA1, 'n' };
288
- static symbol s_8_32[3] = { 'a', 'd', 'o' };
289
- static symbol s_8_33[3] = { 'i', 'd', 'o' };
290
- static symbol s_8_34[4] = { 'a', 'n', 'd', 'o' };
291
- static symbol s_8_35[5] = { 'i', 'e', 'n', 'd', 'o' };
292
- static symbol s_8_36[2] = { 'a', 'r' };
293
- static symbol s_8_37[2] = { 'e', 'r' };
294
- static symbol s_8_38[2] = { 'i', 'r' };
295
- static symbol s_8_39[2] = { 'a', 's' };
296
- static symbol s_8_40[4] = { 'a', 'b', 'a', 's' };
297
- static symbol s_8_41[4] = { 'a', 'd', 'a', 's' };
298
- static symbol s_8_42[4] = { 'i', 'd', 'a', 's' };
299
- static symbol s_8_43[4] = { 'a', 'r', 'a', 's' };
300
- static symbol s_8_44[5] = { 'i', 'e', 'r', 'a', 's' };
301
- static symbol s_8_45[4] = { 0xC3, 0xAD, 'a', 's' };
302
- static symbol s_8_46[6] = { 'a', 'r', 0xC3, 0xAD, 'a', 's' };
303
- static symbol s_8_47[6] = { 'e', 'r', 0xC3, 0xAD, 'a', 's' };
304
- static symbol s_8_48[6] = { 'i', 'r', 0xC3, 0xAD, 'a', 's' };
305
- static symbol s_8_49[2] = { 'e', 's' };
306
- static symbol s_8_50[4] = { 'a', 's', 'e', 's' };
307
- static symbol s_8_51[5] = { 'i', 'e', 's', 'e', 's' };
308
- static symbol s_8_52[5] = { 'a', 'b', 'a', 'i', 's' };
309
- static symbol s_8_53[5] = { 'a', 'r', 'a', 'i', 's' };
310
- static symbol s_8_54[6] = { 'i', 'e', 'r', 'a', 'i', 's' };
311
- static symbol s_8_55[5] = { 0xC3, 0xAD, 'a', 'i', 's' };
312
- static symbol s_8_56[7] = { 'a', 'r', 0xC3, 0xAD, 'a', 'i', 's' };
313
- static symbol s_8_57[7] = { 'e', 'r', 0xC3, 0xAD, 'a', 'i', 's' };
314
- static symbol s_8_58[7] = { 'i', 'r', 0xC3, 0xAD, 'a', 'i', 's' };
315
- static symbol s_8_59[5] = { 'a', 's', 'e', 'i', 's' };
316
- static symbol s_8_60[6] = { 'i', 'e', 's', 'e', 'i', 's' };
317
- static symbol s_8_61[6] = { 'a', 's', 't', 'e', 'i', 's' };
318
- static symbol s_8_62[6] = { 'i', 's', 't', 'e', 'i', 's' };
319
- static symbol s_8_63[4] = { 0xC3, 0xA1, 'i', 's' };
320
- static symbol s_8_64[4] = { 0xC3, 0xA9, 'i', 's' };
321
- static symbol s_8_65[6] = { 'a', 'r', 0xC3, 0xA9, 'i', 's' };
322
- static symbol s_8_66[6] = { 'e', 'r', 0xC3, 0xA9, 'i', 's' };
323
- static symbol s_8_67[6] = { 'i', 'r', 0xC3, 0xA9, 'i', 's' };
324
- static symbol s_8_68[4] = { 'a', 'd', 'o', 's' };
325
- static symbol s_8_69[4] = { 'i', 'd', 'o', 's' };
326
- static symbol s_8_70[4] = { 'a', 'm', 'o', 's' };
327
- static symbol s_8_71[7] = { 0xC3, 0xA1, 'b', 'a', 'm', 'o', 's' };
328
- static symbol s_8_72[7] = { 0xC3, 0xA1, 'r', 'a', 'm', 'o', 's' };
329
- static symbol s_8_73[8] = { 'i', 0xC3, 0xA9, 'r', 'a', 'm', 'o', 's' };
330
- static symbol s_8_74[6] = { 0xC3, 0xAD, 'a', 'm', 'o', 's' };
331
- static symbol s_8_75[8] = { 'a', 'r', 0xC3, 0xAD, 'a', 'm', 'o', 's' };
332
- static symbol s_8_76[8] = { 'e', 'r', 0xC3, 0xAD, 'a', 'm', 'o', 's' };
333
- static symbol s_8_77[8] = { 'i', 'r', 0xC3, 0xAD, 'a', 'm', 'o', 's' };
334
- static symbol s_8_78[4] = { 'e', 'm', 'o', 's' };
335
- static symbol s_8_79[6] = { 'a', 'r', 'e', 'm', 'o', 's' };
336
- static symbol s_8_80[6] = { 'e', 'r', 'e', 'm', 'o', 's' };
337
- static symbol s_8_81[6] = { 'i', 'r', 'e', 'm', 'o', 's' };
338
- static symbol s_8_82[7] = { 0xC3, 0xA1, 's', 'e', 'm', 'o', 's' };
339
- static symbol s_8_83[8] = { 'i', 0xC3, 0xA9, 's', 'e', 'm', 'o', 's' };
340
- static symbol s_8_84[4] = { 'i', 'm', 'o', 's' };
341
- static symbol s_8_85[5] = { 'a', 'r', 0xC3, 0xA1, 's' };
342
- static symbol s_8_86[5] = { 'e', 'r', 0xC3, 0xA1, 's' };
343
- static symbol s_8_87[5] = { 'i', 'r', 0xC3, 0xA1, 's' };
344
- static symbol s_8_88[3] = { 0xC3, 0xAD, 's' };
345
- static symbol s_8_89[4] = { 'a', 'r', 0xC3, 0xA1 };
346
- static symbol s_8_90[4] = { 'e', 'r', 0xC3, 0xA1 };
347
- static symbol s_8_91[4] = { 'i', 'r', 0xC3, 0xA1 };
348
- static symbol s_8_92[4] = { 'a', 'r', 0xC3, 0xA9 };
349
- static symbol s_8_93[4] = { 'e', 'r', 0xC3, 0xA9 };
350
- static symbol s_8_94[4] = { 'i', 'r', 0xC3, 0xA9 };
351
- static symbol s_8_95[3] = { 'i', 0xC3, 0xB3 };
352
-
353
- static struct among a_8[96] =
354
- {
355
- /* 0 */ { 3, s_8_0, -1, 2, 0},
356
- /* 1 */ { 3, s_8_1, -1, 2, 0},
357
- /* 2 */ { 3, s_8_2, -1, 2, 0},
358
- /* 3 */ { 3, s_8_3, -1, 2, 0},
359
- /* 4 */ { 4, s_8_4, -1, 2, 0},
360
- /* 5 */ { 3, s_8_5, -1, 2, 0},
361
- /* 6 */ { 5, s_8_6, 5, 2, 0},
362
- /* 7 */ { 5, s_8_7, 5, 2, 0},
363
- /* 8 */ { 5, s_8_8, 5, 2, 0},
364
- /* 9 */ { 2, s_8_9, -1, 2, 0},
365
- /* 10 */ { 2, s_8_10, -1, 2, 0},
366
- /* 11 */ { 2, s_8_11, -1, 2, 0},
367
- /* 12 */ { 3, s_8_12, -1, 2, 0},
368
- /* 13 */ { 4, s_8_13, -1, 2, 0},
369
- /* 14 */ { 4, s_8_14, -1, 2, 0},
370
- /* 15 */ { 4, s_8_15, -1, 2, 0},
371
- /* 16 */ { 2, s_8_16, -1, 2, 0},
372
- /* 17 */ { 4, s_8_17, 16, 2, 0},
373
- /* 18 */ { 4, s_8_18, 16, 2, 0},
374
- /* 19 */ { 5, s_8_19, 16, 2, 0},
375
- /* 20 */ { 4, s_8_20, 16, 2, 0},
376
- /* 21 */ { 6, s_8_21, 20, 2, 0},
377
- /* 22 */ { 6, s_8_22, 20, 2, 0},
378
- /* 23 */ { 6, s_8_23, 20, 2, 0},
379
- /* 24 */ { 2, s_8_24, -1, 1, 0},
380
- /* 25 */ { 4, s_8_25, 24, 2, 0},
381
- /* 26 */ { 5, s_8_26, 24, 2, 0},
382
- /* 27 */ { 4, s_8_27, -1, 2, 0},
383
- /* 28 */ { 5, s_8_28, -1, 2, 0},
384
- /* 29 */ { 5, s_8_29, -1, 2, 0},
385
- /* 30 */ { 5, s_8_30, -1, 2, 0},
386
- /* 31 */ { 5, s_8_31, -1, 2, 0},
387
- /* 32 */ { 3, s_8_32, -1, 2, 0},
388
- /* 33 */ { 3, s_8_33, -1, 2, 0},
389
- /* 34 */ { 4, s_8_34, -1, 2, 0},
390
- /* 35 */ { 5, s_8_35, -1, 2, 0},
391
- /* 36 */ { 2, s_8_36, -1, 2, 0},
392
- /* 37 */ { 2, s_8_37, -1, 2, 0},
393
- /* 38 */ { 2, s_8_38, -1, 2, 0},
394
- /* 39 */ { 2, s_8_39, -1, 2, 0},
395
- /* 40 */ { 4, s_8_40, 39, 2, 0},
396
- /* 41 */ { 4, s_8_41, 39, 2, 0},
397
- /* 42 */ { 4, s_8_42, 39, 2, 0},
398
- /* 43 */ { 4, s_8_43, 39, 2, 0},
399
- /* 44 */ { 5, s_8_44, 39, 2, 0},
400
- /* 45 */ { 4, s_8_45, 39, 2, 0},
401
- /* 46 */ { 6, s_8_46, 45, 2, 0},
402
- /* 47 */ { 6, s_8_47, 45, 2, 0},
403
- /* 48 */ { 6, s_8_48, 45, 2, 0},
404
- /* 49 */ { 2, s_8_49, -1, 1, 0},
405
- /* 50 */ { 4, s_8_50, 49, 2, 0},
406
- /* 51 */ { 5, s_8_51, 49, 2, 0},
407
- /* 52 */ { 5, s_8_52, -1, 2, 0},
408
- /* 53 */ { 5, s_8_53, -1, 2, 0},
409
- /* 54 */ { 6, s_8_54, -1, 2, 0},
410
- /* 55 */ { 5, s_8_55, -1, 2, 0},
411
- /* 56 */ { 7, s_8_56, 55, 2, 0},
412
- /* 57 */ { 7, s_8_57, 55, 2, 0},
413
- /* 58 */ { 7, s_8_58, 55, 2, 0},
414
- /* 59 */ { 5, s_8_59, -1, 2, 0},
415
- /* 60 */ { 6, s_8_60, -1, 2, 0},
416
- /* 61 */ { 6, s_8_61, -1, 2, 0},
417
- /* 62 */ { 6, s_8_62, -1, 2, 0},
418
- /* 63 */ { 4, s_8_63, -1, 2, 0},
419
- /* 64 */ { 4, s_8_64, -1, 1, 0},
420
- /* 65 */ { 6, s_8_65, 64, 2, 0},
421
- /* 66 */ { 6, s_8_66, 64, 2, 0},
422
- /* 67 */ { 6, s_8_67, 64, 2, 0},
423
- /* 68 */ { 4, s_8_68, -1, 2, 0},
424
- /* 69 */ { 4, s_8_69, -1, 2, 0},
425
- /* 70 */ { 4, s_8_70, -1, 2, 0},
426
- /* 71 */ { 7, s_8_71, 70, 2, 0},
427
- /* 72 */ { 7, s_8_72, 70, 2, 0},
428
- /* 73 */ { 8, s_8_73, 70, 2, 0},
429
- /* 74 */ { 6, s_8_74, 70, 2, 0},
430
- /* 75 */ { 8, s_8_75, 74, 2, 0},
431
- /* 76 */ { 8, s_8_76, 74, 2, 0},
432
- /* 77 */ { 8, s_8_77, 74, 2, 0},
433
- /* 78 */ { 4, s_8_78, -1, 1, 0},
434
- /* 79 */ { 6, s_8_79, 78, 2, 0},
435
- /* 80 */ { 6, s_8_80, 78, 2, 0},
436
- /* 81 */ { 6, s_8_81, 78, 2, 0},
437
- /* 82 */ { 7, s_8_82, 78, 2, 0},
438
- /* 83 */ { 8, s_8_83, 78, 2, 0},
439
- /* 84 */ { 4, s_8_84, -1, 2, 0},
440
- /* 85 */ { 5, s_8_85, -1, 2, 0},
441
- /* 86 */ { 5, s_8_86, -1, 2, 0},
442
- /* 87 */ { 5, s_8_87, -1, 2, 0},
443
- /* 88 */ { 3, s_8_88, -1, 2, 0},
444
- /* 89 */ { 4, s_8_89, -1, 2, 0},
445
- /* 90 */ { 4, s_8_90, -1, 2, 0},
446
- /* 91 */ { 4, s_8_91, -1, 2, 0},
447
- /* 92 */ { 4, s_8_92, -1, 2, 0},
448
- /* 93 */ { 4, s_8_93, -1, 2, 0},
449
- /* 94 */ { 4, s_8_94, -1, 2, 0},
450
- /* 95 */ { 3, s_8_95, -1, 2, 0}
451
- };
452
-
453
- static symbol s_9_0[1] = { 'a' };
454
- static symbol s_9_1[1] = { 'e' };
455
- static symbol s_9_2[1] = { 'o' };
456
- static symbol s_9_3[2] = { 'o', 's' };
457
- static symbol s_9_4[2] = { 0xC3, 0xA1 };
458
- static symbol s_9_5[2] = { 0xC3, 0xA9 };
459
- static symbol s_9_6[2] = { 0xC3, 0xAD };
460
- static symbol s_9_7[2] = { 0xC3, 0xB3 };
461
-
462
- static struct among a_9[8] =
463
- {
464
- /* 0 */ { 1, s_9_0, -1, 1, 0},
465
- /* 1 */ { 1, s_9_1, -1, 2, 0},
466
- /* 2 */ { 1, s_9_2, -1, 1, 0},
467
- /* 3 */ { 2, s_9_3, -1, 1, 0},
468
- /* 4 */ { 2, s_9_4, -1, 1, 0},
469
- /* 5 */ { 2, s_9_5, -1, 2, 0},
470
- /* 6 */ { 2, s_9_6, -1, 1, 0},
471
- /* 7 */ { 2, s_9_7, -1, 1, 0}
472
- };
473
-
474
- static unsigned char g_v[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 17, 4, 10 };
475
-
476
- static symbol s_0[] = { 'a' };
477
- static symbol s_1[] = { 'e' };
478
- static symbol s_2[] = { 'i' };
479
- static symbol s_3[] = { 'o' };
480
- static symbol s_4[] = { 'u' };
481
- static symbol s_5[] = { 'i', 'e', 'n', 'd', 'o' };
482
- static symbol s_6[] = { 'a', 'n', 'd', 'o' };
483
- static symbol s_7[] = { 'a', 'r' };
484
- static symbol s_8[] = { 'e', 'r' };
485
- static symbol s_9[] = { 'i', 'r' };
486
- static symbol s_10[] = { 'u' };
487
- static symbol s_11[] = { 'i', 'c' };
488
- static symbol s_12[] = { 'l', 'o', 'g' };
489
- static symbol s_13[] = { 'u' };
490
- static symbol s_14[] = { 'e', 'n', 't', 'e' };
491
- static symbol s_15[] = { 'a', 't' };
492
- static symbol s_16[] = { 'a', 't' };
493
- static symbol s_17[] = { 'u' };
494
- static symbol s_18[] = { 'u' };
495
- static symbol s_19[] = { 'g' };
496
- static symbol s_20[] = { 'u' };
497
- static symbol s_21[] = { 'g' };
498
-
499
- static int r_mark_regions(struct SN_env * z) {
500
- z->I[0] = z->l;
501
- z->I[1] = z->l;
502
- z->I[2] = z->l;
503
- { int c = z->c; /* do, line 37 */
504
- { int c = z->c; /* or, line 39 */
505
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab2;
506
- { int c = z->c; /* or, line 38 */
507
- if (!(out_grouping_U(z, g_v, 97, 252))) goto lab4;
508
- while(1) { /* gopast, line 38 */
509
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab5;
510
- break;
511
- lab5:
512
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
513
- if (c < 0) goto lab4;
514
- z->c = c; /* gopast, line 38 */
515
- }
516
- }
517
- goto lab3;
518
- lab4:
519
- z->c = c;
520
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab2;
521
- while(1) { /* gopast, line 38 */
522
- if (!(out_grouping_U(z, g_v, 97, 252))) goto lab6;
523
- break;
524
- lab6:
525
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
526
- if (c < 0) goto lab2;
527
- z->c = c; /* gopast, line 38 */
528
- }
529
- }
530
- }
531
- lab3:
532
- goto lab1;
533
- lab2:
534
- z->c = c;
535
- if (!(out_grouping_U(z, g_v, 97, 252))) goto lab0;
536
- { int c = z->c; /* or, line 40 */
537
- if (!(out_grouping_U(z, g_v, 97, 252))) goto lab8;
538
- while(1) { /* gopast, line 40 */
539
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab9;
540
- break;
541
- lab9:
542
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
543
- if (c < 0) goto lab8;
544
- z->c = c; /* gopast, line 40 */
545
- }
546
- }
547
- goto lab7;
548
- lab8:
549
- z->c = c;
550
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab0;
551
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
552
- if (c < 0) goto lab0;
553
- z->c = c; /* next, line 40 */
554
- }
555
- }
556
- lab7:
557
- ;
558
- }
559
- lab1:
560
- z->I[0] = z->c; /* setmark pV, line 41 */
561
- lab0:
562
- z->c = c;
563
- }
564
- { int c = z->c; /* do, line 43 */
565
- while(1) { /* gopast, line 44 */
566
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab11;
567
- break;
568
- lab11:
569
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
570
- if (c < 0) goto lab10;
571
- z->c = c; /* gopast, line 44 */
572
- }
573
- }
574
- while(1) { /* gopast, line 44 */
575
- if (!(out_grouping_U(z, g_v, 97, 252))) goto lab12;
576
- break;
577
- lab12:
578
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
579
- if (c < 0) goto lab10;
580
- z->c = c; /* gopast, line 44 */
581
- }
582
- }
583
- z->I[1] = z->c; /* setmark p1, line 44 */
584
- while(1) { /* gopast, line 45 */
585
- if (!(in_grouping_U(z, g_v, 97, 252))) goto lab13;
586
- break;
587
- lab13:
588
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
589
- if (c < 0) goto lab10;
590
- z->c = c; /* gopast, line 45 */
591
- }
592
- }
593
- while(1) { /* gopast, line 45 */
594
- if (!(out_grouping_U(z, g_v, 97, 252))) goto lab14;
595
- break;
596
- lab14:
597
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
598
- if (c < 0) goto lab10;
599
- z->c = c; /* gopast, line 45 */
600
- }
601
- }
602
- z->I[2] = z->c; /* setmark p2, line 45 */
603
- lab10:
604
- z->c = c;
605
- }
606
- return 1;
607
- }
608
-
609
- static int r_postlude(struct SN_env * z) {
610
- int among_var;
611
- while(1) { /* repeat, line 49 */
612
- int c = z->c;
613
- z->bra = z->c; /* [, line 50 */
614
- among_var = find_among(z, a_0, 6); /* substring, line 50 */
615
- if (!(among_var)) goto lab0;
616
- z->ket = z->c; /* ], line 50 */
617
- switch(among_var) {
618
- case 0: goto lab0;
619
- case 1:
620
- { int ret;
621
- ret = slice_from_s(z, 1, s_0); /* <-, line 51 */
622
- if (ret < 0) return ret;
623
- }
624
- break;
625
- case 2:
626
- { int ret;
627
- ret = slice_from_s(z, 1, s_1); /* <-, line 52 */
628
- if (ret < 0) return ret;
629
- }
630
- break;
631
- case 3:
632
- { int ret;
633
- ret = slice_from_s(z, 1, s_2); /* <-, line 53 */
634
- if (ret < 0) return ret;
635
- }
636
- break;
637
- case 4:
638
- { int ret;
639
- ret = slice_from_s(z, 1, s_3); /* <-, line 54 */
640
- if (ret < 0) return ret;
641
- }
642
- break;
643
- case 5:
644
- { int ret;
645
- ret = slice_from_s(z, 1, s_4); /* <-, line 55 */
646
- if (ret < 0) return ret;
647
- }
648
- break;
649
- case 6:
650
- { int c = skip_utf8(z->p, z->c, 0, z->l, 1);
651
- if (c < 0) goto lab0;
652
- z->c = c; /* next, line 57 */
653
- }
654
- break;
655
- }
656
- continue;
657
- lab0:
658
- z->c = c;
659
- break;
660
- }
661
- return 1;
662
- }
663
-
664
- static int r_RV(struct SN_env * z) {
665
- if (!(z->I[0] <= z->c)) return 0;
666
- return 1;
667
- }
668
-
669
- static int r_R1(struct SN_env * z) {
670
- if (!(z->I[1] <= z->c)) return 0;
671
- return 1;
672
- }
673
-
674
- static int r_R2(struct SN_env * z) {
675
- if (!(z->I[2] <= z->c)) return 0;
676
- return 1;
677
- }
678
-
679
- static int r_attached_pronoun(struct SN_env * z) {
680
- int among_var;
681
- z->ket = z->c; /* [, line 68 */
682
- if (!(find_among_b(z, a_1, 13))) return 0; /* substring, line 68 */
683
- z->bra = z->c; /* ], line 68 */
684
- among_var = find_among_b(z, a_2, 11); /* substring, line 72 */
685
- if (!(among_var)) return 0;
686
- { int ret = r_RV(z);
687
- if (ret == 0) return 0; /* call RV, line 72 */
688
- if (ret < 0) return ret;
689
- }
690
- switch(among_var) {
691
- case 0: return 0;
692
- case 1:
693
- z->bra = z->c; /* ], line 73 */
694
- { int ret;
695
- ret = slice_from_s(z, 5, s_5); /* <-, line 73 */
696
- if (ret < 0) return ret;
697
- }
698
- break;
699
- case 2:
700
- z->bra = z->c; /* ], line 74 */
701
- { int ret;
702
- ret = slice_from_s(z, 4, s_6); /* <-, line 74 */
703
- if (ret < 0) return ret;
704
- }
705
- break;
706
- case 3:
707
- z->bra = z->c; /* ], line 75 */
708
- { int ret;
709
- ret = slice_from_s(z, 2, s_7); /* <-, line 75 */
710
- if (ret < 0) return ret;
711
- }
712
- break;
713
- case 4:
714
- z->bra = z->c; /* ], line 76 */
715
- { int ret;
716
- ret = slice_from_s(z, 2, s_8); /* <-, line 76 */
717
- if (ret < 0) return ret;
718
- }
719
- break;
720
- case 5:
721
- z->bra = z->c; /* ], line 77 */
722
- { int ret;
723
- ret = slice_from_s(z, 2, s_9); /* <-, line 77 */
724
- if (ret < 0) return ret;
725
- }
726
- break;
727
- case 6:
728
- { int ret;
729
- ret = slice_del(z); /* delete, line 81 */
730
- if (ret < 0) return ret;
731
- }
732
- break;
733
- case 7:
734
- if (!(eq_s_b(z, 1, s_10))) return 0;
735
- { int ret;
736
- ret = slice_del(z); /* delete, line 82 */
737
- if (ret < 0) return ret;
738
- }
739
- break;
740
- }
741
- return 1;
742
- }
743
-
744
- static int r_standard_suffix(struct SN_env * z) {
745
- int among_var;
746
- z->ket = z->c; /* [, line 87 */
747
- among_var = find_among_b(z, a_6, 46); /* substring, line 87 */
748
- if (!(among_var)) return 0;
749
- z->bra = z->c; /* ], line 87 */
750
- switch(among_var) {
751
- case 0: return 0;
752
- case 1:
753
- { int ret = r_R2(z);
754
- if (ret == 0) return 0; /* call R2, line 99 */
755
- if (ret < 0) return ret;
756
- }
757
- { int ret;
758
- ret = slice_del(z); /* delete, line 99 */
759
- if (ret < 0) return ret;
760
- }
761
- break;
762
- case 2:
763
- { int ret = r_R2(z);
764
- if (ret == 0) return 0; /* call R2, line 105 */
765
- if (ret < 0) return ret;
766
- }
767
- { int ret;
768
- ret = slice_del(z); /* delete, line 105 */
769
- if (ret < 0) return ret;
770
- }
771
- { int m = z->l - z->c; (void) m; /* try, line 106 */
772
- z->ket = z->c; /* [, line 106 */
773
- if (!(eq_s_b(z, 2, s_11))) { z->c = z->l - m; goto lab0; }
774
- z->bra = z->c; /* ], line 106 */
775
- { int ret = r_R2(z);
776
- if (ret == 0) { z->c = z->l - m; goto lab0; } /* call R2, line 106 */
777
- if (ret < 0) return ret;
778
- }
779
- { int ret;
780
- ret = slice_del(z); /* delete, line 106 */
781
- if (ret < 0) return ret;
782
- }
783
- lab0:
784
- ;
785
- }
786
- break;
787
- case 3:
788
- { int ret = r_R2(z);
789
- if (ret == 0) return 0; /* call R2, line 111 */
790
- if (ret < 0) return ret;
791
- }
792
- { int ret;
793
- ret = slice_from_s(z, 3, s_12); /* <-, line 111 */
794
- if (ret < 0) return ret;
795
- }
796
- break;
797
- case 4:
798
- { int ret = r_R2(z);
799
- if (ret == 0) return 0; /* call R2, line 115 */
800
- if (ret < 0) return ret;
801
- }
802
- { int ret;
803
- ret = slice_from_s(z, 1, s_13); /* <-, line 115 */
804
- if (ret < 0) return ret;
805
- }
806
- break;
807
- case 5:
808
- { int ret = r_R2(z);
809
- if (ret == 0) return 0; /* call R2, line 119 */
810
- if (ret < 0) return ret;
811
- }
812
- { int ret;
813
- ret = slice_from_s(z, 4, s_14); /* <-, line 119 */
814
- if (ret < 0) return ret;
815
- }
816
- break;
817
- case 6:
818
- { int ret = r_R1(z);
819
- if (ret == 0) return 0; /* call R1, line 123 */
820
- if (ret < 0) return ret;
821
- }
822
- { int ret;
823
- ret = slice_del(z); /* delete, line 123 */
824
- if (ret < 0) return ret;
825
- }
826
- { int m = z->l - z->c; (void) m; /* try, line 124 */
827
- z->ket = z->c; /* [, line 125 */
828
- among_var = find_among_b(z, a_3, 4); /* substring, line 125 */
829
- if (!(among_var)) { z->c = z->l - m; goto lab1; }
830
- z->bra = z->c; /* ], line 125 */
831
- { int ret = r_R2(z);
832
- if (ret == 0) { z->c = z->l - m; goto lab1; } /* call R2, line 125 */
833
- if (ret < 0) return ret;
834
- }
835
- { int ret;
836
- ret = slice_del(z); /* delete, line 125 */
837
- if (ret < 0) return ret;
838
- }
839
- switch(among_var) {
840
- case 0: { z->c = z->l - m; goto lab1; }
841
- case 1:
842
- z->ket = z->c; /* [, line 126 */
843
- if (!(eq_s_b(z, 2, s_15))) { z->c = z->l - m; goto lab1; }
844
- z->bra = z->c; /* ], line 126 */
845
- { int ret = r_R2(z);
846
- if (ret == 0) { z->c = z->l - m; goto lab1; } /* call R2, line 126 */
847
- if (ret < 0) return ret;
848
- }
849
- { int ret;
850
- ret = slice_del(z); /* delete, line 126 */
851
- if (ret < 0) return ret;
852
- }
853
- break;
854
- }
855
- lab1:
856
- ;
857
- }
858
- break;
859
- case 7:
860
- { int ret = r_R2(z);
861
- if (ret == 0) return 0; /* call R2, line 135 */
862
- if (ret < 0) return ret;
863
- }
864
- { int ret;
865
- ret = slice_del(z); /* delete, line 135 */
866
- if (ret < 0) return ret;
867
- }
868
- { int m = z->l - z->c; (void) m; /* try, line 136 */
869
- z->ket = z->c; /* [, line 137 */
870
- among_var = find_among_b(z, a_4, 3); /* substring, line 137 */
871
- if (!(among_var)) { z->c = z->l - m; goto lab2; }
872
- z->bra = z->c; /* ], line 137 */
873
- switch(among_var) {
874
- case 0: { z->c = z->l - m; goto lab2; }
875
- case 1:
876
- { int ret = r_R2(z);
877
- if (ret == 0) { z->c = z->l - m; goto lab2; } /* call R2, line 140 */
878
- if (ret < 0) return ret;
879
- }
880
- { int ret;
881
- ret = slice_del(z); /* delete, line 140 */
882
- if (ret < 0) return ret;
883
- }
884
- break;
885
- }
886
- lab2:
887
- ;
888
- }
889
- break;
890
- case 8:
891
- { int ret = r_R2(z);
892
- if (ret == 0) return 0; /* call R2, line 147 */
893
- if (ret < 0) return ret;
894
- }
895
- { int ret;
896
- ret = slice_del(z); /* delete, line 147 */
897
- if (ret < 0) return ret;
898
- }
899
- { int m = z->l - z->c; (void) m; /* try, line 148 */
900
- z->ket = z->c; /* [, line 149 */
901
- among_var = find_among_b(z, a_5, 3); /* substring, line 149 */
902
- if (!(among_var)) { z->c = z->l - m; goto lab3; }
903
- z->bra = z->c; /* ], line 149 */
904
- switch(among_var) {
905
- case 0: { z->c = z->l - m; goto lab3; }
906
- case 1:
907
- { int ret = r_R2(z);
908
- if (ret == 0) { z->c = z->l - m; goto lab3; } /* call R2, line 152 */
909
- if (ret < 0) return ret;
910
- }
911
- { int ret;
912
- ret = slice_del(z); /* delete, line 152 */
913
- if (ret < 0) return ret;
914
- }
915
- break;
916
- }
917
- lab3:
918
- ;
919
- }
920
- break;
921
- case 9:
922
- { int ret = r_R2(z);
923
- if (ret == 0) return 0; /* call R2, line 159 */
924
- if (ret < 0) return ret;
925
- }
926
- { int ret;
927
- ret = slice_del(z); /* delete, line 159 */
928
- if (ret < 0) return ret;
929
- }
930
- { int m = z->l - z->c; (void) m; /* try, line 160 */
931
- z->ket = z->c; /* [, line 161 */
932
- if (!(eq_s_b(z, 2, s_16))) { z->c = z->l - m; goto lab4; }
933
- z->bra = z->c; /* ], line 161 */
934
- { int ret = r_R2(z);
935
- if (ret == 0) { z->c = z->l - m; goto lab4; } /* call R2, line 161 */
936
- if (ret < 0) return ret;
937
- }
938
- { int ret;
939
- ret = slice_del(z); /* delete, line 161 */
940
- if (ret < 0) return ret;
941
- }
942
- lab4:
943
- ;
944
- }
945
- break;
946
- }
947
- return 1;
948
- }
949
-
950
- static int r_y_verb_suffix(struct SN_env * z) {
951
- int among_var;
952
- { int m3; /* setlimit, line 168 */
953
- int m = z->l - z->c; (void) m;
954
- if (z->c < z->I[0]) return 0;
955
- z->c = z->I[0]; /* tomark, line 168 */
956
- m3 = z->lb; z->lb = z->c;
957
- z->c = z->l - m;
958
- z->ket = z->c; /* [, line 168 */
959
- among_var = find_among_b(z, a_7, 12); /* substring, line 168 */
960
- if (!(among_var)) { z->lb = m3; return 0; }
961
- z->bra = z->c; /* ], line 168 */
962
- z->lb = m3;
963
- }
964
- switch(among_var) {
965
- case 0: return 0;
966
- case 1:
967
- if (!(eq_s_b(z, 1, s_17))) return 0;
968
- { int ret;
969
- ret = slice_del(z); /* delete, line 171 */
970
- if (ret < 0) return ret;
971
- }
972
- break;
973
- }
974
- return 1;
975
- }
976
-
977
- static int r_verb_suffix(struct SN_env * z) {
978
- int among_var;
979
- { int m3; /* setlimit, line 176 */
980
- int m = z->l - z->c; (void) m;
981
- if (z->c < z->I[0]) return 0;
982
- z->c = z->I[0]; /* tomark, line 176 */
983
- m3 = z->lb; z->lb = z->c;
984
- z->c = z->l - m;
985
- z->ket = z->c; /* [, line 176 */
986
- among_var = find_among_b(z, a_8, 96); /* substring, line 176 */
987
- if (!(among_var)) { z->lb = m3; return 0; }
988
- z->bra = z->c; /* ], line 176 */
989
- z->lb = m3;
990
- }
991
- switch(among_var) {
992
- case 0: return 0;
993
- case 1:
994
- { int m = z->l - z->c; (void) m; /* try, line 179 */
995
- if (!(eq_s_b(z, 1, s_18))) { z->c = z->l - m; goto lab0; }
996
- { int m_test = z->l - z->c; /* test, line 179 */
997
- if (!(eq_s_b(z, 1, s_19))) { z->c = z->l - m; goto lab0; }
998
- z->c = z->l - m_test;
999
- }
1000
- lab0:
1001
- ;
1002
- }
1003
- z->bra = z->c; /* ], line 179 */
1004
- { int ret;
1005
- ret = slice_del(z); /* delete, line 179 */
1006
- if (ret < 0) return ret;
1007
- }
1008
- break;
1009
- case 2:
1010
- { int ret;
1011
- ret = slice_del(z); /* delete, line 200 */
1012
- if (ret < 0) return ret;
1013
- }
1014
- break;
1015
- }
1016
- return 1;
1017
- }
1018
-
1019
- static int r_residual_suffix(struct SN_env * z) {
1020
- int among_var;
1021
- z->ket = z->c; /* [, line 205 */
1022
- among_var = find_among_b(z, a_9, 8); /* substring, line 205 */
1023
- if (!(among_var)) return 0;
1024
- z->bra = z->c; /* ], line 205 */
1025
- switch(among_var) {
1026
- case 0: return 0;
1027
- case 1:
1028
- { int ret = r_RV(z);
1029
- if (ret == 0) return 0; /* call RV, line 208 */
1030
- if (ret < 0) return ret;
1031
- }
1032
- { int ret;
1033
- ret = slice_del(z); /* delete, line 208 */
1034
- if (ret < 0) return ret;
1035
- }
1036
- break;
1037
- case 2:
1038
- { int ret = r_RV(z);
1039
- if (ret == 0) return 0; /* call RV, line 210 */
1040
- if (ret < 0) return ret;
1041
- }
1042
- { int ret;
1043
- ret = slice_del(z); /* delete, line 210 */
1044
- if (ret < 0) return ret;
1045
- }
1046
- { int m = z->l - z->c; (void) m; /* try, line 210 */
1047
- z->ket = z->c; /* [, line 210 */
1048
- if (!(eq_s_b(z, 1, s_20))) { z->c = z->l - m; goto lab0; }
1049
- z->bra = z->c; /* ], line 210 */
1050
- { int m_test = z->l - z->c; /* test, line 210 */
1051
- if (!(eq_s_b(z, 1, s_21))) { z->c = z->l - m; goto lab0; }
1052
- z->c = z->l - m_test;
1053
- }
1054
- { int ret = r_RV(z);
1055
- if (ret == 0) { z->c = z->l - m; goto lab0; } /* call RV, line 210 */
1056
- if (ret < 0) return ret;
1057
- }
1058
- { int ret;
1059
- ret = slice_del(z); /* delete, line 210 */
1060
- if (ret < 0) return ret;
1061
- }
1062
- lab0:
1063
- ;
1064
- }
1065
- break;
1066
- }
1067
- return 1;
1068
- }
1069
-
1070
- extern int spanish_UTF_8_stem(struct SN_env * z) {
1071
- { int c = z->c; /* do, line 216 */
1072
- { int ret = r_mark_regions(z);
1073
- if (ret == 0) goto lab0; /* call mark_regions, line 216 */
1074
- if (ret < 0) return ret;
1075
- }
1076
- lab0:
1077
- z->c = c;
1078
- }
1079
- z->lb = z->c; z->c = z->l; /* backwards, line 217 */
1080
-
1081
- { int m = z->l - z->c; (void) m; /* do, line 218 */
1082
- { int ret = r_attached_pronoun(z);
1083
- if (ret == 0) goto lab1; /* call attached_pronoun, line 218 */
1084
- if (ret < 0) return ret;
1085
- }
1086
- lab1:
1087
- z->c = z->l - m;
1088
- }
1089
- { int m = z->l - z->c; (void) m; /* do, line 219 */
1090
- { int m = z->l - z->c; (void) m; /* or, line 219 */
1091
- { int ret = r_standard_suffix(z);
1092
- if (ret == 0) goto lab4; /* call standard_suffix, line 219 */
1093
- if (ret < 0) return ret;
1094
- }
1095
- goto lab3;
1096
- lab4:
1097
- z->c = z->l - m;
1098
- { int ret = r_y_verb_suffix(z);
1099
- if (ret == 0) goto lab5; /* call y_verb_suffix, line 220 */
1100
- if (ret < 0) return ret;
1101
- }
1102
- goto lab3;
1103
- lab5:
1104
- z->c = z->l - m;
1105
- { int ret = r_verb_suffix(z);
1106
- if (ret == 0) goto lab2; /* call verb_suffix, line 221 */
1107
- if (ret < 0) return ret;
1108
- }
1109
- }
1110
- lab3:
1111
- lab2:
1112
- z->c = z->l - m;
1113
- }
1114
- { int m = z->l - z->c; (void) m; /* do, line 223 */
1115
- { int ret = r_residual_suffix(z);
1116
- if (ret == 0) goto lab6; /* call residual_suffix, line 223 */
1117
- if (ret < 0) return ret;
1118
- }
1119
- lab6:
1120
- z->c = z->l - m;
1121
- }
1122
- z->c = z->lb;
1123
- { int c = z->c; /* do, line 225 */
1124
- { int ret = r_postlude(z);
1125
- if (ret == 0) goto lab7; /* call postlude, line 225 */
1126
- if (ret < 0) return ret;
1127
- }
1128
- lab7:
1129
- z->c = c;
1130
- }
1131
- return 1;
1132
- }
1133
-
1134
- extern struct SN_env * spanish_UTF_8_create_env(void) { return SN_create_env(0, 3, 0); }
1135
-
1136
- extern void spanish_UTF_8_close_env(struct SN_env * z) { SN_close_env(z); }
1137
-