X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Flexer%2Frange-parser.c;h=4cf21cf044ae2619bb395a2012748e5ba62a1647;hb=29e80fa3921b20d8c24d9f31263d7bfe531ef6ea;hp=4239518440e22bf82ce5db044d74d18eba6d9446;hpb=c3bd77adba5746aae895e6a354aada4e694c0e3f;p=pspp-builds.git

diff --git a/src/language/lexer/range-parser.c b/src/language/lexer/range-parser.c
index 42395184..4cf21cf0 100644
--- 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 <data/format.h>
 
 #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;
-      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)