msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

fixes in finnish

Browse Source
This commit is contained in:
aarne
2008-06-21 20:15:56 +00:00
parent 2ee2d8d29e
commit 7a227a136c
18 changed files with 60 additions and 46 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
lib/resource-1.4/french/DiffFre.gf
View File

@@ -6,7 +6,7 @@ instance DiffFre of DiffRomance = open CommonRomance, PhonoFre, Prelude in {
-- flags optimize=all ;
param
Prepos = P_de | P_a ;
Prepos = P_de | P_a | PNul ;
VType = VHabere | VEsse | VRefl ;
oper
@@ -17,7 +17,8 @@ instance DiffFre of DiffRomance = open CommonRomance, PhonoFre, Prelude in {
Nom => [] ;
Acc => [] ;
CPrep P_a => "à" ;
CPrep P_de => elisDe
CPrep P_de => elisDe ;
CPrep PNul => []
} ;
artDef : Gender -> Number -> Case -> Str = \g,n,c ->
@@ -163,7 +164,7 @@ instance DiffFre of DiffRomance = open CommonRomance, PhonoFre, Prelude in {
quelPron : AAgr => Str = aagrForms "quel" "quelle" "quels" "quelles" ;
partQIndir = [] ; --- only for qui,que: elision "c" ;
partQIndir = "ce" ; --- only for qui,que: elision "c" ;
reflPron : Number -> Person -> Case -> Str = \n,p,c ->
let pron = argPron Fem n p c in