isomorfeus-ferret 0.12.2 → 0.12.6

Sign up to get free protection for your applications and to get access to all the features.
Files changed (125) hide show
  1. checksums.yaml +4 -4
  2. data/LICENSE +612 -612
  3. data/README.md +80 -44
  4. data/ext/isomorfeus_ferret_ext/bm_hash.c +9 -6
  5. data/ext/isomorfeus_ferret_ext/bm_micro_string.c +4 -2
  6. data/ext/isomorfeus_ferret_ext/frb_search.c +14 -2
  7. data/ext/isomorfeus_ferret_ext/frb_store.c +34 -5
  8. data/ext/isomorfeus_ferret_ext/frt_posh.h +11 -19
  9. data/ext/isomorfeus_ferret_ext/frt_q_parser.c +1844 -1911
  10. data/ext/isomorfeus_ferret_ext/frt_q_phrase.c +12 -15
  11. data/ext/isomorfeus_ferret_ext/frt_scanner.c +1 -0
  12. data/ext/isomorfeus_ferret_ext/frt_scanner_mb.c +1 -0
  13. data/ext/isomorfeus_ferret_ext/frt_scanner_utf8.c +1 -0
  14. data/ext/isomorfeus_ferret_ext/frt_search.h +1 -1
  15. data/ext/isomorfeus_ferret_ext/libstemmer.c +14 -11
  16. data/ext/isomorfeus_ferret_ext/libstemmer.h +4 -9
  17. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_basque.c +1167 -0
  18. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_basque.h +6 -0
  19. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_catalan.c +1433 -0
  20. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_catalan.h +6 -0
  21. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.c +120 -143
  22. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_danish.h +1 -2
  23. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.c +217 -237
  24. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_dutch.h +1 -1
  25. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.c +377 -432
  26. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_english.h +1 -1
  27. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.c +298 -342
  28. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_finnish.h +1 -2
  29. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.c +530 -524
  30. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_french.h +1 -1
  31. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.c +201 -214
  32. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_german.h +1 -1
  33. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_hungarian.c +1 -1
  34. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_indonesian.c +394 -0
  35. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_indonesian.h +6 -0
  36. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_irish.c +457 -0
  37. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_irish.h +6 -0
  38. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.c +396 -439
  39. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_italian.h +1 -1
  40. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.c +104 -128
  41. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_norwegian.h +1 -1
  42. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.c +242 -273
  43. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_porter.h +1 -1
  44. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.c +406 -461
  45. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_portuguese.h +1 -2
  46. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.c +405 -456
  47. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_spanish.h +1 -1
  48. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.c +108 -126
  49. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_1_swedish.h +1 -1
  50. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_hungarian.c +849 -0
  51. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_hungarian.h +6 -0
  52. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.c +373 -405
  53. data/ext/isomorfeus_ferret_ext/stem_ISO_8859_2_romanian.h +1 -1
  54. data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.c +288 -305
  55. data/ext/isomorfeus_ferret_ext/stem_KOI8_R_russian.h +1 -1
  56. data/ext/isomorfeus_ferret_ext/stem_UTF_8_arabic.c +1651 -0
  57. data/ext/isomorfeus_ferret_ext/stem_UTF_8_arabic.h +6 -0
  58. data/ext/isomorfeus_ferret_ext/stem_UTF_8_armenian.c +546 -0
  59. data/ext/isomorfeus_ferret_ext/stem_UTF_8_armenian.h +6 -0
  60. data/ext/isomorfeus_ferret_ext/stem_UTF_8_basque.c +1171 -0
  61. data/ext/isomorfeus_ferret_ext/stem_UTF_8_basque.h +6 -0
  62. data/ext/isomorfeus_ferret_ext/stem_UTF_8_catalan.c +1436 -0
  63. data/ext/isomorfeus_ferret_ext/stem_UTF_8_catalan.h +6 -0
  64. data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.c +121 -141
  65. data/ext/isomorfeus_ferret_ext/stem_UTF_8_danish.h +1 -1
  66. data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.c +221 -241
  67. data/ext/isomorfeus_ferret_ext/stem_UTF_8_dutch.h +1 -1
  68. data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.c +381 -431
  69. data/ext/isomorfeus_ferret_ext/stem_UTF_8_english.h +1 -1
  70. data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.c +300 -345
  71. data/ext/isomorfeus_ferret_ext/stem_UTF_8_finnish.h +1 -1
  72. data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.c +518 -511
  73. data/ext/isomorfeus_ferret_ext/stem_UTF_8_french.h +1 -1
  74. data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.c +201 -209
  75. data/ext/isomorfeus_ferret_ext/stem_UTF_8_german.h +1 -1
  76. data/ext/isomorfeus_ferret_ext/stem_UTF_8_greek.c +3660 -0
  77. data/ext/isomorfeus_ferret_ext/stem_UTF_8_greek.h +6 -0
  78. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hindi.c +309 -0
  79. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hindi.h +6 -0
  80. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.c +306 -671
  81. data/ext/isomorfeus_ferret_ext/stem_UTF_8_hungarian.h +1 -1
  82. data/ext/isomorfeus_ferret_ext/stem_UTF_8_indonesian.c +394 -0
  83. data/ext/isomorfeus_ferret_ext/stem_UTF_8_indonesian.h +6 -0
  84. data/ext/isomorfeus_ferret_ext/stem_UTF_8_irish.c +457 -0
  85. data/ext/isomorfeus_ferret_ext/stem_UTF_8_irish.h +6 -0
  86. data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.c +400 -442
  87. data/ext/isomorfeus_ferret_ext/stem_UTF_8_italian.h +1 -1
  88. data/ext/isomorfeus_ferret_ext/stem_UTF_8_lithuanian.c +824 -0
  89. data/ext/isomorfeus_ferret_ext/stem_UTF_8_lithuanian.h +6 -0
  90. data/ext/isomorfeus_ferret_ext/stem_UTF_8_nepali.c +408 -0
  91. data/ext/isomorfeus_ferret_ext/stem_UTF_8_nepali.h +6 -0
  92. data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.c +105 -127
  93. data/ext/isomorfeus_ferret_ext/stem_UTF_8_norwegian.h +1 -1
  94. data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.c +245 -276
  95. data/ext/isomorfeus_ferret_ext/stem_UTF_8_porter.h +1 -1
  96. data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.c +409 -464
  97. data/ext/isomorfeus_ferret_ext/stem_UTF_8_portuguese.h +1 -1
  98. data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.c +376 -408
  99. data/ext/isomorfeus_ferret_ext/stem_UTF_8_romanian.h +1 -1
  100. data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.c +272 -287
  101. data/ext/isomorfeus_ferret_ext/stem_UTF_8_russian.h +1 -1
  102. data/ext/isomorfeus_ferret_ext/stem_UTF_8_serbian.c +6530 -0
  103. data/ext/isomorfeus_ferret_ext/stem_UTF_8_serbian.h +6 -0
  104. data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.c +407 -458
  105. data/ext/isomorfeus_ferret_ext/stem_UTF_8_spanish.h +1 -1
  106. data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.c +110 -125
  107. data/ext/isomorfeus_ferret_ext/stem_UTF_8_swedish.h +1 -1
  108. data/ext/isomorfeus_ferret_ext/stem_UTF_8_tamil.c +1865 -0
  109. data/ext/isomorfeus_ferret_ext/stem_UTF_8_tamil.h +6 -0
  110. data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.c +698 -806
  111. data/ext/isomorfeus_ferret_ext/stem_UTF_8_turkish.h +1 -1
  112. data/ext/isomorfeus_ferret_ext/stem_UTF_8_yiddish.c +1220 -0
  113. data/ext/isomorfeus_ferret_ext/stem_UTF_8_yiddish.h +6 -0
  114. data/ext/isomorfeus_ferret_ext/stem_api.c +1 -9
  115. data/ext/isomorfeus_ferret_ext/stem_api.h +1 -3
  116. data/ext/isomorfeus_ferret_ext/stem_header.h +30 -26
  117. data/ext/isomorfeus_ferret_ext/stem_modules.h +113 -26
  118. data/ext/isomorfeus_ferret_ext/stem_modules.txt +18 -5
  119. data/ext/isomorfeus_ferret_ext/stem_utilities.c +167 -132
  120. data/ext/isomorfeus_ferret_ext/test.c +7 -1
  121. data/ext/isomorfeus_ferret_ext/test_search.c +0 -1
  122. data/lib/isomorfeus/ferret/index/index.rb +1 -1
  123. data/lib/isomorfeus/ferret/version.rb +1 -1
  124. metadata +43 -7
  125. data/ext/isomorfeus_ferret_ext/q_parser.y +0 -1366
@@ -1,5 +1,4 @@
1
-
2
- /* This file was generated automatically by the Snowball to ANSI C compiler */
1
+ /* Generated by Snowball 2.2.0 - https://snowballstem.org/ */
3
2
 
4
3
  #include "stem_header.h"
5
4
 
@@ -28,13 +27,13 @@ static const symbol s_0_6[1] = { 0xFA };
28
27
 
29
28
  static const struct among a_0[7] =
30
29
  {
31
- /* 0 */ { 0, 0, -1, 7, 0},
32
- /* 1 */ { 2, s_0_1, 0, 6, 0},
33
- /* 2 */ { 1, s_0_2, 0, 1, 0},
34
- /* 3 */ { 1, s_0_3, 0, 2, 0},
35
- /* 4 */ { 1, s_0_4, 0, 3, 0},
36
- /* 5 */ { 1, s_0_5, 0, 4, 0},
37
- /* 6 */ { 1, s_0_6, 0, 5, 0}
30
+ { 0, 0, -1, 7, 0},
31
+ { 2, s_0_1, 0, 6, 0},
32
+ { 1, s_0_2, 0, 1, 0},
33
+ { 1, s_0_3, 0, 2, 0},
34
+ { 1, s_0_4, 0, 3, 0},
35
+ { 1, s_0_5, 0, 4, 0},
36
+ { 1, s_0_6, 0, 5, 0}
38
37
  };
39
38
 
40
39
  static const symbol s_1_1[1] = { 'I' };
@@ -42,9 +41,9 @@ static const symbol s_1_2[1] = { 'U' };
42
41
 
43
42
  static const struct among a_1[3] =
44
43
  {
45
- /* 0 */ { 0, 0, -1, 3, 0},
46
- /* 1 */ { 1, s_1_1, 0, 1, 0},
47
- /* 2 */ { 1, s_1_2, 0, 2, 0}
44
+ { 0, 0, -1, 3, 0},
45
+ { 1, s_1_1, 0, 1, 0},
46
+ { 1, s_1_2, 0, 2, 0}
48
47
  };
49
48
 
50
49
  static const symbol s_2_0[2] = { 'l', 'a' };
@@ -87,43 +86,43 @@ static const symbol s_2_36[4] = { 'v', 'e', 'l', 'o' };
87
86
 
88
87
  static const struct among a_2[37] =
89
88
  {
90
- /* 0 */ { 2, s_2_0, -1, -1, 0},
91
- /* 1 */ { 4, s_2_1, 0, -1, 0},
92
- /* 2 */ { 6, s_2_2, 0, -1, 0},
93
- /* 3 */ { 4, s_2_3, 0, -1, 0},
94
- /* 4 */ { 4, s_2_4, 0, -1, 0},
95
- /* 5 */ { 4, s_2_5, 0, -1, 0},
96
- /* 6 */ { 2, s_2_6, -1, -1, 0},
97
- /* 7 */ { 4, s_2_7, 6, -1, 0},
98
- /* 8 */ { 6, s_2_8, 6, -1, 0},
99
- /* 9 */ { 4, s_2_9, 6, -1, 0},
100
- /* 10 */ { 4, s_2_10, 6, -1, 0},
101
- /* 11 */ { 4, s_2_11, 6, -1, 0},
102
- /* 12 */ { 2, s_2_12, -1, -1, 0},
103
- /* 13 */ { 4, s_2_13, 12, -1, 0},
104
- /* 14 */ { 6, s_2_14, 12, -1, 0},
105
- /* 15 */ { 4, s_2_15, 12, -1, 0},
106
- /* 16 */ { 4, s_2_16, 12, -1, 0},
107
- /* 17 */ { 4, s_2_17, 12, -1, 0},
108
- /* 18 */ { 4, s_2_18, 12, -1, 0},
109
- /* 19 */ { 2, s_2_19, -1, -1, 0},
110
- /* 20 */ { 2, s_2_20, -1, -1, 0},
111
- /* 21 */ { 4, s_2_21, 20, -1, 0},
112
- /* 22 */ { 6, s_2_22, 20, -1, 0},
113
- /* 23 */ { 4, s_2_23, 20, -1, 0},
114
- /* 24 */ { 4, s_2_24, 20, -1, 0},
115
- /* 25 */ { 4, s_2_25, 20, -1, 0},
116
- /* 26 */ { 3, s_2_26, 20, -1, 0},
117
- /* 27 */ { 2, s_2_27, -1, -1, 0},
118
- /* 28 */ { 2, s_2_28, -1, -1, 0},
119
- /* 29 */ { 2, s_2_29, -1, -1, 0},
120
- /* 30 */ { 2, s_2_30, -1, -1, 0},
121
- /* 31 */ { 2, s_2_31, -1, -1, 0},
122
- /* 32 */ { 4, s_2_32, 31, -1, 0},
123
- /* 33 */ { 6, s_2_33, 31, -1, 0},
124
- /* 34 */ { 4, s_2_34, 31, -1, 0},
125
- /* 35 */ { 4, s_2_35, 31, -1, 0},
126
- /* 36 */ { 4, s_2_36, 31, -1, 0}
89
+ { 2, s_2_0, -1, -1, 0},
90
+ { 4, s_2_1, 0, -1, 0},
91
+ { 6, s_2_2, 0, -1, 0},
92
+ { 4, s_2_3, 0, -1, 0},
93
+ { 4, s_2_4, 0, -1, 0},
94
+ { 4, s_2_5, 0, -1, 0},
95
+ { 2, s_2_6, -1, -1, 0},
96
+ { 4, s_2_7, 6, -1, 0},
97
+ { 6, s_2_8, 6, -1, 0},
98
+ { 4, s_2_9, 6, -1, 0},
99
+ { 4, s_2_10, 6, -1, 0},
100
+ { 4, s_2_11, 6, -1, 0},
101
+ { 2, s_2_12, -1, -1, 0},
102
+ { 4, s_2_13, 12, -1, 0},
103
+ { 6, s_2_14, 12, -1, 0},
104
+ { 4, s_2_15, 12, -1, 0},
105
+ { 4, s_2_16, 12, -1, 0},
106
+ { 4, s_2_17, 12, -1, 0},
107
+ { 4, s_2_18, 12, -1, 0},
108
+ { 2, s_2_19, -1, -1, 0},
109
+ { 2, s_2_20, -1, -1, 0},
110
+ { 4, s_2_21, 20, -1, 0},
111
+ { 6, s_2_22, 20, -1, 0},
112
+ { 4, s_2_23, 20, -1, 0},
113
+ { 4, s_2_24, 20, -1, 0},
114
+ { 4, s_2_25, 20, -1, 0},
115
+ { 3, s_2_26, 20, -1, 0},
116
+ { 2, s_2_27, -1, -1, 0},
117
+ { 2, s_2_28, -1, -1, 0},
118
+ { 2, s_2_29, -1, -1, 0},
119
+ { 2, s_2_30, -1, -1, 0},
120
+ { 2, s_2_31, -1, -1, 0},
121
+ { 4, s_2_32, 31, -1, 0},
122
+ { 6, s_2_33, 31, -1, 0},
123
+ { 4, s_2_34, 31, -1, 0},
124
+ { 4, s_2_35, 31, -1, 0},
125
+ { 4, s_2_36, 31, -1, 0}
127
126
  };
128
127
 
129
128
  static const symbol s_3_0[4] = { 'a', 'n', 'd', 'o' };
@@ -134,11 +133,11 @@ static const symbol s_3_4[2] = { 'i', 'r' };
134
133
 
135
134
  static const struct among a_3[5] =
136
135
  {
137
- /* 0 */ { 4, s_3_0, -1, 1, 0},
138
- /* 1 */ { 4, s_3_1, -1, 1, 0},
139
- /* 2 */ { 2, s_3_2, -1, 2, 0},
140
- /* 3 */ { 2, s_3_3, -1, 2, 0},
141
- /* 4 */ { 2, s_3_4, -1, 2, 0}
136
+ { 4, s_3_0, -1, 1, 0},
137
+ { 4, s_3_1, -1, 1, 0},
138
+ { 2, s_3_2, -1, 2, 0},
139
+ { 2, s_3_3, -1, 2, 0},
140
+ { 2, s_3_4, -1, 2, 0}
142
141
  };
143
142
 
144
143
  static const symbol s_4_0[2] = { 'i', 'c' };
@@ -148,10 +147,10 @@ static const symbol s_4_3[2] = { 'i', 'v' };
148
147
 
149
148
  static const struct among a_4[4] =
150
149
  {
151
- /* 0 */ { 2, s_4_0, -1, -1, 0},
152
- /* 1 */ { 4, s_4_1, -1, -1, 0},
153
- /* 2 */ { 2, s_4_2, -1, -1, 0},
154
- /* 3 */ { 2, s_4_3, -1, 1, 0}
150
+ { 2, s_4_0, -1, -1, 0},
151
+ { 4, s_4_1, -1, -1, 0},
152
+ { 2, s_4_2, -1, -1, 0},
153
+ { 2, s_4_3, -1, 1, 0}
155
154
  };
156
155
 
157
156
  static const symbol s_5_0[2] = { 'i', 'c' };
@@ -160,9 +159,9 @@ static const symbol s_5_2[2] = { 'i', 'v' };
160
159
 
161
160
  static const struct among a_5[3] =
162
161
  {
163
- /* 0 */ { 2, s_5_0, -1, 1, 0},
164
- /* 1 */ { 4, s_5_1, -1, 1, 0},
165
- /* 2 */ { 2, s_5_2, -1, 1, 0}
162
+ { 2, s_5_0, -1, 1, 0},
163
+ { 4, s_5_1, -1, 1, 0},
164
+ { 2, s_5_2, -1, 1, 0}
166
165
  };
167
166
 
168
167
  static const symbol s_6_0[3] = { 'i', 'c', 'a' };
@@ -219,57 +218,57 @@ static const symbol s_6_50[4] = { 'i', 's', 't', 0xEC };
219
218
 
220
219
  static const struct among a_6[51] =
221
220
  {
222
- /* 0 */ { 3, s_6_0, -1, 1, 0},
223
- /* 1 */ { 5, s_6_1, -1, 3, 0},
224
- /* 2 */ { 3, s_6_2, -1, 1, 0},
225
- /* 3 */ { 4, s_6_3, -1, 1, 0},
226
- /* 4 */ { 3, s_6_4, -1, 9, 0},
227
- /* 5 */ { 4, s_6_5, -1, 1, 0},
228
- /* 6 */ { 4, s_6_6, -1, 5, 0},
229
- /* 7 */ { 3, s_6_7, -1, 1, 0},
230
- /* 8 */ { 6, s_6_8, 7, 1, 0},
231
- /* 9 */ { 4, s_6_9, -1, 1, 0},
232
- /* 10 */ { 5, s_6_10, -1, 3, 0},
233
- /* 11 */ { 5, s_6_11, -1, 1, 0},
234
- /* 12 */ { 5, s_6_12, -1, 1, 0},
235
- /* 13 */ { 6, s_6_13, -1, 4, 0},
236
- /* 14 */ { 6, s_6_14, -1, 2, 0},
237
- /* 15 */ { 6, s_6_15, -1, 4, 0},
238
- /* 16 */ { 5, s_6_16, -1, 2, 0},
239
- /* 17 */ { 3, s_6_17, -1, 1, 0},
240
- /* 18 */ { 4, s_6_18, -1, 1, 0},
241
- /* 19 */ { 5, s_6_19, -1, 1, 0},
242
- /* 20 */ { 6, s_6_20, 19, 7, 0},
243
- /* 21 */ { 4, s_6_21, -1, 1, 0},
244
- /* 22 */ { 3, s_6_22, -1, 9, 0},
245
- /* 23 */ { 4, s_6_23, -1, 1, 0},
246
- /* 24 */ { 4, s_6_24, -1, 5, 0},
247
- /* 25 */ { 3, s_6_25, -1, 1, 0},
248
- /* 26 */ { 6, s_6_26, 25, 1, 0},
249
- /* 27 */ { 4, s_6_27, -1, 1, 0},
250
- /* 28 */ { 5, s_6_28, -1, 1, 0},
251
- /* 29 */ { 5, s_6_29, -1, 1, 0},
252
- /* 30 */ { 4, s_6_30, -1, 1, 0},
253
- /* 31 */ { 6, s_6_31, -1, 4, 0},
254
- /* 32 */ { 6, s_6_32, -1, 2, 0},
255
- /* 33 */ { 6, s_6_33, -1, 4, 0},
256
- /* 34 */ { 5, s_6_34, -1, 2, 0},
257
- /* 35 */ { 3, s_6_35, -1, 1, 0},
258
- /* 36 */ { 4, s_6_36, -1, 1, 0},
259
- /* 37 */ { 6, s_6_37, -1, 6, 0},
260
- /* 38 */ { 6, s_6_38, -1, 6, 0},
261
- /* 39 */ { 4, s_6_39, -1, 1, 0},
262
- /* 40 */ { 3, s_6_40, -1, 9, 0},
263
- /* 41 */ { 3, s_6_41, -1, 1, 0},
264
- /* 42 */ { 4, s_6_42, -1, 1, 0},
265
- /* 43 */ { 3, s_6_43, -1, 1, 0},
266
- /* 44 */ { 6, s_6_44, -1, 6, 0},
267
- /* 45 */ { 6, s_6_45, -1, 6, 0},
268
- /* 46 */ { 3, s_6_46, -1, 9, 0},
269
- /* 47 */ { 3, s_6_47, -1, 8, 0},
270
- /* 48 */ { 4, s_6_48, -1, 1, 0},
271
- /* 49 */ { 4, s_6_49, -1, 1, 0},
272
- /* 50 */ { 4, s_6_50, -1, 1, 0}
221
+ { 3, s_6_0, -1, 1, 0},
222
+ { 5, s_6_1, -1, 3, 0},
223
+ { 3, s_6_2, -1, 1, 0},
224
+ { 4, s_6_3, -1, 1, 0},
225
+ { 3, s_6_4, -1, 9, 0},
226
+ { 4, s_6_5, -1, 1, 0},
227
+ { 4, s_6_6, -1, 5, 0},
228
+ { 3, s_6_7, -1, 1, 0},
229
+ { 6, s_6_8, 7, 1, 0},
230
+ { 4, s_6_9, -1, 1, 0},
231
+ { 5, s_6_10, -1, 3, 0},
232
+ { 5, s_6_11, -1, 1, 0},
233
+ { 5, s_6_12, -1, 1, 0},
234
+ { 6, s_6_13, -1, 4, 0},
235
+ { 6, s_6_14, -1, 2, 0},
236
+ { 6, s_6_15, -1, 4, 0},
237
+ { 5, s_6_16, -1, 2, 0},
238
+ { 3, s_6_17, -1, 1, 0},
239
+ { 4, s_6_18, -1, 1, 0},
240
+ { 5, s_6_19, -1, 1, 0},
241
+ { 6, s_6_20, 19, 7, 0},
242
+ { 4, s_6_21, -1, 1, 0},
243
+ { 3, s_6_22, -1, 9, 0},
244
+ { 4, s_6_23, -1, 1, 0},
245
+ { 4, s_6_24, -1, 5, 0},
246
+ { 3, s_6_25, -1, 1, 0},
247
+ { 6, s_6_26, 25, 1, 0},
248
+ { 4, s_6_27, -1, 1, 0},
249
+ { 5, s_6_28, -1, 1, 0},
250
+ { 5, s_6_29, -1, 1, 0},
251
+ { 4, s_6_30, -1, 1, 0},
252
+ { 6, s_6_31, -1, 4, 0},
253
+ { 6, s_6_32, -1, 2, 0},
254
+ { 6, s_6_33, -1, 4, 0},
255
+ { 5, s_6_34, -1, 2, 0},
256
+ { 3, s_6_35, -1, 1, 0},
257
+ { 4, s_6_36, -1, 1, 0},
258
+ { 6, s_6_37, -1, 6, 0},
259
+ { 6, s_6_38, -1, 6, 0},
260
+ { 4, s_6_39, -1, 1, 0},
261
+ { 3, s_6_40, -1, 9, 0},
262
+ { 3, s_6_41, -1, 1, 0},
263
+ { 4, s_6_42, -1, 1, 0},
264
+ { 3, s_6_43, -1, 1, 0},
265
+ { 6, s_6_44, -1, 6, 0},
266
+ { 6, s_6_45, -1, 6, 0},
267
+ { 3, s_6_46, -1, 9, 0},
268
+ { 3, s_6_47, -1, 8, 0},
269
+ { 4, s_6_48, -1, 1, 0},
270
+ { 4, s_6_49, -1, 1, 0},
271
+ { 4, s_6_50, -1, 1, 0}
273
272
  };
274
273
 
275
274
  static const symbol s_7_0[4] = { 'i', 's', 'c', 'a' };
@@ -362,93 +361,93 @@ static const symbol s_7_86[3] = { 'i', 'r', 0xF2 };
362
361
 
363
362
  static const struct among a_7[87] =
364
363
  {
365
- /* 0 */ { 4, s_7_0, -1, 1, 0},
366
- /* 1 */ { 4, s_7_1, -1, 1, 0},
367
- /* 2 */ { 3, s_7_2, -1, 1, 0},
368
- /* 3 */ { 3, s_7_3, -1, 1, 0},
369
- /* 4 */ { 3, s_7_4, -1, 1, 0},
370
- /* 5 */ { 3, s_7_5, -1, 1, 0},
371
- /* 6 */ { 3, s_7_6, -1, 1, 0},
372
- /* 7 */ { 3, s_7_7, -1, 1, 0},
373
- /* 8 */ { 6, s_7_8, -1, 1, 0},
374
- /* 9 */ { 6, s_7_9, -1, 1, 0},
375
- /* 10 */ { 4, s_7_10, -1, 1, 0},
376
- /* 11 */ { 4, s_7_11, -1, 1, 0},
377
- /* 12 */ { 3, s_7_12, -1, 1, 0},
378
- /* 13 */ { 3, s_7_13, -1, 1, 0},
379
- /* 14 */ { 3, s_7_14, -1, 1, 0},
380
- /* 15 */ { 4, s_7_15, -1, 1, 0},
381
- /* 16 */ { 3, s_7_16, -1, 1, 0},
382
- /* 17 */ { 5, s_7_17, 16, 1, 0},
383
- /* 18 */ { 5, s_7_18, 16, 1, 0},
384
- /* 19 */ { 5, s_7_19, 16, 1, 0},
385
- /* 20 */ { 3, s_7_20, -1, 1, 0},
386
- /* 21 */ { 5, s_7_21, 20, 1, 0},
387
- /* 22 */ { 5, s_7_22, 20, 1, 0},
388
- /* 23 */ { 3, s_7_23, -1, 1, 0},
389
- /* 24 */ { 6, s_7_24, -1, 1, 0},
390
- /* 25 */ { 6, s_7_25, -1, 1, 0},
391
- /* 26 */ { 3, s_7_26, -1, 1, 0},
392
- /* 27 */ { 4, s_7_27, -1, 1, 0},
393
- /* 28 */ { 4, s_7_28, -1, 1, 0},
394
- /* 29 */ { 4, s_7_29, -1, 1, 0},
395
- /* 30 */ { 4, s_7_30, -1, 1, 0},
396
- /* 31 */ { 4, s_7_31, -1, 1, 0},
397
- /* 32 */ { 4, s_7_32, -1, 1, 0},
398
- /* 33 */ { 4, s_7_33, -1, 1, 0},
399
- /* 34 */ { 3, s_7_34, -1, 1, 0},
400
- /* 35 */ { 3, s_7_35, -1, 1, 0},
401
- /* 36 */ { 6, s_7_36, -1, 1, 0},
402
- /* 37 */ { 6, s_7_37, -1, 1, 0},
403
- /* 38 */ { 3, s_7_38, -1, 1, 0},
404
- /* 39 */ { 3, s_7_39, -1, 1, 0},
405
- /* 40 */ { 3, s_7_40, -1, 1, 0},
406
- /* 41 */ { 3, s_7_41, -1, 1, 0},
407
- /* 42 */ { 4, s_7_42, -1, 1, 0},
408
- /* 43 */ { 4, s_7_43, -1, 1, 0},
409
- /* 44 */ { 4, s_7_44, -1, 1, 0},
410
- /* 45 */ { 4, s_7_45, -1, 1, 0},
411
- /* 46 */ { 4, s_7_46, -1, 1, 0},
412
- /* 47 */ { 5, s_7_47, -1, 1, 0},
413
- /* 48 */ { 5, s_7_48, -1, 1, 0},
414
- /* 49 */ { 5, s_7_49, -1, 1, 0},
415
- /* 50 */ { 5, s_7_50, -1, 1, 0},
416
- /* 51 */ { 5, s_7_51, -1, 1, 0},
417
- /* 52 */ { 6, s_7_52, -1, 1, 0},
418
- /* 53 */ { 4, s_7_53, -1, 1, 0},
419
- /* 54 */ { 4, s_7_54, -1, 1, 0},
420
- /* 55 */ { 6, s_7_55, 54, 1, 0},
421
- /* 56 */ { 6, s_7_56, 54, 1, 0},
422
- /* 57 */ { 4, s_7_57, -1, 1, 0},
423
- /* 58 */ { 3, s_7_58, -1, 1, 0},
424
- /* 59 */ { 6, s_7_59, 58, 1, 0},
425
- /* 60 */ { 5, s_7_60, 58, 1, 0},
426
- /* 61 */ { 5, s_7_61, 58, 1, 0},
427
- /* 62 */ { 5, s_7_62, 58, 1, 0},
428
- /* 63 */ { 6, s_7_63, -1, 1, 0},
429
- /* 64 */ { 6, s_7_64, -1, 1, 0},
430
- /* 65 */ { 3, s_7_65, -1, 1, 0},
431
- /* 66 */ { 6, s_7_66, 65, 1, 0},
432
- /* 67 */ { 5, s_7_67, 65, 1, 0},
433
- /* 68 */ { 5, s_7_68, 65, 1, 0},
434
- /* 69 */ { 5, s_7_69, 65, 1, 0},
435
- /* 70 */ { 8, s_7_70, -1, 1, 0},
436
- /* 71 */ { 8, s_7_71, -1, 1, 0},
437
- /* 72 */ { 6, s_7_72, -1, 1, 0},
438
- /* 73 */ { 6, s_7_73, -1, 1, 0},
439
- /* 74 */ { 6, s_7_74, -1, 1, 0},
440
- /* 75 */ { 3, s_7_75, -1, 1, 0},
441
- /* 76 */ { 3, s_7_76, -1, 1, 0},
442
- /* 77 */ { 3, s_7_77, -1, 1, 0},
443
- /* 78 */ { 3, s_7_78, -1, 1, 0},
444
- /* 79 */ { 3, s_7_79, -1, 1, 0},
445
- /* 80 */ { 3, s_7_80, -1, 1, 0},
446
- /* 81 */ { 2, s_7_81, -1, 1, 0},
447
- /* 82 */ { 2, s_7_82, -1, 1, 0},
448
- /* 83 */ { 3, s_7_83, -1, 1, 0},
449
- /* 84 */ { 3, s_7_84, -1, 1, 0},
450
- /* 85 */ { 3, s_7_85, -1, 1, 0},
451
- /* 86 */ { 3, s_7_86, -1, 1, 0}
364
+ { 4, s_7_0, -1, 1, 0},
365
+ { 4, s_7_1, -1, 1, 0},
366
+ { 3, s_7_2, -1, 1, 0},
367
+ { 3, s_7_3, -1, 1, 0},
368
+ { 3, s_7_4, -1, 1, 0},
369
+ { 3, s_7_5, -1, 1, 0},
370
+ { 3, s_7_6, -1, 1, 0},
371
+ { 3, s_7_7, -1, 1, 0},
372
+ { 6, s_7_8, -1, 1, 0},
373
+ { 6, s_7_9, -1, 1, 0},
374
+ { 4, s_7_10, -1, 1, 0},
375
+ { 4, s_7_11, -1, 1, 0},
376
+ { 3, s_7_12, -1, 1, 0},
377
+ { 3, s_7_13, -1, 1, 0},
378
+ { 3, s_7_14, -1, 1, 0},
379
+ { 4, s_7_15, -1, 1, 0},
380
+ { 3, s_7_16, -1, 1, 0},
381
+ { 5, s_7_17, 16, 1, 0},
382
+ { 5, s_7_18, 16, 1, 0},
383
+ { 5, s_7_19, 16, 1, 0},
384
+ { 3, s_7_20, -1, 1, 0},
385
+ { 5, s_7_21, 20, 1, 0},
386
+ { 5, s_7_22, 20, 1, 0},
387
+ { 3, s_7_23, -1, 1, 0},
388
+ { 6, s_7_24, -1, 1, 0},
389
+ { 6, s_7_25, -1, 1, 0},
390
+ { 3, s_7_26, -1, 1, 0},
391
+ { 4, s_7_27, -1, 1, 0},
392
+ { 4, s_7_28, -1, 1, 0},
393
+ { 4, s_7_29, -1, 1, 0},
394
+ { 4, s_7_30, -1, 1, 0},
395
+ { 4, s_7_31, -1, 1, 0},
396
+ { 4, s_7_32, -1, 1, 0},
397
+ { 4, s_7_33, -1, 1, 0},
398
+ { 3, s_7_34, -1, 1, 0},
399
+ { 3, s_7_35, -1, 1, 0},
400
+ { 6, s_7_36, -1, 1, 0},
401
+ { 6, s_7_37, -1, 1, 0},
402
+ { 3, s_7_38, -1, 1, 0},
403
+ { 3, s_7_39, -1, 1, 0},
404
+ { 3, s_7_40, -1, 1, 0},
405
+ { 3, s_7_41, -1, 1, 0},
406
+ { 4, s_7_42, -1, 1, 0},
407
+ { 4, s_7_43, -1, 1, 0},
408
+ { 4, s_7_44, -1, 1, 0},
409
+ { 4, s_7_45, -1, 1, 0},
410
+ { 4, s_7_46, -1, 1, 0},
411
+ { 5, s_7_47, -1, 1, 0},
412
+ { 5, s_7_48, -1, 1, 0},
413
+ { 5, s_7_49, -1, 1, 0},
414
+ { 5, s_7_50, -1, 1, 0},
415
+ { 5, s_7_51, -1, 1, 0},
416
+ { 6, s_7_52, -1, 1, 0},
417
+ { 4, s_7_53, -1, 1, 0},
418
+ { 4, s_7_54, -1, 1, 0},
419
+ { 6, s_7_55, 54, 1, 0},
420
+ { 6, s_7_56, 54, 1, 0},
421
+ { 4, s_7_57, -1, 1, 0},
422
+ { 3, s_7_58, -1, 1, 0},
423
+ { 6, s_7_59, 58, 1, 0},
424
+ { 5, s_7_60, 58, 1, 0},
425
+ { 5, s_7_61, 58, 1, 0},
426
+ { 5, s_7_62, 58, 1, 0},
427
+ { 6, s_7_63, -1, 1, 0},
428
+ { 6, s_7_64, -1, 1, 0},
429
+ { 3, s_7_65, -1, 1, 0},
430
+ { 6, s_7_66, 65, 1, 0},
431
+ { 5, s_7_67, 65, 1, 0},
432
+ { 5, s_7_68, 65, 1, 0},
433
+ { 5, s_7_69, 65, 1, 0},
434
+ { 8, s_7_70, -1, 1, 0},
435
+ { 8, s_7_71, -1, 1, 0},
436
+ { 6, s_7_72, -1, 1, 0},
437
+ { 6, s_7_73, -1, 1, 0},
438
+ { 6, s_7_74, -1, 1, 0},
439
+ { 3, s_7_75, -1, 1, 0},
440
+ { 3, s_7_76, -1, 1, 0},
441
+ { 3, s_7_77, -1, 1, 0},
442
+ { 3, s_7_78, -1, 1, 0},
443
+ { 3, s_7_79, -1, 1, 0},
444
+ { 3, s_7_80, -1, 1, 0},
445
+ { 2, s_7_81, -1, 1, 0},
446
+ { 2, s_7_82, -1, 1, 0},
447
+ { 3, s_7_83, -1, 1, 0},
448
+ { 3, s_7_84, -1, 1, 0},
449
+ { 3, s_7_85, -1, 1, 0},
450
+ { 3, s_7_86, -1, 1, 0}
452
451
  };
453
452
 
454
453
  static const unsigned char g_v[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 128, 8, 2, 1 };
@@ -463,125 +462,122 @@ static const symbol s_2[] = { 0xEC };
463
462
  static const symbol s_3[] = { 0xF2 };
464
463
  static const symbol s_4[] = { 0xF9 };
465
464
  static const symbol s_5[] = { 'q', 'U' };
466
- static const symbol s_6[] = { 'u' };
467
- static const symbol s_7[] = { 'U' };
465
+ static const symbol s_6[] = { 'U' };
466
+ static const symbol s_7[] = { 'I' };
468
467
  static const symbol s_8[] = { 'i' };
469
- static const symbol s_9[] = { 'I' };
470
- static const symbol s_10[] = { 'i' };
471
- static const symbol s_11[] = { 'u' };
472
- static const symbol s_12[] = { 'e' };
473
- static const symbol s_13[] = { 'i', 'c' };
474
- static const symbol s_14[] = { 'l', 'o', 'g' };
475
- static const symbol s_15[] = { 'u' };
476
- static const symbol s_16[] = { 'e', 'n', 't', 'e' };
477
- static const symbol s_17[] = { 'a', 't' };
478
- static const symbol s_18[] = { 'a', 't' };
479
- static const symbol s_19[] = { 'i', 'c' };
480
- static const symbol s_20[] = { 'i' };
481
- static const symbol s_21[] = { 'h' };
468
+ static const symbol s_9[] = { 'u' };
469
+ static const symbol s_10[] = { 'e' };
470
+ static const symbol s_11[] = { 'i', 'c' };
471
+ static const symbol s_12[] = { 'l', 'o', 'g' };
472
+ static const symbol s_13[] = { 'u' };
473
+ static const symbol s_14[] = { 'e', 'n', 't', 'e' };
474
+ static const symbol s_15[] = { 'a', 't' };
475
+ static const symbol s_16[] = { 'a', 't' };
476
+ static const symbol s_17[] = { 'i', 'c' };
482
477
 
483
478
  static int r_prelude(struct SN_env * z) {
484
479
  int among_var;
485
- { int c_test = z->c; /* test, line 35 */
486
- while(1) { /* repeat, line 35 */
487
- int c1 = z->c;
488
- z->bra = z->c; /* [, line 36 */
489
- among_var = find_among(z, a_0, 7); /* substring, line 36 */
480
+ { int c_test1 = z->c;
481
+ while(1) {
482
+ int c2 = z->c;
483
+ z->bra = z->c;
484
+ among_var = find_among(z, a_0, 7);
490
485
  if (!(among_var)) goto lab0;
491
- z->ket = z->c; /* ], line 36 */
492
- switch(among_var) {
493
- case 0: goto lab0;
486
+ z->ket = z->c;
487
+ switch (among_var) {
494
488
  case 1:
495
- { int ret = slice_from_s(z, 1, s_0); /* <-, line 37 */
489
+ { int ret = slice_from_s(z, 1, s_0);
496
490
  if (ret < 0) return ret;
497
491
  }
498
492
  break;
499
493
  case 2:
500
- { int ret = slice_from_s(z, 1, s_1); /* <-, line 38 */
494
+ { int ret = slice_from_s(z, 1, s_1);
501
495
  if (ret < 0) return ret;
502
496
  }
503
497
  break;
504
498
  case 3:
505
- { int ret = slice_from_s(z, 1, s_2); /* <-, line 39 */
499
+ { int ret = slice_from_s(z, 1, s_2);
506
500
  if (ret < 0) return ret;
507
501
  }
508
502
  break;
509
503
  case 4:
510
- { int ret = slice_from_s(z, 1, s_3); /* <-, line 40 */
504
+ { int ret = slice_from_s(z, 1, s_3);
511
505
  if (ret < 0) return ret;
512
506
  }
513
507
  break;
514
508
  case 5:
515
- { int ret = slice_from_s(z, 1, s_4); /* <-, line 41 */
509
+ { int ret = slice_from_s(z, 1, s_4);
516
510
  if (ret < 0) return ret;
517
511
  }
518
512
  break;
519
513
  case 6:
520
- { int ret = slice_from_s(z, 2, s_5); /* <-, line 42 */
514
+ { int ret = slice_from_s(z, 2, s_5);
521
515
  if (ret < 0) return ret;
522
516
  }
523
517
  break;
524
518
  case 7:
525
519
  if (z->c >= z->l) goto lab0;
526
- z->c++; /* next, line 43 */
520
+ z->c++;
527
521
  break;
528
522
  }
529
523
  continue;
530
524
  lab0:
531
- z->c = c1;
525
+ z->c = c2;
532
526
  break;
533
527
  }
534
- z->c = c_test;
528
+ z->c = c_test1;
535
529
  }
536
- while(1) { /* repeat, line 46 */
537
- int c2 = z->c;
538
- while(1) { /* goto, line 46 */
539
- int c3 = z->c;
530
+ while(1) {
531
+ int c3 = z->c;
532
+ while(1) {
533
+ int c4 = z->c;
540
534
  if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
541
- z->bra = z->c; /* [, line 47 */
542
- { int c4 = z->c; /* or, line 47 */
543
- if (!(eq_s(z, 1, s_6))) goto lab4;
544
- z->ket = z->c; /* ], line 47 */
535
+ z->bra = z->c;
536
+ { int c5 = z->c;
537
+ if (z->c == z->l || z->p[z->c] != 'u') goto lab4;
538
+ z->c++;
539
+ z->ket = z->c;
545
540
  if (in_grouping(z, g_v, 97, 249, 0)) goto lab4;
546
- { int ret = slice_from_s(z, 1, s_7); /* <-, line 47 */
541
+ { int ret = slice_from_s(z, 1, s_6);
547
542
  if (ret < 0) return ret;
548
543
  }
549
544
  goto lab3;
550
545
  lab4:
551
- z->c = c4;
552
- if (!(eq_s(z, 1, s_8))) goto lab2;
553
- z->ket = z->c; /* ], line 48 */
546
+ z->c = c5;
547
+ if (z->c == z->l || z->p[z->c] != 'i') goto lab2;
548
+ z->c++;
549
+ z->ket = z->c;
554
550
  if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
555
- { int ret = slice_from_s(z, 1, s_9); /* <-, line 48 */
551
+ { int ret = slice_from_s(z, 1, s_7);
556
552
  if (ret < 0) return ret;
557
553
  }
558
554
  }
559
555
  lab3:
560
- z->c = c3;
556
+ z->c = c4;
561
557
  break;
562
558
  lab2:
563
- z->c = c3;
559
+ z->c = c4;
564
560
  if (z->c >= z->l) goto lab1;
565
- z->c++; /* goto, line 46 */
561
+ z->c++;
566
562
  }
567
563
  continue;
568
564
  lab1:
569
- z->c = c2;
565
+ z->c = c3;
570
566
  break;
571
567
  }
572
568
  return 1;
573
569
  }
574
570
 
575
571
  static int r_mark_regions(struct SN_env * z) {
576
- z->I[0] = z->l;
577
- z->I[1] = z->l;
578
572
  z->I[2] = z->l;
579
- { int c1 = z->c; /* do, line 58 */
580
- { int c2 = z->c; /* or, line 60 */
573
+ z->I[1] = z->l;
574
+ z->I[0] = z->l;
575
+ { int c1 = z->c;
576
+ { int c2 = z->c;
581
577
  if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
582
- { int c3 = z->c; /* or, line 59 */
578
+ { int c3 = z->c;
583
579
  if (out_grouping(z, g_v, 97, 249, 0)) goto lab4;
584
- { /* gopast */ /* grouping v, line 59 */
580
+ {
585
581
  int ret = out_grouping(z, g_v, 97, 249, 1);
586
582
  if (ret < 0) goto lab4;
587
583
  z->c += ret;
@@ -590,7 +586,7 @@ static int r_mark_regions(struct SN_env * z) {
590
586
  lab4:
591
587
  z->c = c3;
592
588
  if (in_grouping(z, g_v, 97, 249, 0)) goto lab2;
593
- { /* gopast */ /* non v, line 59 */
589
+ {
594
590
  int ret = in_grouping(z, g_v, 97, 249, 1);
595
591
  if (ret < 0) goto lab2;
596
592
  z->c += ret;
@@ -601,9 +597,9 @@ static int r_mark_regions(struct SN_env * z) {
601
597
  lab2:
602
598
  z->c = c2;
603
599
  if (out_grouping(z, g_v, 97, 249, 0)) goto lab0;
604
- { int c4 = z->c; /* or, line 61 */
600
+ { int c4 = z->c;
605
601
  if (out_grouping(z, g_v, 97, 249, 0)) goto lab6;
606
- { /* gopast */ /* grouping v, line 61 */
602
+ {
607
603
  int ret = out_grouping(z, g_v, 97, 249, 1);
608
604
  if (ret < 0) goto lab6;
609
605
  z->c += ret;
@@ -613,39 +609,39 @@ static int r_mark_regions(struct SN_env * z) {
613
609
  z->c = c4;
614
610
  if (in_grouping(z, g_v, 97, 249, 0)) goto lab0;
615
611
  if (z->c >= z->l) goto lab0;
616
- z->c++; /* next, line 61 */
612
+ z->c++;
617
613
  }
618
614
  lab5:
619
615
  ;
620
616
  }
621
617
  lab1:
622
- z->I[0] = z->c; /* setmark pV, line 62 */
618
+ z->I[2] = z->c;
623
619
  lab0:
624
620
  z->c = c1;
625
621
  }
626
- { int c5 = z->c; /* do, line 64 */
627
- { /* gopast */ /* grouping v, line 65 */
622
+ { int c5 = z->c;
623
+ {
628
624
  int ret = out_grouping(z, g_v, 97, 249, 1);
629
625
  if (ret < 0) goto lab7;
630
626
  z->c += ret;
631
627
  }
632
- { /* gopast */ /* non v, line 65 */
628
+ {
633
629
  int ret = in_grouping(z, g_v, 97, 249, 1);
634
630
  if (ret < 0) goto lab7;
635
631
  z->c += ret;
636
632
  }
637
- z->I[1] = z->c; /* setmark p1, line 65 */
638
- { /* gopast */ /* grouping v, line 66 */
633
+ z->I[1] = z->c;
634
+ {
639
635
  int ret = out_grouping(z, g_v, 97, 249, 1);
640
636
  if (ret < 0) goto lab7;
641
637
  z->c += ret;
642
638
  }
643
- { /* gopast */ /* non v, line 66 */
639
+ {
644
640
  int ret = in_grouping(z, g_v, 97, 249, 1);
645
641
  if (ret < 0) goto lab7;
646
642
  z->c += ret;
647
643
  }
648
- z->I[2] = z->c; /* setmark p2, line 66 */
644
+ z->I[0] = z->c;
649
645
  lab7:
650
646
  z->c = c5;
651
647
  }
@@ -654,28 +650,27 @@ static int r_mark_regions(struct SN_env * z) {
654
650
 
655
651
  static int r_postlude(struct SN_env * z) {
656
652
  int among_var;
657
- while(1) { /* repeat, line 70 */
653
+ while(1) {
658
654
  int c1 = z->c;
659
- z->bra = z->c; /* [, line 72 */
655
+ z->bra = z->c;
660
656
  if (z->c >= z->l || (z->p[z->c + 0] != 73 && z->p[z->c + 0] != 85)) among_var = 3; else
661
- among_var = find_among(z, a_1, 3); /* substring, line 72 */
657
+ among_var = find_among(z, a_1, 3);
662
658
  if (!(among_var)) goto lab0;
663
- z->ket = z->c; /* ], line 72 */
664
- switch(among_var) {
665
- case 0: goto lab0;
659
+ z->ket = z->c;
660
+ switch (among_var) {
666
661
  case 1:
667
- { int ret = slice_from_s(z, 1, s_10); /* <-, line 73 */
662
+ { int ret = slice_from_s(z, 1, s_8);
668
663
  if (ret < 0) return ret;
669
664
  }
670
665
  break;
671
666
  case 2:
672
- { int ret = slice_from_s(z, 1, s_11); /* <-, line 74 */
667
+ { int ret = slice_from_s(z, 1, s_9);
673
668
  if (ret < 0) return ret;
674
669
  }
675
670
  break;
676
671
  case 3:
677
672
  if (z->c >= z->l) goto lab0;
678
- z->c++; /* next, line 75 */
673
+ z->c++;
679
674
  break;
680
675
  }
681
676
  continue;
@@ -687,7 +682,7 @@ static int r_postlude(struct SN_env * z) {
687
682
  }
688
683
 
689
684
  static int r_RV(struct SN_env * z) {
690
- if (!(z->I[0] <= z->c)) return 0;
685
+ if (!(z->I[2] <= z->c)) return 0;
691
686
  return 1;
692
687
  }
693
688
 
@@ -697,32 +692,30 @@ static int r_R1(struct SN_env * z) {
697
692
  }
698
693
 
699
694
  static int r_R2(struct SN_env * z) {
700
- if (!(z->I[2] <= z->c)) return 0;
695
+ if (!(z->I[0] <= z->c)) return 0;
701
696
  return 1;
702
697
  }
703
698
 
704
699
  static int r_attached_pronoun(struct SN_env * z) {
705
700
  int among_var;
706
- z->ket = z->c; /* [, line 87 */
701
+ z->ket = z->c;
707
702
  if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((33314 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
708
- if (!(find_among_b(z, a_2, 37))) return 0; /* substring, line 87 */
709
- z->bra = z->c; /* ], line 87 */
703
+ if (!(find_among_b(z, a_2, 37))) return 0;
704
+ z->bra = z->c;
710
705
  if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 111 && z->p[z->c - 1] != 114)) return 0;
711
- among_var = find_among_b(z, a_3, 5); /* among, line 97 */
706
+ among_var = find_among_b(z, a_3, 5);
712
707
  if (!(among_var)) return 0;
713
708
  { int ret = r_RV(z);
714
- if (ret == 0) return 0; /* call RV, line 97 */
715
- if (ret < 0) return ret;
709
+ if (ret <= 0) return ret;
716
710
  }
717
- switch(among_var) {
718
- case 0: return 0;
711
+ switch (among_var) {
719
712
  case 1:
720
- { int ret = slice_del(z); /* delete, line 98 */
713
+ { int ret = slice_del(z);
721
714
  if (ret < 0) return ret;
722
715
  }
723
716
  break;
724
717
  case 2:
725
- { int ret = slice_from_s(z, 1, s_12); /* <-, line 99 */
718
+ { int ret = slice_from_s(z, 1, s_10);
726
719
  if (ret < 0) return ret;
727
720
  }
728
721
  break;
@@ -732,38 +725,35 @@ static int r_attached_pronoun(struct SN_env * z) {
732
725
 
733
726
  static int r_standard_suffix(struct SN_env * z) {
734
727
  int among_var;
735
- z->ket = z->c; /* [, line 104 */
736
- among_var = find_among_b(z, a_6, 51); /* substring, line 104 */
728
+ z->ket = z->c;
729
+ among_var = find_among_b(z, a_6, 51);
737
730
  if (!(among_var)) return 0;
738
- z->bra = z->c; /* ], line 104 */
739
- switch(among_var) {
740
- case 0: return 0;
731
+ z->bra = z->c;
732
+ switch (among_var) {
741
733
  case 1:
742
734
  { int ret = r_R2(z);
743
- if (ret == 0) return 0; /* call R2, line 111 */
744
- if (ret < 0) return ret;
735
+ if (ret <= 0) return ret;
745
736
  }
746
- { int ret = slice_del(z); /* delete, line 111 */
737
+ { int ret = slice_del(z);
747
738
  if (ret < 0) return ret;
748
739
  }
749
740
  break;
750
741
  case 2:
751
742
  { int ret = r_R2(z);
752
- if (ret == 0) return 0; /* call R2, line 113 */
753
- if (ret < 0) return ret;
743
+ if (ret <= 0) return ret;
754
744
  }
755
- { int ret = slice_del(z); /* delete, line 113 */
745
+ { int ret = slice_del(z);
756
746
  if (ret < 0) return ret;
757
747
  }
758
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 114 */
759
- z->ket = z->c; /* [, line 114 */
760
- if (!(eq_s_b(z, 2, s_13))) { z->c = z->l - m_keep; goto lab0; }
761
- z->bra = z->c; /* ], line 114 */
748
+ { int m1 = z->l - z->c; (void)m1;
749
+ z->ket = z->c;
750
+ if (!(eq_s_b(z, 2, s_11))) { z->c = z->l - m1; goto lab0; }
751
+ z->bra = z->c;
762
752
  { int ret = r_R2(z);
763
- if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call R2, line 114 */
753
+ if (ret == 0) { z->c = z->l - m1; goto lab0; }
764
754
  if (ret < 0) return ret;
765
755
  }
766
- { int ret = slice_del(z); /* delete, line 114 */
756
+ { int ret = slice_del(z);
767
757
  if (ret < 0) return ret;
768
758
  }
769
759
  lab0:
@@ -772,72 +762,66 @@ static int r_standard_suffix(struct SN_env * z) {
772
762
  break;
773
763
  case 3:
774
764
  { int ret = r_R2(z);
775
- if (ret == 0) return 0; /* call R2, line 117 */
776
- if (ret < 0) return ret;
765
+ if (ret <= 0) return ret;
777
766
  }
778
- { int ret = slice_from_s(z, 3, s_14); /* <-, line 117 */
767
+ { int ret = slice_from_s(z, 3, s_12);
779
768
  if (ret < 0) return ret;
780
769
  }
781
770
  break;
782
771
  case 4:
783
772
  { int ret = r_R2(z);
784
- if (ret == 0) return 0; /* call R2, line 119 */
785
- if (ret < 0) return ret;
773
+ if (ret <= 0) return ret;
786
774
  }
787
- { int ret = slice_from_s(z, 1, s_15); /* <-, line 119 */
775
+ { int ret = slice_from_s(z, 1, s_13);
788
776
  if (ret < 0) return ret;
789
777
  }
790
778
  break;
791
779
  case 5:
792
780
  { int ret = r_R2(z);
793
- if (ret == 0) return 0; /* call R2, line 121 */
794
- if (ret < 0) return ret;
781
+ if (ret <= 0) return ret;
795
782
  }
796
- { int ret = slice_from_s(z, 4, s_16); /* <-, line 121 */
783
+ { int ret = slice_from_s(z, 4, s_14);
797
784
  if (ret < 0) return ret;
798
785
  }
799
786
  break;
800
787
  case 6:
801
788
  { int ret = r_RV(z);
802
- if (ret == 0) return 0; /* call RV, line 123 */
803
- if (ret < 0) return ret;
789
+ if (ret <= 0) return ret;
804
790
  }
805
- { int ret = slice_del(z); /* delete, line 123 */
791
+ { int ret = slice_del(z);
806
792
  if (ret < 0) return ret;
807
793
  }
808
794
  break;
809
795
  case 7:
810
796
  { int ret = r_R1(z);
811
- if (ret == 0) return 0; /* call R1, line 125 */
812
- if (ret < 0) return ret;
797
+ if (ret <= 0) return ret;
813
798
  }
814
- { int ret = slice_del(z); /* delete, line 125 */
799
+ { int ret = slice_del(z);
815
800
  if (ret < 0) return ret;
816
801
  }
817
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 126 */
818
- z->ket = z->c; /* [, line 127 */
819
- if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4722696 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m_keep; goto lab1; }
820
- among_var = find_among_b(z, a_4, 4); /* substring, line 127 */
821
- if (!(among_var)) { z->c = z->l - m_keep; goto lab1; }
822
- z->bra = z->c; /* ], line 127 */
802
+ { int m2 = z->l - z->c; (void)m2;
803
+ z->ket = z->c;
804
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4722696 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m2; goto lab1; }
805
+ among_var = find_among_b(z, a_4, 4);
806
+ if (!(among_var)) { z->c = z->l - m2; goto lab1; }
807
+ z->bra = z->c;
823
808
  { int ret = r_R2(z);
824
- if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call R2, line 127 */
809
+ if (ret == 0) { z->c = z->l - m2; goto lab1; }
825
810
  if (ret < 0) return ret;
826
811
  }
827
- { int ret = slice_del(z); /* delete, line 127 */
812
+ { int ret = slice_del(z);
828
813
  if (ret < 0) return ret;
829
814
  }
830
- switch(among_var) {
831
- case 0: { z->c = z->l - m_keep; goto lab1; }
815
+ switch (among_var) {
832
816
  case 1:
833
- z->ket = z->c; /* [, line 128 */
834
- if (!(eq_s_b(z, 2, s_17))) { z->c = z->l - m_keep; goto lab1; }
835
- z->bra = z->c; /* ], line 128 */
817
+ z->ket = z->c;
818
+ if (!(eq_s_b(z, 2, s_15))) { z->c = z->l - m2; goto lab1; }
819
+ z->bra = z->c;
836
820
  { int ret = r_R2(z);
837
- if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call R2, line 128 */
821
+ if (ret == 0) { z->c = z->l - m2; goto lab1; }
838
822
  if (ret < 0) return ret;
839
823
  }
840
- { int ret = slice_del(z); /* delete, line 128 */
824
+ { int ret = slice_del(z);
841
825
  if (ret < 0) return ret;
842
826
  }
843
827
  break;
@@ -848,29 +832,22 @@ static int r_standard_suffix(struct SN_env * z) {
848
832
  break;
849
833
  case 8:
850
834
  { int ret = r_R2(z);
851
- if (ret == 0) return 0; /* call R2, line 134 */
852
- if (ret < 0) return ret;
835
+ if (ret <= 0) return ret;
853
836
  }
854
- { int ret = slice_del(z); /* delete, line 134 */
837
+ { int ret = slice_del(z);
855
838
  if (ret < 0) return ret;
856
839
  }
857
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 135 */
858
- z->ket = z->c; /* [, line 136 */
859
- if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4198408 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m_keep; goto lab2; }
860
- among_var = find_among_b(z, a_5, 3); /* substring, line 136 */
861
- if (!(among_var)) { z->c = z->l - m_keep; goto lab2; }
862
- z->bra = z->c; /* ], line 136 */
863
- switch(among_var) {
864
- case 0: { z->c = z->l - m_keep; goto lab2; }
865
- case 1:
866
- { int ret = r_R2(z);
867
- if (ret == 0) { z->c = z->l - m_keep; goto lab2; } /* call R2, line 137 */
868
- if (ret < 0) return ret;
869
- }
870
- { int ret = slice_del(z); /* delete, line 137 */
871
- if (ret < 0) return ret;
872
- }
873
- break;
840
+ { int m3 = z->l - z->c; (void)m3;
841
+ z->ket = z->c;
842
+ if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((4198408 >> (z->p[z->c - 1] & 0x1f)) & 1)) { z->c = z->l - m3; goto lab2; }
843
+ if (!(find_among_b(z, a_5, 3))) { z->c = z->l - m3; goto lab2; }
844
+ z->bra = z->c;
845
+ { int ret = r_R2(z);
846
+ if (ret == 0) { z->c = z->l - m3; goto lab2; }
847
+ if (ret < 0) return ret;
848
+ }
849
+ { int ret = slice_del(z);
850
+ if (ret < 0) return ret;
874
851
  }
875
852
  lab2:
876
853
  ;
@@ -878,31 +855,30 @@ static int r_standard_suffix(struct SN_env * z) {
878
855
  break;
879
856
  case 9:
880
857
  { int ret = r_R2(z);
881
- if (ret == 0) return 0; /* call R2, line 142 */
882
- if (ret < 0) return ret;
858
+ if (ret <= 0) return ret;
883
859
  }
884
- { int ret = slice_del(z); /* delete, line 142 */
860
+ { int ret = slice_del(z);
885
861
  if (ret < 0) return ret;
886
862
  }
887
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 143 */
888
- z->ket = z->c; /* [, line 143 */
889
- if (!(eq_s_b(z, 2, s_18))) { z->c = z->l - m_keep; goto lab3; }
890
- z->bra = z->c; /* ], line 143 */
863
+ { int m4 = z->l - z->c; (void)m4;
864
+ z->ket = z->c;
865
+ if (!(eq_s_b(z, 2, s_16))) { z->c = z->l - m4; goto lab3; }
866
+ z->bra = z->c;
891
867
  { int ret = r_R2(z);
892
- if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 143 */
868
+ if (ret == 0) { z->c = z->l - m4; goto lab3; }
893
869
  if (ret < 0) return ret;
894
870
  }
895
- { int ret = slice_del(z); /* delete, line 143 */
871
+ { int ret = slice_del(z);
896
872
  if (ret < 0) return ret;
897
873
  }
898
- z->ket = z->c; /* [, line 143 */
899
- if (!(eq_s_b(z, 2, s_19))) { z->c = z->l - m_keep; goto lab3; }
900
- z->bra = z->c; /* ], line 143 */
874
+ z->ket = z->c;
875
+ if (!(eq_s_b(z, 2, s_17))) { z->c = z->l - m4; goto lab3; }
876
+ z->bra = z->c;
901
877
  { int ret = r_R2(z);
902
- if (ret == 0) { z->c = z->l - m_keep; goto lab3; } /* call R2, line 143 */
878
+ if (ret == 0) { z->c = z->l - m4; goto lab3; }
903
879
  if (ret < 0) return ret;
904
880
  }
905
- { int ret = slice_del(z); /* delete, line 143 */
881
+ { int ret = slice_del(z);
906
882
  if (ret < 0) return ret;
907
883
  }
908
884
  lab3:
@@ -914,65 +890,58 @@ static int r_standard_suffix(struct SN_env * z) {
914
890
  }
915
891
 
916
892
  static int r_verb_suffix(struct SN_env * z) {
917
- int among_var;
918
- { int mlimit; /* setlimit, line 148 */
919
- int m1 = z->l - z->c; (void)m1;
920
- if (z->c < z->I[0]) return 0;
921
- z->c = z->I[0]; /* tomark, line 148 */
922
- mlimit = z->lb; z->lb = z->c;
923
- z->c = z->l - m1;
924
- z->ket = z->c; /* [, line 149 */
925
- among_var = find_among_b(z, a_7, 87); /* substring, line 149 */
926
- if (!(among_var)) { z->lb = mlimit; return 0; }
927
- z->bra = z->c; /* ], line 149 */
928
- switch(among_var) {
929
- case 0: { z->lb = mlimit; return 0; }
930
- case 1:
931
- { int ret = slice_del(z); /* delete, line 163 */
932
- if (ret < 0) return ret;
933
- }
934
- break;
893
+
894
+ { int mlimit1;
895
+ if (z->c < z->I[2]) return 0;
896
+ mlimit1 = z->lb; z->lb = z->I[2];
897
+ z->ket = z->c;
898
+ if (!(find_among_b(z, a_7, 87))) { z->lb = mlimit1; return 0; }
899
+ z->bra = z->c;
900
+ { int ret = slice_del(z);
901
+ if (ret < 0) return ret;
935
902
  }
936
- z->lb = mlimit;
903
+ z->lb = mlimit1;
937
904
  }
938
905
  return 1;
939
906
  }
940
907
 
941
908
  static int r_vowel_suffix(struct SN_env * z) {
942
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 171 */
943
- z->ket = z->c; /* [, line 172 */
944
- if (in_grouping_b(z, g_AEIO, 97, 242, 0)) { z->c = z->l - m_keep; goto lab0; }
945
- z->bra = z->c; /* ], line 172 */
909
+ { int m1 = z->l - z->c; (void)m1;
910
+ z->ket = z->c;
911
+ if (in_grouping_b(z, g_AEIO, 97, 242, 0)) { z->c = z->l - m1; goto lab0; }
912
+ z->bra = z->c;
946
913
  { int ret = r_RV(z);
947
- if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call RV, line 172 */
914
+ if (ret == 0) { z->c = z->l - m1; goto lab0; }
948
915
  if (ret < 0) return ret;
949
916
  }
950
- { int ret = slice_del(z); /* delete, line 172 */
917
+ { int ret = slice_del(z);
951
918
  if (ret < 0) return ret;
952
919
  }
953
- z->ket = z->c; /* [, line 173 */
954
- if (!(eq_s_b(z, 1, s_20))) { z->c = z->l - m_keep; goto lab0; }
955
- z->bra = z->c; /* ], line 173 */
920
+ z->ket = z->c;
921
+ if (z->c <= z->lb || z->p[z->c - 1] != 'i') { z->c = z->l - m1; goto lab0; }
922
+ z->c--;
923
+ z->bra = z->c;
956
924
  { int ret = r_RV(z);
957
- if (ret == 0) { z->c = z->l - m_keep; goto lab0; } /* call RV, line 173 */
925
+ if (ret == 0) { z->c = z->l - m1; goto lab0; }
958
926
  if (ret < 0) return ret;
959
927
  }
960
- { int ret = slice_del(z); /* delete, line 173 */
928
+ { int ret = slice_del(z);
961
929
  if (ret < 0) return ret;
962
930
  }
963
931
  lab0:
964
932
  ;
965
933
  }
966
- { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 175 */
967
- z->ket = z->c; /* [, line 176 */
968
- if (!(eq_s_b(z, 1, s_21))) { z->c = z->l - m_keep; goto lab1; }
969
- z->bra = z->c; /* ], line 176 */
970
- if (in_grouping_b(z, g_CG, 99, 103, 0)) { z->c = z->l - m_keep; goto lab1; }
934
+ { int m2 = z->l - z->c; (void)m2;
935
+ z->ket = z->c;
936
+ if (z->c <= z->lb || z->p[z->c - 1] != 'h') { z->c = z->l - m2; goto lab1; }
937
+ z->c--;
938
+ z->bra = z->c;
939
+ if (in_grouping_b(z, g_CG, 99, 103, 0)) { z->c = z->l - m2; goto lab1; }
971
940
  { int ret = r_RV(z);
972
- if (ret == 0) { z->c = z->l - m_keep; goto lab1; } /* call RV, line 176 */
941
+ if (ret == 0) { z->c = z->l - m2; goto lab1; }
973
942
  if (ret < 0) return ret;
974
943
  }
975
- { int ret = slice_del(z); /* delete, line 176 */
944
+ { int ret = slice_del(z);
976
945
  if (ret < 0) return ret;
977
946
  }
978
947
  lab1:
@@ -982,71 +951,59 @@ static int r_vowel_suffix(struct SN_env * z) {
982
951
  }
983
952
 
984
953
  extern int italian_ISO_8859_1_stem(struct SN_env * z) {
985
- { int c1 = z->c; /* do, line 182 */
954
+ { int c1 = z->c;
986
955
  { int ret = r_prelude(z);
987
- if (ret == 0) goto lab0; /* call prelude, line 182 */
988
956
  if (ret < 0) return ret;
989
957
  }
990
- lab0:
991
958
  z->c = c1;
992
959
  }
993
- { int c2 = z->c; /* do, line 183 */
994
- { int ret = r_mark_regions(z);
995
- if (ret == 0) goto lab1; /* call mark_regions, line 183 */
996
- if (ret < 0) return ret;
997
- }
998
- lab1:
999
- z->c = c2;
960
+
961
+ { int ret = r_mark_regions(z);
962
+ if (ret < 0) return ret;
1000
963
  }
1001
- z->lb = z->c; z->c = z->l; /* backwards, line 184 */
964
+ z->lb = z->c; z->c = z->l;
1002
965
 
1003
- { int m3 = z->l - z->c; (void)m3; /* do, line 185 */
966
+ { int m2 = z->l - z->c; (void)m2;
1004
967
  { int ret = r_attached_pronoun(z);
1005
- if (ret == 0) goto lab2; /* call attached_pronoun, line 185 */
1006
968
  if (ret < 0) return ret;
1007
969
  }
1008
- lab2:
1009
- z->c = z->l - m3;
970
+ z->c = z->l - m2;
1010
971
  }
1011
- { int m4 = z->l - z->c; (void)m4; /* do, line 186 */
1012
- { int m5 = z->l - z->c; (void)m5; /* or, line 186 */
972
+ { int m3 = z->l - z->c; (void)m3;
973
+ { int m4 = z->l - z->c; (void)m4;
1013
974
  { int ret = r_standard_suffix(z);
1014
- if (ret == 0) goto lab5; /* call standard_suffix, line 186 */
975
+ if (ret == 0) goto lab2;
1015
976
  if (ret < 0) return ret;
1016
977
  }
1017
- goto lab4;
1018
- lab5:
1019
- z->c = z->l - m5;
978
+ goto lab1;
979
+ lab2:
980
+ z->c = z->l - m4;
1020
981
  { int ret = r_verb_suffix(z);
1021
- if (ret == 0) goto lab3; /* call verb_suffix, line 186 */
982
+ if (ret == 0) goto lab0;
1022
983
  if (ret < 0) return ret;
1023
984
  }
1024
985
  }
1025
- lab4:
1026
- lab3:
1027
- z->c = z->l - m4;
986
+ lab1:
987
+ lab0:
988
+ z->c = z->l - m3;
1028
989
  }
1029
- { int m6 = z->l - z->c; (void)m6; /* do, line 187 */
990
+ { int m5 = z->l - z->c; (void)m5;
1030
991
  { int ret = r_vowel_suffix(z);
1031
- if (ret == 0) goto lab6; /* call vowel_suffix, line 187 */
1032
992
  if (ret < 0) return ret;
1033
993
  }
1034
- lab6:
1035
- z->c = z->l - m6;
994
+ z->c = z->l - m5;
1036
995
  }
1037
996
  z->c = z->lb;
1038
- { int c7 = z->c; /* do, line 189 */
997
+ { int c6 = z->c;
1039
998
  { int ret = r_postlude(z);
1040
- if (ret == 0) goto lab7; /* call postlude, line 189 */
1041
999
  if (ret < 0) return ret;
1042
1000
  }
1043
- lab7:
1044
- z->c = c7;
1001
+ z->c = c6;
1045
1002
  }
1046
1003
  return 1;
1047
1004
  }
1048
1005
 
1049
- extern struct SN_env * italian_ISO_8859_1_create_env(void) { return SN_create_env(0, 3, 0); }
1006
+ extern struct SN_env * italian_ISO_8859_1_create_env(void) { return SN_create_env(0, 3); }
1050
1007
 
1051
1008
  extern void italian_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
1052
1009