diff options
-rw-r--r-- | generator/generator_perl.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/generator/generator_perl.ml b/generator/generator_perl.ml index c9ec4fb3..10a2387e 100644 --- a/generator/generator_perl.ml +++ b/generator/generator_perl.ml @@ -181,6 +181,7 @@ _close_handle (guestfs_h *g) for (i = 0; i < len; ++i) SvREFCNT_dec (cbs[i]); + free (cbs); } MODULE = Sys::Guestfs PACKAGE = Sys::Guestfs |