GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-25 02:38:55 -06:00
Code Issues Packages Projects Releases Wiki Activity

added the nominal possessive form NPNomPoss to NPCase in Eng (covering mine, yours, etc)

Browse Source
This commit is contained in:
aarne
2013-03-13 12:34:22 +00:00
parent f61a013a40
commit 05c9934af0
4 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
lib/src/english/MorphoEng.gf
View File

@@ -36,6 +36,7 @@ resource MorphoEng = open Prelude, (Predef=Predef), ResEng in {
s = table { s = table {
NCase Nom => i ; NCase Nom => i ;
NPAcc => me ; NPAcc => me ;
NPNomPoss => mine ;
NCase Gen => my NCase Gen => my
} ; } ;
a = toAgr n p g ; a = toAgr n p g ;

2
lib/src/english/NounEng.gf
View File

@@ -78,7 +78,7 @@ concrete NounEng of Noun = CatEng ** open MorphoEng, ResEng, Prelude in {
s = \\hasCard,n => artDef ; s = \\hasCard,n => artDef ;
sp = \\hasCard,n => case <n,hasCard> of { sp = \\hasCard,n => case <n,hasCard> of {
<Sg,False> => table { NCase Gen => "its"; _ => "it" } ; <Sg,False> => table { NCase Gen => "its"; _ => "it" } ;
<Pl,False> => table { NCase Nom => "they"; NPAcc => "them"; NCase Gen => "theirs" } ; <Pl,False> => table { NCase Nom => "they"; NPAcc => "them"; _ => "theirs" } ;
_ => \\c => artDef _ => \\c => artDef
} }
} ; } ;

2
lib/src/english/RelativeEng.gf
View File

@@ -39,7 +39,7 @@ concrete RelativeEng of Relative = CatEng ** open ResEng in {
IdRP = IdRP =
{ s = table { { s = table {
RC _ (NCase Gen) => "whose" ; RC _ (NCase Gen) | RC _ NPNomPoss => "whose" ;
RC Neutr _ => "which" ; RC Neutr _ => "which" ;
RC _ NPAcc => "whom" ; RC _ NPAcc => "whom" ;
RC _ (NCase Nom) => "who" ; RC _ (NCase Nom) => "who" ;

6
lib/src/english/ResEng.gf
View File

@@ -21,9 +21,9 @@ resource ResEng = ParamX ** open Prelude in {
param param
Case = Nom | Gen ; Case = Nom | Gen ;
-- This is the worst-case $Case$ needed for pronouns. -- This is the worst-case $Case$ needed for pronouns: I, me, my, mine
NPCase = NCase Case | NPAcc ; NPCase = NCase Case | NPAcc | NPNomPoss ;
-- Useful macros and conversions: -- Useful macros and conversions:
@@ -169,7 +169,7 @@ resource ResEng = ParamX ** open Prelude in {
{ s = table { { s = table {
NCase Nom => i ; NCase Nom => i ;
NPAcc => me ; NPAcc => me ;
NCase Gen => my NCase Gen | NPNomPoss => my -- works for normal genitives, "whose", etc.
} ; } ;
a = toAgr n p g ; a = toAgr n p g ;
}; };