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

allow compound nouns with dash

Browse Source
This commit is contained in:
Krasimir Angelov
2018-08-24 10:53:38 +02:00
parent 07b99f455f
commit 1e3e42e308
1 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/english/ExtendEng.gf
View File

@@ -251,7 +251,8 @@ concrete ExtendEng of Extend =
SlashBareV2S v s = insertExtrac s.s (predVc v) ; SlashBareV2S v s = insertExtrac s.s (predVc v) ;
CompoundN noun cn = { CompoundN noun cn = {
s = \\n,c => noun.s ! Sg ! Nom ++ cn.s ! n ! c ; s = variants {\\n,c => noun.s ! Sg ! Nom ++ cn.s ! n ! c ;
\\n,c => noun.s ! Sg ! Nom ++ BIND++"-"++BIND ++ cn.s ! n ! c} ;
g = cn.g g = cn.g
} ; } ;