Update

1 files changed, 7 insertions, 3 deletions

diff --git a/src/lib/sounds/sounds.mli b/src/lib/sounds/sounds.mli
index 8c11488..dcb5e8d 100644
--- a/src/lib/sounds/sounds.mli
+++ b/src/lib/sounds/sounds.mli
@@ -36,8 +36,12 @@ val voyel_u : t
     When nazalized, the voyel become [un] like in "brun" *)
 val voyel_y : t
 
-(** Create a diphtongue from a semi-voyel and a voyel *)
-val diphtongue: t -> t -> t
+(** Create a diphtongue from a semi-voyel and a voyel. 
+
+    Note that there is no control here that the two elements follows the
+    expected type. *)
+val diphtongue
+  : t -> t -> t
 
 val nasal: t -> t option
 
@@ -68,4 +72,4 @@ val is_voyel : t -> bool
 val is_nasal : t -> bool
 
 val repr
-  : (module Sig.REPR with type t = 'a) -> t -> 'a
+  : (module Sig.REPR) -> t list -> string