From 583e04fa0a08c11f31b4583b8fd74ca6da418393 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Tue, 29 Nov 2011 12:25:34 +0000 Subject: [PATCH] ocaml: Memory leak: Free roots array along handle close path. (cherry picked from commit c5dbb1e63a8e0c45c7088dd2e58f5abbcfc30620) --- ocaml/guestfs_c.c | 1 + 1 file changed, 1 insertion(+) diff --git a/ocaml/guestfs_c.c b/ocaml/guestfs_c.c index 96e8a35..fd5e14a 100644 --- a/ocaml/guestfs_c.c +++ b/ocaml/guestfs_c.c @@ -82,6 +82,7 @@ guestfs_finalize (value gv) caml_remove_global_root (roots[i]); free (roots[i]); } + free (roots); caml_remove_global_root (v); free (v); -- 1.8.3.1