X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=src%2Fgenerator.ml;h=7f248027784df7c1f64a1b94ef1280963712fac7;hp=f7057d0ea14249b4f6e3a4246e1bb763bcb11186;hb=09128ca421f13da9fb6446cd7b09b0ae89c3876f;hpb=d43dac69483e8ec62e8356d93f761684ce2f5cc8

diff --git a/src/generator.ml b/src/generator.ml
index f7057d0..7f24802 100755
--- a/src/generator.ml
+++ b/src/generator.ml
@@ -4862,7 +4862,7 @@ XS_unpack_charPtrPtr (SV *arg) {
     croak (\"array reference expected\");
 
   av = (AV *)SvRV (arg);
-  ret = malloc (av_len (av) + 1 + 1);
+  ret = malloc ((av_len (av) + 1 + 1) * sizeof (char *));
   if (!ret)
     croak (\"malloc failed\");