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

(Spa) fix bug in MakeStructuralSpa.mkDet

Browse Source
This commit is contained in:
Inari Listenmaa
2019-04-09 13:16:53 +02:00
parent f827650840
commit 74fb09daa5
1 changed files with 2 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
src/spanish/MakeStructuralSpa.gf
View File

@@ -55,17 +55,14 @@ oper
mkDet = overload {
-- Does not inflect for number
mkDet : Str -> Number -> Det = \piu,n -> lin Det {
s,sp = \\_,_ => piu ;
s,sp = \\_,c => prepCase c ++ piu ;
n = n ;
s2 = [] ;
isNeg = False
} ;
-- Inflects for number
mkDet : Str -> Str -> Number -> Det = \alcuni,alcune,n -> lin Det {
s,sp = table {
Masc => \\_ => alcuni ;
Fem => \\_ => alcune
} ;
s,sp = \\g,c => prepCase c ++ genForms alcuni alcune ! g ;
n = n ;
s2 = [] ;
isNeg = False