forked from GitHub/gf-core
Couple of fixes for the "food" example in French
This commit is contained in:
@@ -6,7 +6,7 @@ instance LexFoodsFre of LexFoods = open SyntaxFre,ParadigmsFre in {
|
||||
pizza_N = mkN "pizza" feminine ;
|
||||
cheese_N = mkN "fromage" masculine ;
|
||||
fish_N = mkN "poisson" ;
|
||||
fresh_A = mkA "frais" "fraîche" ;
|
||||
fresh_A = mkA "frais" "fraîche" "frais" "fraîches";
|
||||
warm_A = mkA "chaud" ;
|
||||
italian_A = mkA "italien" ;
|
||||
expensive_A = mkA "cher" ;
|
||||
|
||||
@@ -116,7 +116,7 @@ oper
|
||||
|
||||
adjHeureux : Str -> Adj = \heureux ->
|
||||
let {heureu = Predef.tk 1 heureux} in
|
||||
mkAdj heureux (heureu+"s") (heureu+"se") (heureu+"sement") ;
|
||||
mkAdj heureux heureux (heureu+"se") (heureu+"sement") ;
|
||||
|
||||
adjBanal : Str -> Adj = \banal ->
|
||||
let {bana = Predef.tk 1 banal} in
|
||||
|
||||
Reference in New Issue
Block a user