X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fhelper.c;h=b09a2f58c3f1cc7bff73e36aecbb4775a81c1049;hb=d8659cda7d193dd3e6e035cd0b1b40493d360f0b;hp=b4b3872df3abecf00de49e2e36979a333cb7e2f1;hpb=83df73bacd2cd3abd177e6a8ac1b76b072255025;p=pspp-builds.git diff --git a/src/ui/gui/helper.c b/src/ui/gui/helper.c index b4b3872d..b09a2f58 100644 --- a/src/ui/gui/helper.c +++ b/src/ui/gui/helper.c @@ -49,7 +49,7 @@ /* Formats a value according to FORMAT The returned string must be freed when no longer required */ gchar * -value_to_text (union value v, PsppireDict *dict, struct fmt_spec format) +value_to_text (union value v, const PsppireDict *dict, struct fmt_spec format) { gchar *s = 0; @@ -60,16 +60,27 @@ value_to_text (union value v, PsppireDict *dict, struct fmt_spec format) } +/* Converts TEXT to a value. -gboolean -text_to_value (const gchar *text, union value *v, - struct fmt_spec format) + VAL will be initialised and filled by this function. + It is the caller's responsibility to destroy VAL when no longer needed. + VAR and DICT must be the variable and dictionary with which VAL + is associated. + + On success, VAL is returned, NULL otherwise. +*/ +union value * +text_to_value (const gchar *text, + const PsppireDict *dict, + const struct variable *var, + union value *val) { - bool ok; + const struct fmt_spec *format = var_get_print_format (var); + int width = var_get_width (var); - if ( format.type != FMT_A) + if ( format->type != FMT_A) { - if ( ! text ) return FALSE; + if ( ! text ) return NULL; { const gchar *s = text; @@ -80,16 +91,18 @@ text_to_value (const gchar *text, union value *v, s++; } - if ( !*s) return FALSE; + if ( !*s) return NULL; } } + value_init (val, width); msg_disable (); - ok = data_in (ss_cstr (text), LEGACY_NATIVE, format.type, 0, 0, 0, - v, fmt_var_width (&format)); + data_in (ss_cstr (text), UTF8, format->type, 0, 0, 0, + dict->dict, + val, width); msg_enable (); - return ok; + return val; }