extern int swedish_stem(struct SN_env * z) { { int c = z->c; /* do, line 66 */ if (!r_mark_regions(z)) goto lab0; /* call mark_regions, line 66 */ lab0: z->c = c; } z->lb = z->c; z->c = z->l; /* backwards, line 67 */ { int m = z->l - z->c; /* do, line 68 */ if (!r_main_suffix(z)) goto lab1; /* call main_suffix, line 68 */ lab1: z->c = z->l - m; } { int m = z->l - z->c; /* do, line 69 */ if (!r_consonant_pair(z)) goto lab2; /* call consonant_pair, line 69 */ lab2: z->c = z->l - m; } { int m = z->l - z->c; /* do, line 70 */ if (!r_other_suffix(z)) goto lab3; /* call other_suffix, line 70 */ lab3: z->c = z->l - m; } z->c = z->lb; return 1; }
extern int danish_UTF_8_stem(struct SN_env * z) { { int c = z->c; /* do, line 84 */ { int ret = r_mark_regions(z); if (ret == 0) goto lab0; /* call mark_regions, line 84 */ if (ret < 0) return ret; } lab0: z->c = c; } z->lb = z->c; z->c = z->l; /* backwards, line 85 */ { int m = z->l - z->c; (void) m; /* do, line 86 */ { int ret = r_main_suffix(z); if (ret == 0) goto lab1; /* call main_suffix, line 86 */ if (ret < 0) return ret; } lab1: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 87 */ { int ret = r_consonant_pair(z); if (ret == 0) goto lab2; /* call consonant_pair, line 87 */ if (ret < 0) return ret; } lab2: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 88 */ { int ret = r_other_suffix(z); if (ret == 0) goto lab3; /* call other_suffix, line 88 */ if (ret < 0) return ret; } lab3: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 89 */ { int ret = r_undouble(z); if (ret == 0) goto lab4; /* call undouble, line 89 */ if (ret < 0) return ret; } lab4: z->c = z->l - m; } z->c = z->lb; return 1; }
extern int swedish_ISO_8859_1_stem(struct SN_env * z) { { int c = z->c; /* do, line 66 */ { int ret = r_mark_regions(z); if (ret == 0) goto lab0; /* call mark_regions, line 66 */ if (ret < 0) return ret; } lab0: z->c = c; } z->lb = z->c; z->c = z->l; /* backwards, line 67 */ { int m = z->l - z->c; (void) m; /* do, line 68 */ { int ret = r_main_suffix(z); if (ret == 0) goto lab1; /* call main_suffix, line 68 */ if (ret < 0) return ret; } lab1: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 69 */ { int ret = r_consonant_pair(z); if (ret == 0) goto lab2; /* call consonant_pair, line 69 */ if (ret < 0) return ret; } lab2: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 70 */ { int ret = r_other_suffix(z); if (ret == 0) goto lab3; /* call other_suffix, line 70 */ if (ret < 0) return ret; } lab3: z->c = z->l - m; } z->c = z->lb; return 1; }
extern int norwegian_UTF_8_stem(struct SN_env * z) { { int c = z->c; /* do, line 74 */ { int ret = r_mark_regions(z); if (ret == 0) goto lab0; /* call mark_regions, line 74 */ if (ret < 0) return ret; } lab0: z->c = c; } z->lb = z->c; z->c = z->l; /* backwards, line 75 */ { int m = z->l - z->c; (void) m; /* do, line 76 */ { int ret = r_main_suffix(z); if (ret == 0) goto lab1; /* call main_suffix, line 76 */ if (ret < 0) return ret; } lab1: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 77 */ { int ret = r_consonant_pair(z); if (ret == 0) goto lab2; /* call consonant_pair, line 77 */ if (ret < 0) return ret; } lab2: z->c = z->l - m; } { int m = z->l - z->c; (void) m; /* do, line 78 */ { int ret = r_other_suffix(z); if (ret == 0) goto lab3; /* call other_suffix, line 78 */ if (ret < 0) return ret; } lab3: z->c = z->l - m; } z->c = z->lb; return 1; }