+++ /dev/null
-// This file was generated automatically by the Snowball to Java compiler
-
-package org.tartarus.snowball.ext;
-import org.tartarus.snowball.SnowballProgram;
-import org.tartarus.snowball.Among;
-
-/**
- * Generated class implementing code defined by a snowball script.
- */
-public class PortugueseStemmer extends SnowballProgram {
-
- private Among a_0[] = {
- new Among ( "", -1, 3, "", this),
- new Among ( "\u00E3", 0, 1, "", this),
- new Among ( "\u00F5", 0, 2, "", this)
- };
-
- private Among a_1[] = {
- new Among ( "", -1, 3, "", this),
- new Among ( "a~", 0, 1, "", this),
- new Among ( "o~", 0, 2, "", this)
- };
-
- private Among a_2[] = {
- new Among ( "ic", -1, -1, "", this),
- new Among ( "ad", -1, -1, "", this),
- new Among ( "os", -1, -1, "", this),
- new Among ( "iv", -1, 1, "", this)
- };
-
- private Among a_3[] = {
- new Among ( "ante", -1, 1, "", this),
- new Among ( "avel", -1, 1, "", this),
- new Among ( "\u00EDvel", -1, 1, "", this)
- };
-
- private Among a_4[] = {
- new Among ( "ic", -1, 1, "", this),
- new Among ( "abil", -1, 1, "", this),
- new Among ( "iv", -1, 1, "", this)
- };
-
- private Among a_5[] = {
- new Among ( "ica", -1, 1, "", this),
- new Among ( "\u00E2ncia", -1, 1, "", this),
- new Among ( "\u00EAncia", -1, 4, "", this),
- new Among ( "ira", -1, 9, "", this),
- new Among ( "adora", -1, 1, "", this),
- new Among ( "osa", -1, 1, "", this),
- new Among ( "ista", -1, 1, "", this),
- new Among ( "iva", -1, 8, "", this),
- new Among ( "eza", -1, 1, "", this),
- new Among ( "log\u00EDa", -1, 2, "", this),
- new Among ( "idade", -1, 7, "", this),
- new Among ( "ante", -1, 1, "", this),
- new Among ( "mente", -1, 6, "", this),
- new Among ( "amente", 12, 5, "", this),
- new Among ( "\u00E1vel", -1, 1, "", this),
- new Among ( "\u00EDvel", -1, 1, "", this),
- new Among ( "uci\u00F3n", -1, 3, "", this),
- new Among ( "ico", -1, 1, "", this),
- new Among ( "ismo", -1, 1, "", this),
- new Among ( "oso", -1, 1, "", this),
- new Among ( "amento", -1, 1, "", this),
- new Among ( "imento", -1, 1, "", this),
- new Among ( "ivo", -1, 8, "", this),
- new Among ( "a\u00E7a~o", -1, 1, "", this),
- new Among ( "ador", -1, 1, "", this),
- new Among ( "icas", -1, 1, "", this),
- new Among ( "\u00EAncias", -1, 4, "", this),
- new Among ( "iras", -1, 9, "", this),
- new Among ( "adoras", -1, 1, "", this),
- new Among ( "osas", -1, 1, "", this),
- new Among ( "istas", -1, 1, "", this),
- new Among ( "ivas", -1, 8, "", this),
- new Among ( "ezas", -1, 1, "", this),
- new Among ( "log\u00EDas", -1, 2, "", this),
- new Among ( "idades", -1, 7, "", this),
- new Among ( "uciones", -1, 3, "", this),
- new Among ( "adores", -1, 1, "", this),
- new Among ( "antes", -1, 1, "", this),
- new Among ( "a\u00E7o~es", -1, 1, "", this),
- new Among ( "icos", -1, 1, "", this),
- new Among ( "ismos", -1, 1, "", this),
- new Among ( "osos", -1, 1, "", this),
- new Among ( "amentos", -1, 1, "", this),
- new Among ( "imentos", -1, 1, "", this),
- new Among ( "ivos", -1, 8, "", this)
- };
-
- private Among a_6[] = {
- new Among ( "ada", -1, 1, "", this),
- new Among ( "ida", -1, 1, "", this),
- new Among ( "ia", -1, 1, "", this),
- new Among ( "aria", 2, 1, "", this),
- new Among ( "eria", 2, 1, "", this),
- new Among ( "iria", 2, 1, "", this),
- new Among ( "ara", -1, 1, "", this),
- new Among ( "era", -1, 1, "", this),
- new Among ( "ira", -1, 1, "", this),
- new Among ( "ava", -1, 1, "", this),
- new Among ( "asse", -1, 1, "", this),
- new Among ( "esse", -1, 1, "", this),
- new Among ( "isse", -1, 1, "", this),
- new Among ( "aste", -1, 1, "", this),
- new Among ( "este", -1, 1, "", this),
- new Among ( "iste", -1, 1, "", this),
- new Among ( "ei", -1, 1, "", this),
- new Among ( "arei", 16, 1, "", this),
- new Among ( "erei", 16, 1, "", this),
- new Among ( "irei", 16, 1, "", this),
- new Among ( "am", -1, 1, "", this),
- new Among ( "iam", 20, 1, "", this),
- new Among ( "ariam", 21, 1, "", this),
- new Among ( "eriam", 21, 1, "", this),
- new Among ( "iriam", 21, 1, "", this),
- new Among ( "aram", 20, 1, "", this),
- new Among ( "eram", 20, 1, "", this),
- new Among ( "iram", 20, 1, "", this),
- new Among ( "avam", 20, 1, "", this),
- new Among ( "em", -1, 1, "", this),
- new Among ( "arem", 29, 1, "", this),
- new Among ( "erem", 29, 1, "", this),
- new Among ( "irem", 29, 1, "", this),
- new Among ( "assem", 29, 1, "", this),
- new Among ( "essem", 29, 1, "", this),
- new Among ( "issem", 29, 1, "", this),
- new Among ( "ado", -1, 1, "", this),
- new Among ( "ido", -1, 1, "", this),
- new Among ( "ando", -1, 1, "", this),
- new Among ( "endo", -1, 1, "", this),
- new Among ( "indo", -1, 1, "", this),
- new Among ( "ara~o", -1, 1, "", this),
- new Among ( "era~o", -1, 1, "", this),
- new Among ( "ira~o", -1, 1, "", this),
- new Among ( "ar", -1, 1, "", this),
- new Among ( "er", -1, 1, "", this),
- new Among ( "ir", -1, 1, "", this),
- new Among ( "as", -1, 1, "", this),
- new Among ( "adas", 47, 1, "", this),
- new Among ( "idas", 47, 1, "", this),
- new Among ( "ias", 47, 1, "", this),
- new Among ( "arias", 50, 1, "", this),
- new Among ( "erias", 50, 1, "", this),
- new Among ( "irias", 50, 1, "", this),
- new Among ( "aras", 47, 1, "", this),
- new Among ( "eras", 47, 1, "", this),
- new Among ( "iras", 47, 1, "", this),
- new Among ( "avas", 47, 1, "", this),
- new Among ( "es", -1, 1, "", this),
- new Among ( "ardes", 58, 1, "", this),
- new Among ( "erdes", 58, 1, "", this),
- new Among ( "irdes", 58, 1, "", this),
- new Among ( "ares", 58, 1, "", this),
- new Among ( "eres", 58, 1, "", this),
- new Among ( "ires", 58, 1, "", this),
- new Among ( "asses", 58, 1, "", this),
- new Among ( "esses", 58, 1, "", this),
- new Among ( "isses", 58, 1, "", this),
- new Among ( "astes", 58, 1, "", this),
- new Among ( "estes", 58, 1, "", this),
- new Among ( "istes", 58, 1, "", this),
- new Among ( "is", -1, 1, "", this),
- new Among ( "ais", 71, 1, "", this),
- new Among ( "eis", 71, 1, "", this),
- new Among ( "areis", 73, 1, "", this),
- new Among ( "ereis", 73, 1, "", this),
- new Among ( "ireis", 73, 1, "", this),
- new Among ( "\u00E1reis", 73, 1, "", this),
- new Among ( "\u00E9reis", 73, 1, "", this),
- new Among ( "\u00EDreis", 73, 1, "", this),
- new Among ( "\u00E1sseis", 73, 1, "", this),
- new Among ( "\u00E9sseis", 73, 1, "", this),
- new Among ( "\u00EDsseis", 73, 1, "", this),
- new Among ( "\u00E1veis", 73, 1, "", this),
- new Among ( "\u00EDeis", 73, 1, "", this),
- new Among ( "ar\u00EDeis", 84, 1, "", this),
- new Among ( "er\u00EDeis", 84, 1, "", this),
- new Among ( "ir\u00EDeis", 84, 1, "", this),
- new Among ( "ados", -1, 1, "", this),
- new Among ( "idos", -1, 1, "", this),
- new Among ( "amos", -1, 1, "", this),
- new Among ( "\u00E1ramos", 90, 1, "", this),
- new Among ( "\u00E9ramos", 90, 1, "", this),
- new Among ( "\u00EDramos", 90, 1, "", this),
- new Among ( "\u00E1vamos", 90, 1, "", this),
- new Among ( "\u00EDamos", 90, 1, "", this),
- new Among ( "ar\u00EDamos", 95, 1, "", this),
- new Among ( "er\u00EDamos", 95, 1, "", this),
- new Among ( "ir\u00EDamos", 95, 1, "", this),
- new Among ( "emos", -1, 1, "", this),
- new Among ( "aremos", 99, 1, "", this),
- new Among ( "eremos", 99, 1, "", this),
- new Among ( "iremos", 99, 1, "", this),
- new Among ( "\u00E1ssemos", 99, 1, "", this),
- new Among ( "\u00EAssemos", 99, 1, "", this),
- new Among ( "\u00EDssemos", 99, 1, "", this),
- new Among ( "imos", -1, 1, "", this),
- new Among ( "armos", -1, 1, "", this),
- new Among ( "ermos", -1, 1, "", this),
- new Among ( "irmos", -1, 1, "", this),
- new Among ( "\u00E1mos", -1, 1, "", this),
- new Among ( "ar\u00E1s", -1, 1, "", this),
- new Among ( "er\u00E1s", -1, 1, "", this),
- new Among ( "ir\u00E1s", -1, 1, "", this),
- new Among ( "eu", -1, 1, "", this),
- new Among ( "iu", -1, 1, "", this),
- new Among ( "ou", -1, 1, "", this),
- new Among ( "ar\u00E1", -1, 1, "", this),
- new Among ( "er\u00E1", -1, 1, "", this),
- new Among ( "ir\u00E1", -1, 1, "", this)
- };
-
- private Among a_7[] = {
- new Among ( "a", -1, 1, "", this),
- new Among ( "i", -1, 1, "", this),
- new Among ( "o", -1, 1, "", this),
- new Among ( "os", -1, 1, "", this),
- new Among ( "\u00E1", -1, 1, "", this),
- new Among ( "\u00ED", -1, 1, "", this),
- new Among ( "\u00F3", -1, 1, "", this)
- };
-
- private Among a_8[] = {
- new Among ( "e", -1, 1, "", this),
- new Among ( "\u00E7", -1, 2, "", this),
- new Among ( "\u00E9", -1, 1, "", this),
- new Among ( "\u00EA", -1, 1, "", this)
- };
-
- private static final char g_v[] = {17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 19, 12, 2 };
-
- private int I_p2;
- private int I_p1;
- private int I_pV;
-
- private void copy_from(PortugueseStemmer other) {
- I_p2 = other.I_p2;
- I_p1 = other.I_p1;
- I_pV = other.I_pV;
- super.copy_from(other);
- }
-
- private boolean r_prelude() {
- int among_var;
- int v_1;
- // repeat, line 36
- replab0: while(true)
- {
- v_1 = cursor;
- lab1: do {
- // (, line 36
- // [, line 37
- bra = cursor;
- // substring, line 37
- among_var = find_among(a_0, 3);
- if (among_var == 0)
- {
- break lab1;
- }
- // ], line 37
- ket = cursor;
- switch(among_var) {
- case 0:
- break lab1;
- case 1:
- // (, line 38
- // <-, line 38
- slice_from("a~");
- break;
- case 2:
- // (, line 39
- // <-, line 39
- slice_from("o~");
- break;
- case 3:
- // (, line 40
- // next, line 40
- if (cursor >= limit)
- {
- break lab1;
- }
- cursor++;
- break;
- }
- continue replab0;
- } while (false);
- cursor = v_1;
- break replab0;
- }
- return true;
- }
-
- private boolean r_mark_regions() {
- int v_1;
- int v_2;
- int v_3;
- int v_6;
- int v_8;
- // (, line 44
- I_pV = limit;
- I_p1 = limit;
- I_p2 = limit;
- // do, line 50
- v_1 = cursor;
- lab0: do {
- // (, line 50
- // or, line 52
- lab1: do {
- v_2 = cursor;
- lab2: do {
- // (, line 51
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab2;
- }
- // or, line 51
- lab3: do {
- v_3 = cursor;
- lab4: do {
- // (, line 51
- if (!(out_grouping(g_v, 97, 250)))
- {
- break lab4;
- }
- // gopast, line 51
- golab5: while(true)
- {
- lab6: do {
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab6;
- }
- break golab5;
- } while (false);
- if (cursor >= limit)
- {
- break lab4;
- }
- cursor++;
- }
- break lab3;
- } while (false);
- cursor = v_3;
- // (, line 51
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab2;
- }
- // gopast, line 51
- golab7: while(true)
- {
- lab8: do {
- if (!(out_grouping(g_v, 97, 250)))
- {
- break lab8;
- }
- break golab7;
- } while (false);
- if (cursor >= limit)
- {
- break lab2;
- }
- cursor++;
- }
- } while (false);
- break lab1;
- } while (false);
- cursor = v_2;
- // (, line 53
- if (!(out_grouping(g_v, 97, 250)))
- {
- break lab0;
- }
- // or, line 53
- lab9: do {
- v_6 = cursor;
- lab10: do {
- // (, line 53
- if (!(out_grouping(g_v, 97, 250)))
- {
- break lab10;
- }
- // gopast, line 53
- golab11: while(true)
- {
- lab12: do {
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab12;
- }
- break golab11;
- } while (false);
- if (cursor >= limit)
- {
- break lab10;
- }
- cursor++;
- }
- break lab9;
- } while (false);
- cursor = v_6;
- // (, line 53
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab0;
- }
- // next, line 53
- if (cursor >= limit)
- {
- break lab0;
- }
- cursor++;
- } while (false);
- } while (false);
- // setmark pV, line 54
- I_pV = cursor;
- } while (false);
- cursor = v_1;
- // do, line 56
- v_8 = cursor;
- lab13: do {
- // (, line 56
- // gopast, line 57
- golab14: while(true)
- {
- lab15: do {
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab15;
- }
- break golab14;
- } while (false);
- if (cursor >= limit)
- {
- break lab13;
- }
- cursor++;
- }
- // gopast, line 57
- golab16: while(true)
- {
- lab17: do {
- if (!(out_grouping(g_v, 97, 250)))
- {
- break lab17;
- }
- break golab16;
- } while (false);
- if (cursor >= limit)
- {
- break lab13;
- }
- cursor++;
- }
- // setmark p1, line 57
- I_p1 = cursor;
- // gopast, line 58
- golab18: while(true)
- {
- lab19: do {
- if (!(in_grouping(g_v, 97, 250)))
- {
- break lab19;
- }
- break golab18;
- } while (false);
- if (cursor >= limit)
- {
- break lab13;
- }
- cursor++;
- }
- // gopast, line 58
- golab20: while(true)
- {
- lab21: do {
- if (!(out_grouping(g_v, 97, 250)))
- {
- break lab21;
- }
- break golab20;
- } while (false);
- if (cursor >= limit)
- {
- break lab13;
- }
- cursor++;
- }
- // setmark p2, line 58
- I_p2 = cursor;
- } while (false);
- cursor = v_8;
- return true;
- }
-
- private boolean r_postlude() {
- int among_var;
- int v_1;
- // repeat, line 62
- replab0: while(true)
- {
- v_1 = cursor;
- lab1: do {
- // (, line 62
- // [, line 63
- bra = cursor;
- // substring, line 63
- among_var = find_among(a_1, 3);
- if (among_var == 0)
- {
- break lab1;
- }
- // ], line 63
- ket = cursor;
- switch(among_var) {
- case 0:
- break lab1;
- case 1:
- // (, line 64
- // <-, line 64
- slice_from("\u00E3");
- break;
- case 2:
- // (, line 65
- // <-, line 65
- slice_from("\u00F5");
- break;
- case 3:
- // (, line 66
- // next, line 66
- if (cursor >= limit)
- {
- break lab1;
- }
- cursor++;
- break;
- }
- continue replab0;
- } while (false);
- cursor = v_1;
- break replab0;
- }
- return true;
- }
-
- private boolean r_RV() {
- if (!(I_pV <= cursor))
- {
- return false;
- }
- return true;
- }
-
- private boolean r_R1() {
- if (!(I_p1 <= cursor))
- {
- return false;
- }
- return true;
- }
-
- private boolean r_R2() {
- if (!(I_p2 <= cursor))
- {
- return false;
- }
- return true;
- }
-
- private boolean r_standard_suffix() {
- int among_var;
- int v_1;
- int v_2;
- int v_3;
- int v_4;
- // (, line 76
- // [, line 77
- ket = cursor;
- // substring, line 77
- among_var = find_among_b(a_5, 45);
- if (among_var == 0)
- {
- return false;
- }
- // ], line 77
- bra = cursor;
- switch(among_var) {
- case 0:
- return false;
- case 1:
- // (, line 92
- // call R2, line 93
- if (!r_R2())
- {
- return false;
- }
- // delete, line 93
- slice_del();
- break;
- case 2:
- // (, line 97
- // call R2, line 98
- if (!r_R2())
- {
- return false;
- }
- // <-, line 98
- slice_from("log");
- break;
- case 3:
- // (, line 101
- // call R2, line 102
- if (!r_R2())
- {
- return false;
- }
- // <-, line 102
- slice_from("u");
- break;
- case 4:
- // (, line 105
- // call R2, line 106
- if (!r_R2())
- {
- return false;
- }
- // <-, line 106
- slice_from("ente");
- break;
- case 5:
- // (, line 109
- // call R1, line 110
- if (!r_R1())
- {
- return false;
- }
- // delete, line 110
- slice_del();
- // try, line 111
- v_1 = limit - cursor;
- lab0: do {
- // (, line 111
- // [, line 112
- ket = cursor;
- // substring, line 112
- among_var = find_among_b(a_2, 4);
- if (among_var == 0)
- {
- cursor = limit - v_1;
- break lab0;
- }
- // ], line 112
- bra = cursor;
- // call R2, line 112
- if (!r_R2())
- {
- cursor = limit - v_1;
- break lab0;
- }
- // delete, line 112
- slice_del();
- switch(among_var) {
- case 0:
- cursor = limit - v_1;
- break lab0;
- case 1:
- // (, line 113
- // [, line 113
- ket = cursor;
- // literal, line 113
- if (!(eq_s_b(2, "at")))
- {
- cursor = limit - v_1;
- break lab0;
- }
- // ], line 113
- bra = cursor;
- // call R2, line 113
- if (!r_R2())
- {
- cursor = limit - v_1;
- break lab0;
- }
- // delete, line 113
- slice_del();
- break;
- }
- } while (false);
- break;
- case 6:
- // (, line 121
- // call R2, line 122
- if (!r_R2())
- {
- return false;
- }
- // delete, line 122
- slice_del();
- // try, line 123
- v_2 = limit - cursor;
- lab1: do {
- // (, line 123
- // [, line 124
- ket = cursor;
- // substring, line 124
- among_var = find_among_b(a_3, 3);
- if (among_var == 0)
- {
- cursor = limit - v_2;
- break lab1;
- }
- // ], line 124
- bra = cursor;
- switch(among_var) {
- case 0:
- cursor = limit - v_2;
- break lab1;
- case 1:
- // (, line 127
- // call R2, line 127
- if (!r_R2())
- {
- cursor = limit - v_2;
- break lab1;
- }
- // delete, line 127
- slice_del();
- break;
- }
- } while (false);
- break;
- case 7:
- // (, line 133
- // call R2, line 134
- if (!r_R2())
- {
- return false;
- }
- // delete, line 134
- slice_del();
- // try, line 135
- v_3 = limit - cursor;
- lab2: do {
- // (, line 135
- // [, line 136
- ket = cursor;
- // substring, line 136
- among_var = find_among_b(a_4, 3);
- if (among_var == 0)
- {
- cursor = limit - v_3;
- break lab2;
- }
- // ], line 136
- bra = cursor;
- switch(among_var) {
- case 0:
- cursor = limit - v_3;
- break lab2;
- case 1:
- // (, line 139
- // call R2, line 139
- if (!r_R2())
- {
- cursor = limit - v_3;
- break lab2;
- }
- // delete, line 139
- slice_del();
- break;
- }
- } while (false);
- break;
- case 8:
- // (, line 145
- // call R2, line 146
- if (!r_R2())
- {
- return false;
- }
- // delete, line 146
- slice_del();
- // try, line 147
- v_4 = limit - cursor;
- lab3: do {
- // (, line 147
- // [, line 148
- ket = cursor;
- // literal, line 148
- if (!(eq_s_b(2, "at")))
- {
- cursor = limit - v_4;
- break lab3;
- }
- // ], line 148
- bra = cursor;
- // call R2, line 148
- if (!r_R2())
- {
- cursor = limit - v_4;
- break lab3;
- }
- // delete, line 148
- slice_del();
- } while (false);
- break;
- case 9:
- // (, line 152
- // call RV, line 153
- if (!r_RV())
- {
- return false;
- }
- // literal, line 153
- if (!(eq_s_b(1, "e")))
- {
- return false;
- }
- // <-, line 154
- slice_from("ir");
- break;
- }
- return true;
- }
-
- private boolean r_verb_suffix() {
- int among_var;
- int v_1;
- int v_2;
- // setlimit, line 159
- v_1 = limit - cursor;
- // tomark, line 159
- if (cursor < I_pV)
- {
- return false;
- }
- cursor = I_pV;
- v_2 = limit_backward;
- limit_backward = cursor;
- cursor = limit - v_1;
- // (, line 159
- // [, line 160
- ket = cursor;
- // substring, line 160
- among_var = find_among_b(a_6, 120);
- if (among_var == 0)
- {
- limit_backward = v_2;
- return false;
- }
- // ], line 160
- bra = cursor;
- switch(among_var) {
- case 0:
- limit_backward = v_2;
- return false;
- case 1:
- // (, line 179
- // delete, line 179
- slice_del();
- break;
- }
- limit_backward = v_2;
- return true;
- }
-
- private boolean r_residual_suffix() {
- int among_var;
- // (, line 183
- // [, line 184
- ket = cursor;
- // substring, line 184
- among_var = find_among_b(a_7, 7);
- if (among_var == 0)
- {
- return false;
- }
- // ], line 184
- bra = cursor;
- switch(among_var) {
- case 0:
- return false;
- case 1:
- // (, line 187
- // call RV, line 187
- if (!r_RV())
- {
- return false;
- }
- // delete, line 187
- slice_del();
- break;
- }
- return true;
- }
-
- private boolean r_residual_form() {
- int among_var;
- int v_1;
- int v_2;
- int v_3;
- // (, line 191
- // [, line 192
- ket = cursor;
- // substring, line 192
- among_var = find_among_b(a_8, 4);
- if (among_var == 0)
- {
- return false;
- }
- // ], line 192
- bra = cursor;
- switch(among_var) {
- case 0:
- return false;
- case 1:
- // (, line 194
- // call RV, line 194
- if (!r_RV())
- {
- return false;
- }
- // delete, line 194
- slice_del();
- // [, line 194
- ket = cursor;
- // or, line 194
- lab0: do {
- v_1 = limit - cursor;
- lab1: do {
- // (, line 194
- // literal, line 194
- if (!(eq_s_b(1, "u")))
- {
- break lab1;
- }
- // ], line 194
- bra = cursor;
- // test, line 194
- v_2 = limit - cursor;
- // literal, line 194
- if (!(eq_s_b(1, "g")))
- {
- break lab1;
- }
- cursor = limit - v_2;
- break lab0;
- } while (false);
- cursor = limit - v_1;
- // (, line 195
- // literal, line 195
- if (!(eq_s_b(1, "i")))
- {
- return false;
- }
- // ], line 195
- bra = cursor;
- // test, line 195
- v_3 = limit - cursor;
- // literal, line 195
- if (!(eq_s_b(1, "c")))
- {
- return false;
- }
- cursor = limit - v_3;
- } while (false);
- // call RV, line 195
- if (!r_RV())
- {
- return false;
- }
- // delete, line 195
- slice_del();
- break;
- case 2:
- // (, line 196
- // <-, line 196
- slice_from("c");
- break;
- }
- return true;
- }
-
- public boolean stem() {
- int v_1;
- int v_2;
- int v_3;
- int v_4;
- int v_5;
- int v_6;
- int v_7;
- int v_8;
- int v_9;
- int v_10;
- // (, line 201
- // do, line 202
- v_1 = cursor;
- lab0: do {
- // call prelude, line 202
- if (!r_prelude())
- {
- break lab0;
- }
- } while (false);
- cursor = v_1;
- // do, line 203
- v_2 = cursor;
- lab1: do {
- // call mark_regions, line 203
- if (!r_mark_regions())
- {
- break lab1;
- }
- } while (false);
- cursor = v_2;
- // backwards, line 204
- limit_backward = cursor; cursor = limit;
- // (, line 204
- // do, line 205
- v_3 = limit - cursor;
- lab2: do {
- // (, line 205
- // or, line 209
- lab3: do {
- v_4 = limit - cursor;
- lab4: do {
- // (, line 206
- // and, line 207
- v_5 = limit - cursor;
- // (, line 206
- // or, line 206
- lab5: do {
- v_6 = limit - cursor;
- lab6: do {
- // call standard_suffix, line 206
- if (!r_standard_suffix())
- {
- break lab6;
- }
- break lab5;
- } while (false);
- cursor = limit - v_6;
- // call verb_suffix, line 206
- if (!r_verb_suffix())
- {
- break lab4;
- }
- } while (false);
- cursor = limit - v_5;
- // do, line 207
- v_7 = limit - cursor;
- lab7: do {
- // (, line 207
- // [, line 207
- ket = cursor;
- // literal, line 207
- if (!(eq_s_b(1, "i")))
- {
- break lab7;
- }
- // ], line 207
- bra = cursor;
- // test, line 207
- v_8 = limit - cursor;
- // literal, line 207
- if (!(eq_s_b(1, "c")))
- {
- break lab7;
- }
- cursor = limit - v_8;
- // call RV, line 207
- if (!r_RV())
- {
- break lab7;
- }
- // delete, line 207
- slice_del();
- } while (false);
- cursor = limit - v_7;
- break lab3;
- } while (false);
- cursor = limit - v_4;
- // call residual_suffix, line 209
- if (!r_residual_suffix())
- {
- break lab2;
- }
- } while (false);
- } while (false);
- cursor = limit - v_3;
- // do, line 211
- v_9 = limit - cursor;
- lab8: do {
- // call residual_form, line 211
- if (!r_residual_form())
- {
- break lab8;
- }
- } while (false);
- cursor = limit - v_9;
- cursor = limit_backward; // do, line 213
- v_10 = cursor;
- lab9: do {
- // call postlude, line 213
- if (!r_postlude())
- {
- break lab9;
- }
- } while (false);
- cursor = v_10;
- return true;
- }
-
-}
-