mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-10-25 17:23:18 -06:00
added PlSurname
This commit is contained in:
1 parent
1c0a4f98ed
commit
95e7996a2d
1 file changed
+3
-1
@@ -106,7 +106,7 @@ concrete ExtendSpa of Extend = CatSpa ** ExtendRomanceFunctor -
|
||||
lin UseComp_estar comp = insertComplement comp.s (predV I.estar_V) ;
|
||||
UseComp_ser comp = insertComplement comp.s (predV copula) ;
|
||||
|
||||
lin GivenName, MaleSurname, FemaleSurname = \n -> n ;
|
||||
lin GivenName, MaleSurname, FemaleSurname, PlSurname = \n -> n ;
|
||||
lin FullName gn sn = {
|
||||
s = gn.s ++ sn.s ;
|
||||
g = gn.g
|
||||
@@ -126,4 +126,6 @@ oper
|
||||
comp = \\a => vps.comp ! a ++ (let agr = complAgr a in vps.s.s ! VPart agr.g agr.n) ++ agent ;
|
||||
} ;
|
||||
|
||||
lin AnaphPron np = agr2pron ! np.a ;
|
||||
|
||||
} ;
|
||||
Reference in new issue
Block a user