[Pspp-cvs] Changes to pspp/src/compute.c

[John Darrington]

Index: pspp/src/compute.c
diff -u pspp/src/compute.c:1.16 pspp/src/compute.c:1.17
--- pspp/src/compute.c:1.16     Tue Mar  1 08:16:15 2005
+++ pspp/src/compute.c  Wed Apr 13 10:09:59 2005
@@ -310,7 +310,7 @@
 /* COMPUTE or IF target variable or vector element. */
 struct lvalue
   {
-    char var_name[9];            /* Destination variable name, or "". */
+    char var_name[LONG_NAME_LEN + 1];   /* Destination variable name, or "". */
     const struct vector *vector; /* Destination vector, if any, or NULL. */
     struct expression *element;  /* Destination vector element, or NULL. */
   };
@@ -353,8 +353,8 @@
   else
     {
       /* Variable name. */
-      strncpy (lvalue->var_name, tokid, 8);
-      lvalue->var_name[8] = '\0';
+      strncpy (lvalue->var_name, tokid, LONG_NAME_LEN);
+      lvalue->var_name[LONG_NAME_LEN] = '\0';
       lex_get ();
     }
   return lvalue;