stem_ISO_8859_1_finnish.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 *	finnish_ISO_8859_1_create_env (void)
void	finnish_ISO_8859_1_close_env (struct SN_env *z)
int	finnish_ISO_8859_1_stem (struct SN_env *z)

Function Documentation

finnish_ISO_8859_1_close_env()

void finnish_ISO_8859_1_close_env

(

struct SN_env *

z

)

Definition at line 717 of file stem_ISO_8859_1_finnish.c.

{ SN_close_env(z, 1); }

References SN_close_env().

finnish_ISO_8859_1_create_env()

struct SN_env* finnish_ISO_8859_1_create_env

(

void

)

Definition at line 715 of file stem_ISO_8859_1_finnish.c.

{ return SN_create_env(1, 3); }

References SN_create_env().

finnish_ISO_8859_1_stem()

int finnish_ISO_8859_1_stem

(

struct SN_env *

z

)

Definition at line 654 of file stem_ISO_8859_1_finnish.c.

                                                      {
    {   int c1 = z->c;
        {   int ret = r_mark_regions(z);
            if (ret < 0) return ret;
        }
        z->c = c1;
    }
    z->I[2] = 0;
    z->lb = z->c; z->c = z->l;
 
    {   int m2 = z->l - z->c; (void)m2;
        {   int ret = r_particle_etc(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m2;
    }
    {   int m3 = z->l - z->c; (void)m3;
        {   int ret = r_possessive(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m3;
    }
    {   int m4 = z->l - z->c; (void)m4;
        {   int ret = r_case_ending(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m4;
    }
    {   int m5 = z->l - z->c; (void)m5;
        {   int ret = r_other_endings(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m5;
    }
    
    if (!(z->I[2])) goto lab1;
    {   int m6 = z->l - z->c; (void)m6;
        {   int ret = r_i_plural(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m6;
    }
    goto lab0;
lab1:
    {   int m7 = z->l - z->c; (void)m7;
        {   int ret = r_t_plural(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m7;
    }
lab0:
    {   int m8 = z->l - z->c; (void)m8;
        {   int ret = r_tidy(z);
            if (ret < 0) return ret;
        }
        z->c = z->l - m8;
    }
    z->c = z->lb;
    return 1;
}

References SN_env::c, SN_env::I, SN_env::l, SN_env::lb, r_case_ending(), r_i_plural(), r_mark_regions(), r_other_endings(), r_particle_etc(), r_possessive(), r_t_plural(), and r_tidy().