stem_utf_8_italian.c

firtext搜索引擎源码

/*  1 */ { 4, s_7_1, -1, 1, 0},
/*  2 */ { 3, s_7_2, -1, 1, 0},
/*  3 */ { 3, s_7_3, -1, 1, 0},
/*  4 */ { 3, s_7_4, -1, 1, 0},
/*  5 */ { 3, s_7_5, -1, 1, 0},
/*  6 */ { 3, s_7_6, -1, 1, 0},
/*  7 */ { 3, s_7_7, -1, 1, 0},
/*  8 */ { 6, s_7_8, -1, 1, 0},
/*  9 */ { 6, s_7_9, -1, 1, 0},
/* 10 */ { 4, s_7_10, -1, 1, 0},
/* 11 */ { 4, s_7_11, -1, 1, 0},
/* 12 */ { 3, s_7_12, -1, 1, 0},
/* 13 */ { 3, s_7_13, -1, 1, 0},
/* 14 */ { 3, s_7_14, -1, 1, 0},
/* 15 */ { 4, s_7_15, -1, 1, 0},
/* 16 */ { 3, s_7_16, -1, 1, 0},
/* 17 */ { 5, s_7_17, 16, 1, 0},
/* 18 */ { 5, s_7_18, 16, 1, 0},
/* 19 */ { 5, s_7_19, 16, 1, 0},
/* 20 */ { 3, s_7_20, -1, 1, 0},
/* 21 */ { 5, s_7_21, 20, 1, 0},
/* 22 */ { 5, s_7_22, 20, 1, 0},
/* 23 */ { 3, s_7_23, -1, 1, 0},
/* 24 */ { 6, s_7_24, -1, 1, 0},
/* 25 */ { 6, s_7_25, -1, 1, 0},
/* 26 */ { 3, s_7_26, -1, 1, 0},
/* 27 */ { 4, s_7_27, -1, 1, 0},
/* 28 */ { 4, s_7_28, -1, 1, 0},
/* 29 */ { 4, s_7_29, -1, 1, 0},
/* 30 */ { 4, s_7_30, -1, 1, 0},
/* 31 */ { 4, s_7_31, -1, 1, 0},
/* 32 */ { 4, s_7_32, -1, 1, 0},
/* 33 */ { 4, s_7_33, -1, 1, 0},
/* 34 */ { 3, s_7_34, -1, 1, 0},
/* 35 */ { 3, s_7_35, -1, 1, 0},
/* 36 */ { 6, s_7_36, -1, 1, 0},
/* 37 */ { 6, s_7_37, -1, 1, 0},
/* 38 */ { 3, s_7_38, -1, 1, 0},
/* 39 */ { 3, s_7_39, -1, 1, 0},
/* 40 */ { 3, s_7_40, -1, 1, 0},
/* 41 */ { 3, s_7_41, -1, 1, 0},
/* 42 */ { 4, s_7_42, -1, 1, 0},
/* 43 */ { 4, s_7_43, -1, 1, 0},
/* 44 */ { 4, s_7_44, -1, 1, 0},
/* 45 */ { 4, s_7_45, -1, 1, 0},
/* 46 */ { 4, s_7_46, -1, 1, 0},
/* 47 */ { 5, s_7_47, -1, 1, 0},
/* 48 */ { 5, s_7_48, -1, 1, 0},
/* 49 */ { 5, s_7_49, -1, 1, 0},
/* 50 */ { 5, s_7_50, -1, 1, 0},
/* 51 */ { 5, s_7_51, -1, 1, 0},
/* 52 */ { 6, s_7_52, -1, 1, 0},
/* 53 */ { 4, s_7_53, -1, 1, 0},
/* 54 */ { 4, s_7_54, -1, 1, 0},
/* 55 */ { 6, s_7_55, 54, 1, 0},
/* 56 */ { 6, s_7_56, 54, 1, 0},
/* 57 */ { 4, s_7_57, -1, 1, 0},
/* 58 */ { 3, s_7_58, -1, 1, 0},
/* 59 */ { 6, s_7_59, 58, 1, 0},
/* 60 */ { 5, s_7_60, 58, 1, 0},
/* 61 */ { 5, s_7_61, 58, 1, 0},
/* 62 */ { 5, s_7_62, 58, 1, 0},
/* 63 */ { 6, s_7_63, -1, 1, 0},
/* 64 */ { 6, s_7_64, -1, 1, 0},
/* 65 */ { 3, s_7_65, -1, 1, 0},
/* 66 */ { 6, s_7_66, 65, 1, 0},
/* 67 */ { 5, s_7_67, 65, 1, 0},
/* 68 */ { 5, s_7_68, 65, 1, 0},
/* 69 */ { 5, s_7_69, 65, 1, 0},
/* 70 */ { 8, s_7_70, -1, 1, 0},
/* 71 */ { 8, s_7_71, -1, 1, 0},
/* 72 */ { 6, s_7_72, -1, 1, 0},
/* 73 */ { 6, s_7_73, -1, 1, 0},
/* 74 */ { 6, s_7_74, -1, 1, 0},
/* 75 */ { 3, s_7_75, -1, 1, 0},
/* 76 */ { 3, s_7_76, -1, 1, 0},
/* 77 */ { 3, s_7_77, -1, 1, 0},
/* 78 */ { 3, s_7_78, -1, 1, 0},
/* 79 */ { 3, s_7_79, -1, 1, 0},
/* 80 */ { 3, s_7_80, -1, 1, 0},
/* 81 */ { 2, s_7_81, -1, 1, 0},
/* 82 */ { 2, s_7_82, -1, 1, 0},
/* 83 */ { 4, s_7_83, -1, 1, 0},
/* 84 */ { 4, s_7_84, -1, 1, 0},
/* 85 */ { 4, s_7_85, -1, 1, 0},
/* 86 */ { 4, s_7_86, -1, 1, 0}
};

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 };

static const unsigned char g_AEIO[] = { 17, 65, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 128, 8, 2 };

static const unsigned char g_CG[] = { 17 };

static const symbol s_0[] = { 0xC3, 0xA0 };
static const symbol s_1[] = { 0xC3, 0xA8 };
static const symbol s_2[] = { 0xC3, 0xAC };
static const symbol s_3[] = { 0xC3, 0xB2 };
static const symbol s_4[] = { 0xC3, 0xB9 };
static const symbol s_5[] = { 'q', 'U' };
static const symbol s_6[] = { 'u' };
static const symbol s_7[] = { 'U' };
static const symbol s_8[] = { 'i' };
static const symbol s_9[] = { 'I' };
static const symbol s_10[] = { 'i' };
static const symbol s_11[] = { 'u' };
static const symbol s_12[] = { 'e' };
static const symbol s_13[] = { 'i', 'c' };
static const symbol s_14[] = { 'l', 'o', 'g' };
static const symbol s_15[] = { 'u' };
static const symbol s_16[] = { 'e', 'n', 't', 'e' };
static const symbol s_17[] = { 'a', 't' };
static const symbol s_18[] = { 'a', 't' };
static const symbol s_19[] = { 'i', 'c' };
static const symbol s_20[] = { 'i' };
static const symbol s_21[] = { 'h' };

static int r_prelude(struct SN_env * z) {
    int among_var;
    {   int c_test = z->c; /* test, line 35 */
        while(1) { /* repeat, line 35 */
            int c = z->c;
            z->bra = z->c; /* [, line 36 */
            among_var = find_among(z, a_0, 7); /* substring, line 36 */
            if (!(among_var)) goto lab0;
            z->ket = z->c; /* ], line 36 */
            switch(among_var) {
                case 0: goto lab0;
                case 1:
                    {   int ret;
                        ret = slice_from_s(z, 2, s_0); /* <-, line 37 */
                        if (ret < 0) return ret;
                    }
                    break;
                case 2:
                    {   int ret;
                        ret = slice_from_s(z, 2, s_1); /* <-, line 38 */
                        if (ret < 0) return ret;
                    }
                    break;
                case 3:
                    {   int ret;
                        ret = slice_from_s(z, 2, s_2); /* <-, line 39 */
                        if (ret < 0) return ret;
                    }
                    break;
                case 4:
                    {   int ret;
                        ret = slice_from_s(z, 2, s_3); /* <-, line 40 */
                        if (ret < 0) return ret;
                    }
                    break;
                case 5:
                    {   int ret;
                        ret = slice_from_s(z, 2, s_4); /* <-, line 41 */
                        if (ret < 0) return ret;
                    }
                    break;
                case 6:
                    {   int ret;
                        ret = slice_from_s(z, 2, s_5); /* <-, line 42 */
                        if (ret < 0) return ret;
                    }
                    break;
                case 7:
                    {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                        if (c < 0) goto lab0;
                        z->c = c; /* next, line 43 */
                    }
                    break;
            }
            continue;
        lab0:
            z->c = c;
            break;
        }
        z->c = c_test;
    }
    while(1) { /* repeat, line 46 */
        int c = z->c;
        while(1) { /* goto, line 46 */
            int c = z->c;
            if (!(in_grouping_U(z, g_v, 97, 249))) goto lab2;
            z->bra = z->c; /* [, line 47 */
            {   int c = z->c; /* or, line 47 */
                if (!(eq_s(z, 1, s_6))) goto lab4;
                z->ket = z->c; /* ], line 47 */
                if (!(in_grouping_U(z, g_v, 97, 249))) goto lab4;
                {   int ret;
                    ret = slice_from_s(z, 1, s_7); /* <-, line 47 */
                    if (ret < 0) return ret;
                }
                goto lab3;
            lab4:
                z->c = c;
                if (!(eq_s(z, 1, s_8))) goto lab2;
                z->ket = z->c; /* ], line 48 */
                if (!(in_grouping_U(z, g_v, 97, 249))) goto lab2;
                {   int ret;
                    ret = slice_from_s(z, 1, s_9); /* <-, line 48 */
                    if (ret < 0) return ret;
                }
            }
        lab3:
            z->c = c;
            break;
        lab2:
            z->c = c;
            {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                if (c < 0) goto lab1;
                z->c = c; /* goto, line 46 */
            }
        }
        continue;
    lab1:
        z->c = c;
        break;
    }
    return 1;
}

static int r_mark_regions(struct SN_env * z) {
    z->I[0] = z->l;
    z->I[1] = z->l;
    z->I[2] = z->l;
    {   int c = z->c; /* do, line 58 */
        {   int c = z->c; /* or, line 60 */
            if (!(in_grouping_U(z, g_v, 97, 249))) goto lab2;
            {   int c = z->c; /* or, line 59 */
                if (!(out_grouping_U(z, g_v, 97, 249))) goto lab4;
                while(1) { /* gopast, line 59 */
                    if (!(in_grouping_U(z, g_v, 97, 249))) goto lab5;
                    break;
                lab5:
                    {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                        if (c < 0) goto lab4;
                        z->c = c; /* gopast, line 59 */
                    }
                }
                goto lab3;
            lab4:
                z->c = c;
                if (!(in_grouping_U(z, g_v, 97, 249))) goto lab2;
                while(1) { /* gopast, line 59 */
                    if (!(out_grouping_U(z, g_v, 97, 249))) goto lab6;
                    break;
                lab6:
                    {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                        if (c < 0) goto lab2;
                        z->c = c; /* gopast, line 59 */
                    }
                }
            }
        lab3:
            goto lab1;
        lab2:
            z->c = c;
            if (!(out_grouping_U(z, g_v, 97, 249))) goto lab0;
            {   int c = z->c; /* or, line 61 */
                if (!(out_grouping_U(z, g_v, 97, 249))) goto lab8;
                while(1) { /* gopast, line 61 */
                    if (!(in_grouping_U(z, g_v, 97, 249))) goto lab9;
                    break;
                lab9:
                    {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                        if (c < 0) goto lab8;
                        z->c = c; /* gopast, line 61 */
                    }
                }
                goto lab7;
            lab8:
                z->c = c;
                if (!(in_grouping_U(z, g_v, 97, 249))) goto lab0;
                {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                    if (c < 0) goto lab0;
                    z->c = c; /* next, line 61 */
                }
            }
        lab7:
            ;
        }
    lab1:
        z->I[0] = z->c; /* setmark pV, line 62 */
    lab0:
        z->c = c;
    }
    {   int c = z->c; /* do, line 64 */
        while(1) { /* gopast, line 65 */
            if (!(in_grouping_U(z, g_v, 97, 249))) goto lab11;
            break;
        lab11:
            {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                if (c < 0) goto lab10;
                z->c = c; /* gopast, line 65 */
            }
        }
        while(1) { /* gopast, line 65 */
            if (!(out_grouping_U(z, g_v, 97, 249))) goto lab12;
            break;
        lab12:
            {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                if (c < 0) goto lab10;
                z->c = c; /* gopast, line 65 */
            }
        }
        z->I[1] = z->c; /* setmark p1, line 65 */
        while(1) { /* gopast, line 66 */
            if (!(in_grouping_U(z, g_v, 97, 249))) goto lab13;
            break;
        lab13:
            {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                if (c < 0) goto lab10;
                z->c = c; /* gopast, line 66 */
            }
        }
        while(1) { /* gopast, line 66 */
            if (!(out_grouping_U(z, g_v, 97, 249))) goto lab14;
            break;
        lab14:
            {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                if (c < 0) goto lab10;
                z->c = c; /* gopast, line 66 */
            }
        }
        z->I[2] = z->c; /* setmark p2, line 66 */
    lab10:
        z->c = c;
    }
    return 1;
}

static int r_postlude(struct SN_env * z) {
    int among_var;
    while(1) { /* repeat, line 70 */
        int c = z->c;
        z->bra = z->c; /* [, line 72 */
        if (z->c + 0 >= z->l || (z->p[z->c + 0] != 73 && z->p[z->c + 0] != 85)) among_var = 3; else
        among_var = find_among(z, a_1, 3); /* substring, line 72 */
        if (!(among_var)) goto lab0;
        z->ket = z->c; /* ], line 72 */
        switch(among_var) {
            case 0: goto lab0;
            case 1:
                {   int ret;
                    ret = slice_from_s(z, 1, s_10); /* <-, line 73 */
                    if (ret < 0) return ret;
                }
                break;
            case 2:
                {   int ret;
                    ret = slice_from_s(z, 1, s_11); /* <-, line 74 */
                    if (ret < 0) return ret;
                }
                break;
            case 3:
                {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);
                    if (c < 0) goto lab0;
                    z->c = c; /* next, line 75 */
                }
                break;
        }
        continue;
    lab0:
        z->c = c;
        break;
    }
    return 1;
}

static int r_RV(struct SN_env * z) {
    if (!(z->I[0] <= z->c)) return 0;
    return 1;
}

static int r_R1(struct SN_env * z) {
    if (!(z->I[1] <= z->c)) return 0;
    return 1;
}