stem_KOI8_R_russian.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 *	russian_KOI8_R_create_env (void)
void	russian_KOI8_R_close_env (struct SN_env *z)
int	russian_KOI8_R_stem (struct SN_env *z)

Function Documentation

russian_KOI8_R_close_env()

void russian_KOI8_R_close_env

(

struct SN_env *

z

)

Definition at line 684 of file stem_KOI8_R_russian.c.

{ SN_close_env(z, 0); }

References SN_close_env().

russian_KOI8_R_create_env()

struct SN_env * russian_KOI8_R_create_env

(

void

)

Definition at line 682 of file stem_KOI8_R_russian.c.

{ return SN_create_env(0, 2); }

References SN_create_env().

russian_KOI8_R_stem()

int russian_KOI8_R_stem

(

struct SN_env *

z

)

Definition at line 572 of file stem_KOI8_R_russian.c.

                                                  {
    {   int c1 = z->c;
        while(1) {
            int c2 = z->c;
            while(1) {
                int c3 = z->c;
                z->bra = z->c;
                if (z->c == z->l || z->p[z->c] != 0xA3) goto lab2;
                z->c++;
                z->ket = z->c;
                z->c = c3;
                break;
            lab2:
                z->c = c3;
                if (z->c >= z->l) goto lab1;
                z->c++;
            }
            {   int ret = slice_from_s(z, 1, s_0);
                if (ret < 0) return ret;
            }
            continue;
        lab1:
            z->c = c2;
            break;
        }
        z->c = c1;
    }
 
    {   int ret = r_mark_regions(z);
        if (ret < 0) return ret;
    }
    z->lb = z->c; z->c = z->l;
 
 
    {   int mlimit4;
        if (z->c < z->I[1]) return 0;
        mlimit4 = z->lb; z->lb = z->I[1];
        {   int m5 = z->l - z->c; (void)m5;
            {   int m6 = z->l - z->c; (void)m6;
                {   int ret = r_perfective_gerund(z);
                    if (ret == 0) goto lab5;
                    if (ret < 0) return ret;
                }
                goto lab4;
            lab5:
                z->c = z->l - m6;
                {   int m7 = z->l - z->c; (void)m7;
                    {   int ret = r_reflexive(z);
                        if (ret == 0) { z->c = z->l - m7; goto lab6; }
                        if (ret < 0) return ret;
                    }
                lab6:
                    ;
                }
                {   int m8 = z->l - z->c; (void)m8;
                    {   int ret = r_adjectival(z);
                        if (ret == 0) goto lab8;
                        if (ret < 0) return ret;
                    }
                    goto lab7;
                lab8:
                    z->c = z->l - m8;
                    {   int ret = r_verb(z);
                        if (ret == 0) goto lab9;
                        if (ret < 0) return ret;
                    }
                    goto lab7;
                lab9:
                    z->c = z->l - m8;
                    {   int ret = r_noun(z);
                        if (ret == 0) goto lab3;
                        if (ret < 0) return ret;
                    }
                }
            lab7:
                ;
            }
        lab4:
        lab3:
            z->c = z->l - m5;
        }
        {   int m9 = z->l - z->c; (void)m9;
            z->ket = z->c;
            if (z->c <= z->lb || z->p[z->c - 1] != 0xC9) { z->c = z->l - m9; goto lab10; }
            z->c--;
            z->bra = z->c;
            {   int ret = slice_del(z);
                if (ret < 0) return ret;
            }
        lab10:
            ;
        }
        {   int m10 = z->l - z->c; (void)m10;
            {   int ret = r_derivational(z);
                if (ret < 0) return ret;
            }
            z->c = z->l - m10;
        }
        {   int m11 = z->l - z->c; (void)m11;
            {   int ret = r_tidy_up(z);
                if (ret < 0) return ret;
            }
            z->c = z->l - m11;
        }
        z->lb = mlimit4;
    }
    z->c = z->lb;
    return 1;
}

References SN_env::bra, SN_env::c, SN_env::I, SN_env::ket, SN_env::l, SN_env::lb, SN_env::p, r_adjectival(), r_derivational(), r_mark_regions(), r_noun(), r_perfective_gerund(), r_reflexive(), r_tidy_up(), r_verb(), s_0, slice_del(), and slice_from_s().