X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdictionary%2Fvariable-label.c;h=17f881125aa157e2e917c55e6eb4e34d22e724d4;hb=9956f167d1db0f91ed35f9fb28b711586a416d42;hp=acf5f054e52359f16ca4a10d67f6348867659461;hpb=77e551d23575da6b89f866612ab39c2b0497c9be;p=pspp-builds.git

diff --git a/src/language/dictionary/variable-label.c b/src/language/dictionary/variable-label.c
index acf5f054..17f88112 100644
--- a/src/language/dictionary/variable-label.c
+++ b/src/language/dictionary/variable-label.c
@@ -18,14 +18,18 @@
    02110-1301, USA. */
 
 #include <config.h>
+
 #include <stdio.h>
 #include <stdlib.h>
-#include <libpspp/alloc.h>
+
+#include <data/procedure.h>
+#include <data/variable.h>
 #include <language/command.h>
-#include <libpspp/message.h>
 #include <language/lexer/lexer.h>
+#include <language/lexer/variable-parser.h>
+#include <libpspp/alloc.h>
+#include <libpspp/message.h>
 #include <libpspp/str.h>
-#include <data/variable.h>
 
 #include "gettext.h"
 #define _(msgid) gettext (msgid)
@@ -41,13 +45,13 @@ cmd_variable_labels (void)
       size_t i;
 
       if (!parse_variables (default_dict, &v, &nv, PV_NONE))
-        return CMD_PART_SUCCESS_MAYBE;
+        return CMD_FAILURE;
 
       if (token != T_STRING)
 	{
 	  msg (SE, _("String expected for variable label."));
 	  free (v);
-	  return CMD_PART_SUCCESS_MAYBE;
+	  return CMD_FAILURE;
 	}
       if (ds_length (&tokstr) > 255)
 	{
@@ -58,7 +62,7 @@ cmd_variable_labels (void)
 	{
 	  if (v[i]->label)
 	    free (v[i]->label);
-	  v[i]->label = xstrdup (ds_c_str (&tokstr));
+	  v[i]->label = ds_xstrdup (&tokstr);
 	}
 
       lex_get ();