diff --git a/lib/src/french/ExtraFre.gf b/lib/src/french/ExtraFre.gf index b86d99f6b..6b1bcfdc7 100644 --- a/lib/src/french/ExtraFre.gf +++ b/lib/src/french/ExtraFre.gf @@ -50,6 +50,11 @@ concrete ExtraFre of ExtraFreAbs = ExtraRomanceFre ** in {s = vous.s ; hasClit = vous.hasClit ; poss = vous.poss ; a = vous.a ; isPol = True ; isNeg = False} ; + ce_Pron = + let ce = elision "c" + in + mkPronoun ce ce ce ("cela" | "ça") "son" (elisPoss "s") "ses" Masc Sg P3 ; ---- variants? + AdvDatVP = insertClit3 datClit ; AdvGenVP = insertClit3 genClit ; diff --git a/lib/src/french/ExtraFreAbs.gf b/lib/src/french/ExtraFreAbs.gf index ab66dcdd2..be1b0d86e 100644 --- a/lib/src/french/ExtraFreAbs.gf +++ b/lib/src/french/ExtraFreAbs.gf @@ -32,6 +32,8 @@ abstract ExtraFreAbs = ExtraRomanceAbs - [ProDrop] ** { youPl8fem_Pron : Pron ; youPol8fem_Pron : Pron ; + ce_Pron : Pron ; + -- clitic adverbs AdvDatVP : VP -> VP ; -- j'y vais