Fix memory leaks.
[pspp-builds.git] / src / var-labs.c
index a098e62a88515182162476c51b96e8e467e13f99..87916977297c31d7d438b8719a411ec67e713a24 100644 (file)
 
 #include "debug-print.h"
 
-#if DEBUGGING
-static void debug_print (void);
-#endif
-
 int
 cmd_variable_labels (void)
 {
@@ -52,16 +48,16 @@ cmd_variable_labels (void)
          free (v);
          return CMD_PART_SUCCESS_MAYBE;
        }
-      if (ds_length (&tokstr) > 120)
+      if (ds_length (&tokstr) > 255)
        {
-         msg (SW, _("Truncating variable label to 120 characters."));
-         ds_truncate (&tokstr, 120);
+         msg (SW, _("Truncating variable label to 255 characters."));
+         ds_truncate (&tokstr, 255);
        }
       for (i = 0; i < nv; i++)
        {
          if (v[i]->label)
            free (v[i]->label);
-         v[i]->label = xstrdup (ds_value (&tokstr));
+         v[i]->label = xstrdup (ds_c_str (&tokstr));
        }
 
       lex_get ();
@@ -70,27 +66,5 @@ cmd_variable_labels (void)
       free (v);
     }
   while (token != '.');
-#if 0 && DEBUGGING
-  debug_print ();
-#endif
   return CMD_SUCCESS;
 }
-
-#if 0 && DEBUGGING
-static void
-debug_print (void)
-{
-  int i;
-
-  printf (_("Variable labels:\n"));
-  for (i = 0; i < nvar; i++)
-    {
-      printf ("  %8s: ", var[i]->name);
-      if (var[i]->label)
-       printf ("`%s'", var[i]->label);
-      else
-       printf (_("(no variable label)"));
-      printf ("\n");
-    }
-}
-#endif /* DEBUGGING */