From 48dc04c3b9afe19207d15b873452129d9c2b3b4c Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Fri, 3 Sep 2021 15:15:00 +0200 Subject: Continued refactoring --- src/lib/process.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/lib/process.ml') diff --git a/src/lib/process.ml b/src/lib/process.ml index d0d1884..13a24a1 100644 --- a/src/lib/process.ml +++ b/src/lib/process.ml @@ -1,6 +1,6 @@ open StdLabels -module M(T:Sounds.T) = struct +module M(T:Sounds.Sig.T) = struct type voyel = T.t Modifiers.Sig.voyel @@ -19,7 +19,7 @@ module M(T:Sounds.T) = struct = fun e m -> List.fold_left m ~init:e - ~f:(fun e f -> f (module T:Sounds.T with type t = T.t) e) + ~f:(fun e f -> f (module T:Sounds.Sig.T with type t = T.t) e) let change_voyel = fun init -> -- cgit v1.2.3