diff --git a/lib/src/french/PhonoFre.gf b/lib/src/french/PhonoFre.gf index 5c8743d1a..31c7ccda3 100644 --- a/lib/src/french/PhonoFre.gf +++ b/lib/src/french/PhonoFre.gf @@ -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" ; diff --git a/lib/src/italian/PhonoIta.gf b/lib/src/italian/PhonoIta.gf index b7c4be62c..f4e4f1f7a 100644 --- a/lib/src/italian/PhonoIta.gf +++ b/lib/src/italian/PhonoIta.gf @@ -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 }