diff --git a/src/api/ml/z3.ml b/src/api/ml/z3.ml
index 9d8a9c923..5fb87bf64 100644
--- a/src/api/ml/z3.ml
+++ b/src/api/ml/z3.ml
@@ -2023,3 +2023,7 @@ let toggle_warning_messages = Z3native.toggle_warning_messages
 let enable_trace = Z3native.enable_trace
 
 let disable_trace = Z3native.enable_trace
+
+module Memory = struct
+  let reset = Z3native.reset_memory
+end
diff --git a/src/api/ml/z3.mli b/src/api/ml/z3.mli
index ddc9f2a41..6d478c57f 100644
--- a/src/api/ml/z3.mli
+++ b/src/api/ml/z3.mli
@@ -3472,3 +3472,11 @@ val enable_trace : string -> unit
    Remarks: It is a NOOP otherwise.
 *)
 val disable_trace : string -> unit
+
+
+(** Memory management **)
+module Memory :
+sig
+  (** Reset all allocated resourced **)
+  val reset : unit -> unit
+end