summaryrefslogtreecommitdiffstats
path: root/src/generator.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/generator.ml')
-rwxr-xr-xsrc/generator.ml4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/generator.ml b/src/generator.ml
index b1071a86..c20e43fc 100755
--- a/src/generator.ml
+++ b/src/generator.ml
@@ -3533,6 +3533,7 @@ copy_table (char * const * argv)
| RStatVFS _ ->
pr " struct guestfs_statvfs *r;\n"; "NULL"
| RHashtable _ ->
+ pr " int i;\n";
pr " char **r;\n";
"NULL" in
pr "\n";
@@ -3588,6 +3589,7 @@ copy_table (char * const * argv)
pr " free (r);\n";
| RHashtable _ ->
pr " rv = copy_table (r);\n";
+ pr " for (i = 0; r[i] != NULL; ++i) free (r[i]);\n";
pr " free (r);\n";
);
@@ -4447,7 +4449,7 @@ py_guestfs_close (PyObject *self, PyObject *args)
pr " free (r);\n"
| RHashtable n ->
pr " py_r = put_table (r);\n";
- pr " free (r);\n"
+ pr " free_strings (r);\n"
);
pr " return py_r;\n";