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

restored BIND in Fre and Ita now that they work in C runtime

Browse Source
This commit is contained in:
aarne
2014-04-22 15:41:12 +00:00
parent f7a64de783
commit 96c91999c8
2 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/src/french/PhonoFre.gf
View File

@@ -12,14 +12,14 @@ oper
"I" ; "Î" ; "O" ; "Ô" ; "U" ; "Û" ; "Y"
} ;
elision : Str -> Str = \d -> d + pre {"e" ; "'" / voyelle} ;
---- elision : Str -> Str = \d -> d + pre {"e" ; ("'" ++ Predef.SOFT_BIND) / voyelle} ;
---- elision : Str -> Str = \d -> d + pre {"e" ; "'" / voyelle} ;
elision : Str -> Str = \d -> d + pre {"e" ; ("'" ++ Predef.BIND) / voyelle} ;
-- The following morphemes are the most common uses of elision.
elisDe = elision "d" ;
elisLa = pre {"la" ; ("l'") / voyelle} ;
---- elisLa = pre {"la" ; ("l'" ++ Predef.SOFT_BIND) / voyelle} ; --- doesn't work properly 15/4/2014
---- elisLa = pre {"la" ; ("l'") / voyelle} ;
elisLa = pre {"la" ; ("l'" ++ Predef.BIND) / voyelle} ; --- doesn't work properly 15/4/2014
elisLe = elision "l" ;
elisNe = elision "n" ;
elisQue = elision "qu" ;

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

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