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

(Est) Workaround for short forms of Sg pers. prons

Browse Source 
Always use long Gen, because other cases are formed from long Gen stem
This commit is contained in:
Inari Listenmaa
2022-04-15 10:37:21 +08:00
committed by Meowyam
parent e80cd82870
commit a59ed0e0e2
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/estonian/MorphoEst.gf
View File

@@ -520,6 +520,7 @@ caseTable : Number -> Noun -> Case => Str = \n,cn ->
-- Ess, Abess, Comit, Termin all use the long Gen stem. -- Ess, Abess, Comit, Termin all use the long Gen stem.
-- Alternative 1: let Gen be long form, leaving only Nom and Part actually short -- Alternative 1: let Gen be long form, leaving only Nom and Part actually short
-- Alternative 2: leave Gen short, postprocess Ess, Abess, Comit, Termin in application -- Alternative 2: leave Gen short, postprocess Ess, Abess, Comit, Termin in application
-- Alternative 3: include two Gen stems in NPForm
shortPronoun : (_,_,_,_ : Str) -> Number -> Person -> shortPronoun : (_,_,_,_ : Str) -> Number -> Person ->
{s : NPForm => Str ; a : Agr} = {s : NPForm => Str ; a : Agr} =
\ma, mu, mind, minu, n, p -> \ma, mu, mind, minu, n, p ->
@@ -531,6 +532,7 @@ caseTable : Number -> Noun -> Case => Str = \n,cn ->
} ; } ;
in shortMa ** { s = table { in shortMa ** { s = table {
NPCase Gen => minu ; -- this is Alternative 1, see comment above. Comment out for Alternative 2.
NPCase Allat => mulle ; NPCase Allat => mulle ;
NPCase Transl => minu + "ks" ; NPCase Transl => minu + "ks" ;
x => shortMa.s ! x } } ; x => shortMa.s ! x } } ;