/* This file was generated automatically by the Snowball to ANSI C compiler */#include "../runtime/header.h"#ifdef __cplusplusextern "C" {#endifextern int german_UTF_8_stem(struct SN_env * z);#ifdef __cplusplus}#endifstatic int r_standard_suffix(struct SN_env * z);static int r_R2(struct SN_env * z);static int r_R1(struct SN_env * z);static int r_mark_regions(struct SN_env * z);static int r_postlude(struct SN_env * z);static int r_prelude(struct SN_env * z);#ifdef __cplusplusextern "C" {#endifextern struct SN_env * german_UTF_8_create_env(void);extern void german_UTF_8_close_env(struct SN_env * z);#ifdef __cplusplus}#endifstatic const symbol s_0_1[1] = { 'U' };static const symbol s_0_2[1] = { 'Y' };static const symbol s_0_3[2] = { 0xC3, 0xA4 };static const symbol s_0_4[2] = { 0xC3, 0xB6 };static const symbol s_0_5[2] = { 0xC3, 0xBC };static const struct among a_0[6] ={/*  0 */ { 0, 0, -1, 6, 0},/*  1 */ { 1, s_0_1, 0, 2, 0},/*  2 */ { 1, s_0_2, 0, 1, 0},/*  3 */ { 2, s_0_3, 0, 3, 0},/*  4 */ { 2, s_0_4, 0, 4, 0},/*  5 */ { 2, s_0_5, 0, 5, 0}};static const symbol s_1_0[1] = { 'e' };static const symbol s_1_1[2] = { 'e', 'm' };static const symbol s_1_2[2] = { 'e', 'n' };static const symbol s_1_3[3] = { 'e', 'r', 'n' };static const symbol s_1_4[2] = { 'e', 'r' };static const symbol s_1_5[1] = { 's' };static const symbol s_1_6[2] = { 'e', 's' };static const struct among a_1[7] ={/*  0 */ { 1, s_1_0, -1, 1, 0},/*  1 */ { 2, s_1_1, -1, 1, 0},/*  2 */ { 2, s_1_2, -1, 1, 0},/*  3 */ { 3, s_1_3, -1, 1, 0},/*  4 */ { 2, s_1_4, -1, 1, 0},/*  5 */ { 1, s_1_5, -1, 2, 0},/*  6 */ { 2, s_1_6, 5, 1, 0}};static const symbol s_2_0[2] = { 'e', 'n' };static const symbol s_2_1[2] = { 'e', 'r' };static const symbol s_2_2[2] = { 's', 't' };static const symbol s_2_3[3] = { 'e', 's', 't' };static const struct among a_2[4] ={/*  0 */ { 2, s_2_0, -1, 1, 0},/*  1 */ { 2, s_2_1, -1, 1, 0},/*  2 */ { 2, s_2_2, -1, 2, 0},/*  3 */ { 3, s_2_3, 2, 1, 0}};static const symbol s_3_0[2] = { 'i', 'g' };static const symbol s_3_1[4] = { 'l', 'i', 'c', 'h' };static const struct among a_3[2] ={/*  0 */ { 2, s_3_0, -1, 1, 0},/*  1 */ { 4, s_3_1, -1, 1, 0}};static const symbol s_4_0[3] = { 'e', 'n', 'd' };static const symbol s_4_1[2] = { 'i', 'g' };static const symbol s_4_2[3] = { 'u', 'n', 'g' };static const symbol s_4_3[4] = { 'l', 'i', 'c', 'h' };static const symbol s_4_4[4] = { 'i', 's', 'c', 'h' };static const symbol s_4_5[2] = { 'i', 'k' };static const symbol s_4_6[4] = { 'h', 'e', 'i', 't' };static const symbol s_4_7[4] = { 'k', 'e', 'i', 't' };static const struct among a_4[8] ={/*  0 */ { 3, s_4_0, -1, 1, 0},/*  1 */ { 2, s_4_1, -1, 2, 0},/*  2 */ { 3, s_4_2, -1, 1, 0},/*  3 */ { 4, s_4_3, -1, 3, 0},/*  4 */ { 4, s_4_4, -1, 2, 0},/*  5 */ { 2, s_4_5, -1, 2, 0},/*  6 */ { 4, s_4_6, -1, 3, 0},/*  7 */ { 4, s_4_7, -1, 4, 0}};static const unsigned char g_v[] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32, 8 };static const unsigned char g_s_ending[] = { 117, 30, 5 };static const unsigned char g_st_ending[] = { 117, 30, 4 };static const symbol s_0[] = { 0xC3, 0x9F };static const symbol s_1[] = { 's', 's' };static const symbol s_2[] = { 'u' };static const symbol s_3[] = { 'U' };static const symbol s_4[] = { 'y' };static const symbol s_5[] = { 'Y' };static const symbol s_6[] = { 'y' };static const symbol s_7[] = { 'u' };static const symbol s_8[] = { 'a' };static const symbol s_9[] = { 'o' };static const symbol s_10[] = { 'u' };static const symbol s_11[] = { 'i', 'g' };static const symbol s_12[] = { 'e' };static const symbol s_13[] = { 'e' };static const symbol s_14[] = { 'e', 'r' };static const symbol s_15[] = { 'e', 'n' };static int r_prelude(struct SN_env * z) {    {   int c_test = z->c; /* test, line 30 */        while(1) { /* repeat, line 30 */            int c = z->c;            {   int c = z->c; /* or, line 33 */                z->bra = z->c; /* [, line 32 */                if (!(eq_s(z, 2, s_0))) goto lab2;                z->ket = z->c; /* ], line 32 */                {   int ret;                    ret = slice_from_s(z, 2, s_1); /* <-, line 32 */                    if (ret < 0) return ret;                }                goto lab1;            lab2:                z->c = c;                {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);                    if (c < 0) goto lab0;                    z->c = c; /* next, line 33 */                }            }        lab1:            continue;        lab0:            z->c = c;            break;        }        z->c = c_test;    }    while(1) { /* repeat, line 36 */        int c = z->c;        while(1) { /* goto, line 36 */            int c = z->c;            if (!(in_grouping_U(z, g_v, 97, 252))) goto lab4;            z->bra = z->c; /* [, line 37 */            {   int c = z->c; /* or, line 37 */                if (!(eq_s(z, 1, s_2))) goto lab6;                z->ket = z->c; /* ], line 37 */                if (!(in_grouping_U(z, g_v, 97, 252))) goto lab6;                {   int ret;                    ret = slice_from_s(z, 1, s_3); /* <-, line 37 */                    if (ret < 0) return ret;                }                goto lab5;            lab6:                z->c = c;                if (!(eq_s(z, 1, s_4))) goto lab4;                z->ket = z->c; /* ], line 38 */                if (!(in_grouping_U(z, g_v, 97, 252))) goto lab4;                {   int ret;                    ret = slice_from_s(z, 1, s_5); /* <-, line 38 */                    if (ret < 0) return ret;                }            }        lab5:            z->c = c;            break;        lab4:            z->c = c;            {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);                if (c < 0) goto lab3;                z->c = c; /* goto, line 36 */            }        }        continue;    lab3:        z->c = c;        break;    }    return 1;}static int r_mark_regions(struct SN_env * z) {    z->I[0] = z->l;    z->I[1] = z->l;    {   int c_test = z->c; /* test, line 47 */        {   int c = skip_utf8(z->p, z->c, 0, z->l, + 3);            if (c < 0) return 0;            z->c = c; /* hop, line 47 */        }        z->I[2] = z->c; /* setmark x, line 47 */        z->c = c_test;    }    while(1) { /* gopast, line 49 */        if (!(in_grouping_U(z, g_v, 97, 252))) goto lab0;        break;    lab0:        {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);            if (c < 0) return 0;            z->c = c; /* gopast, line 49 */        }    }    while(1) { /* gopast, line 49 */        if (!(out_grouping_U(z, g_v, 97, 252))) goto lab1;        break;    lab1:        {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);            if (c < 0) return 0;            z->c = c; /* gopast, line 49 */        }    }    z->I[0] = z->c; /* setmark p1, line 49 */     /* try, line 50 */    if (!(z->I[0] < z->I[2])) goto lab2;    z->I[0] = z->I[2];lab2:    while(1) { /* gopast, line 51 */        if (!(in_grouping_U(z, g_v, 97, 252))) goto lab3;        break;    lab3:        {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);            if (c < 0) return 0;            z->c = c; /* gopast, line 51 */        }    }    while(1) { /* gopast, line 51 */        if (!(out_grouping_U(z, g_v, 97, 252))) goto lab4;        break;    lab4:        {   int c = skip_utf8(z->p, z->c, 0, z->l, 1);            if (c < 0) return 0;            z->c = c; /* gopast, line 51 */        }    }    z->I[1] = z->c; /* setmark p2, line 51 */    return 1;}static int r_postlude(struct SN_env * z) {    int among_var;    while(1) { /* repeat, line 55 */        int c = z->c;        z->bra = z->c; /* [, line 57 */        among_var = find_among(z, a_0, 6); /* substring, line 57 */        if (!(among_var)) goto lab0;        z->ket = z->c; /* ], line 57 */        switch(among_var) {            case 0: goto lab0;            case 1:                {   int ret;                    ret = slice_from_s(z, 1, s_6); /* <-, line 58 */                    if (ret < 0) return ret;                }