projects
/
pspp-builds.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Make value_set_missing(), etc. tolerate values of width -1.
[pspp-builds.git]
/
src
/
language
/
lexer
/
range-parser.c
diff --git
a/src/language/lexer/range-parser.c
b/src/language/lexer/range-parser.c
index 4239518440e22bf82ce5db044d74d18eba6d9446..4cf21cf044ae2619bb395a2012748e5ba62a1647 100644
(file)
--- a/
src/language/lexer/range-parser.c
+++ b/
src/language/lexer/range-parser.c
@@
-22,6
+22,7
@@
#include "lexer.h"
#include <libpspp/str.h>
#include <data/value.h>
#include "lexer.h"
#include <libpspp/str.h>
#include <data/value.h>
+#include <data/format.h>
#include "gettext.h"
#define _(msgid) gettext (msgid)
#include "gettext.h"
#define _(msgid) gettext (msgid)
@@
-98,7
+99,8
@@
parse_number (struct lexer *lexer, double *x, const enum fmt_type *format)
else if (lex_token (lexer) == T_STRING && format != NULL)
{
union value v;
else if (lex_token (lexer) == T_STRING && format != NULL)
{
union value v;
- data_in (ds_ss (lex_tokstr (lexer)), *format, 0, 0, &v, 0);
+ data_in (ds_ss (lex_tokstr (lexer)), LEGACY_NATIVE,
+ *format, 0, 0, 0, &v, 0);
lex_get (lexer);
*x = v.f;
if (*x == SYSMIS)
lex_get (lexer);
*x = v.f;
if (*x == SYSMIS)