X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Foperations.def;h=a945f7bf998a25c25e28a97b2f14348680c85e26;hb=4e8efdc4acb80fc1a3735228d29fca0cf86fee6d;hp=c25f113c319c4b214a46c923d2fdceffcf46fc75;hpb=d775f576e4ffc0973c5f183b57b2baa089f555dc;p=pspp diff --git a/src/language/expressions/operations.def b/src/language/expressions/operations.def index c25f113c31..a945f7bf99 100644 --- a/src/language/expressions/operations.def +++ b/src/language/expressions/operations.def @@ -581,7 +581,8 @@ string function RTRIM (string s, string c) function NUMBER (string s, ni_format f) { union value out; - data_in (ss_head (s, f->w), LEGACY_NATIVE, f->type, f->d, 0, 0, NULL, &out, 0); + data_in (ss_head (s, f->w), LEGACY_NATIVE, f->type, 0, 0, NULL, &out, 0); + data_in_imply_decimals (s, LEGACY_NATIVE, f->type, f->d, &out); return out.f; }