stem_UTF_8_lithuanian.h File Reference

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Functions
struct SN_env *	lithuanian_UTF_8_create_env (void)
void	lithuanian_UTF_8_close_env (struct SN_env *z)
int	lithuanian_UTF_8_stem (struct SN_env *z)

Function Documentation

lithuanian_UTF_8_close_env()

void lithuanian_UTF_8_close_env

(

struct SN_env *

z

)

Definition at line 816 of file stem_UTF_8_lithuanian.c.

                                                          {
    SN_delete_env(z);
}

References SN_delete_env().

lithuanian_UTF_8_create_env()

struct SN_env * lithuanian_UTF_8_create_env

(

void

)

Definition at line 808 of file stem_UTF_8_lithuanian.c.

                                                         {
    struct SN_env * z = SN_new_env(sizeof(SN_local));
    if (z) {
        ((SN_local *)z)->i_p1 = 0;
    }
    return z;
}

References SN_new_env().

lithuanian_UTF_8_stem()

int lithuanian_UTF_8_stem

(

struct SN_env *

z

)

Definition at line 729 of file stem_UTF_8_lithuanian.c.

                                                    {
    ((SN_local *)z)->i_p1 = z->l;
    {
        int v_1 = z->c;
        {
            int v_2 = z->c;
            if (z->c == z->l || z->p[z->c] != 'a') { z->c = v_2; goto lab1; }
            z->c++;
            if (len_utf8(z->p) <= 6) { z->c = v_2; goto lab1; }
        lab1:
            ;
        }
        {
            int ret = out_grouping_U(z, g_v, 97, 371, 1);
            if (ret < 0) goto lab0;
            z->c += ret;
        }
        {
            int ret = in_grouping_U(z, g_v, 97, 371, 1);
            if (ret < 0) goto lab0;
            z->c += ret;
        }
        ((SN_local *)z)->i_p1 = z->c;
    lab0:
        z->c = v_1;
    }
    z->lb = z->c; z->c = z->l;
    {
        int v_3 = z->l - z->c;
        {
            int ret = r_fix_conflicts(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - v_3;
    }
    {
        int v_4 = z->l - z->c;
        {
            int ret = r_step1(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - v_4;
    }
    {
        int v_5 = z->l - z->c;
        {
            int ret = r_fix_chdz(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - v_5;
    }
    {
        int v_6 = z->l - z->c;
        {
            int ret = r_step2(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - v_6;
    }
    {
        int v_7 = z->l - z->c;
        {
            int ret = r_fix_chdz(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - v_7;
    }
    {
        int v_8 = z->l - z->c;
        {
            int ret = r_fix_gd(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - v_8;
    }
    z->c = z->lb;
    return 1;
}

References SN_env::c, g_v, in_grouping_U(), SN_env::l, SN_env::lb, len_utf8(), out_grouping_U(), SN_env::p, r_fix_chdz(), r_fix_conflicts(), r_fix_gd(), r_step1(), and r_step2().