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

fixed a bug in PhonoIta.elision, which caused gluing of articles with nouns beginning with a vowel also when there was no apostrophe

Browse Source
This commit is contained in:
aarne
2014-07-20 08:06:45 +00:00
parent 423fa50994
commit 78bd8f98a8
3 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/italian/DiffIta.gf
View File

@@ -52,7 +52,7 @@ instance DiffIta of DiffRomance = open CommonRomance, PhonoIta, BeschIta, Prelud
artIndef = \g,n,c -> case <n,c> of {
<Sg,_> => prepCase c ++
genForms (elision "un" "un" "uno") (elision "una" "un'" "una") ! g ;
genForms (pre {"un" ; "uno" / sImpuro}) (elision "una" "un'" "una") ! g ;
_ => prepCase c
} ;

3
lib/src/italian/PhonoIta.gf
View File

@@ -17,7 +17,8 @@ oper
} ;
elision : (_,_,_ : Str) -> Str = \il, l', lo ->
pre {il ; (l' ++ Predef.BIND) / vocale ; lo / sImpuro} ;
let ll = case last l' of {"'" => l' ++ Predef.BIND ; _ => l'} in
pre {il ; ll / vocale ; lo / sImpuro} ;
--- pre {vocale => l' ; sImpuro => lo ; _ => il} ; --- doesn't work properly 15/4/2014
}

2
lib/src/italian/StructuralIta.gf
View File

@@ -81,7 +81,7 @@ lin
mkPronoun
"lei" "la" "le" "glie" "lei" "suo" "sua" "suoi" "sue"
Fem Sg P3 ;
so_AdA = ss "così" ;
so_AdA = ss "così" ;
somebody_NP = pn2np (mkPN ["qualcuno"] Masc) ;
somePl_Det = {s,sp = \\_,c => prepCase c ++ "qualche" ; n = Pl ; s2 = [] ; isNeg = False} ;
someSg_Det = {s,sp = \\_,c => prepCase c ++ "qualche" ; n = Sg ; s2 = [] ; isNeg = False} ;