Added some more UNIMPL entries.
[pspp] / src / language / dictionary / weight.c
index 121728b68e454b8d371e750f91cbb093eb4ab9a1..fb0972f9afeadab3b92320cd5b033bd8244d4949 100644 (file)
 
 #include <stdio.h>
 
-#include <procedure.h>
+#include <data/procedure.h>
 #include <data/dictionary.h>
 #include <data/variable.h>
 #include <language/command.h>
 #include <language/lexer/lexer.h>
+#include <language/lexer/variable-parser.h>
 #include <libpspp/message.h>
 #include <libpspp/str.h>
 
@@ -36,7 +37,7 @@ int
 cmd_weight (void)
 {
   if (lex_match_id ("OFF"))
-    dict_set_weight (default_dict, NULL);
+    dict_set_weight (dataset_dict (current_dataset), NULL);
   else
     {
       struct variable *v;
@@ -56,7 +57,7 @@ cmd_weight (void)
          return CMD_CASCADING_FAILURE;
        }
 
-      dict_set_weight (default_dict, v);
+      dict_set_weight (dataset_dict (current_dataset), v);
     }
 
   return lex_end_of_command ();