diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2011-06-22 10:36:44 +0100 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2011-06-22 10:37:42 +0100 |
commit | 56b94f5f6aa7981533ad867cc908c6e9cca2ba42 (patch) | |
tree | e8da81626ec86b3d706f1574bca2db8da85ff570 /generator | |
parent | e1e78bcef5e4654bd2456bd696840329359d35cd (diff) | |
download | libguestfs-56b94f5f6aa7981533ad867cc908c6e9cca2ba42.tar.gz libguestfs-56b94f5f6aa7981533ad867cc908c6e9cca2ba42.tar.xz libguestfs-56b94f5f6aa7981533ad867cc908c6e9cca2ba42.zip |
trace: Print empty list correctly.
Empty lists returned by RStringList and RHashtable functions
were incorrectly printed as [""].
Fix this so they are printed as [] instead.
Diffstat (limited to 'generator')
-rw-r--r-- | generator/generator_c.ml | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/generator/generator_c.ml b/generator/generator_c.ml index 82083060..7aa472b5 100644 --- a/generator/generator_c.ml +++ b/generator/generator_c.ml @@ -942,12 +942,14 @@ trace_send_line (guestfs_h *g) | RBufferOut _ -> pr "%s guestfs___print_BufferOut (trace_fp, %s, *size_r);\n" indent rv | RStringList _ | RHashtable _ -> - pr "%s fputs (\"[\\\"\", trace_fp);\n" indent; + pr "%s fputs (\"[\", trace_fp);\n" indent; pr "%s for (i = 0; %s[i]; ++i) {\n" indent rv; - pr "%s if (i > 0) fputs (\"\\\", \\\"\", trace_fp);\n" indent; + pr "%s if (i > 0) fputs (\", \", trace_fp);\n" indent; + pr "%s fputs (\"\\\"\", trace_fp);\n" indent; pr "%s fputs (%s[i], trace_fp);\n" indent rv; + pr "%s fputs (\"\\\"\", trace_fp);\n" indent; pr "%s }\n" indent; - pr "%s fputs (\"\\\"]\", trace_fp);\n" indent; + pr "%s fputs (\"]\", trace_fp);\n" indent; | RStruct (_, typ) -> (* XXX There is code generated for guestfish for printing * these structures. We need to make it generally available |