summaryrefslogtreecommitdiffstats
path: root/ocaml/guestfs_c.c
diff options
context:
space:
mode:
authorRichard W.M. Jones <rjones@redhat.com>2011-11-29 12:25:34 +0000
committerRichard W.M. Jones <rjones@redhat.com>2011-11-29 12:25:34 +0000
commitc5dbb1e63a8e0c45c7088dd2e58f5abbcfc30620 (patch)
treec5e1792f7f06081094ad3da8fe06995f19d80c5d /ocaml/guestfs_c.c
parent35c8e4fa7f5c90cc8371028e2bfc0562272380e3 (diff)
downloadlibguestfs-c5dbb1e63a8e0c45c7088dd2e58f5abbcfc30620.tar.gz
libguestfs-c5dbb1e63a8e0c45c7088dd2e58f5abbcfc30620.tar.xz
libguestfs-c5dbb1e63a8e0c45c7088dd2e58f5abbcfc30620.zip
ocaml: Memory leak: Free roots array along handle close path.
Diffstat (limited to 'ocaml/guestfs_c.c')
-rw-r--r--ocaml/guestfs_c.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/ocaml/guestfs_c.c b/ocaml/guestfs_c.c
index 96e8a35a..fd5e14ae 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);