diff options
| -rw-r--r-- | contrib/summerschool/foods/FoodsGle.gf | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/contrib/summerschool/foods/FoodsGle.gf b/contrib/summerschool/foods/FoodsGle.gf index 4e91e7046..e48c0c21b 100644 --- a/contrib/summerschool/foods/FoodsGle.gf +++ b/contrib/summerschool/foods/FoodsGle.gf @@ -36,8 +36,8 @@ concrete FoodsGle of Foods = open MutationsGle, CharactersGle in { s = table{Sg => (mutate sg); Pl => (mutate pl)};
g = g;
pe = case pl of {
- _ + v@(#broadVowel) + c@(#consonant*) => Broad;
- _ + v@(#slenderVowel) + c@(#consonant*) => Slender;
+ _ + v@(#broadVowel) + c@(#consonant*) + #consonant => Broad;
+ _ + v@(#slenderVowel) + c@(#consonant*) + #consonant => Slender;
_ => NoBreadth
}
} ;
|