X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=src%2Fgenerator.ml;h=d2da8ec937ce9400f10ed9c971424604bd50c694;hp=95a263706c1be59f839c94805253ca6f7abb8bd4;hb=63e8da5abeaad1d2aa332fc41ad8f161fc567cdf;hpb=7cb6fac3074c52ac3c3e9ead5d99e4a2887cf7b1 diff --git a/src/generator.ml b/src/generator.ml index 95a2637..d2da8ec 100755 --- a/src/generator.ml +++ b/src/generator.ml @@ -11035,9 +11035,12 @@ print_strings (char *const *argv) | FileIn n | FileOut n -> pr " printf (\"%%s\\n\", %s);\n" n | BufferIn n -> - pr " for (size_t i = 0; i < %s_size; ++i)\n" n; - pr " printf (\"<%%02x>\", %s[i]);\n" n; - pr " printf (\"\\n\");\n" + pr " {\n"; + pr " size_t i;\n"; + pr " for (i = 0; i < %s_size; ++i)\n" n; + pr " printf (\"<%%02x>\", %s[i]);\n" n; + pr " printf (\"\\n\");\n"; + pr " }\n"; | OptString n -> pr " printf (\"%%s\\n\", %s ? %s : \"null\");\n" n n | StringList n | DeviceList n -> pr " print_strings (%s);\n" n | Bool n -> pr " printf (\"%%s\\n\", %s ? \"true\" : \"false\");\n" n