isomorfeus-ferret 0.12.4 → 0.12.7
Sign up to get free protection for your applications and to get access to all the features.
- checksums.yaml +4 -4
- data/LICENSE +612 -612
- data/README.md +77 -48
- data/ext/isomorfeus_ferret_ext/bm_hash.c +9 -6
- data/ext/isomorfeus_ferret_ext/bm_micro_string.c +4 -2
- data/ext/isomorfeus_ferret_ext/brotli_common_constants.c +15 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_constants.h +200 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_context.c +156 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_context.h +113 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_dictionary.c +5914 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_dictionary.h +64 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_platform.c +22 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_platform.h +594 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_transform.c +291 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_transform.h +85 -0
- data/ext/isomorfeus_ferret_ext/brotli_common_version.h +26 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_bit_reader.c +76 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_bit_reader.h +351 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_decode.c +2608 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_huffman.c +339 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_huffman.h +121 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_prefix.h +732 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_state.c +159 -0
- data/ext/isomorfeus_ferret_ext/brotli_dec_state.h +365 -0
- data/ext/isomorfeus_ferret_ext/brotli_decode.h +344 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references.c +145 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references.h +39 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references_hq.c +843 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references_hq.h +95 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_backward_references_inc.h +163 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_bit_cost.c +35 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_bit_cost.h +63 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_bit_cost_inc.h +127 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_block_encoder_inc.h +34 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_block_splitter.c +194 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_block_splitter.h +51 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_block_splitter_inc.h +440 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_brotli_bit_stream.c +1314 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_brotli_bit_stream.h +84 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_cluster.c +56 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_cluster.h +48 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_cluster_inc.h +320 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_command.c +28 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_command.h +190 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment.c +790 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment.h +61 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment_two_pass.c +645 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_compress_fragment_two_pass.h +54 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_dictionary_hash.c +1846 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_dictionary_hash.h +25 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_encode.c +1927 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_encoder_dict.c +33 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_encoder_dict.h +43 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_entropy_encode.c +503 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_entropy_encode.h +122 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_entropy_encode_static.h +539 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_fast_log.c +105 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_fast_log.h +66 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_find_match_length.h +79 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash.h +488 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_composite_inc.h +125 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_forgetful_chain_inc.h +293 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_longest_match64_inc.h +267 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_longest_match_inc.h +262 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_longest_match_quickly_inc.h +266 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_rolling_inc.h +212 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_hash_to_binary_tree_inc.h +329 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_histogram.c +100 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_histogram.h +63 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_histogram_inc.h +51 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_literal_cost.c +175 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_literal_cost.h +30 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_memory.c +170 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_memory.h +114 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_metablock.c +663 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_metablock.h +105 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_metablock_inc.h +183 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_params.h +46 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_prefix.h +53 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_quality.h +165 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_ringbuffer.h +167 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_static_dict.c +486 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_static_dict.h +40 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_static_dict_lut.h +5864 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_utf8_util.c +85 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_utf8_util.h +32 -0
- data/ext/isomorfeus_ferret_ext/brotli_enc_write_bits.h +87 -0
- data/ext/isomorfeus_ferret_ext/brotli_encode.h +448 -0
- data/ext/isomorfeus_ferret_ext/brotli_port.h +288 -0
- data/ext/isomorfeus_ferret_ext/brotli_types.h +83 -0
- data/ext/isomorfeus_ferret_ext/frb_index.c +35 -4
- data/ext/isomorfeus_ferret_ext/frb_store.c +34 -5
- data/ext/isomorfeus_ferret_ext/frt_document.h +1 -0
- data/ext/isomorfeus_ferret_ext/frt_fs_store.c +1 -0
- data/ext/isomorfeus_ferret_ext/frt_index.c +174 -25
- data/ext/isomorfeus_ferret_ext/frt_index.h +6 -3
- data/ext/isomorfeus_ferret_ext/frt_posh.h +11 -19
- data/ext/isomorfeus_ferret_ext/frt_q_parser.c +1844 -1911
- data/ext/isomorfeus_ferret_ext/frt_q_phrase.c +12 -15
- data/ext/isomorfeus_ferret_ext/frt_ram_store.c +1 -0
- data/ext/isomorfeus_ferret_ext/frt_scanner.c +1 -0
- data/ext/isomorfeus_ferret_ext/frt_scanner_mb.c +1 -0
- data/ext/isomorfeus_ferret_ext/frt_scanner_utf8.c +1 -0
- data/ext/isomorfeus_ferret_ext/frt_search.h +1 -1
- data/ext/isomorfeus_ferret_ext/libstemmer.c +14 -11
- data/ext/isomorfeus_ferret_ext/libstemmer.h +4 -9
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_basque.c +1167 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_basque.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_catalan.c +1433 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_catalan.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.c +120 -143
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.h +1 -2
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.c +217 -237
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.c +377 -432
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.c +298 -342
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.h +1 -2
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.c +530 -524
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.c +201 -214
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_hungarian.c +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_indonesian.c +394 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_indonesian.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_irish.c +457 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_irish.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.c +396 -439
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.c +104 -128
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.c +242 -273
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.c +406 -461
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.h +1 -2
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.c +405 -456
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.c +108 -126
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_hungarian.c +849 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_hungarian.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.c +373 -405
- data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.c +288 -305
- data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_arabic.c +1651 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_arabic.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_armenian.c +546 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_armenian.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_basque.c +1171 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_basque.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_catalan.c +1436 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_catalan.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.c +121 -141
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.c +221 -241
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.c +381 -431
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.c +300 -345
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.c +518 -511
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.c +201 -209
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_greek.c +3660 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_greek.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_hindi.c +309 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_hindi.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.c +306 -671
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_indonesian.c +394 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_indonesian.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_irish.c +457 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_irish.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.c +400 -442
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_lithuanian.c +824 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_lithuanian.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_nepali.c +408 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_nepali.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.c +105 -127
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.c +245 -276
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.c +409 -464
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.c +376 -408
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.c +272 -287
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_serbian.c +6530 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_serbian.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.c +407 -458
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.c +110 -125
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_tamil.c +1865 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_tamil.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.c +698 -806
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.h +1 -1
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_yiddish.c +1220 -0
- data/ext/isomorfeus_ferret_ext/stem_UTF_8_yiddish.h +6 -0
- data/ext/isomorfeus_ferret_ext/stem_api.c +1 -9
- data/ext/isomorfeus_ferret_ext/stem_api.h +1 -3
- data/ext/isomorfeus_ferret_ext/stem_header.h +30 -26
- data/ext/isomorfeus_ferret_ext/stem_modules.h +113 -26
- data/ext/isomorfeus_ferret_ext/stem_modules.txt +18 -5
- data/ext/isomorfeus_ferret_ext/stem_utilities.c +167 -132
- data/ext/isomorfeus_ferret_ext/test.c +7 -1
- data/ext/isomorfeus_ferret_ext/test_fields.c +57 -45
- data/ext/isomorfeus_ferret_ext/test_index.c +4 -1
- data/ext/isomorfeus_ferret_ext/test_search.c +0 -1
- data/lib/isomorfeus/ferret/version.rb +1 -1
- metadata +125 -5
- data/ext/isomorfeus_ferret_ext/q_parser.y +0 -1366
@@ -1,4 +1,4 @@
|
|
1
|
-
/*
|
1
|
+
/* Generated by Snowball 2.2.0 - https://snowballstem.org/ */
|
2
2
|
|
3
3
|
#include "stem_header.h"
|
4
4
|
|
@@ -26,10 +26,10 @@ static const symbol s_0_3[2] = { 's', 's' };
|
|
26
26
|
|
27
27
|
static const struct among a_0[4] =
|
28
28
|
{
|
29
|
-
|
30
|
-
|
31
|
-
|
32
|
-
|
29
|
+
{ 1, s_0_0, -1, 3, 0},
|
30
|
+
{ 3, s_0_1, 0, 2, 0},
|
31
|
+
{ 4, s_0_2, 0, 1, 0},
|
32
|
+
{ 2, s_0_3, 0, -1, 0}
|
33
33
|
};
|
34
34
|
|
35
35
|
static const symbol s_1_1[2] = { 'b', 'b' };
|
@@ -47,19 +47,19 @@ static const symbol s_1_12[2] = { 'i', 'z' };
|
|
47
47
|
|
48
48
|
static const struct among a_1[13] =
|
49
49
|
{
|
50
|
-
|
51
|
-
|
52
|
-
|
53
|
-
|
54
|
-
|
55
|
-
|
56
|
-
|
57
|
-
|
58
|
-
|
59
|
-
|
60
|
-
|
61
|
-
|
62
|
-
|
50
|
+
{ 0, 0, -1, 3, 0},
|
51
|
+
{ 2, s_1_1, 0, 2, 0},
|
52
|
+
{ 2, s_1_2, 0, 2, 0},
|
53
|
+
{ 2, s_1_3, 0, 2, 0},
|
54
|
+
{ 2, s_1_4, 0, 2, 0},
|
55
|
+
{ 2, s_1_5, 0, 1, 0},
|
56
|
+
{ 2, s_1_6, 0, 2, 0},
|
57
|
+
{ 2, s_1_7, 0, 2, 0},
|
58
|
+
{ 2, s_1_8, 0, 2, 0},
|
59
|
+
{ 2, s_1_9, 0, 2, 0},
|
60
|
+
{ 2, s_1_10, 0, 1, 0},
|
61
|
+
{ 2, s_1_11, 0, 2, 0},
|
62
|
+
{ 2, s_1_12, 0, 1, 0}
|
63
63
|
};
|
64
64
|
|
65
65
|
static const symbol s_2_0[2] = { 'e', 'd' };
|
@@ -68,9 +68,9 @@ static const symbol s_2_2[3] = { 'i', 'n', 'g' };
|
|
68
68
|
|
69
69
|
static const struct among a_2[3] =
|
70
70
|
{
|
71
|
-
|
72
|
-
|
73
|
-
|
71
|
+
{ 2, s_2_0, -1, 2, 0},
|
72
|
+
{ 3, s_2_1, 0, 1, 0},
|
73
|
+
{ 3, s_2_2, -1, 2, 0}
|
74
74
|
};
|
75
75
|
|
76
76
|
static const symbol s_3_0[4] = { 'a', 'n', 'c', 'i' };
|
@@ -96,26 +96,26 @@ static const symbol s_3_19[7] = { 'o', 'u', 's', 'n', 'e', 's', 's' };
|
|
96
96
|
|
97
97
|
static const struct among a_3[20] =
|
98
98
|
{
|
99
|
-
|
100
|
-
|
101
|
-
|
102
|
-
|
103
|
-
|
104
|
-
|
105
|
-
|
106
|
-
|
107
|
-
|
108
|
-
|
109
|
-
|
110
|
-
|
111
|
-
|
112
|
-
|
113
|
-
|
114
|
-
|
115
|
-
|
116
|
-
|
117
|
-
|
118
|
-
|
99
|
+
{ 4, s_3_0, -1, 3, 0},
|
100
|
+
{ 4, s_3_1, -1, 2, 0},
|
101
|
+
{ 4, s_3_2, -1, 4, 0},
|
102
|
+
{ 3, s_3_3, -1, 6, 0},
|
103
|
+
{ 4, s_3_4, -1, 9, 0},
|
104
|
+
{ 5, s_3_5, -1, 11, 0},
|
105
|
+
{ 5, s_3_6, -1, 5, 0},
|
106
|
+
{ 5, s_3_7, -1, 9, 0},
|
107
|
+
{ 6, s_3_8, -1, 13, 0},
|
108
|
+
{ 5, s_3_9, -1, 12, 0},
|
109
|
+
{ 6, s_3_10, -1, 1, 0},
|
110
|
+
{ 7, s_3_11, 10, 8, 0},
|
111
|
+
{ 5, s_3_12, -1, 9, 0},
|
112
|
+
{ 5, s_3_13, -1, 8, 0},
|
113
|
+
{ 7, s_3_14, 13, 7, 0},
|
114
|
+
{ 4, s_3_15, -1, 7, 0},
|
115
|
+
{ 4, s_3_16, -1, 8, 0},
|
116
|
+
{ 7, s_3_17, -1, 12, 0},
|
117
|
+
{ 7, s_3_18, -1, 10, 0},
|
118
|
+
{ 7, s_3_19, -1, 11, 0}
|
119
119
|
};
|
120
120
|
|
121
121
|
static const symbol s_4_0[5] = { 'i', 'c', 'a', 't', 'e' };
|
@@ -128,13 +128,13 @@ static const symbol s_4_6[4] = { 'n', 'e', 's', 's' };
|
|
128
128
|
|
129
129
|
static const struct among a_4[7] =
|
130
130
|
{
|
131
|
-
|
132
|
-
|
133
|
-
|
134
|
-
|
135
|
-
|
136
|
-
|
137
|
-
|
131
|
+
{ 5, s_4_0, -1, 2, 0},
|
132
|
+
{ 5, s_4_1, -1, 3, 0},
|
133
|
+
{ 5, s_4_2, -1, 1, 0},
|
134
|
+
{ 5, s_4_3, -1, 2, 0},
|
135
|
+
{ 4, s_4_4, -1, 2, 0},
|
136
|
+
{ 3, s_4_5, -1, 3, 0},
|
137
|
+
{ 4, s_4_6, -1, 3, 0}
|
138
138
|
};
|
139
139
|
|
140
140
|
static const symbol s_5_0[2] = { 'i', 'c' };
|
@@ -159,25 +159,25 @@ static const symbol s_5_18[2] = { 'o', 'u' };
|
|
159
159
|
|
160
160
|
static const struct among a_5[19] =
|
161
161
|
{
|
162
|
-
|
163
|
-
|
164
|
-
|
165
|
-
|
166
|
-
|
167
|
-
|
168
|
-
|
169
|
-
|
170
|
-
|
171
|
-
|
172
|
-
|
173
|
-
|
174
|
-
|
175
|
-
|
176
|
-
|
177
|
-
|
178
|
-
|
179
|
-
|
180
|
-
|
162
|
+
{ 2, s_5_0, -1, 1, 0},
|
163
|
+
{ 4, s_5_1, -1, 1, 0},
|
164
|
+
{ 4, s_5_2, -1, 1, 0},
|
165
|
+
{ 4, s_5_3, -1, 1, 0},
|
166
|
+
{ 4, s_5_4, -1, 1, 0},
|
167
|
+
{ 3, s_5_5, -1, 1, 0},
|
168
|
+
{ 3, s_5_6, -1, 1, 0},
|
169
|
+
{ 3, s_5_7, -1, 1, 0},
|
170
|
+
{ 3, s_5_8, -1, 1, 0},
|
171
|
+
{ 2, s_5_9, -1, 1, 0},
|
172
|
+
{ 3, s_5_10, -1, 1, 0},
|
173
|
+
{ 3, s_5_11, -1, 2, 0},
|
174
|
+
{ 2, s_5_12, -1, 1, 0},
|
175
|
+
{ 3, s_5_13, -1, 1, 0},
|
176
|
+
{ 3, s_5_14, -1, 1, 0},
|
177
|
+
{ 3, s_5_15, -1, 1, 0},
|
178
|
+
{ 4, s_5_16, 15, 1, 0},
|
179
|
+
{ 5, s_5_17, 16, 1, 0},
|
180
|
+
{ 2, s_5_18, -1, 1, 0}
|
181
181
|
};
|
182
182
|
|
183
183
|
static const unsigned char g_v[] = { 17, 65, 16, 1 };
|
@@ -189,36 +189,25 @@ static const symbol s_1[] = { 'i' };
|
|
189
189
|
static const symbol s_2[] = { 'e', 'e' };
|
190
190
|
static const symbol s_3[] = { 'e' };
|
191
191
|
static const symbol s_4[] = { 'e' };
|
192
|
-
static const symbol s_5[] = { '
|
193
|
-
static const symbol s_6[] = { '
|
194
|
-
static const symbol s_7[] = { '
|
195
|
-
static const symbol s_8[] = { '
|
196
|
-
static const symbol s_9[] = { '
|
197
|
-
static const symbol s_10[] = { '
|
198
|
-
static const symbol s_11[] = { '
|
199
|
-
static const symbol s_12[] = { '
|
200
|
-
static const symbol s_13[] = { 'e' };
|
201
|
-
static const symbol s_14[] = { '
|
202
|
-
static const symbol s_15[] = { '
|
203
|
-
static const symbol s_16[] = { '
|
204
|
-
static const symbol s_17[] = { '
|
205
|
-
static const symbol s_18[] = { '
|
206
|
-
static const symbol s_19[] = { '
|
207
|
-
static const symbol s_20[] = { 'i', '
|
208
|
-
static const symbol s_21[] = { '
|
209
|
-
static const symbol s_22[] = { '
|
210
|
-
static const symbol s_23[] = { '
|
211
|
-
static const symbol s_24[] = { 's' };
|
212
|
-
static const symbol s_25[] = { 't' };
|
213
|
-
static const symbol s_26[] = { 'e' };
|
214
|
-
static const symbol s_27[] = { 'l' };
|
215
|
-
static const symbol s_28[] = { 'l' };
|
216
|
-
static const symbol s_29[] = { 'y' };
|
217
|
-
static const symbol s_30[] = { 'Y' };
|
218
|
-
static const symbol s_31[] = { 'y' };
|
219
|
-
static const symbol s_32[] = { 'Y' };
|
220
|
-
static const symbol s_33[] = { 'Y' };
|
221
|
-
static const symbol s_34[] = { 'y' };
|
192
|
+
static const symbol s_5[] = { 'i' };
|
193
|
+
static const symbol s_6[] = { 't', 'i', 'o', 'n' };
|
194
|
+
static const symbol s_7[] = { 'e', 'n', 'c', 'e' };
|
195
|
+
static const symbol s_8[] = { 'a', 'n', 'c', 'e' };
|
196
|
+
static const symbol s_9[] = { 'a', 'b', 'l', 'e' };
|
197
|
+
static const symbol s_10[] = { 'e', 'n', 't' };
|
198
|
+
static const symbol s_11[] = { 'e' };
|
199
|
+
static const symbol s_12[] = { 'i', 'z', 'e' };
|
200
|
+
static const symbol s_13[] = { 'a', 't', 'e' };
|
201
|
+
static const symbol s_14[] = { 'a', 'l' };
|
202
|
+
static const symbol s_15[] = { 'f', 'u', 'l' };
|
203
|
+
static const symbol s_16[] = { 'o', 'u', 's' };
|
204
|
+
static const symbol s_17[] = { 'i', 'v', 'e' };
|
205
|
+
static const symbol s_18[] = { 'b', 'l', 'e' };
|
206
|
+
static const symbol s_19[] = { 'a', 'l' };
|
207
|
+
static const symbol s_20[] = { 'i', 'c' };
|
208
|
+
static const symbol s_21[] = { 'Y' };
|
209
|
+
static const symbol s_22[] = { 'Y' };
|
210
|
+
static const symbol s_23[] = { 'y' };
|
222
211
|
|
223
212
|
static int r_shortv(struct SN_env * z) {
|
224
213
|
if (out_grouping_b(z, g_v_WXY, 89, 121, 0)) return 0;
|
@@ -228,36 +217,35 @@ static int r_shortv(struct SN_env * z) {
|
|
228
217
|
}
|
229
218
|
|
230
219
|
static int r_R1(struct SN_env * z) {
|
231
|
-
if (!(z->I[
|
220
|
+
if (!(z->I[1] <= z->c)) return 0;
|
232
221
|
return 1;
|
233
222
|
}
|
234
223
|
|
235
224
|
static int r_R2(struct SN_env * z) {
|
236
|
-
if (!(z->I[
|
225
|
+
if (!(z->I[0] <= z->c)) return 0;
|
237
226
|
return 1;
|
238
227
|
}
|
239
228
|
|
240
229
|
static int r_Step_1a(struct SN_env * z) {
|
241
230
|
int among_var;
|
242
|
-
z->ket = z->c;
|
231
|
+
z->ket = z->c;
|
243
232
|
if (z->c <= z->lb || z->p[z->c - 1] != 115) return 0;
|
244
|
-
among_var = find_among_b(z, a_0, 4);
|
233
|
+
among_var = find_among_b(z, a_0, 4);
|
245
234
|
if (!(among_var)) return 0;
|
246
|
-
z->bra = z->c;
|
247
|
-
switch(among_var) {
|
248
|
-
case 0: return 0;
|
235
|
+
z->bra = z->c;
|
236
|
+
switch (among_var) {
|
249
237
|
case 1:
|
250
|
-
{ int ret = slice_from_s(z, 2, s_0);
|
238
|
+
{ int ret = slice_from_s(z, 2, s_0);
|
251
239
|
if (ret < 0) return ret;
|
252
240
|
}
|
253
241
|
break;
|
254
242
|
case 2:
|
255
|
-
{ int ret = slice_from_s(z, 1, s_1);
|
243
|
+
{ int ret = slice_from_s(z, 1, s_1);
|
256
244
|
if (ret < 0) return ret;
|
257
245
|
}
|
258
246
|
break;
|
259
247
|
case 3:
|
260
|
-
{ int ret = slice_del(z);
|
248
|
+
{ int ret = slice_del(z);
|
261
249
|
if (ret < 0) return ret;
|
262
250
|
}
|
263
251
|
break;
|
@@ -267,70 +255,70 @@ static int r_Step_1a(struct SN_env * z) {
|
|
267
255
|
|
268
256
|
static int r_Step_1b(struct SN_env * z) {
|
269
257
|
int among_var;
|
270
|
-
z->ket = z->c;
|
258
|
+
z->ket = z->c;
|
271
259
|
if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 100 && z->p[z->c - 1] != 103)) return 0;
|
272
|
-
among_var = find_among_b(z, a_2, 3);
|
260
|
+
among_var = find_among_b(z, a_2, 3);
|
273
261
|
if (!(among_var)) return 0;
|
274
|
-
z->bra = z->c;
|
275
|
-
switch(among_var) {
|
276
|
-
case 0: return 0;
|
262
|
+
z->bra = z->c;
|
263
|
+
switch (among_var) {
|
277
264
|
case 1:
|
278
265
|
{ int ret = r_R1(z);
|
279
|
-
if (ret
|
280
|
-
if (ret < 0) return ret;
|
266
|
+
if (ret <= 0) return ret;
|
281
267
|
}
|
282
|
-
{ int ret = slice_from_s(z, 2, s_2);
|
268
|
+
{ int ret = slice_from_s(z, 2, s_2);
|
283
269
|
if (ret < 0) return ret;
|
284
270
|
}
|
285
271
|
break;
|
286
272
|
case 2:
|
287
|
-
{ int
|
288
|
-
{
|
273
|
+
{ int m_test1 = z->l - z->c;
|
274
|
+
{
|
289
275
|
int ret = out_grouping_b(z, g_v, 97, 121, 1);
|
290
276
|
if (ret < 0) return 0;
|
291
277
|
z->c -= ret;
|
292
278
|
}
|
293
|
-
z->c = z->l -
|
279
|
+
z->c = z->l - m_test1;
|
294
280
|
}
|
295
|
-
{ int ret = slice_del(z);
|
281
|
+
{ int ret = slice_del(z);
|
296
282
|
if (ret < 0) return ret;
|
297
283
|
}
|
298
|
-
{ int
|
284
|
+
{ int m_test2 = z->l - z->c;
|
299
285
|
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
|
300
|
-
among_var = find_among_b(z, a_1, 13);
|
286
|
+
among_var = find_among_b(z, a_1, 13);
|
301
287
|
if (!(among_var)) return 0;
|
302
|
-
z->c = z->l -
|
288
|
+
z->c = z->l - m_test2;
|
303
289
|
}
|
304
|
-
switch(among_var) {
|
305
|
-
case 0: return 0;
|
290
|
+
switch (among_var) {
|
306
291
|
case 1:
|
307
|
-
{ int
|
308
|
-
int
|
309
|
-
|
292
|
+
{ int ret;
|
293
|
+
{ int saved_c = z->c;
|
294
|
+
ret = insert_s(z, z->c, z->c, 1, s_3);
|
295
|
+
z->c = saved_c;
|
296
|
+
}
|
310
297
|
if (ret < 0) return ret;
|
311
298
|
}
|
312
299
|
break;
|
313
300
|
case 2:
|
314
|
-
z->ket = z->c;
|
301
|
+
z->ket = z->c;
|
315
302
|
if (z->c <= z->lb) return 0;
|
316
|
-
z->c--;
|
317
|
-
z->bra = z->c;
|
318
|
-
{ int ret = slice_del(z);
|
303
|
+
z->c--;
|
304
|
+
z->bra = z->c;
|
305
|
+
{ int ret = slice_del(z);
|
319
306
|
if (ret < 0) return ret;
|
320
307
|
}
|
321
308
|
break;
|
322
309
|
case 3:
|
323
|
-
if (z->c != z->I[
|
324
|
-
{ int
|
310
|
+
if (z->c != z->I[1]) return 0;
|
311
|
+
{ int m_test3 = z->l - z->c;
|
325
312
|
{ int ret = r_shortv(z);
|
326
|
-
if (ret
|
327
|
-
if (ret < 0) return ret;
|
313
|
+
if (ret <= 0) return ret;
|
328
314
|
}
|
329
|
-
z->c = z->l -
|
315
|
+
z->c = z->l - m_test3;
|
330
316
|
}
|
331
|
-
{ int
|
332
|
-
int
|
333
|
-
|
317
|
+
{ int ret;
|
318
|
+
{ int saved_c = z->c;
|
319
|
+
ret = insert_s(z, z->c, z->c, 1, s_4);
|
320
|
+
z->c = saved_c;
|
321
|
+
}
|
334
322
|
if (ret < 0) return ret;
|
335
323
|
}
|
336
324
|
break;
|
@@ -341,22 +329,24 @@ static int r_Step_1b(struct SN_env * z) {
|
|
341
329
|
}
|
342
330
|
|
343
331
|
static int r_Step_1c(struct SN_env * z) {
|
344
|
-
z->ket = z->c;
|
345
|
-
{ int m1 = z->l - z->c; (void)m1;
|
346
|
-
if (
|
332
|
+
z->ket = z->c;
|
333
|
+
{ int m1 = z->l - z->c; (void)m1;
|
334
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 'y') goto lab1;
|
335
|
+
z->c--;
|
347
336
|
goto lab0;
|
348
337
|
lab1:
|
349
338
|
z->c = z->l - m1;
|
350
|
-
if (
|
339
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 'Y') return 0;
|
340
|
+
z->c--;
|
351
341
|
}
|
352
342
|
lab0:
|
353
|
-
z->bra = z->c;
|
354
|
-
{
|
343
|
+
z->bra = z->c;
|
344
|
+
{
|
355
345
|
int ret = out_grouping_b(z, g_v, 97, 121, 1);
|
356
346
|
if (ret < 0) return 0;
|
357
347
|
z->c -= ret;
|
358
348
|
}
|
359
|
-
{ int ret = slice_from_s(z, 1,
|
349
|
+
{ int ret = slice_from_s(z, 1, s_5);
|
360
350
|
if (ret < 0) return ret;
|
361
351
|
}
|
362
352
|
return 1;
|
@@ -364,84 +354,77 @@ lab0:
|
|
364
354
|
|
365
355
|
static int r_Step_2(struct SN_env * z) {
|
366
356
|
int among_var;
|
367
|
-
z->ket = z->c;
|
357
|
+
z->ket = z->c;
|
368
358
|
if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((815616 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
|
369
|
-
among_var = find_among_b(z, a_3, 20);
|
359
|
+
among_var = find_among_b(z, a_3, 20);
|
370
360
|
if (!(among_var)) return 0;
|
371
|
-
z->bra = z->c;
|
361
|
+
z->bra = z->c;
|
372
362
|
{ int ret = r_R1(z);
|
373
|
-
if (ret
|
374
|
-
if (ret < 0) return ret;
|
363
|
+
if (ret <= 0) return ret;
|
375
364
|
}
|
376
|
-
switch(among_var) {
|
377
|
-
case 0: return 0;
|
365
|
+
switch (among_var) {
|
378
366
|
case 1:
|
379
|
-
{ int ret = slice_from_s(z, 4,
|
367
|
+
{ int ret = slice_from_s(z, 4, s_6);
|
380
368
|
if (ret < 0) return ret;
|
381
369
|
}
|
382
370
|
break;
|
383
371
|
case 2:
|
384
|
-
{ int ret = slice_from_s(z, 4,
|
372
|
+
{ int ret = slice_from_s(z, 4, s_7);
|
385
373
|
if (ret < 0) return ret;
|
386
374
|
}
|
387
375
|
break;
|
388
376
|
case 3:
|
389
|
-
{ int ret = slice_from_s(z, 4,
|
377
|
+
{ int ret = slice_from_s(z, 4, s_8);
|
390
378
|
if (ret < 0) return ret;
|
391
379
|
}
|
392
380
|
break;
|
393
381
|
case 4:
|
394
|
-
{ int ret = slice_from_s(z, 4,
|
382
|
+
{ int ret = slice_from_s(z, 4, s_9);
|
395
383
|
if (ret < 0) return ret;
|
396
384
|
}
|
397
385
|
break;
|
398
386
|
case 5:
|
399
|
-
{ int ret = slice_from_s(z, 3,
|
387
|
+
{ int ret = slice_from_s(z, 3, s_10);
|
400
388
|
if (ret < 0) return ret;
|
401
389
|
}
|
402
390
|
break;
|
403
391
|
case 6:
|
404
|
-
{ int ret = slice_from_s(z, 1,
|
392
|
+
{ int ret = slice_from_s(z, 1, s_11);
|
405
393
|
if (ret < 0) return ret;
|
406
394
|
}
|
407
395
|
break;
|
408
396
|
case 7:
|
409
|
-
{ int ret = slice_from_s(z, 3,
|
397
|
+
{ int ret = slice_from_s(z, 3, s_12);
|
410
398
|
if (ret < 0) return ret;
|
411
399
|
}
|
412
400
|
break;
|
413
401
|
case 8:
|
414
|
-
{ int ret = slice_from_s(z, 3,
|
402
|
+
{ int ret = slice_from_s(z, 3, s_13);
|
415
403
|
if (ret < 0) return ret;
|
416
404
|
}
|
417
405
|
break;
|
418
406
|
case 9:
|
419
|
-
{ int ret = slice_from_s(z, 2,
|
407
|
+
{ int ret = slice_from_s(z, 2, s_14);
|
420
408
|
if (ret < 0) return ret;
|
421
409
|
}
|
422
410
|
break;
|
423
411
|
case 10:
|
424
|
-
{ int ret = slice_from_s(z,
|
412
|
+
{ int ret = slice_from_s(z, 3, s_15);
|
425
413
|
if (ret < 0) return ret;
|
426
414
|
}
|
427
415
|
break;
|
428
416
|
case 11:
|
429
|
-
{ int ret = slice_from_s(z, 3,
|
417
|
+
{ int ret = slice_from_s(z, 3, s_16);
|
430
418
|
if (ret < 0) return ret;
|
431
419
|
}
|
432
420
|
break;
|
433
421
|
case 12:
|
434
|
-
{ int ret = slice_from_s(z, 3,
|
422
|
+
{ int ret = slice_from_s(z, 3, s_17);
|
435
423
|
if (ret < 0) return ret;
|
436
424
|
}
|
437
425
|
break;
|
438
426
|
case 13:
|
439
|
-
{ int ret = slice_from_s(z, 3,
|
440
|
-
if (ret < 0) return ret;
|
441
|
-
}
|
442
|
-
break;
|
443
|
-
case 14:
|
444
|
-
{ int ret = slice_from_s(z, 3, s_21); /* <-, line 77 */
|
427
|
+
{ int ret = slice_from_s(z, 3, s_18);
|
445
428
|
if (ret < 0) return ret;
|
446
429
|
}
|
447
430
|
break;
|
@@ -451,29 +434,27 @@ static int r_Step_2(struct SN_env * z) {
|
|
451
434
|
|
452
435
|
static int r_Step_3(struct SN_env * z) {
|
453
436
|
int among_var;
|
454
|
-
z->ket = z->c;
|
437
|
+
z->ket = z->c;
|
455
438
|
if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((528928 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
|
456
|
-
among_var = find_among_b(z, a_4, 7);
|
439
|
+
among_var = find_among_b(z, a_4, 7);
|
457
440
|
if (!(among_var)) return 0;
|
458
|
-
z->bra = z->c;
|
441
|
+
z->bra = z->c;
|
459
442
|
{ int ret = r_R1(z);
|
460
|
-
if (ret
|
461
|
-
if (ret < 0) return ret;
|
443
|
+
if (ret <= 0) return ret;
|
462
444
|
}
|
463
|
-
switch(among_var) {
|
464
|
-
case 0: return 0;
|
445
|
+
switch (among_var) {
|
465
446
|
case 1:
|
466
|
-
{ int ret = slice_from_s(z, 2,
|
447
|
+
{ int ret = slice_from_s(z, 2, s_19);
|
467
448
|
if (ret < 0) return ret;
|
468
449
|
}
|
469
450
|
break;
|
470
451
|
case 2:
|
471
|
-
{ int ret = slice_from_s(z, 2,
|
452
|
+
{ int ret = slice_from_s(z, 2, s_20);
|
472
453
|
if (ret < 0) return ret;
|
473
454
|
}
|
474
455
|
break;
|
475
456
|
case 3:
|
476
|
-
{ int ret = slice_del(z);
|
457
|
+
{ int ret = slice_del(z);
|
477
458
|
if (ret < 0) return ret;
|
478
459
|
}
|
479
460
|
break;
|
@@ -483,32 +464,32 @@ static int r_Step_3(struct SN_env * z) {
|
|
483
464
|
|
484
465
|
static int r_Step_4(struct SN_env * z) {
|
485
466
|
int among_var;
|
486
|
-
z->ket = z->c;
|
467
|
+
z->ket = z->c;
|
487
468
|
if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((3961384 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
|
488
|
-
among_var = find_among_b(z, a_5, 19);
|
469
|
+
among_var = find_among_b(z, a_5, 19);
|
489
470
|
if (!(among_var)) return 0;
|
490
|
-
z->bra = z->c;
|
471
|
+
z->bra = z->c;
|
491
472
|
{ int ret = r_R2(z);
|
492
|
-
if (ret
|
493
|
-
if (ret < 0) return ret;
|
473
|
+
if (ret <= 0) return ret;
|
494
474
|
}
|
495
|
-
switch(among_var) {
|
496
|
-
case 0: return 0;
|
475
|
+
switch (among_var) {
|
497
476
|
case 1:
|
498
|
-
{ int ret = slice_del(z);
|
477
|
+
{ int ret = slice_del(z);
|
499
478
|
if (ret < 0) return ret;
|
500
479
|
}
|
501
480
|
break;
|
502
481
|
case 2:
|
503
|
-
{ int m1 = z->l - z->c; (void)m1;
|
504
|
-
if (
|
482
|
+
{ int m1 = z->l - z->c; (void)m1;
|
483
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 's') goto lab1;
|
484
|
+
z->c--;
|
505
485
|
goto lab0;
|
506
486
|
lab1:
|
507
487
|
z->c = z->l - m1;
|
508
|
-
if (
|
488
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 't') return 0;
|
489
|
+
z->c--;
|
509
490
|
}
|
510
491
|
lab0:
|
511
|
-
{ int ret = slice_del(z);
|
492
|
+
{ int ret = slice_del(z);
|
512
493
|
if (ret < 0) return ret;
|
513
494
|
}
|
514
495
|
break;
|
@@ -517,24 +498,24 @@ static int r_Step_4(struct SN_env * z) {
|
|
517
498
|
}
|
518
499
|
|
519
500
|
static int r_Step_5a(struct SN_env * z) {
|
520
|
-
z->ket = z->c;
|
521
|
-
if (
|
522
|
-
z->
|
523
|
-
|
501
|
+
z->ket = z->c;
|
502
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 'e') return 0;
|
503
|
+
z->c--;
|
504
|
+
z->bra = z->c;
|
505
|
+
{ int m1 = z->l - z->c; (void)m1;
|
524
506
|
{ int ret = r_R2(z);
|
525
|
-
if (ret == 0) goto lab1;
|
507
|
+
if (ret == 0) goto lab1;
|
526
508
|
if (ret < 0) return ret;
|
527
509
|
}
|
528
510
|
goto lab0;
|
529
511
|
lab1:
|
530
512
|
z->c = z->l - m1;
|
531
513
|
{ int ret = r_R1(z);
|
532
|
-
if (ret
|
533
|
-
if (ret < 0) return ret;
|
514
|
+
if (ret <= 0) return ret;
|
534
515
|
}
|
535
|
-
{ int m2 = z->l - z->c; (void)m2;
|
516
|
+
{ int m2 = z->l - z->c; (void)m2;
|
536
517
|
{ int ret = r_shortv(z);
|
537
|
-
if (ret == 0) goto lab2;
|
518
|
+
if (ret == 0) goto lab2;
|
538
519
|
if (ret < 0) return ret;
|
539
520
|
}
|
540
521
|
return 0;
|
@@ -543,60 +524,63 @@ static int r_Step_5a(struct SN_env * z) {
|
|
543
524
|
}
|
544
525
|
}
|
545
526
|
lab0:
|
546
|
-
{ int ret = slice_del(z);
|
527
|
+
{ int ret = slice_del(z);
|
547
528
|
if (ret < 0) return ret;
|
548
529
|
}
|
549
530
|
return 1;
|
550
531
|
}
|
551
532
|
|
552
533
|
static int r_Step_5b(struct SN_env * z) {
|
553
|
-
z->ket = z->c;
|
554
|
-
if (
|
555
|
-
z->
|
534
|
+
z->ket = z->c;
|
535
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 'l') return 0;
|
536
|
+
z->c--;
|
537
|
+
z->bra = z->c;
|
556
538
|
{ int ret = r_R2(z);
|
557
|
-
if (ret
|
558
|
-
if (ret < 0) return ret;
|
539
|
+
if (ret <= 0) return ret;
|
559
540
|
}
|
560
|
-
if (
|
561
|
-
|
541
|
+
if (z->c <= z->lb || z->p[z->c - 1] != 'l') return 0;
|
542
|
+
z->c--;
|
543
|
+
{ int ret = slice_del(z);
|
562
544
|
if (ret < 0) return ret;
|
563
545
|
}
|
564
546
|
return 1;
|
565
547
|
}
|
566
548
|
|
567
549
|
extern int porter_ISO_8859_1_stem(struct SN_env * z) {
|
568
|
-
z->
|
569
|
-
{ int c1 = z->c;
|
570
|
-
z->bra = z->c;
|
571
|
-
if (
|
572
|
-
z->
|
573
|
-
|
550
|
+
z->I[2] = 0;
|
551
|
+
{ int c1 = z->c;
|
552
|
+
z->bra = z->c;
|
553
|
+
if (z->c == z->l || z->p[z->c] != 'y') goto lab0;
|
554
|
+
z->c++;
|
555
|
+
z->ket = z->c;
|
556
|
+
{ int ret = slice_from_s(z, 1, s_21);
|
574
557
|
if (ret < 0) return ret;
|
575
558
|
}
|
576
|
-
z->
|
559
|
+
z->I[2] = 1;
|
577
560
|
lab0:
|
578
561
|
z->c = c1;
|
579
562
|
}
|
580
|
-
{ int c2 = z->c;
|
581
|
-
while(1) {
|
563
|
+
{ int c2 = z->c;
|
564
|
+
while(1) {
|
582
565
|
int c3 = z->c;
|
583
|
-
while(1) {
|
566
|
+
while(1) {
|
584
567
|
int c4 = z->c;
|
585
568
|
if (in_grouping(z, g_v, 97, 121, 0)) goto lab3;
|
586
|
-
z->bra = z->c;
|
587
|
-
if (
|
588
|
-
z->
|
569
|
+
z->bra = z->c;
|
570
|
+
if (z->c == z->l || z->p[z->c] != 'y') goto lab3;
|
571
|
+
z->c++;
|
572
|
+
z->ket = z->c;
|
589
573
|
z->c = c4;
|
590
574
|
break;
|
591
575
|
lab3:
|
592
576
|
z->c = c4;
|
593
577
|
if (z->c >= z->l) goto lab2;
|
594
|
-
z->c++;
|
578
|
+
z->c++;
|
595
579
|
}
|
596
|
-
{ int ret = slice_from_s(z, 1,
|
580
|
+
{ int ret = slice_from_s(z, 1, s_22);
|
597
581
|
if (ret < 0) return ret;
|
598
582
|
}
|
599
|
-
z->
|
583
|
+
z->I[2] = 1;
|
600
584
|
continue;
|
601
585
|
lab2:
|
602
586
|
z->c = c3;
|
@@ -604,132 +588,117 @@ extern int porter_ISO_8859_1_stem(struct SN_env * z) {
|
|
604
588
|
}
|
605
589
|
z->c = c2;
|
606
590
|
}
|
607
|
-
z->I[0] = z->l;
|
608
591
|
z->I[1] = z->l;
|
609
|
-
|
610
|
-
|
592
|
+
z->I[0] = z->l;
|
593
|
+
{ int c5 = z->c;
|
594
|
+
{
|
611
595
|
int ret = out_grouping(z, g_v, 97, 121, 1);
|
612
596
|
if (ret < 0) goto lab4;
|
613
597
|
z->c += ret;
|
614
598
|
}
|
615
|
-
{
|
599
|
+
{
|
616
600
|
int ret = in_grouping(z, g_v, 97, 121, 1);
|
617
601
|
if (ret < 0) goto lab4;
|
618
602
|
z->c += ret;
|
619
603
|
}
|
620
|
-
z->I[
|
621
|
-
{
|
604
|
+
z->I[1] = z->c;
|
605
|
+
{
|
622
606
|
int ret = out_grouping(z, g_v, 97, 121, 1);
|
623
607
|
if (ret < 0) goto lab4;
|
624
608
|
z->c += ret;
|
625
609
|
}
|
626
|
-
{
|
610
|
+
{
|
627
611
|
int ret = in_grouping(z, g_v, 97, 121, 1);
|
628
612
|
if (ret < 0) goto lab4;
|
629
613
|
z->c += ret;
|
630
614
|
}
|
631
|
-
z->I[
|
615
|
+
z->I[0] = z->c;
|
632
616
|
lab4:
|
633
617
|
z->c = c5;
|
634
618
|
}
|
635
|
-
z->lb = z->c; z->c = z->l;
|
619
|
+
z->lb = z->c; z->c = z->l;
|
636
620
|
|
637
|
-
{ int m6 = z->l - z->c; (void)m6;
|
621
|
+
{ int m6 = z->l - z->c; (void)m6;
|
638
622
|
{ int ret = r_Step_1a(z);
|
639
|
-
if (ret == 0) goto lab5; /* call Step_1a, line 127 */
|
640
623
|
if (ret < 0) return ret;
|
641
624
|
}
|
642
|
-
lab5:
|
643
625
|
z->c = z->l - m6;
|
644
626
|
}
|
645
|
-
{ int m7 = z->l - z->c; (void)m7;
|
627
|
+
{ int m7 = z->l - z->c; (void)m7;
|
646
628
|
{ int ret = r_Step_1b(z);
|
647
|
-
if (ret == 0) goto lab6; /* call Step_1b, line 128 */
|
648
629
|
if (ret < 0) return ret;
|
649
630
|
}
|
650
|
-
lab6:
|
651
631
|
z->c = z->l - m7;
|
652
632
|
}
|
653
|
-
{ int m8 = z->l - z->c; (void)m8;
|
633
|
+
{ int m8 = z->l - z->c; (void)m8;
|
654
634
|
{ int ret = r_Step_1c(z);
|
655
|
-
if (ret == 0) goto lab7; /* call Step_1c, line 129 */
|
656
635
|
if (ret < 0) return ret;
|
657
636
|
}
|
658
|
-
lab7:
|
659
637
|
z->c = z->l - m8;
|
660
638
|
}
|
661
|
-
{ int m9 = z->l - z->c; (void)m9;
|
639
|
+
{ int m9 = z->l - z->c; (void)m9;
|
662
640
|
{ int ret = r_Step_2(z);
|
663
|
-
if (ret == 0) goto lab8; /* call Step_2, line 130 */
|
664
641
|
if (ret < 0) return ret;
|
665
642
|
}
|
666
|
-
lab8:
|
667
643
|
z->c = z->l - m9;
|
668
644
|
}
|
669
|
-
{ int m10 = z->l - z->c; (void)m10;
|
645
|
+
{ int m10 = z->l - z->c; (void)m10;
|
670
646
|
{ int ret = r_Step_3(z);
|
671
|
-
if (ret == 0) goto lab9; /* call Step_3, line 131 */
|
672
647
|
if (ret < 0) return ret;
|
673
648
|
}
|
674
|
-
lab9:
|
675
649
|
z->c = z->l - m10;
|
676
650
|
}
|
677
|
-
{ int m11 = z->l - z->c; (void)m11;
|
651
|
+
{ int m11 = z->l - z->c; (void)m11;
|
678
652
|
{ int ret = r_Step_4(z);
|
679
|
-
if (ret == 0) goto lab10; /* call Step_4, line 132 */
|
680
653
|
if (ret < 0) return ret;
|
681
654
|
}
|
682
|
-
lab10:
|
683
655
|
z->c = z->l - m11;
|
684
656
|
}
|
685
|
-
{ int m12 = z->l - z->c; (void)m12;
|
657
|
+
{ int m12 = z->l - z->c; (void)m12;
|
686
658
|
{ int ret = r_Step_5a(z);
|
687
|
-
if (ret == 0) goto lab11; /* call Step_5a, line 133 */
|
688
659
|
if (ret < 0) return ret;
|
689
660
|
}
|
690
|
-
lab11:
|
691
661
|
z->c = z->l - m12;
|
692
662
|
}
|
693
|
-
{ int m13 = z->l - z->c; (void)m13;
|
663
|
+
{ int m13 = z->l - z->c; (void)m13;
|
694
664
|
{ int ret = r_Step_5b(z);
|
695
|
-
if (ret == 0) goto lab12; /* call Step_5b, line 134 */
|
696
665
|
if (ret < 0) return ret;
|
697
666
|
}
|
698
|
-
lab12:
|
699
667
|
z->c = z->l - m13;
|
700
668
|
}
|
701
669
|
z->c = z->lb;
|
702
|
-
{ int c14 = z->c;
|
703
|
-
if (!(z->
|
704
|
-
while(1) {
|
670
|
+
{ int c14 = z->c;
|
671
|
+
if (!(z->I[2])) goto lab5;
|
672
|
+
while(1) {
|
705
673
|
int c15 = z->c;
|
706
|
-
while(1) {
|
674
|
+
while(1) {
|
707
675
|
int c16 = z->c;
|
708
|
-
z->bra = z->c;
|
709
|
-
if (
|
710
|
-
z->
|
676
|
+
z->bra = z->c;
|
677
|
+
if (z->c == z->l || z->p[z->c] != 'Y') goto lab7;
|
678
|
+
z->c++;
|
679
|
+
z->ket = z->c;
|
711
680
|
z->c = c16;
|
712
681
|
break;
|
713
|
-
|
682
|
+
lab7:
|
714
683
|
z->c = c16;
|
715
|
-
if (z->c >= z->l) goto
|
716
|
-
z->c++;
|
684
|
+
if (z->c >= z->l) goto lab6;
|
685
|
+
z->c++;
|
717
686
|
}
|
718
|
-
{ int ret = slice_from_s(z, 1,
|
687
|
+
{ int ret = slice_from_s(z, 1, s_23);
|
719
688
|
if (ret < 0) return ret;
|
720
689
|
}
|
721
690
|
continue;
|
722
|
-
|
691
|
+
lab6:
|
723
692
|
z->c = c15;
|
724
693
|
break;
|
725
694
|
}
|
726
|
-
|
695
|
+
lab5:
|
727
696
|
z->c = c14;
|
728
697
|
}
|
729
698
|
return 1;
|
730
699
|
}
|
731
700
|
|
732
|
-
extern struct SN_env * porter_ISO_8859_1_create_env(void) { return SN_create_env(0,
|
701
|
+
extern struct SN_env * porter_ISO_8859_1_create_env(void) { return SN_create_env(0, 3); }
|
733
702
|
|
734
703
|
extern void porter_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
|
735
704
|
|