msyds/gf-rgl
1
0 Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Hun) Remove some stem changing paradigms from 1-argument regNoun

Browse Source
This commit is contained in:
Inari Listenmaa committed 2020-04-27 17:18:48 +02:00
1 parent 6f2cc8af96
commit fd6541846f
1 file changed
+2 -2
Download Patch File Download Diff File Expand all files Collapse all files
src/hungarian/NounMorphoHun.gf
+2 -2
View File
@@ -254,8 +254,8 @@ regNounNomAcc : (nom : Str) -> (acc : Str) -> Noun = \n,a ->
-- Words like nyár, név need to use 2-arg smart paradigm
(#c|"")+("á"|"é")+ #c => mkNoun sgnom ;
_ + ("á"|"é") + #c => dToll sgnom (név2nevet sgnom) ;
_ + ("ó"|"é"|"ő"|"ű") => dLó sgnom (ló2lovat sgnom) ;
_ + #v + #c + #v + #c => dMajom sgnom (majom2majmo sgnom);
-- _ + ("ó"|"é"|"ő"|"ű") => dLó sgnom (ló2lovat sgnom) ;
-- _ + #v + #c + #v + #c => dMajom sgnom (majom2majmo sgnom);
_ => mkNoun sgnom -- Fall back to the regular paradigm
} where {
név2nevet : Str -> Str = \név ->