C99 compatible build fix for RHEL 5.
authorRichard W.M. Jones <rjones@redhat.com>
Fri, 21 May 2010 15:14:07 +0000 (16:14 +0100)
committerRichard Jones <rjones@redhat.com>
Fri, 21 May 2010 15:15:56 +0000 (16:15 +0100)
src/generator.ml

index 95a2637..d2da8ec 100755 (executable)
@@ -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