GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-23 19:42:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

order of clitiques and auxiliary

Browse Source
This commit is contained in:
aarne
2004-11-24 14:42:28 +00:00
parent 1bda4ff5e7
commit 8b6018cb8b
7 changed files with 65 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/resource/french/MorphoFre.gf
View File

@@ -478,8 +478,8 @@ oper
ced = troncVerb céder ;
d = Predef.dp 1 ced ;
c = Predef.tk 2 ced ;
cèd = c + "è" + "d" ;
céd = c + "é" + "d"
cèd = c + "è" + d ;
céd = c + "é" + d
}
in auxConj1 céd cèd céder ;

2
lib/resource/french/StructuralFre.gf
View File

@@ -29,7 +29,7 @@ lin
ItNP = pronNounPhrase pronIl ;
EveryDet = chaqueDet ;
AllMassDet = toutDet ;
AllMassDet = toutDet ;
AllNumDet = tousDet ;
WhichDet = quelDet ;
WhichNumDet = mkDeterminerNum plural "quels" "quelles" ;

6
lib/resource/french/SyntaxFre.gf
View File

@@ -25,7 +25,7 @@ oper
toutDet : Determiner =
{s = \\g => genForms "tout" "toute" ! g ++ artDef g Sg nominative ;
n = Pl
n = Sg
} ;
tousDet : Numeral -> Determiner = \nu ->
{s = \\g => genForms "tous" "toutes" ! g ++ artDef g Pl nominative ++ nu.s ! g ;
@@ -91,10 +91,10 @@ oper
copula = \b,w -> let etre = (predVerb verbEtre).s in
etre ! b ! Masc ! w ;
isTransVerbClit = \v -> case v.c of {
isClitCase = \c -> case c of {
Acc => True ;
Dat => True ;
_ => False
_ => False --- this is not quite correct
} ;
auxVerb ve = case ve.aux of {

2
lib/resource/french/TestResourceFre.gf
View File

@@ -29,7 +29,7 @@ lin
Drink = mkTransVerbDir (verbPres (conj3boire "boire") AHabere) ;
Wait = mkTransVerbDir (verbPres (conj3rendre "attendre") AHabere) ;
Give = mkDitransVerb (verbPres (conj1aimer "donner") AHabere) [] dative [] accusative ;
Prefer = mkDitransVerb (verbPres (conj1aimer "preférer") AHabere) [] accusative [] dative ;
Prefer = mkDitransVerb (verbPres (conj1céder "préférer") AHabere) [] accusative [] dative ;
Say = verbSent (verbPres (conj3dire "dire") AHabere) Ind Ind ;
Prove = verbSent (verbPres (conj1aimer "démontrer") AHabere) Ind Ind ;
SwitchOn = mkTransVerbDir (verbPres (conj1aimer "allumer") AHabere) ;