diff --git a/src/data/CCBitField.ml b/src/data/CCBitField.ml index 621de0dd..78104bce 100644 --- a/src/data/CCBitField.ml +++ b/src/data/CCBitField.ml @@ -49,7 +49,7 @@ let get_then_incr n = incr n; x -module Make (X : sig end) : S = struct +module Make () : S = struct type t = int let empty = 0 diff --git a/src/data/CCBitField.mli b/src/data/CCBitField.mli index 0189cddf..00da9f26 100644 --- a/src/data/CCBitField.mli +++ b/src/data/CCBitField.mli @@ -59,8 +59,8 @@ module type S = sig (** Current width of the bitfield. *) end +module Make () : S (** Create a new bitfield type *) -module Make : functor (_ : sig end) -> S (**/**)