mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-22 01:22:51 -06:00
clitic insertion started
This commit is contained in:
@@ -12,7 +12,7 @@ concrete LangFre of Lang =
|
||||
-- ConjunctionFre,
|
||||
-- PhraseFre,
|
||||
-- TensedFre,
|
||||
-- StructuralFre,
|
||||
StructuralFre,
|
||||
BasicFre
|
||||
** {
|
||||
|
||||
|
||||
@@ -162,8 +162,6 @@ oper
|
||||
-- All the eight personal pronouns can be built by the following macro.
|
||||
-- The use of "en" as atonic genitive is debatable.
|
||||
|
||||
Pronoun = {s : NPForm => Str ; a : Agr ; c : ClitType} ;
|
||||
|
||||
mkPronoun : (_,_,_,_,_,_,_ : Str) ->
|
||||
Gender -> Number -> Person -> ClitType -> Pronoun =
|
||||
\il,le,lui,Lui,son,sa,ses,g,n,p,c ->
|
||||
|
||||
@@ -288,7 +288,7 @@ oper
|
||||
accusative = complAcc ;
|
||||
genitive = complGen ;
|
||||
dative = complDat ;
|
||||
mkPreposition p = {s = p ; c = Acc} ;
|
||||
mkPreposition p = {s = p ; c = Acc ; isDir = False} ;
|
||||
|
||||
mkN x y g = mkCNomIrreg x y g ** {lock_N = <>} ;
|
||||
regN x g = mkNomReg x g ** {lock_N = <>} ;
|
||||
|
||||
Reference in New Issue
Block a user