diff options
Diffstat (limited to 'src/lib/modifiers/vocalize.ml')
| -rw-r--r-- | src/lib/modifiers/vocalize.ml | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/lib/modifiers/vocalize.ml b/src/lib/modifiers/vocalize.ml index b390757..1014642 100644 --- a/src/lib/modifiers/vocalize.ml +++ b/src/lib/modifiers/vocalize.ml @@ -1,9 +1,10 @@ +module T = Sounds + (** Transform the S into Z if the S is the opening consonant and there is no ending consonant before *) let process : 'a Sig.modifier - = fun (type el) m init -> - let module T = (val m:Sounds.Sig.T with type t = el) in + = fun init -> let (((v1, v2), c) , ending) = init in match c with |