PostgreSQL Source Code  git master
stem_UTF_8_finnish.c File Reference
#include "header.h"
Include dependency graph for stem_UTF_8_finnish.c:

Go to the source code of this file.

Functions

int finnish_UTF_8_stem (struct SN_env *z)
 
static int r_tidy (struct SN_env *z)
 
static int r_other_endings (struct SN_env *z)
 
static int r_t_plural (struct SN_env *z)
 
static int r_i_plural (struct SN_env *z)
 
static int r_case_ending (struct SN_env *z)
 
static int r_VI (struct SN_env *z)
 
static int r_LONG (struct SN_env *z)
 
static int r_possessive (struct SN_env *z)
 
static int r_particle_etc (struct SN_env *z)
 
static int r_R2 (struct SN_env *z)
 
static int r_mark_regions (struct SN_env *z)
 
struct SN_envfinnish_UTF_8_create_env (void)
 
void finnish_UTF_8_close_env (struct SN_env *z)
 

Variables

static const symbol s_0_0 [2] = { 'p', 'a' }
 
static const symbol s_0_1 [3] = { 's', 't', 'i' }
 
static const symbol s_0_2 [4] = { 'k', 'a', 'a', 'n' }
 
static const symbol s_0_3 [3] = { 'h', 'a', 'n' }
 
static const symbol s_0_4 [3] = { 'k', 'i', 'n' }
 
static const symbol s_0_5 [4] = { 'h', 0xC3, 0xA4, 'n' }
 
static const symbol s_0_6 [6] = { 'k', 0xC3, 0xA4, 0xC3, 0xA4, 'n' }
 
static const symbol s_0_7 [2] = { 'k', 'o' }
 
static const symbol s_0_8 [3] = { 'p', 0xC3, 0xA4 }
 
static const symbol s_0_9 [3] = { 'k', 0xC3, 0xB6 }
 
static const struct among a_0 [10]
 
static const symbol s_1_0 [3] = { 'l', 'l', 'a' }
 
static const symbol s_1_1 [2] = { 'n', 'a' }
 
static const symbol s_1_2 [3] = { 's', 's', 'a' }
 
static const symbol s_1_3 [2] = { 't', 'a' }
 
static const symbol s_1_4 [3] = { 'l', 't', 'a' }
 
static const symbol s_1_5 [3] = { 's', 't', 'a' }
 
static const struct among a_1 [6]
 
static const symbol s_2_0 [4] = { 'l', 'l', 0xC3, 0xA4 }
 
static const symbol s_2_1 [3] = { 'n', 0xC3, 0xA4 }
 
static const symbol s_2_2 [4] = { 's', 's', 0xC3, 0xA4 }
 
static const symbol s_2_3 [3] = { 't', 0xC3, 0xA4 }
 
static const symbol s_2_4 [4] = { 'l', 't', 0xC3, 0xA4 }
 
static const symbol s_2_5 [4] = { 's', 't', 0xC3, 0xA4 }
 
static const struct among a_2 [6]
 
static const symbol s_3_0 [3] = { 'l', 'l', 'e' }
 
static const symbol s_3_1 [3] = { 'i', 'n', 'e' }
 
static const struct among a_3 [2]
 
static const symbol s_4_0 [3] = { 'n', 's', 'a' }
 
static const symbol s_4_1 [3] = { 'm', 'm', 'e' }
 
static const symbol s_4_2 [3] = { 'n', 'n', 'e' }
 
static const symbol s_4_3 [2] = { 'n', 'i' }
 
static const symbol s_4_4 [2] = { 's', 'i' }
 
static const symbol s_4_5 [2] = { 'a', 'n' }
 
static const symbol s_4_6 [2] = { 'e', 'n' }
 
static const symbol s_4_7 [3] = { 0xC3, 0xA4, 'n' }
 
static const symbol s_4_8 [4] = { 'n', 's', 0xC3, 0xA4 }
 
static const struct among a_4 [9]
 
static const symbol s_5_0 [2] = { 'a', 'a' }
 
static const symbol s_5_1 [2] = { 'e', 'e' }
 
static const symbol s_5_2 [2] = { 'i', 'i' }
 
static const symbol s_5_3 [2] = { 'o', 'o' }
 
static const symbol s_5_4 [2] = { 'u', 'u' }
 
static const symbol s_5_5 [4] = { 0xC3, 0xA4, 0xC3, 0xA4 }
 
static const symbol s_5_6 [4] = { 0xC3, 0xB6, 0xC3, 0xB6 }
 
static const struct among a_5 [7]
 
static const symbol s_6_0 [1] = { 'a' }
 
static const symbol s_6_1 [3] = { 'l', 'l', 'a' }
 
static const symbol s_6_2 [2] = { 'n', 'a' }
 
static const symbol s_6_3 [3] = { 's', 's', 'a' }
 
static const symbol s_6_4 [2] = { 't', 'a' }
 
static const symbol s_6_5 [3] = { 'l', 't', 'a' }
 
static const symbol s_6_6 [3] = { 's', 't', 'a' }
 
static const symbol s_6_7 [3] = { 't', 't', 'a' }
 
static const symbol s_6_8 [3] = { 'l', 'l', 'e' }
 
static const symbol s_6_9 [3] = { 'i', 'n', 'e' }
 
static const symbol s_6_10 [3] = { 'k', 's', 'i' }
 
static const symbol s_6_11 [1] = { 'n' }
 
static const symbol s_6_12 [3] = { 'h', 'a', 'n' }
 
static const symbol s_6_13 [3] = { 'd', 'e', 'n' }
 
static const symbol s_6_14 [4] = { 's', 'e', 'e', 'n' }
 
static const symbol s_6_15 [3] = { 'h', 'e', 'n' }
 
static const symbol s_6_16 [4] = { 't', 't', 'e', 'n' }
 
static const symbol s_6_17 [3] = { 'h', 'i', 'n' }
 
static const symbol s_6_18 [4] = { 's', 'i', 'i', 'n' }
 
static const symbol s_6_19 [3] = { 'h', 'o', 'n' }
 
static const symbol s_6_20 [4] = { 'h', 0xC3, 0xA4, 'n' }
 
static const symbol s_6_21 [4] = { 'h', 0xC3, 0xB6, 'n' }
 
static const symbol s_6_22 [2] = { 0xC3, 0xA4 }
 
static const symbol s_6_23 [4] = { 'l', 'l', 0xC3, 0xA4 }
 
static const symbol s_6_24 [3] = { 'n', 0xC3, 0xA4 }
 
static const symbol s_6_25 [4] = { 's', 's', 0xC3, 0xA4 }
 
static const symbol s_6_26 [3] = { 't', 0xC3, 0xA4 }
 
static const symbol s_6_27 [4] = { 'l', 't', 0xC3, 0xA4 }
 
static const symbol s_6_28 [4] = { 's', 't', 0xC3, 0xA4 }
 
static const symbol s_6_29 [4] = { 't', 't', 0xC3, 0xA4 }
 
static const struct among a_6 [30]
 
static const symbol s_7_0 [3] = { 'e', 'j', 'a' }
 
static const symbol s_7_1 [3] = { 'm', 'm', 'a' }
 
static const symbol s_7_2 [4] = { 'i', 'm', 'm', 'a' }
 
static const symbol s_7_3 [3] = { 'm', 'p', 'a' }
 
static const symbol s_7_4 [4] = { 'i', 'm', 'p', 'a' }
 
static const symbol s_7_5 [3] = { 'm', 'm', 'i' }
 
static const symbol s_7_6 [4] = { 'i', 'm', 'm', 'i' }
 
static const symbol s_7_7 [3] = { 'm', 'p', 'i' }
 
static const symbol s_7_8 [4] = { 'i', 'm', 'p', 'i' }
 
static const symbol s_7_9 [4] = { 'e', 'j', 0xC3, 0xA4 }
 
static const symbol s_7_10 [4] = { 'm', 'm', 0xC3, 0xA4 }
 
static const symbol s_7_11 [5] = { 'i', 'm', 'm', 0xC3, 0xA4 }
 
static const symbol s_7_12 [4] = { 'm', 'p', 0xC3, 0xA4 }
 
static const symbol s_7_13 [5] = { 'i', 'm', 'p', 0xC3, 0xA4 }
 
static const struct among a_7 [14]
 
static const symbol s_8_0 [1] = { 'i' }
 
static const symbol s_8_1 [1] = { 'j' }
 
static const struct among a_8 [2]
 
static const symbol s_9_0 [3] = { 'm', 'm', 'a' }
 
static const symbol s_9_1 [4] = { 'i', 'm', 'm', 'a' }
 
static const struct among a_9 [2]
 
static const unsigned char g_AEI [] = { 17, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8 }
 
static const unsigned char g_V1 [] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 }
 
static const unsigned char g_V2 [] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 }
 
static const unsigned char g_particle_end [] = { 17, 97, 24, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 }
 
static const symbol s_0 [] = { 'k' }
 
static const symbol s_1 [] = { 'k', 's', 'e' }
 
static const symbol s_2 [] = { 'k', 's', 'i' }
 
static const symbol s_3 [] = { 'i' }
 
static const symbol s_4 [] = { 'a' }
 
static const symbol s_5 [] = { 'e' }
 
static const symbol s_6 [] = { 'i' }
 
static const symbol s_7 [] = { 'o' }
 
static const symbol s_8 [] = { 0xC3, 0xA4 }
 
static const symbol s_9 [] = { 0xC3, 0xB6 }
 
static const symbol s_10 [] = { 'i', 'e' }
 
static const symbol s_11 [] = { 'e' }
 
static const symbol s_12 [] = { 'p', 'o' }
 
static const symbol s_13 [] = { 't' }
 
static const symbol s_14 [] = { 'p', 'o' }
 
static const symbol s_15 [] = { 'j' }
 
static const symbol s_16 [] = { 'o' }
 
static const symbol s_17 [] = { 'u' }
 
static const symbol s_18 [] = { 'o' }
 
static const symbol s_19 [] = { 'j' }
 

Function Documentation

◆ finnish_UTF_8_close_env()

void finnish_UTF_8_close_env ( struct SN_env z)

Definition at line 767 of file stem_UTF_8_finnish.c.

References SN_close_env().

767 { SN_close_env(z, 1); }
void SN_close_env(struct SN_env *z, int S_size)
Definition: api.c:40

◆ finnish_UTF_8_create_env()

struct SN_env * finnish_UTF_8_create_env ( void  )

Definition at line 765 of file stem_UTF_8_finnish.c.

References SN_create_env().

765 { return SN_create_env(1, 2, 1); }
struct SN_env * SN_create_env(int S_size, int I_size, int B_size)
Definition: api.c:3

◆ finnish_UTF_8_stem()

int finnish_UTF_8_stem ( struct SN_env z)

Definition at line 686 of file stem_UTF_8_finnish.c.

References SN_env::B, SN_env::c, 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().

686  {
687  { int c1 = z->c; /* do, line 185 */
688  { int ret = r_mark_regions(z);
689  if (ret == 0) goto lab0; /* call mark_regions, line 185 */
690  if (ret < 0) return ret;
691  }
692  lab0:
693  z->c = c1;
694  }
695  z->B[0] = 0; /* unset ending_removed, line 186 */
696  z->lb = z->c; z->c = z->l; /* backwards, line 187 */
697 
698  { int m2 = z->l - z->c; (void)m2; /* do, line 188 */
699  { int ret = r_particle_etc(z);
700  if (ret == 0) goto lab1; /* call particle_etc, line 188 */
701  if (ret < 0) return ret;
702  }
703  lab1:
704  z->c = z->l - m2;
705  }
706  { int m3 = z->l - z->c; (void)m3; /* do, line 189 */
707  { int ret = r_possessive(z);
708  if (ret == 0) goto lab2; /* call possessive, line 189 */
709  if (ret < 0) return ret;
710  }
711  lab2:
712  z->c = z->l - m3;
713  }
714  { int m4 = z->l - z->c; (void)m4; /* do, line 190 */
715  { int ret = r_case_ending(z);
716  if (ret == 0) goto lab3; /* call case_ending, line 190 */
717  if (ret < 0) return ret;
718  }
719  lab3:
720  z->c = z->l - m4;
721  }
722  { int m5 = z->l - z->c; (void)m5; /* do, line 191 */
723  { int ret = r_other_endings(z);
724  if (ret == 0) goto lab4; /* call other_endings, line 191 */
725  if (ret < 0) return ret;
726  }
727  lab4:
728  z->c = z->l - m5;
729  }
730  { int m6 = z->l - z->c; (void)m6; /* or, line 192 */
731  if (!(z->B[0])) goto lab6; /* Boolean test ending_removed, line 192 */
732  { int m7 = z->l - z->c; (void)m7; /* do, line 192 */
733  { int ret = r_i_plural(z);
734  if (ret == 0) goto lab7; /* call i_plural, line 192 */
735  if (ret < 0) return ret;
736  }
737  lab7:
738  z->c = z->l - m7;
739  }
740  goto lab5;
741  lab6:
742  z->c = z->l - m6;
743  { int m8 = z->l - z->c; (void)m8; /* do, line 192 */
744  { int ret = r_t_plural(z);
745  if (ret == 0) goto lab8; /* call t_plural, line 192 */
746  if (ret < 0) return ret;
747  }
748  lab8:
749  z->c = z->l - m8;
750  }
751  }
752 lab5:
753  { int m9 = z->l - z->c; (void)m9; /* do, line 193 */
754  { int ret = r_tidy(z);
755  if (ret == 0) goto lab9; /* call tidy, line 193 */
756  if (ret < 0) return ret;
757  }
758  lab9:
759  z->c = z->l - m9;
760  }
761  z->c = z->lb;
762  return 1;
763 }
static int r_case_ending(struct SN_env *z)
static int r_i_plural(struct SN_env *z)
int c
Definition: api.h:16
static int r_other_endings(struct SN_env *z)
static int r_mark_regions(struct SN_env *z)
int lb
Definition: api.h:16
static int r_tidy(struct SN_env *z)
static int r_t_plural(struct SN_env *z)
unsigned char * B
Definition: api.h:19
static int r_particle_etc(struct SN_env *z)
int l
Definition: api.h:16
static int r_possessive(struct SN_env *z)

◆ r_case_ending()

static int r_case_ending ( struct SN_env z)
static

Definition at line 427 of file stem_UTF_8_finnish.c.

References SN_env::B, SN_env::bra, SN_env::c, eq_s_b(), find_among_b(), g_V1, SN_env::I, in_grouping_b_U(), SN_env::ket, SN_env::l, SN_env::lb, out_grouping_b_U(), SN_env::p, r_LONG(), s_10, s_11, s_4, s_5, s_6, s_7, s_8, s_9, skip_utf8(), and slice_del().

Referenced by finnish_UTF_8_stem().

427  {
428  int among_var;
429  { int mlimit; /* setlimit, line 96 */
430  int m1 = z->l - z->c; (void)m1;
431  if (z->c < z->I[0]) return 0;
432  z->c = z->I[0]; /* tomark, line 96 */
433  mlimit = z->lb; z->lb = z->c;
434  z->c = z->l - m1;
435  z->ket = z->c; /* [, line 96 */
436  among_var = find_among_b(z, a_6, 30); /* substring, line 96 */
437  if (!(among_var)) { z->lb = mlimit; return 0; }
438  z->bra = z->c; /* ], line 96 */
439  z->lb = mlimit;
440  }
441  switch(among_var) {
442  case 0: return 0;
443  case 1:
444  if (!(eq_s_b(z, 1, s_4))) return 0;
445  break;
446  case 2:
447  if (!(eq_s_b(z, 1, s_5))) return 0;
448  break;
449  case 3:
450  if (!(eq_s_b(z, 1, s_6))) return 0;
451  break;
452  case 4:
453  if (!(eq_s_b(z, 1, s_7))) return 0;
454  break;
455  case 5:
456  if (!(eq_s_b(z, 2, s_8))) return 0;
457  break;
458  case 6:
459  if (!(eq_s_b(z, 2, s_9))) return 0;
460  break;
461  case 7:
462  { int m_keep = z->l - z->c;/* (void) m_keep;*/ /* try, line 111 */
463  { int m2 = z->l - z->c; (void)m2; /* and, line 113 */
464  { int m3 = z->l - z->c; (void)m3; /* or, line 112 */
465  { int ret = r_LONG(z);
466  if (ret == 0) goto lab2; /* call LONG, line 111 */
467  if (ret < 0) return ret;
468  }
469  goto lab1;
470  lab2:
471  z->c = z->l - m3;
472  if (!(eq_s_b(z, 2, s_10))) { z->c = z->l - m_keep; goto lab0; }
473  }
474  lab1:
475  z->c = z->l - m2;
476  { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
477  if (ret < 0) { z->c = z->l - m_keep; goto lab0; }
478  z->c = ret; /* next, line 113 */
479  }
480  }
481  z->bra = z->c; /* ], line 113 */
482  lab0:
483  ;
484  }
485  break;
486  case 8:
487  if (in_grouping_b_U(z, g_V1, 97, 246, 0)) return 0;
488  if (out_grouping_b_U(z, g_V1, 97, 246, 0)) return 0;
489  break;
490  case 9:
491  if (!(eq_s_b(z, 1, s_11))) return 0;
492  break;
493  }
494  { int ret = slice_del(z); /* delete, line 138 */
495  if (ret < 0) return ret;
496  }
497  z->B[0] = 1; /* set ending_removed, line 139 */
498  return 1;
499 }
static const unsigned char g_V1[]
symbol * p
Definition: api.h:15
int skip_utf8(const symbol *p, int c, int lb, int l, int n)
Definition: utilities.c:30
static const struct among a_6[30]
static int r_LONG(struct SN_env *z)
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:194
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
static const symbol s_7[]
int c
Definition: api.h:16
int lb
Definition: api.h:16
int in_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:103
int out_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:127
static const symbol s_5[]
static const symbol s_4[]
static const symbol s_10[]
unsigned char * B
Definition: api.h:19
int l
Definition: api.h:16
static const symbol s_11[]
static const symbol s_6[]
static const symbol s_9[]
static const symbol s_8[]

◆ r_i_plural()

static int r_i_plural ( struct SN_env z)
static

Definition at line 532 of file stem_UTF_8_finnish.c.

References SN_env::bra, SN_env::c, find_among_b(), SN_env::I, SN_env::ket, SN_env::l, SN_env::lb, SN_env::p, and slice_del().

Referenced by finnish_UTF_8_stem().

532  {
533  { int mlimit; /* setlimit, line 154 */
534  int m1 = z->l - z->c; (void)m1;
535  if (z->c < z->I[0]) return 0;
536  z->c = z->I[0]; /* tomark, line 154 */
537  mlimit = z->lb; z->lb = z->c;
538  z->c = z->l - m1;
539  z->ket = z->c; /* [, line 154 */
540  if (z->c <= z->lb || (z->p[z->c - 1] != 105 && z->p[z->c - 1] != 106)) { z->lb = mlimit; return 0; }
541  if (!(find_among_b(z, a_8, 2))) { z->lb = mlimit; return 0; } /* substring, line 154 */
542  z->bra = z->c; /* ], line 154 */
543  z->lb = mlimit;
544  }
545  { int ret = slice_del(z); /* delete, line 158 */
546  if (ret < 0) return ret;
547  }
548  return 1;
549 }
symbol * p
Definition: api.h:15
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
static const struct among a_8[2]
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
int c
Definition: api.h:16
int lb
Definition: api.h:16
int l
Definition: api.h:16

◆ r_LONG()

static int r_LONG ( struct SN_env z)
static

Definition at line 416 of file stem_UTF_8_finnish.c.

References find_among_b().

Referenced by r_case_ending(), and r_tidy().

416  {
417  if (!(find_among_b(z, a_5, 7))) return 0; /* among, line 91 */
418  return 1;
419 }
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
static const struct among a_5[7]

◆ r_mark_regions()

static int r_mark_regions ( struct SN_env z)
static

Definition at line 291 of file stem_UTF_8_finnish.c.

References SN_env::c, g_V1, SN_env::I, in_grouping_U(), SN_env::l, and out_grouping_U().

Referenced by finnish_UTF_8_stem().

291  {
292  z->I[0] = z->l;
293  z->I[1] = z->l;
294  if (out_grouping_U(z, g_V1, 97, 246, 1) < 0) return 0; /* goto */ /* grouping V1, line 46 */
295  { /* gopast */ /* non V1, line 46 */
296  int ret = in_grouping_U(z, g_V1, 97, 246, 1);
297  if (ret < 0) return 0;
298  z->c += ret;
299  }
300  z->I[0] = z->c; /* setmark p1, line 46 */
301  if (out_grouping_U(z, g_V1, 97, 246, 1) < 0) return 0; /* goto */ /* grouping V1, line 47 */
302  { /* gopast */ /* non V1, line 47 */
303  int ret = in_grouping_U(z, g_V1, 97, 246, 1);
304  if (ret < 0) return 0;
305  z->c += ret;
306  }
307  z->I[1] = z->c; /* setmark p2, line 47 */
308  return 1;
309 }
static const unsigned char g_V1[]
int * I
Definition: api.h:18
int c
Definition: api.h:16
int in_grouping_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:91
int out_grouping_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:115
int l
Definition: api.h:16

◆ r_other_endings()

static int r_other_endings ( struct SN_env z)
static

Definition at line 501 of file stem_UTF_8_finnish.c.

References SN_env::bra, SN_env::c, eq_s_b(), find_among_b(), SN_env::I, SN_env::ket, SN_env::l, SN_env::lb, s_12, and slice_del().

Referenced by finnish_UTF_8_stem().

501  {
502  int among_var;
503  { int mlimit; /* setlimit, line 142 */
504  int m1 = z->l - z->c; (void)m1;
505  if (z->c < z->I[1]) return 0;
506  z->c = z->I[1]; /* tomark, line 142 */
507  mlimit = z->lb; z->lb = z->c;
508  z->c = z->l - m1;
509  z->ket = z->c; /* [, line 142 */
510  among_var = find_among_b(z, a_7, 14); /* substring, line 142 */
511  if (!(among_var)) { z->lb = mlimit; return 0; }
512  z->bra = z->c; /* ], line 142 */
513  z->lb = mlimit;
514  }
515  switch(among_var) {
516  case 0: return 0;
517  case 1:
518  { int m2 = z->l - z->c; (void)m2; /* not, line 146 */
519  if (!(eq_s_b(z, 2, s_12))) goto lab0;
520  return 0;
521  lab0:
522  z->c = z->l - m2;
523  }
524  break;
525  }
526  { int ret = slice_del(z); /* delete, line 151 */
527  if (ret < 0) return ret;
528  }
529  return 1;
530 }
static const struct among a_7[14]
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:194
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
int c
Definition: api.h:16
int lb
Definition: api.h:16
static const symbol s_12[]
int l
Definition: api.h:16

◆ r_particle_etc()

static int r_particle_etc ( struct SN_env z)
static

Definition at line 316 of file stem_UTF_8_finnish.c.

References SN_env::bra, SN_env::c, find_among_b(), g_particle_end, SN_env::I, in_grouping_b_U(), SN_env::ket, SN_env::l, SN_env::lb, r_R2(), and slice_del().

Referenced by finnish_UTF_8_stem().

316  {
317  int among_var;
318  { int mlimit; /* setlimit, line 55 */
319  int m1 = z->l - z->c; (void)m1;
320  if (z->c < z->I[0]) return 0;
321  z->c = z->I[0]; /* tomark, line 55 */
322  mlimit = z->lb; z->lb = z->c;
323  z->c = z->l - m1;
324  z->ket = z->c; /* [, line 55 */
325  among_var = find_among_b(z, a_0, 10); /* substring, line 55 */
326  if (!(among_var)) { z->lb = mlimit; return 0; }
327  z->bra = z->c; /* ], line 55 */
328  z->lb = mlimit;
329  }
330  switch(among_var) {
331  case 0: return 0;
332  case 1:
333  if (in_grouping_b_U(z, g_particle_end, 97, 246, 0)) return 0;
334  break;
335  case 2:
336  { int ret = r_R2(z);
337  if (ret == 0) return 0; /* call R2, line 64 */
338  if (ret < 0) return ret;
339  }
340  break;
341  }
342  { int ret = slice_del(z); /* delete, line 66 */
343  if (ret < 0) return ret;
344  }
345  return 1;
346 }
static const struct among a_0[10]
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
static const unsigned char g_particle_end[]
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
int c
Definition: api.h:16
static int r_R2(struct SN_env *z)
int lb
Definition: api.h:16
int in_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:103
int l
Definition: api.h:16

◆ r_possessive()

static int r_possessive ( struct SN_env z)
static

Definition at line 348 of file stem_UTF_8_finnish.c.

References SN_env::bra, SN_env::c, eq_s_b(), find_among_b(), SN_env::I, SN_env::ket, SN_env::l, SN_env::lb, SN_env::p, s_0, s_1, s_2, slice_del(), and slice_from_s().

Referenced by finnish_UTF_8_stem().

348  {
349  int among_var;
350  { int mlimit; /* setlimit, line 69 */
351  int m1 = z->l - z->c; (void)m1;
352  if (z->c < z->I[0]) return 0;
353  z->c = z->I[0]; /* tomark, line 69 */
354  mlimit = z->lb; z->lb = z->c;
355  z->c = z->l - m1;
356  z->ket = z->c; /* [, line 69 */
357  among_var = find_among_b(z, a_4, 9); /* substring, line 69 */
358  if (!(among_var)) { z->lb = mlimit; return 0; }
359  z->bra = z->c; /* ], line 69 */
360  z->lb = mlimit;
361  }
362  switch(among_var) {
363  case 0: return 0;
364  case 1:
365  { int m2 = z->l - z->c; (void)m2; /* not, line 72 */
366  if (!(eq_s_b(z, 1, s_0))) goto lab0;
367  return 0;
368  lab0:
369  z->c = z->l - m2;
370  }
371  { int ret = slice_del(z); /* delete, line 72 */
372  if (ret < 0) return ret;
373  }
374  break;
375  case 2:
376  { int ret = slice_del(z); /* delete, line 74 */
377  if (ret < 0) return ret;
378  }
379  z->ket = z->c; /* [, line 74 */
380  if (!(eq_s_b(z, 3, s_1))) return 0;
381  z->bra = z->c; /* ], line 74 */
382  { int ret = slice_from_s(z, 3, s_2); /* <-, line 74 */
383  if (ret < 0) return ret;
384  }
385  break;
386  case 3:
387  { int ret = slice_del(z); /* delete, line 78 */
388  if (ret < 0) return ret;
389  }
390  break;
391  case 4:
392  if (z->c - 1 <= z->lb || z->p[z->c - 1] != 97) return 0;
393  if (!(find_among_b(z, a_1, 6))) return 0; /* among, line 81 */
394  { int ret = slice_del(z); /* delete, line 81 */
395  if (ret < 0) return ret;
396  }
397  break;
398  case 5:
399  if (z->c - 2 <= z->lb || z->p[z->c - 1] != 164) return 0;
400  if (!(find_among_b(z, a_2, 6))) return 0; /* among, line 83 */
401  { int ret = slice_del(z); /* delete, line 84 */
402  if (ret < 0) return ret;
403  }
404  break;
405  case 6:
406  if (z->c - 2 <= z->lb || z->p[z->c - 1] != 101) return 0;
407  if (!(find_among_b(z, a_3, 2))) return 0; /* among, line 86 */
408  { int ret = slice_del(z); /* delete, line 86 */
409  if (ret < 0) return ret;
410  }
411  break;
412  }
413  return 1;
414 }
symbol * p
Definition: api.h:15
static const symbol s_1[]
static const struct among a_3[2]
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:194
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
int c
Definition: api.h:16
int slice_from_s(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:392
static const symbol s_0[]
int lb
Definition: api.h:16
static const struct among a_1[6]
static const struct among a_4[9]
static const symbol s_2[]
int l
Definition: api.h:16
static const struct among a_2[6]

◆ r_R2()

static int r_R2 ( struct SN_env z)
static

Definition at line 311 of file stem_UTF_8_finnish.c.

References SN_env::c, and SN_env::I.

Referenced by r_particle_etc().

311  {
312  if (!(z->I[1] <= z->c)) return 0;
313  return 1;
314 }
int * I
Definition: api.h:18
int c
Definition: api.h:16

◆ r_t_plural()

static int r_t_plural ( struct SN_env z)
static

Definition at line 551 of file stem_UTF_8_finnish.c.

References SN_env::bra, SN_env::c, eq_s_b(), find_among_b(), g_V1, SN_env::I, in_grouping_b_U(), SN_env::ket, SN_env::l, SN_env::lb, SN_env::p, s_13, s_14, and slice_del().

Referenced by finnish_UTF_8_stem().

551  {
552  int among_var;
553  { int mlimit; /* setlimit, line 161 */
554  int m1 = z->l - z->c; (void)m1;
555  if (z->c < z->I[0]) return 0;
556  z->c = z->I[0]; /* tomark, line 161 */
557  mlimit = z->lb; z->lb = z->c;
558  z->c = z->l - m1;
559  z->ket = z->c; /* [, line 162 */
560  if (!(eq_s_b(z, 1, s_13))) { z->lb = mlimit; return 0; }
561  z->bra = z->c; /* ], line 162 */
562  { int m_test = z->l - z->c; /* test, line 162 */
563  if (in_grouping_b_U(z, g_V1, 97, 246, 0)) { z->lb = mlimit; return 0; }
564  z->c = z->l - m_test;
565  }
566  { int ret = slice_del(z); /* delete, line 163 */
567  if (ret < 0) return ret;
568  }
569  z->lb = mlimit;
570  }
571  { int mlimit; /* setlimit, line 165 */
572  int m2 = z->l - z->c; (void)m2;
573  if (z->c < z->I[1]) return 0;
574  z->c = z->I[1]; /* tomark, line 165 */
575  mlimit = z->lb; z->lb = z->c;
576  z->c = z->l - m2;
577  z->ket = z->c; /* [, line 165 */
578  if (z->c - 2 <= z->lb || z->p[z->c - 1] != 97) { z->lb = mlimit; return 0; }
579  among_var = find_among_b(z, a_9, 2); /* substring, line 165 */
580  if (!(among_var)) { z->lb = mlimit; return 0; }
581  z->bra = z->c; /* ], line 165 */
582  z->lb = mlimit;
583  }
584  switch(among_var) {
585  case 0: return 0;
586  case 1:
587  { int m3 = z->l - z->c; (void)m3; /* not, line 167 */
588  if (!(eq_s_b(z, 2, s_14))) goto lab0;
589  return 0;
590  lab0:
591  z->c = z->l - m3;
592  }
593  break;
594  }
595  { int ret = slice_del(z); /* delete, line 170 */
596  if (ret < 0) return ret;
597  }
598  return 1;
599 }
static const unsigned char g_V1[]
symbol * p
Definition: api.h:15
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:194
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition: utilities.c:267
int c
Definition: api.h:16
int lb
Definition: api.h:16
static const symbol s_13[]
int in_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:103
static const struct among a_9[2]
static const symbol s_14[]
int l
Definition: api.h:16

◆ r_tidy()

static int r_tidy ( struct SN_env z)
static

Definition at line 601 of file stem_UTF_8_finnish.c.

References SN_env::bra, SN_env::c, eq_s_b(), eq_v_b(), g_AEI, g_V1, SN_env::I, in_grouping_b_U(), SN_env::ket, SN_env::l, SN_env::lb, out_grouping_b_U(), SN_env::p, r_LONG(), SN_env::S, s_15, s_16, s_17, s_18, s_19, skip_utf8(), slice_del(), and slice_to().

Referenced by finnish_UTF_8_stem().

601  {
602  { int mlimit; /* setlimit, line 173 */
603  int m1 = z->l - z->c; (void)m1;
604  if (z->c < z->I[0]) return 0;
605  z->c = z->I[0]; /* tomark, line 173 */
606  mlimit = z->lb; z->lb = z->c;
607  z->c = z->l - m1;
608  { int m2 = z->l - z->c; (void)m2; /* do, line 174 */
609  { int m3 = z->l - z->c; (void)m3; /* and, line 174 */
610  { int ret = r_LONG(z);
611  if (ret == 0) goto lab0; /* call LONG, line 174 */
612  if (ret < 0) return ret;
613  }
614  z->c = z->l - m3;
615  z->ket = z->c; /* [, line 174 */
616  { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
617  if (ret < 0) goto lab0;
618  z->c = ret; /* next, line 174 */
619  }
620  z->bra = z->c; /* ], line 174 */
621  { int ret = slice_del(z); /* delete, line 174 */
622  if (ret < 0) return ret;
623  }
624  }
625  lab0:
626  z->c = z->l - m2;
627  }
628  { int m4 = z->l - z->c; (void)m4; /* do, line 175 */
629  z->ket = z->c; /* [, line 175 */
630  if (in_grouping_b_U(z, g_AEI, 97, 228, 0)) goto lab1;
631  z->bra = z->c; /* ], line 175 */
632  if (out_grouping_b_U(z, g_V1, 97, 246, 0)) goto lab1;
633  { int ret = slice_del(z); /* delete, line 175 */
634  if (ret < 0) return ret;
635  }
636  lab1:
637  z->c = z->l - m4;
638  }
639  { int m5 = z->l - z->c; (void)m5; /* do, line 176 */
640  z->ket = z->c; /* [, line 176 */
641  if (!(eq_s_b(z, 1, s_15))) goto lab2;
642  z->bra = z->c; /* ], line 176 */
643  { int m6 = z->l - z->c; (void)m6; /* or, line 176 */
644  if (!(eq_s_b(z, 1, s_16))) goto lab4;
645  goto lab3;
646  lab4:
647  z->c = z->l - m6;
648  if (!(eq_s_b(z, 1, s_17))) goto lab2;
649  }
650  lab3:
651  { int ret = slice_del(z); /* delete, line 176 */
652  if (ret < 0) return ret;
653  }
654  lab2:
655  z->c = z->l - m5;
656  }
657  { int m7 = z->l - z->c; (void)m7; /* do, line 177 */
658  z->ket = z->c; /* [, line 177 */
659  if (!(eq_s_b(z, 1, s_18))) goto lab5;
660  z->bra = z->c; /* ], line 177 */
661  if (!(eq_s_b(z, 1, s_19))) goto lab5;
662  { int ret = slice_del(z); /* delete, line 177 */
663  if (ret < 0) return ret;
664  }
665  lab5:
666  z->c = z->l - m7;
667  }
668  z->lb = mlimit;
669  }
670  if (in_grouping_b_U(z, g_V1, 97, 246, 1) < 0) return 0; /* goto */ /* non V1, line 179 */
671  z->ket = z->c; /* [, line 179 */
672  { int ret = skip_utf8(z->p, z->c, z->lb, 0, -1);
673  if (ret < 0) return 0;
674  z->c = ret; /* next, line 179 */
675  }
676  z->bra = z->c; /* ], line 179 */
677  z->S[0] = slice_to(z, z->S[0]); /* -> x, line 179 */
678  if (z->S[0] == 0) return -1; /* -> x, line 179 */
679  if (!(eq_v_b(z, z->S[0]))) return 0; /* name x, line 179 */
680  { int ret = slice_del(z); /* delete, line 179 */
681  if (ret < 0) return ret;
682  }
683  return 1;
684 }
int eq_v_b(struct SN_env *z, const symbol *p)
Definition: utilities.c:203
static const symbol s_15[]
static const unsigned char g_V1[]
symbol * p
Definition: api.h:15
int skip_utf8(const symbol *p, int c, int lb, int l, int n)
Definition: utilities.c:30
static int r_LONG(struct SN_env *z)
static const symbol s_17[]
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:194
int * I
Definition: api.h:18
int ket
Definition: api.h:16
int slice_del(struct SN_env *z)
Definition: utilities.c:401
int bra
Definition: api.h:16
int c
Definition: api.h:16
symbol * slice_to(struct SN_env *z, symbol *p)
Definition: utilities.c:423
symbol ** S
Definition: api.h:17
int lb
Definition: api.h:16
static const symbol s_19[]
int in_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:103
int out_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:127
static const unsigned char g_AEI[]
static const symbol s_16[]
int l
Definition: api.h:16
static const symbol s_18[]

◆ r_VI()

static int r_VI ( struct SN_env z)
static

Definition at line 421 of file stem_UTF_8_finnish.c.

References eq_s_b(), g_V2, in_grouping_b_U(), and s_3.

421  {
422  if (!(eq_s_b(z, 1, s_3))) return 0;
423  if (in_grouping_b_U(z, g_V2, 97, 246, 0)) return 0;
424  return 1;
425 }
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:194
static const unsigned char g_V2[]
int in_grouping_b_U(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:103
static const symbol s_3[]

Variable Documentation

◆ a_0

const struct among a_0[10]
static
Initial value:
=
{
{ 2, s_0_0, -1, 1, 0},
{ 3, s_0_1, -1, 2, 0},
{ 4, s_0_2, -1, 1, 0},
{ 3, s_0_3, -1, 1, 0},
{ 3, s_0_4, -1, 1, 0},
{ 4, s_0_5, -1, 1, 0},
{ 6, s_0_6, -1, 1, 0},
{ 2, s_0_7, -1, 1, 0},
{ 3, s_0_8, -1, 1, 0},
{ 3, s_0_9, -1, 1, 0}
}
static const symbol s_0_0[2]
static const symbol s_0_9[3]
static const symbol s_0_7[2]
static const symbol s_0_6[6]
static const symbol s_0_3[3]
static const symbol s_0_2[4]
static const symbol s_0_8[3]
static const symbol s_0_1[3]
static const symbol s_0_4[3]
static const symbol s_0_5[4]

Definition at line 47 of file stem_UTF_8_finnish.c.

◆ a_1

const struct among a_1[6]
static
Initial value:
=
{
{ 3, s_1_0, -1, -1, 0},
{ 2, s_1_1, -1, -1, 0},
{ 3, s_1_2, -1, -1, 0},
{ 2, s_1_3, -1, -1, 0},
{ 3, s_1_4, 3, -1, 0},
{ 3, s_1_5, 3, -1, 0}
}
static const symbol s_1_5[3]
static const symbol s_1_3[2]
static const symbol s_1_4[3]
static const symbol s_1_2[3]
static const symbol s_1_1[2]
static const symbol s_1_0[3]

Definition at line 68 of file stem_UTF_8_finnish.c.

◆ a_2

const struct among a_2[6]
static
Initial value:
=
{
{ 4, s_2_0, -1, -1, 0},
{ 3, s_2_1, -1, -1, 0},
{ 4, s_2_2, -1, -1, 0},
{ 3, s_2_3, -1, -1, 0},
{ 4, s_2_4, 3, -1, 0},
{ 4, s_2_5, 3, -1, 0}
}
static const symbol s_2_3[3]
static const symbol s_2_0[4]
static const symbol s_2_2[4]
static const symbol s_2_5[4]
static const symbol s_2_4[4]
static const symbol s_2_1[3]

Definition at line 85 of file stem_UTF_8_finnish.c.

◆ a_3

const struct among a_3[2]
static
Initial value:
=
{
{ 3, s_3_0, -1, -1, 0},
{ 3, s_3_1, -1, -1, 0}
}
static const symbol s_3_1[3]
static const symbol s_3_0[3]

Definition at line 98 of file stem_UTF_8_finnish.c.

◆ a_4

const struct among a_4[9]
static
Initial value:
=
{
{ 3, s_4_0, -1, 3, 0},
{ 3, s_4_1, -1, 3, 0},
{ 3, s_4_2, -1, 3, 0},
{ 2, s_4_3, -1, 2, 0},
{ 2, s_4_4, -1, 1, 0},
{ 2, s_4_5, -1, 4, 0},
{ 2, s_4_6, -1, 6, 0},
{ 3, s_4_7, -1, 5, 0},
{ 4, s_4_8, -1, 3, 0}
}
static const symbol s_4_5[2]
static const symbol s_4_2[3]
static const symbol s_4_1[3]
static const symbol s_4_3[2]
static const symbol s_4_7[3]
static const symbol s_4_8[4]
static const symbol s_4_4[2]
static const symbol s_4_6[2]
static const symbol s_4_0[3]

Definition at line 114 of file stem_UTF_8_finnish.c.

◆ a_5

const struct among a_5[7]
static
Initial value:
=
{
{ 2, s_5_0, -1, -1, 0},
{ 2, s_5_1, -1, -1, 0},
{ 2, s_5_2, -1, -1, 0},
{ 2, s_5_3, -1, -1, 0},
{ 2, s_5_4, -1, -1, 0},
{ 4, s_5_5, -1, -1, 0},
{ 4, s_5_6, -1, -1, 0}
}
static const symbol s_5_5[4]
static const symbol s_5_3[2]
static const symbol s_5_6[4]
static const symbol s_5_1[2]
static const symbol s_5_4[2]
static const symbol s_5_0[2]
static const symbol s_5_2[2]

Definition at line 135 of file stem_UTF_8_finnish.c.

◆ a_6

const struct among a_6[30]
static

Definition at line 177 of file stem_UTF_8_finnish.c.

◆ a_7

const struct among a_7[14]
static
Initial value:
=
{
{ 3, s_7_0, -1, -1, 0},
{ 3, s_7_1, -1, 1, 0},
{ 4, s_7_2, 1, -1, 0},
{ 3, s_7_3, -1, 1, 0},
{ 4, s_7_4, 3, -1, 0},
{ 3, s_7_5, -1, 1, 0},
{ 4, s_7_6, 5, -1, 0},
{ 3, s_7_7, -1, 1, 0},
{ 4, s_7_8, 7, -1, 0},
{ 4, s_7_9, -1, -1, 0},
{ 4, s_7_10, -1, 1, 0},
{ 5, s_7_11, 10, -1, 0},
{ 4, s_7_12, -1, 1, 0},
{ 5, s_7_13, 12, -1, 0}
}
static const symbol s_7_5[3]
static const symbol s_7_12[4]
static const symbol s_7_8[4]
static const symbol s_7_3[3]
static const symbol s_7_13[5]
static const symbol s_7_10[4]
static const symbol s_7_11[5]
static const symbol s_7_6[4]
static const symbol s_7_0[3]
static const symbol s_7_7[3]
static const symbol s_7_9[4]
static const symbol s_7_1[3]
static const symbol s_7_2[4]
static const symbol s_7_4[4]

Definition at line 226 of file stem_UTF_8_finnish.c.

◆ a_8

const struct among a_8[2]
static
Initial value:
=
{
{ 1, s_8_0, -1, -1, 0},
{ 1, s_8_1, -1, -1, 0}
}
static const symbol s_8_1[1]
static const symbol s_8_0[1]

Definition at line 247 of file stem_UTF_8_finnish.c.

◆ a_9

const struct among a_9[2]
static
Initial value:
=
{
{ 3, s_9_0, -1, 1, 0},
{ 4, s_9_1, 0, -1, 0}
}
static const symbol s_9_0[3]
static const symbol s_9_1[4]

Definition at line 256 of file stem_UTF_8_finnish.c.

◆ g_AEI

const unsigned char g_AEI[] = { 17, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8 }
static

Definition at line 262 of file stem_UTF_8_finnish.c.

Referenced by r_tidy().

◆ g_particle_end

const unsigned char g_particle_end[] = { 17, 97, 24, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 }
static

Definition at line 268 of file stem_UTF_8_finnish.c.

Referenced by r_particle_etc().

◆ g_V1

const unsigned char g_V1[] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 }
static

Definition at line 264 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending(), r_mark_regions(), r_t_plural(), and r_tidy().

◆ g_V2

const unsigned char g_V2[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 }
static

Definition at line 266 of file stem_UTF_8_finnish.c.

Referenced by r_VI().

◆ s_0

const symbol s_0[] = { 'k' }
static

Definition at line 270 of file stem_UTF_8_finnish.c.

Referenced by r_possessive().

◆ s_0_0

const symbol s_0_0[2] = { 'p', 'a' }
static

Definition at line 36 of file stem_UTF_8_finnish.c.

◆ s_0_1

const symbol s_0_1[3] = { 's', 't', 'i' }
static

Definition at line 37 of file stem_UTF_8_finnish.c.

◆ s_0_2

const symbol s_0_2[4] = { 'k', 'a', 'a', 'n' }
static

Definition at line 38 of file stem_UTF_8_finnish.c.

◆ s_0_3

const symbol s_0_3[3] = { 'h', 'a', 'n' }
static

Definition at line 39 of file stem_UTF_8_finnish.c.

◆ s_0_4

const symbol s_0_4[3] = { 'k', 'i', 'n' }
static

Definition at line 40 of file stem_UTF_8_finnish.c.

◆ s_0_5

const symbol s_0_5[4] = { 'h', 0xC3, 0xA4, 'n' }
static

Definition at line 41 of file stem_UTF_8_finnish.c.

◆ s_0_6

const symbol s_0_6[6] = { 'k', 0xC3, 0xA4, 0xC3, 0xA4, 'n' }
static

Definition at line 42 of file stem_UTF_8_finnish.c.

◆ s_0_7

const symbol s_0_7[2] = { 'k', 'o' }
static

Definition at line 43 of file stem_UTF_8_finnish.c.

◆ s_0_8

const symbol s_0_8[3] = { 'p', 0xC3, 0xA4 }
static

Definition at line 44 of file stem_UTF_8_finnish.c.

◆ s_0_9

const symbol s_0_9[3] = { 'k', 0xC3, 0xB6 }
static

Definition at line 45 of file stem_UTF_8_finnish.c.

◆ s_1

const symbol s_1[] = { 'k', 's', 'e' }
static

Definition at line 271 of file stem_UTF_8_finnish.c.

Referenced by r_possessive().

◆ s_10

const symbol s_10[] = { 'i', 'e' }
static

Definition at line 280 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_11

const symbol s_11[] = { 'e' }
static

Definition at line 281 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_12

const symbol s_12[] = { 'p', 'o' }
static

Definition at line 282 of file stem_UTF_8_finnish.c.

Referenced by r_other_endings().

◆ s_13

const symbol s_13[] = { 't' }
static

Definition at line 283 of file stem_UTF_8_finnish.c.

Referenced by r_t_plural().

◆ s_14

const symbol s_14[] = { 'p', 'o' }
static

Definition at line 284 of file stem_UTF_8_finnish.c.

Referenced by r_t_plural().

◆ s_15

const symbol s_15[] = { 'j' }
static

Definition at line 285 of file stem_UTF_8_finnish.c.

Referenced by r_tidy().

◆ s_16

const symbol s_16[] = { 'o' }
static

Definition at line 286 of file stem_UTF_8_finnish.c.

Referenced by r_tidy().

◆ s_17

const symbol s_17[] = { 'u' }
static

Definition at line 287 of file stem_UTF_8_finnish.c.

Referenced by r_tidy().

◆ s_18

const symbol s_18[] = { 'o' }
static

Definition at line 288 of file stem_UTF_8_finnish.c.

Referenced by r_tidy().

◆ s_19

const symbol s_19[] = { 'j' }
static

Definition at line 289 of file stem_UTF_8_finnish.c.

Referenced by r_tidy().

◆ s_1_0

const symbol s_1_0[3] = { 'l', 'l', 'a' }
static

Definition at line 61 of file stem_UTF_8_finnish.c.

◆ s_1_1

const symbol s_1_1[2] = { 'n', 'a' }
static

Definition at line 62 of file stem_UTF_8_finnish.c.

◆ s_1_2

const symbol s_1_2[3] = { 's', 's', 'a' }
static

Definition at line 63 of file stem_UTF_8_finnish.c.

◆ s_1_3

const symbol s_1_3[2] = { 't', 'a' }
static

Definition at line 64 of file stem_UTF_8_finnish.c.

◆ s_1_4

const symbol s_1_4[3] = { 'l', 't', 'a' }
static

Definition at line 65 of file stem_UTF_8_finnish.c.

◆ s_1_5

const symbol s_1_5[3] = { 's', 't', 'a' }
static

Definition at line 66 of file stem_UTF_8_finnish.c.

◆ s_2

const symbol s_2[] = { 'k', 's', 'i' }
static

Definition at line 272 of file stem_UTF_8_finnish.c.

Referenced by r_possessive().

◆ s_2_0

const symbol s_2_0[4] = { 'l', 'l', 0xC3, 0xA4 }
static

Definition at line 78 of file stem_UTF_8_finnish.c.

◆ s_2_1

const symbol s_2_1[3] = { 'n', 0xC3, 0xA4 }
static

Definition at line 79 of file stem_UTF_8_finnish.c.

◆ s_2_2

const symbol s_2_2[4] = { 's', 's', 0xC3, 0xA4 }
static

Definition at line 80 of file stem_UTF_8_finnish.c.

◆ s_2_3

const symbol s_2_3[3] = { 't', 0xC3, 0xA4 }
static

Definition at line 81 of file stem_UTF_8_finnish.c.

◆ s_2_4

const symbol s_2_4[4] = { 'l', 't', 0xC3, 0xA4 }
static

Definition at line 82 of file stem_UTF_8_finnish.c.

◆ s_2_5

const symbol s_2_5[4] = { 's', 't', 0xC3, 0xA4 }
static

Definition at line 83 of file stem_UTF_8_finnish.c.

◆ s_3

const symbol s_3[] = { 'i' }
static

Definition at line 273 of file stem_UTF_8_finnish.c.

Referenced by r_VI().

◆ s_3_0

const symbol s_3_0[3] = { 'l', 'l', 'e' }
static

Definition at line 95 of file stem_UTF_8_finnish.c.

◆ s_3_1

const symbol s_3_1[3] = { 'i', 'n', 'e' }
static

Definition at line 96 of file stem_UTF_8_finnish.c.

◆ s_4

const symbol s_4[] = { 'a' }
static

Definition at line 274 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_4_0

const symbol s_4_0[3] = { 'n', 's', 'a' }
static

Definition at line 104 of file stem_UTF_8_finnish.c.

◆ s_4_1

const symbol s_4_1[3] = { 'm', 'm', 'e' }
static

Definition at line 105 of file stem_UTF_8_finnish.c.

◆ s_4_2

const symbol s_4_2[3] = { 'n', 'n', 'e' }
static

Definition at line 106 of file stem_UTF_8_finnish.c.

◆ s_4_3

const symbol s_4_3[2] = { 'n', 'i' }
static

Definition at line 107 of file stem_UTF_8_finnish.c.

◆ s_4_4

const symbol s_4_4[2] = { 's', 'i' }
static

Definition at line 108 of file stem_UTF_8_finnish.c.

◆ s_4_5

const symbol s_4_5[2] = { 'a', 'n' }
static

Definition at line 109 of file stem_UTF_8_finnish.c.

◆ s_4_6

const symbol s_4_6[2] = { 'e', 'n' }
static

Definition at line 110 of file stem_UTF_8_finnish.c.

◆ s_4_7

const symbol s_4_7[3] = { 0xC3, 0xA4, 'n' }
static

Definition at line 111 of file stem_UTF_8_finnish.c.

◆ s_4_8

const symbol s_4_8[4] = { 'n', 's', 0xC3, 0xA4 }
static

Definition at line 112 of file stem_UTF_8_finnish.c.

◆ s_5

const symbol s_5[] = { 'e' }
static

Definition at line 275 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_5_0

const symbol s_5_0[2] = { 'a', 'a' }
static

Definition at line 127 of file stem_UTF_8_finnish.c.

◆ s_5_1

const symbol s_5_1[2] = { 'e', 'e' }
static

Definition at line 128 of file stem_UTF_8_finnish.c.

◆ s_5_2

const symbol s_5_2[2] = { 'i', 'i' }
static

Definition at line 129 of file stem_UTF_8_finnish.c.

◆ s_5_3

const symbol s_5_3[2] = { 'o', 'o' }
static

Definition at line 130 of file stem_UTF_8_finnish.c.

◆ s_5_4

const symbol s_5_4[2] = { 'u', 'u' }
static

Definition at line 131 of file stem_UTF_8_finnish.c.

◆ s_5_5

const symbol s_5_5[4] = { 0xC3, 0xA4, 0xC3, 0xA4 }
static

Definition at line 132 of file stem_UTF_8_finnish.c.

◆ s_5_6

const symbol s_5_6[4] = { 0xC3, 0xB6, 0xC3, 0xB6 }
static

Definition at line 133 of file stem_UTF_8_finnish.c.

◆ s_6

const symbol s_6[] = { 'i' }
static

Definition at line 276 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_6_0

const symbol s_6_0[1] = { 'a' }
static

Definition at line 146 of file stem_UTF_8_finnish.c.

◆ s_6_1

const symbol s_6_1[3] = { 'l', 'l', 'a' }
static

Definition at line 147 of file stem_UTF_8_finnish.c.

◆ s_6_10

const symbol s_6_10[3] = { 'k', 's', 'i' }
static

Definition at line 156 of file stem_UTF_8_finnish.c.

◆ s_6_11

const symbol s_6_11[1] = { 'n' }
static

Definition at line 157 of file stem_UTF_8_finnish.c.

◆ s_6_12

const symbol s_6_12[3] = { 'h', 'a', 'n' }
static

Definition at line 158 of file stem_UTF_8_finnish.c.

◆ s_6_13

const symbol s_6_13[3] = { 'd', 'e', 'n' }
static

Definition at line 159 of file stem_UTF_8_finnish.c.

◆ s_6_14

const symbol s_6_14[4] = { 's', 'e', 'e', 'n' }
static

Definition at line 160 of file stem_UTF_8_finnish.c.

◆ s_6_15

const symbol s_6_15[3] = { 'h', 'e', 'n' }
static

Definition at line 161 of file stem_UTF_8_finnish.c.

◆ s_6_16

const symbol s_6_16[4] = { 't', 't', 'e', 'n' }
static

Definition at line 162 of file stem_UTF_8_finnish.c.

◆ s_6_17

const symbol s_6_17[3] = { 'h', 'i', 'n' }
static

Definition at line 163 of file stem_UTF_8_finnish.c.

◆ s_6_18

const symbol s_6_18[4] = { 's', 'i', 'i', 'n' }
static

Definition at line 164 of file stem_UTF_8_finnish.c.

◆ s_6_19

const symbol s_6_19[3] = { 'h', 'o', 'n' }
static

Definition at line 165 of file stem_UTF_8_finnish.c.

◆ s_6_2

const symbol s_6_2[2] = { 'n', 'a' }
static

Definition at line 148 of file stem_UTF_8_finnish.c.

◆ s_6_20

const symbol s_6_20[4] = { 'h', 0xC3, 0xA4, 'n' }
static

Definition at line 166 of file stem_UTF_8_finnish.c.

◆ s_6_21

const symbol s_6_21[4] = { 'h', 0xC3, 0xB6, 'n' }
static

Definition at line 167 of file stem_UTF_8_finnish.c.

◆ s_6_22

const symbol s_6_22[2] = { 0xC3, 0xA4 }
static

Definition at line 168 of file stem_UTF_8_finnish.c.

◆ s_6_23

const symbol s_6_23[4] = { 'l', 'l', 0xC3, 0xA4 }
static

Definition at line 169 of file stem_UTF_8_finnish.c.

◆ s_6_24

const symbol s_6_24[3] = { 'n', 0xC3, 0xA4 }
static

Definition at line 170 of file stem_UTF_8_finnish.c.

◆ s_6_25

const symbol s_6_25[4] = { 's', 's', 0xC3, 0xA4 }
static

Definition at line 171 of file stem_UTF_8_finnish.c.

◆ s_6_26

const symbol s_6_26[3] = { 't', 0xC3, 0xA4 }
static

Definition at line 172 of file stem_UTF_8_finnish.c.

◆ s_6_27

const symbol s_6_27[4] = { 'l', 't', 0xC3, 0xA4 }
static

Definition at line 173 of file stem_UTF_8_finnish.c.

◆ s_6_28

const symbol s_6_28[4] = { 's', 't', 0xC3, 0xA4 }
static

Definition at line 174 of file stem_UTF_8_finnish.c.

◆ s_6_29

const symbol s_6_29[4] = { 't', 't', 0xC3, 0xA4 }
static

Definition at line 175 of file stem_UTF_8_finnish.c.

◆ s_6_3

const symbol s_6_3[3] = { 's', 's', 'a' }
static

Definition at line 149 of file stem_UTF_8_finnish.c.

◆ s_6_4

const symbol s_6_4[2] = { 't', 'a' }
static

Definition at line 150 of file stem_UTF_8_finnish.c.

◆ s_6_5

const symbol s_6_5[3] = { 'l', 't', 'a' }
static

Definition at line 151 of file stem_UTF_8_finnish.c.

◆ s_6_6

const symbol s_6_6[3] = { 's', 't', 'a' }
static

Definition at line 152 of file stem_UTF_8_finnish.c.

◆ s_6_7

const symbol s_6_7[3] = { 't', 't', 'a' }
static

Definition at line 153 of file stem_UTF_8_finnish.c.

◆ s_6_8

const symbol s_6_8[3] = { 'l', 'l', 'e' }
static

Definition at line 154 of file stem_UTF_8_finnish.c.

◆ s_6_9

const symbol s_6_9[3] = { 'i', 'n', 'e' }
static

Definition at line 155 of file stem_UTF_8_finnish.c.

◆ s_7

const symbol s_7[] = { 'o' }
static

Definition at line 277 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_7_0

const symbol s_7_0[3] = { 'e', 'j', 'a' }
static

Definition at line 211 of file stem_UTF_8_finnish.c.

◆ s_7_1

const symbol s_7_1[3] = { 'm', 'm', 'a' }
static

Definition at line 212 of file stem_UTF_8_finnish.c.

◆ s_7_10

const symbol s_7_10[4] = { 'm', 'm', 0xC3, 0xA4 }
static

Definition at line 221 of file stem_UTF_8_finnish.c.

◆ s_7_11

const symbol s_7_11[5] = { 'i', 'm', 'm', 0xC3, 0xA4 }
static

Definition at line 222 of file stem_UTF_8_finnish.c.

◆ s_7_12

const symbol s_7_12[4] = { 'm', 'p', 0xC3, 0xA4 }
static

Definition at line 223 of file stem_UTF_8_finnish.c.

◆ s_7_13

const symbol s_7_13[5] = { 'i', 'm', 'p', 0xC3, 0xA4 }
static

Definition at line 224 of file stem_UTF_8_finnish.c.

◆ s_7_2

const symbol s_7_2[4] = { 'i', 'm', 'm', 'a' }
static

Definition at line 213 of file stem_UTF_8_finnish.c.

◆ s_7_3

const symbol s_7_3[3] = { 'm', 'p', 'a' }
static

Definition at line 214 of file stem_UTF_8_finnish.c.

◆ s_7_4

const symbol s_7_4[4] = { 'i', 'm', 'p', 'a' }
static

Definition at line 215 of file stem_UTF_8_finnish.c.

◆ s_7_5

const symbol s_7_5[3] = { 'm', 'm', 'i' }
static

Definition at line 216 of file stem_UTF_8_finnish.c.

◆ s_7_6

const symbol s_7_6[4] = { 'i', 'm', 'm', 'i' }
static

Definition at line 217 of file stem_UTF_8_finnish.c.

◆ s_7_7

const symbol s_7_7[3] = { 'm', 'p', 'i' }
static

Definition at line 218 of file stem_UTF_8_finnish.c.

◆ s_7_8

const symbol s_7_8[4] = { 'i', 'm', 'p', 'i' }
static

Definition at line 219 of file stem_UTF_8_finnish.c.

◆ s_7_9

const symbol s_7_9[4] = { 'e', 'j', 0xC3, 0xA4 }
static

Definition at line 220 of file stem_UTF_8_finnish.c.

◆ s_8

const symbol s_8[] = { 0xC3, 0xA4 }
static

Definition at line 278 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_8_0

const symbol s_8_0[1] = { 'i' }
static

Definition at line 244 of file stem_UTF_8_finnish.c.

◆ s_8_1

const symbol s_8_1[1] = { 'j' }
static

Definition at line 245 of file stem_UTF_8_finnish.c.

◆ s_9

const symbol s_9[] = { 0xC3, 0xB6 }
static

Definition at line 279 of file stem_UTF_8_finnish.c.

Referenced by r_case_ending().

◆ s_9_0

const symbol s_9_0[3] = { 'm', 'm', 'a' }
static

Definition at line 253 of file stem_UTF_8_finnish.c.

◆ s_9_1

const symbol s_9_1[4] = { 'i', 'm', 'm', 'a' }
static

Definition at line 254 of file stem_UTF_8_finnish.c.