GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-27 11:56:29 -06:00
Code Issues Packages Projects Releases Wiki Activity

better treatment of variant relative pronouns in Eng, based on suggestions by DrBean in gf-dev

Browse Source
This commit is contained in:
aarne
2016-05-20 17:13:06 +00:00
parent 44d654aca5
commit 743047e7a5
5 changed files with 50 additions and 34 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/english/ResEng.gf
+4 -4
View File
@@ -37,7 +37,7 @@ resource ResEng = ParamX ** open Prelude in {
-- for "himself"/"herself"/"itself".
param
Agr = AgP1 Number | AgP2 Number | AgP3Sg Gender | AgP3Pl ;
Agr = AgP1 Number | AgP2 Number | AgP3Sg Gender | AgP3Pl Gender ;
param
Gender = Neutr | Masc | Fem ;
@@ -101,14 +101,14 @@ param
P2 => AgP2 n ;
P3 => case n of {
Sg => AgP3Sg g ;
Pl => AgP3Pl
Pl => AgP3Pl g
}
} ;
fromAgr : Agr -> {n : Number ; p : Person ; g : Gender} = \a -> case a of {
AgP1 n => {n = n ; p = P1 ; g = Masc} ;
AgP2 n => {n = n ; p = P2 ; g = Masc} ;
AgP3Pl => {n = Pl ; p = P3 ; g = Masc} ;
AgP3Pl g => {n = Pl ; p = P3 ; g = g} ;
AgP3Sg g => {n = Sg ; p = P3 ; g = g}
} ;
@@ -523,7 +523,7 @@ param
AgP3Sg Neutr => "itself" ;
AgP1 Pl => "ourselves" ;
AgP2 Pl => "yourselves" ;
AgP3Pl => "themselves"
AgP3Pl _ => "themselves"
} ;
-- For $Sentence$.