mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Hun) Add SgAll to the forms
This commit is contained in:
@@ -458,6 +458,7 @@ oper
|
||||
SgSup => harm3 "on" "en" "ön" ;
|
||||
PlAcc => harm3 "ot" "et" "öt" ;
|
||||
SgAccStem => harm3 "o" "e" "ö" ;
|
||||
SgAll => harm3 "hoz" "hez" "höz" ;
|
||||
PossdPl => harm1 "i" ; -- TODO figure out allomorphs
|
||||
_ => harm1 []
|
||||
} ;
|
||||
|
||||
@@ -72,6 +72,7 @@ param
|
||||
NumCaseStem =
|
||||
SgNom | SgAccStem | SgSup -- These may use 2-3 different stems
|
||||
| PlAcc -- May have irregular vowel in suffix
|
||||
| SgAll -- May have irregular vowel in suffix
|
||||
| SgInsStem -- Instrumental and translative: -v after vowels
|
||||
| SgStem -- Rest of the cases in Sg
|
||||
| PlStem -- Rest of the cases in Pl
|
||||
@@ -150,6 +151,7 @@ oper
|
||||
SgNom => "SgNom" ;
|
||||
SgAccStem => "SgAccStem" ;
|
||||
SgSup => "SgSup" ;
|
||||
SgAll => "SgAll" ;
|
||||
PlAcc => "PlAcc" ;
|
||||
SgInsStem => "SgInsStem" ;
|
||||
SgStem => "SgStem" ;
|
||||
|
||||
@@ -28,6 +28,7 @@ oper
|
||||
<Sg,Nom> => cn.s ! SgNom ;
|
||||
<Sg,Acc> => bind (cn.s ! SgAccStem) "t" ;
|
||||
<Sg,Sup> => cn.s ! SgSup ;
|
||||
<Sg,All> => cn.s ! SgAll ;
|
||||
<Pl,Acc> => cn.s ! PlAcc ;
|
||||
<Pl,Nom> => cn.s ! PlStem ; -- don't use applyCase', it adds a BIND which breaks everything!
|
||||
<Sg,Ins|Tra> => applyCase' SgInsStem ;
|
||||
|
||||
Reference in New Issue
Block a user