X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdictionary%2Fweight.c;h=56229a285d1e6b9f8fb90ef9212553f852b31820;hb=888d0f91d57e0c3c5a4206c30ac71eb87bf44227;hp=5d492c4f50ceefcad2e807f85391e0629a3dfe86;hpb=81fff61a96bece351e381ad3fef8ab1248a952ba;p=pspp-builds.git diff --git a/src/language/dictionary/weight.c b/src/language/dictionary/weight.c index 5d492c4f..56229a28 100644 --- a/src/language/dictionary/weight.c +++ b/src/language/dictionary/weight.c @@ -26,6 +26,7 @@ #include #include #include +#include #include #include @@ -33,31 +34,32 @@ #define _(msgid) gettext (msgid) int -cmd_weight (void) +cmd_weight (struct lexer *lexer, struct dataset *ds) { - if (lex_match_id ("OFF")) - dict_set_weight (default_dict, NULL); + struct dictionary *dict = dataset_dict (ds); + if (lex_match_id (lexer, "OFF")) + dict_set_weight (dataset_dict (ds), NULL); else { struct variable *v; - lex_match (T_BY); - v = parse_variable (); + lex_match (lexer, T_BY); + v = parse_variable (lexer, dict); if (!v) return CMD_CASCADING_FAILURE; - if (v->type == ALPHA) + if (var_is_alpha (v)) { msg (SE, _("The weighting variable must be numeric.")); return CMD_CASCADING_FAILURE; } - if (dict_class_from_id (v->name) == DC_SCRATCH) + if (dict_class_from_id (var_get_name (v)) == DC_SCRATCH) { msg (SE, _("The weighting variable may not be scratch.")); return CMD_CASCADING_FAILURE; } - dict_set_weight (default_dict, v); + dict_set_weight (dict, v); } - return lex_end_of_command (); + return lex_end_of_command (lexer); }