Eine aufbereitete Darstellung der Quelle

 
     
 
 
Anforderungen  |   Konzepte  |   Entwurf  |   Entwicklung  |   Qualitätssicherung  |   Lebenszyklus  |   Steuerung
 
 
 
 

Benutzer

Quelle  stem_UTF_8_hungarian.c   Sprache: unbekannt

 
/* Generated by Snowball 2.2.0 - https://snowballstem.org/ */

#include "header.h"

#ifdef __cplusplus
extern "C" {
#endif
extern int hungarian_UTF_8_stem(struct SN_env * z);
#ifdef __cplusplus
}
#endif
static int r_double(struct SN_env * z);
static int r_undouble(struct SN_env * z);
static int r_factive(struct SN_env * z);
static int r_instrum(struct SN_env * z);
static int r_plur_owner(struct SN_env * z);
static int r_sing_owner(struct SN_env * z);
static int r_owned(struct SN_env * z);
static int r_plural(struct SN_env * z);
static int r_case_other(struct SN_env * z);
static int r_case_special(struct SN_env * z);
static int r_case(struct SN_env * z);
static int r_v_ending(struct SN_env * z);
static int r_R1(struct SN_env * z);
static int r_mark_regions(struct SN_env * z);
#ifdef __cplusplus
extern "C" {
#endif


extern struct SN_env * hungarian_UTF_8_create_env(void);
extern void hungarian_UTF_8_close_env(struct SN_env * z);


#ifdef __cplusplus
}
#endif
static const symbol s_0_0[2] = { 'c''s' };
static const symbol s_0_1[3] = { 'd''z''s' };
static const symbol s_0_2[2] = { 'g''y' };
static const symbol s_0_3[2] = { 'l''y' };
static const symbol s_0_4[2] = { 'n''y' };
static const symbol s_0_5[2] = { 's''z' };
static const symbol s_0_6[2] = { 't''y' };
static const symbol s_0_7[2] = { 'z''s' };

static const struct among a_0[8] =
{
2, s_0_0, -1, -10},
3, s_0_1, -1, -10},
2, s_0_2, -1, -10},
2, s_0_3, -1, -10},
2, s_0_4, -1, -10},
2, s_0_5, -1, -10},
2, s_0_6, -1, -10},
2, s_0_7, -1, -10}
};

static const symbol s_1_0[2] = { 0xC3, 0xA1 };
static const symbol s_1_1[2] = { 0xC3, 0xA9 };

static const struct among a_1[2] =
{
2, s_1_0, -110},
2, s_1_1, -120}
};

static const symbol s_2_0[2] = { 'b''b' };
static const symbol s_2_1[2] = { 'c''c' };
static const symbol s_2_2[2] = { 'd''d' };
static const symbol s_2_3[2] = { 'f''f' };
static const symbol s_2_4[2] = { 'g''g' };
static const symbol s_2_5[2] = { 'j''j' };
static const symbol s_2_6[2] = { 'k''k' };
static const symbol s_2_7[2] = { 'l''l' };
static const symbol s_2_8[2] = { 'm''m' };
static const symbol s_2_9[2] = { 'n''n' };
static const symbol s_2_10[2] = { 'p''p' };
static const symbol s_2_11[2] = { 'r''r' };
static const symbol s_2_12[3] = { 'c''c''s' };
static const symbol s_2_13[2] = { 's''s' };
static const symbol s_2_14[3] = { 'z''z''s' };
static const symbol s_2_15[2] = { 't''t' };
static const symbol s_2_16[2] = { 'v''v' };
static const symbol s_2_17[3] = { 'g''g''y' };
static const symbol s_2_18[3] = { 'l''l''y' };
static const symbol s_2_19[3] = { 'n''n''y' };
static const symbol s_2_20[3] = { 't''t''y' };
static const symbol s_2_21[3] = { 's''s''z' };
static const symbol s_2_22[2] = { 'z''z' };

static const struct among a_2[23] =
{
2, s_2_0, -1, -10},
2, s_2_1, -1, -10},
2, s_2_2, -1, -10},
2, s_2_3, -1, -10},
2, s_2_4, -1, -10},
2, s_2_5, -1, -10},
2, s_2_6, -1, -10},
2, s_2_7, -1, -10},
2, s_2_8, -1, -10},
2, s_2_9, -1, -10},
2, s_2_10, -1, -10},
2, s_2_11, -1, -10},
3, s_2_12, -1, -10},
2, s_2_13, -1, -10},
3, s_2_14, -1, -10},
2, s_2_15, -1, -10},
2, s_2_16, -1, -10},
3, s_2_17, -1, -10},
3, s_2_18, -1, -10},
3, s_2_19, -1, -10},
3, s_2_20, -1, -10},
3, s_2_21, -1, -10},
2, s_2_22, -1, -10}
};

static const symbol s_3_0[2] = { 'a''l' };
static const symbol s_3_1[2] = { 'e''l' };

static const struct among a_3[2] =
{
2, s_3_0, -110},
2, s_3_1, -110}
};

static const symbol s_4_0[2] = { 'b''a' };
static const symbol s_4_1[2] = { 'r''a' };
static const symbol s_4_2[2] = { 'b''e' };
static const symbol s_4_3[2] = { 'r''e' };
static const symbol s_4_4[2] = { 'i''g' };
static const symbol s_4_5[3] = { 'n''a''k' };
static const symbol s_4_6[3] = { 'n''e''k' };
static const symbol s_4_7[3] = { 'v''a''l' };
static const symbol s_4_8[3] = { 'v''e''l' };
static const symbol s_4_9[2] = { 'u''l' };
static const symbol s_4_10[4] = { 'b'0xC5, 0x91, 'l' };
static const symbol s_4_11[4] = { 'r'0xC5, 0x91, 'l' };
static const symbol s_4_12[4] = { 't'0xC5, 0x91, 'l' };
static const symbol s_4_13[4] = { 'n'0xC3, 0xA1, 'l' };
static const symbol s_4_14[4] = { 'n'0xC3, 0xA9, 'l' };
static const symbol s_4_15[4] = { 'b'0xC3, 0xB3, 'l' };
static const symbol s_4_16[4] = { 'r'0xC3, 0xB3, 'l' };
static const symbol s_4_17[4] = { 't'0xC3, 0xB3, 'l' };
static const symbol s_4_18[3] = { 0xC3, 0xBC, 'l' };
static const symbol s_4_19[1] = { 'n' };
static const symbol s_4_20[2] = { 'a''n' };
static const symbol s_4_21[3] = { 'b''a''n' };
static const symbol s_4_22[2] = { 'e''n' };
static const symbol s_4_23[3] = { 'b''e''n' };
static const symbol s_4_24[7] = { 'k'0xC3, 0xA9, 'p''p''e''n' };
static const symbol s_4_25[2] = { 'o''n' };
static const symbol s_4_26[3] = { 0xC3, 0xB6, 'n' };
static const symbol s_4_27[5] = { 'k'0xC3, 0xA9, 'p''p' };
static const symbol s_4_28[3] = { 'k''o''r' };
static const symbol s_4_29[1] = { 't' };
static const symbol s_4_30[2] = { 'a''t' };
static const symbol s_4_31[2] = { 'e''t' };
static const symbol s_4_32[5] = { 'k'0xC3, 0xA9, 'n''t' };
static const symbol s_4_33[7] = { 'a''n''k'0xC3, 0xA9, 'n''t' };
static const symbol s_4_34[7] = { 'e''n''k'0xC3, 0xA9, 'n''t' };
static const symbol s_4_35[7] = { 'o''n''k'0xC3, 0xA9, 'n''t' };
static const symbol s_4_36[2] = { 'o''t' };
static const symbol s_4_37[4] = { 0xC3, 0xA9, 'r''t' };
static const symbol s_4_38[3] = { 0xC3, 0xB6, 't' };
static const symbol s_4_39[3] = { 'h''e''z' };
static const symbol s_4_40[3] = { 'h''o''z' };
static const symbol s_4_41[4] = { 'h'0xC3, 0xB6, 'z' };
static const symbol s_4_42[3] = { 'v'0xC3, 0xA1 };
static const symbol s_4_43[3] = { 'v'0xC3, 0xA9 };

static const struct among a_4[44] =
{
2, s_4_0, -1, -10},
2, s_4_1, -1, -10},
2, s_4_2, -1, -10},
2, s_4_3, -1, -10},
2, s_4_4, -1, -10},
3, s_4_5, -1, -10},
3, s_4_6, -1, -10},
3, s_4_7, -1, -10},
3, s_4_8, -1, -10},
2, s_4_9, -1, -10},
4, s_4_10, -1, -10},
4, s_4_11, -1, -10},
4, s_4_12, -1, -10},
4, s_4_13, -1, -10},
4, s_4_14, -1, -10},
4, s_4_15, -1, -10},
4, s_4_16, -1, -10},
4, s_4_17, -1, -10},
3, s_4_18, -1, -10},
1, s_4_19, -1, -10},
2, s_4_20, 19, -10},
3, s_4_21, 20, -10},
2, s_4_22, 19, -10},
3, s_4_23, 22, -10},
7, s_4_24, 22, -10},
2, s_4_25, 19, -10},
3, s_4_26, 19, -10},
5, s_4_27, -1, -10},
3, s_4_28, -1, -10},
1, s_4_29, -1, -10},
2, s_4_30, 29, -10},
2, s_4_31, 29, -10},
5, s_4_32, 29, -10},
7, s_4_33, 32, -10},
7, s_4_34, 32, -10},
7, s_4_35, 32, -10},
2, s_4_36, 29, -10},
4, s_4_37, 29, -10},
3, s_4_38, 29, -10},
3, s_4_39, -1, -10},
3, s_4_40, -1, -10},
4, s_4_41, -1, -10},
3, s_4_42, -1, -10},
3, s_4_43, -1, -10}
};

static const symbol s_5_0[3] = { 0xC3, 0xA1, 'n' };
static const symbol s_5_1[3] = { 0xC3, 0xA9, 'n' };
static const symbol s_5_2[8] = { 0xC3, 0xA1, 'n''k'0xC3, 0xA9, 'n''t' };

static const struct among a_5[3] =
{
3, s_5_0, -120},
3, s_5_1, -110},
8, s_5_2, -120}
};

static const symbol s_6_0[4] = { 's''t''u''l' };
static const symbol s_6_1[5] = { 'a''s''t''u''l' };
static const symbol s_6_2[6] = { 0xC3, 0xA1, 's''t''u''l' };
static const symbol s_6_3[5] = { 's''t'0xC3, 0xBC, 'l' };
static const symbol s_6_4[6] = { 'e''s''t'0xC3, 0xBC, 'l' };
static const symbol s_6_5[7] = { 0xC3, 0xA9, 's''t'0xC3, 0xBC, 'l' };

static const struct among a_6[6] =
{
4, s_6_0, -110},
5, s_6_1, 010},
6, s_6_2, 020},
5, s_6_3, -110},
6, s_6_4, 310},
7, s_6_5, 330}
};

static const symbol s_7_0[2] = { 0xC3, 0xA1 };
static const symbol s_7_1[2] = { 0xC3, 0xA9 };

static const struct among a_7[2] =
{
2, s_7_0, -110},
2, s_7_1, -110}
};

static const symbol s_8_0[1] = { 'k' };
static const symbol s_8_1[2] = { 'a''k' };
static const symbol s_8_2[2] = { 'e''k' };
static const symbol s_8_3[2] = { 'o''k' };
static const symbol s_8_4[3] = { 0xC3, 0xA1, 'k' };
static const symbol s_8_5[3] = { 0xC3, 0xA9, 'k' };
static const symbol s_8_6[3] = { 0xC3, 0xB6, 'k' };

static const struct among a_8[7] =
{
1, s_8_0, -130},
2, s_8_1, 030},
2, s_8_2, 030},
2, s_8_3, 030},
3, s_8_4, 010},
3, s_8_5, 020},
3, s_8_6, 030}
};

static const symbol s_9_0[3] = { 0xC3, 0xA9, 'i' };
static const symbol s_9_1[5] = { 0xC3, 0xA1, 0xC3, 0xA9, 'i' };
static const symbol s_9_2[5] = { 0xC3, 0xA9, 0xC3, 0xA9, 'i' };
static const symbol s_9_3[2] = { 0xC3, 0xA9 };
static const symbol s_9_4[3] = { 'k'0xC3, 0xA9 };
static const symbol s_9_5[4] = { 'a''k'0xC3, 0xA9 };
static const symbol s_9_6[4] = { 'e''k'0xC3, 0xA9 };
static const symbol s_9_7[4] = { 'o''k'0xC3, 0xA9 };
static const symbol s_9_8[5] = { 0xC3, 0xA1, 'k'0xC3, 0xA9 };
static const symbol s_9_9[5] = { 0xC3, 0xA9, 'k'0xC3, 0xA9 };
static const symbol s_9_10[5] = { 0xC3, 0xB6, 'k'0xC3, 0xA9 };
static const symbol s_9_11[4] = { 0xC3, 0xA9, 0xC3, 0xA9 };

static const struct among a_9[12] =
{
3, s_9_0, -110},
5, s_9_1, 030},
5, s_9_2, 020},
2, s_9_3, -110},
3, s_9_4, 310},
4, s_9_5, 410},
4, s_9_6, 410},
4, s_9_7, 410},
5, s_9_8, 430},
5, s_9_9, 420},
5, s_9_10, 410},
4, s_9_11, 320}
};

static const symbol s_10_0[1] = { 'a' };
static const symbol s_10_1[2] = { 'j''a' };
static const symbol s_10_2[1] = { 'd' };
static const symbol s_10_3[2] = { 'a''d' };
static const symbol s_10_4[2] = { 'e''d' };
static const symbol s_10_5[2] = { 'o''d' };
static const symbol s_10_6[3] = { 0xC3, 0xA1, 'd' };
static const symbol s_10_7[3] = { 0xC3, 0xA9, 'd' };
static const symbol s_10_8[3] = { 0xC3, 0xB6, 'd' };
static const symbol s_10_9[1] = { 'e' };
static const symbol s_10_10[2] = { 'j''e' };
static const symbol s_10_11[2] = { 'n''k' };
static const symbol s_10_12[3] = { 'u''n''k' };
static const symbol s_10_13[4] = { 0xC3, 0xA1, 'n''k' };
static const symbol s_10_14[4] = { 0xC3, 0xA9, 'n''k' };
static const symbol s_10_15[4] = { 0xC3, 0xBC, 'n''k' };
static const symbol s_10_16[2] = { 'u''k' };
static const symbol s_10_17[3] = { 'j''u''k' };
static const symbol s_10_18[5] = { 0xC3, 0xA1, 'j''u''k' };
static const symbol s_10_19[3] = { 0xC3, 0xBC, 'k' };
static const symbol s_10_20[4] = { 'j'0xC3, 0xBC, 'k' };
static const symbol s_10_21[6] = { 0xC3, 0xA9, 'j'0xC3, 0xBC, 'k' };
static const symbol s_10_22[1] = { 'm' };
static const symbol s_10_23[2] = { 'a''m' };
static const symbol s_10_24[2] = { 'e''m' };
static const symbol s_10_25[2] = { 'o''m' };
static const symbol s_10_26[3] = { 0xC3, 0xA1, 'm' };
static const symbol s_10_27[3] = { 0xC3, 0xA9, 'm' };
static const symbol s_10_28[1] = { 'o' };
static const symbol s_10_29[2] = { 0xC3, 0xA1 };
static const symbol s_10_30[2] = { 0xC3, 0xA9 };

static const struct among a_10[31] =
{
1, s_10_0, -110},
2, s_10_1, 010},
1, s_10_2, -110},
2, s_10_3, 210},
2, s_10_4, 210},
2, s_10_5, 210},
3, s_10_6, 220},
3, s_10_7, 230},
3, s_10_8, 210},
1, s_10_9, -110},
2, s_10_10, 910},
2, s_10_11, -110},
3, s_10_12, 1110},
4, s_10_13, 1120},
4, s_10_14, 1130},
4, s_10_15, 1110},
2, s_10_16, -110},
3, s_10_17, 1610},
5, s_10_18, 1720},
3, s_10_19, -110},
4, s_10_20, 1910},
6, s_10_21, 2030},
1, s_10_22, -110},
2, s_10_23, 2210},
2, s_10_24, 2210},
2, s_10_25, 2210},
3, s_10_26, 2220},
3, s_10_27, 2230},
1, s_10_28, -110},
2, s_10_29, -120},
2, s_10_30, -130}
};

static const symbol s_11_0[2] = { 'i''d' };
static const symbol s_11_1[3] = { 'a''i''d' };
static const symbol s_11_2[4] = { 'j''a''i''d' };
static const symbol s_11_3[3] = { 'e''i''d' };
static const symbol s_11_4[4] = { 'j''e''i''d' };
static const symbol s_11_5[4] = { 0xC3, 0xA1, 'i''d' };
static const symbol s_11_6[4] = { 0xC3, 0xA9, 'i''d' };
static const symbol s_11_7[1] = { 'i' };
static const symbol s_11_8[2] = { 'a''i' };
static const symbol s_11_9[3] = { 'j''a''i' };
static const symbol s_11_10[2] = { 'e''i' };
static const symbol s_11_11[3] = { 'j''e''i' };
static const symbol s_11_12[3] = { 0xC3, 0xA1, 'i' };
static const symbol s_11_13[3] = { 0xC3, 0xA9, 'i' };
static const symbol s_11_14[4] = { 'i''t''e''k' };
static const symbol s_11_15[5] = { 'e''i''t''e''k' };
static const symbol s_11_16[6] = { 'j''e''i''t''e''k' };
static const symbol s_11_17[6] = { 0xC3, 0xA9, 'i''t''e''k' };
static const symbol s_11_18[2] = { 'i''k' };
static const symbol s_11_19[3] = { 'a''i''k' };
static const symbol s_11_20[4] = { 'j''a''i''k' };
static const symbol s_11_21[3] = { 'e''i''k' };
static const symbol s_11_22[4] = { 'j''e''i''k' };
static const symbol s_11_23[4] = { 0xC3, 0xA1, 'i''k' };
static const symbol s_11_24[4] = { 0xC3, 0xA9, 'i''k' };
static const symbol s_11_25[3] = { 'i''n''k' };
static const symbol s_11_26[4] = { 'a''i''n''k' };
static const symbol s_11_27[5] = { 'j''a''i''n''k' };
static const symbol s_11_28[4] = { 'e''i''n''k' };
static const symbol s_11_29[5] = { 'j''e''i''n''k' };
static const symbol s_11_30[5] = { 0xC3, 0xA1, 'i''n''k' };
static const symbol s_11_31[5] = { 0xC3, 0xA9, 'i''n''k' };
static const symbol s_11_32[5] = { 'a''i''t''o''k' };
static const symbol s_11_33[6] = { 'j''a''i''t''o''k' };
static const symbol s_11_34[6] = { 0xC3, 0xA1, 'i''t''o''k' };
static const symbol s_11_35[2] = { 'i''m' };
static const symbol s_11_36[3] = { 'a''i''m' };
static const symbol s_11_37[4] = { 'j''a''i''m' };
static const symbol s_11_38[3] = { 'e''i''m' };
static const symbol s_11_39[4] = { 'j''e''i''m' };
static const symbol s_11_40[4] = { 0xC3, 0xA1, 'i''m' };
static const symbol s_11_41[4] = { 0xC3, 0xA9, 'i''m' };

static const struct among a_11[42] =
{
2, s_11_0, -110},
3, s_11_1, 010},
4, s_11_2, 110},
3, s_11_3, 010},
4, s_11_4, 310},
4, s_11_5, 020},
4, s_11_6, 030},
1, s_11_7, -110},
2, s_11_8, 710},
3, s_11_9, 810},
2, s_11_10, 710},
3, s_11_11, 1010},
3, s_11_12, 720},
3, s_11_13, 730},
4, s_11_14, -110},
5, s_11_15, 1410},
6, s_11_16, 1510},
6, s_11_17, 1430},
2, s_11_18, -110},
3, s_11_19, 1810},
4, s_11_20, 1910},
3, s_11_21, 1810},
4, s_11_22, 2110},
4, s_11_23, 1820},
4, s_11_24, 1830},
3, s_11_25, -110},
4, s_11_26, 2510},
5, s_11_27, 2610},
4, s_11_28, 2510},
5, s_11_29, 2810},
5, s_11_30, 2520},
5, s_11_31, 2530},
5, s_11_32, -110},
6, s_11_33, 3210},
6, s_11_34, -120},
2, s_11_35, -110},
3, s_11_36, 3510},
4, s_11_37, 3610},
3, s_11_38, 3510},
4, s_11_39, 3810},
4, s_11_40, 3520},
4, s_11_41, 3530}
};

static const unsigned char g_v[] = { 17651600000000000001173610000000000010001 };

static const symbol s_0[] = { 'a' };
static const symbol s_1[] = { 'e' };
static const symbol s_2[] = { 'e' };
static const symbol s_3[] = { 'a' };
static const symbol s_4[] = { 'a' };
static const symbol s_5[] = { 'e' };
static const symbol s_6[] = { 'a' };
static const symbol s_7[] = { 'e' };
static const symbol s_8[] = { 'e' };
static const symbol s_9[] = { 'a' };
static const symbol s_10[] = { 'a' };
static const symbol s_11[] = { 'e' };
static const symbol s_12[] = { 'a' };
static const symbol s_13[] = { 'e' };

static int r_mark_regions(struct SN_env * z) {
    z->I[0] = z->l;
    {   int c1 = z->c;
        if (in_grouping_U(z, g_v, 973690)) goto lab1;

        if (in_grouping_U(z, g_v, 973691) < 0goto lab1;
        {   int c2 = z->c;
            if (z->c + 1 >= z->l || z->p[z->c + 1] >> 5 != 3 || !((101187584 >> (z->p[z->c + 1] & 0x1f)) & 1)) goto lab3;
            if (!find_among(z, a_0, 8)) goto lab3;
            goto lab2;
        lab3:
            z->c = c2;
            {   int ret = skip_utf8(z->p, z->c, z->l, 1);
                if (ret < 0goto lab1;
                z->c = ret;
            }
        }
    lab2:
        z->I[0] = z->c;
        goto lab0;
    lab1:
        z->c = c1;
        if (out_grouping_U(z, g_v, 973690)) return 0;

        {
            int ret = out_grouping_U(z, g_v, 973691);
            if (ret < 0return 0;
            z->c += ret;
        }
        z->I[0] = z->c;
    }
lab0:
    return 1;
}

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

static int r_v_ending(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 161 && z->p[z->c - 1] != 169)) return 0;
    among_var = find_among_b(z, a_1, 2);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_from_s(z, 1, s_0);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_1);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

static int r_double(struct SN_env * z) {
    {   int m_test1 = z->l - z->c;
        if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((106790108 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
        if (!find_among_b(z, a_2, 23)) return 0;
        z->c = z->l - m_test1;
    }
    return 1;
}

static int r_undouble(struct SN_env * z) {
    {   int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
        if (ret < 0return 0;
        z->c = ret;
    }
    z->ket = z->c;
    {   int ret = skip_b_utf8(z->p, z->c, z->lb, 1);
        if (ret < 0return 0;
        z->c = ret;
    }
    z->bra = z->c;
    {   int ret = slice_del(z);
        if (ret < 0return ret;
    }
    return 1;
}

static int r_instrum(struct SN_env * z) {
    z->ket = z->c;
    if (z->c - 1 <= z->lb || z->p[z->c - 1] != 108return 0;
    if (!find_among_b(z, a_3, 2)) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    {   int ret = r_double(z);
        if (ret <= 0return ret;
    }
    {   int ret = slice_del(z);
        if (ret < 0return ret;
    }
    {   int ret = r_undouble(z);
        if (ret <= 0return ret;
    }
    return 1;
}

static int r_case(struct SN_env * z) {
    z->ket = z->c;
    if (!find_among_b(z, a_4, 44)) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    {   int ret = slice_del(z);
        if (ret < 0return ret;
    }
    {   int ret = r_v_ending(z);
        if (ret <= 0return ret;
    }
    return 1;
}

static int r_case_special(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    if (z->c - 2 <= z->lb || (z->p[z->c - 1] != 110 && z->p[z->c - 1] != 116)) return 0;
    among_var = find_among_b(z, a_5, 3);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_from_s(z, 1, s_2);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_3);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

static int r_case_other(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    if (z->c - 3 <= z->lb || z->p[z->c - 1] != 108return 0;
    among_var = find_among_b(z, a_6, 6);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_del(z);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_4);
                if (ret < 0return ret;
            }
            break;
        case 3:
            {   int ret = slice_from_s(z, 1, s_5);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

static int r_factive(struct SN_env * z) {
    z->ket = z->c;
    if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 161 && z->p[z->c - 1] != 169)) return 0;
    if (!find_among_b(z, a_7, 2)) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    {   int ret = r_double(z);
        if (ret <= 0return ret;
    }
    {   int ret = slice_del(z);
        if (ret < 0return ret;
    }
    {   int ret = r_undouble(z);
        if (ret <= 0return ret;
    }
    return 1;
}

static int r_plural(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    if (z->c <= z->lb || z->p[z->c - 1] != 107return 0;
    among_var = find_among_b(z, a_8, 7);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_from_s(z, 1, s_6);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_7);
                if (ret < 0return ret;
            }
            break;
        case 3:
            {   int ret = slice_del(z);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

static int r_owned(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 105 && z->p[z->c - 1] != 169)) return 0;
    among_var = find_among_b(z, a_9, 12);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_del(z);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_8);
                if (ret < 0return ret;
            }
            break;
        case 3:
            {   int ret = slice_from_s(z, 1, s_9);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

static int r_sing_owner(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    among_var = find_among_b(z, a_10, 31);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_del(z);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_10);
                if (ret < 0return ret;
            }
            break;
        case 3:
            {   int ret = slice_from_s(z, 1, s_11);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

static int r_plur_owner(struct SN_env * z) {
    int among_var;
    z->ket = z->c;
    if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((10768 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
    among_var = find_among_b(z, a_11, 42);
    if (!among_var) return 0;
    z->bra = z->c;
    {   int ret = r_R1(z);
        if (ret <= 0return ret;
    }
    switch (among_var) {
        case 1:
            {   int ret = slice_del(z);
                if (ret < 0return ret;
            }
            break;
        case 2:
            {   int ret = slice_from_s(z, 1, s_12);
                if (ret < 0return ret;
            }
            break;
        case 3:
            {   int ret = slice_from_s(z, 1, s_13);
                if (ret < 0return ret;
            }
            break;
    }
    return 1;
}

extern int hungarian_UTF_8_stem(struct SN_env * z) {
    {   int c1 = z->c;
        {   int ret = r_mark_regions(z);
            if (ret < 0return ret;
        }
        z->c = c1;
    }
    z->lb = z->c; z->c = z->l;

    {   int m2 = z->l - z->c; (void)m2;
        {   int ret = r_instrum(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m2;
    }
    {   int m3 = z->l - z->c; (void)m3;
        {   int ret = r_case(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m3;
    }
    {   int m4 = z->l - z->c; (void)m4;
        {   int ret = r_case_special(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m4;
    }
    {   int m5 = z->l - z->c; (void)m5;
        {   int ret = r_case_other(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m5;
    }
    {   int m6 = z->l - z->c; (void)m6;
        {   int ret = r_factive(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m6;
    }
    {   int m7 = z->l - z->c; (void)m7;
        {   int ret = r_owned(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m7;
    }
    {   int m8 = z->l - z->c; (void)m8;
        {   int ret = r_sing_owner(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m8;
    }
    {   int m9 = z->l - z->c; (void)m9;
        {   int ret = r_plur_owner(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m9;
    }
    {   int m10 = z->l - z->c; (void)m10;
        {   int ret = r_plural(z);
            if (ret < 0return ret;
        }
        z->c = z->l - m10;
    }
    z->c = z->lb;
    return 1;
}

extern struct SN_env * hungarian_UTF_8_create_env(void) { return SN_create_env(01); }

extern void hungarian_UTF_8_close_env(struct SN_env * z) { SN_close_env(z, 0); }


Messung V0.5 in Prozent
C=100 H=91 G=95

[Dauer der Verarbeitung: 0.26 Sekunden, vorverarbeitet 2026-08-08]

                                                                                                                                                                                                                                                                                                                                                                                                     


Neuigkeiten

     Aktuelles
     Motto des Tages

Open Source Software

     Quellcodebibliothek
     Eigene Quellcodes
     Fremde Quellcodes
     Suchen

Jenseits des Üblichen ....
    

Besucherstatistik

Besucherstatistik

Statistik
#Sources=141584
#Domains=752002