summaryrefslogtreecommitdiffstats
path: root/generator
diff options
context:
space:
mode:
Diffstat (limited to 'generator')
-rw-r--r--generator/generator_daemon.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/generator/generator_daemon.ml b/generator/generator_daemon.ml
index 7e18e35a..75377169 100644
--- a/generator/generator_daemon.ml
+++ b/generator/generator_daemon.ml
@@ -289,6 +289,7 @@ and generate_daemon_actions () =
| RStruct (n, _) ->
pr " struct guestfs_%s_ret ret;\n" name;
pr " ret.%s = *r;\n" n;
+ pr " free (r);\n";
pr " reply ((xdrproc_t) xdr_guestfs_%s_ret, (char *) &ret);\n"
name;
pr " xdr_free ((xdrproc_t) xdr_guestfs_%s_ret, (char *) &ret);\n"
@@ -296,6 +297,7 @@ and generate_daemon_actions () =
| RStructList (n, _) ->
pr " struct guestfs_%s_ret ret;\n" name;
pr " ret.%s = *r;\n" n;
+ pr " free (r);\n";
pr " reply ((xdrproc_t) xdr_guestfs_%s_ret, (char *) &ret);\n"
name;
pr " xdr_free ((xdrproc_t) xdr_guestfs_%s_ret, (char *) &ret);\n"