X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fdictionary%2Fvalue-labels.c;h=39f544ec4b917fa2b517129a06ad6c252d5cc171;hb=423d3e418a94598b85c82fb83c9796de7712288b;hp=6af0b62c57aa981175253e0f5dd04f2ad10f9640;hpb=43b1296aafe7582e7dbe6c2b6a8b478d7d9b0fcf;p=pspp-builds.git diff --git a/src/language/dictionary/value-labels.c b/src/language/dictionary/value-labels.c index 6af0b62c..39f544ec 100644 --- a/src/language/dictionary/value-labels.c +++ b/src/language/dictionary/value-labels.c @@ -25,11 +25,12 @@ #include #include #include -#include #include #include #include +#include "xalloc.h" + #include "gettext.h" #define _(msgid) gettext (msgid) @@ -162,11 +163,9 @@ get_label (struct lexer *lexer, struct variable **vars, size_t var_cnt) { if (!lex_is_number (lexer)) { - lex_error (lexer, _("expecting integer")); + lex_error (lexer, _("expecting number")); return 0; } - if (!lex_is_integer (lexer)) - msg (SW, _("Value label `%g' is not integer."), lex_tokval (lexer)); value.f = lex_tokval (lexer); } lex_get (lexer);