fix uninitialized read

diff --git a/src/comp.c b/src/comp.c
index e46cd5cfecff5601609bd97a3f380553c460da6f..44d9a783f0ee520602a12dd4857ad7f5fcc5a432 100644 (file)
--- a/src/comp.c
+++ b/src/comp.c
@@ -1355,9 +1355,13 @@ DEFUN ("native-compile", Fnative_compile, Snative_compile,
 
   /* FIXME how many other characters are not allowed in C?
      This will introduce name clashs too. */
-  for (int i; i < strlen(c_f_name); i++)
-    if (c_f_name[i] == '-')
-      c_f_name[i] = '_';
+  char *c = c_f_name;
+  while (*c)
+    {
+      if (*c == '-')
+       *c = '_';
+      ++c;
+    }
 
   func = indirect_function (func);
   if (!COMPILEDP (func))