search for: xs_unpack_charptrptr

--- generator/perl.ml | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/generator/perl.ml b/generator/perl.ml index 240bf3b54..5fa00a92d 100644 --- a/generator/perl.ml +++ b/generator/perl.ml @@ -122,8 +122,10 @@ XS_unpack_charPtrPtr (SV *arg) { for (i = 0; i <= av_len (av); i++) { SV **elem = av_fetch (av, i, 0); - if (!elem || !*elem) + if (!elem || !*elem) { + free (ret); croak (\"missing element in list\"); + } ret[i] = SvPV_nolen (*elem); } -- 2.13.2

This is an updated and extended version of the original patch: https://www.redhat.com/archives/libguestfs/2010-August/msg00163.html This adds OCaml and Perl bindings (both tested), support for progress bars in virt-resize, and adds progress notifications to a number of the simpler commands. Still to do is to add progress messages to more commands. There are still a few commands which would be