diff --git a/src/lib_error_monad/error_monad.ml b/src/lib_error_monad/error_monad.ml
index 8fdc5361f41a4e8ecb17bae766c9edce59a24a7d..cb51423ef86ca6be95378b228e4dfa1e8154751e 100644
--- a/src/lib_error_monad/error_monad.ml
+++ b/src/lib_error_monad/error_monad.ml
@@ -33,16 +33,6 @@ type error_category = [`Branch | `Temporary | `Permanent]
 include Core
 include Monad
 
-module Make (Prefix : Sig.PREFIX) : sig
-  include Sig.CORE
-
-  include Sig.EXT with type error := error
-
-  include Sig.WITH_WRAPPED with type error := error
-end = struct
-  include Core_maker.Make (Prefix)
-end
-
 type error += Exn of exn
 
 let () =
diff --git a/src/lib_error_monad/error_monad.mli b/src/lib_error_monad/error_monad.mli
index aa1a589ae8c67913404356ff31c52fd07b891251..54515d4cfc47fef8e7cd7198a80e0da10aae976b 100644
--- a/src/lib_error_monad/error_monad.mli
+++ b/src/lib_error_monad/error_monad.mli
@@ -95,14 +95,6 @@ val with_timeout :
   (Lwt_canceler.t -> 'a tzresult Lwt.t) ->
   'a tzresult Lwt.t
 
-module Make (Prefix : Sig.PREFIX) : sig
-  include Sig.CORE
-
-  include Sig.EXT with type error := error
-
-  include Sig.WITH_WRAPPED with type error := error
-end
-
 (**/**)
 
 val errs_tag : trace Tag.def