- fp = psppire_variable_get_write_spec (pv);
-
- s = g_string_sized_new (fp->w + 1);
- g_string_set_size (s, fp->w);
-
- memset (s->str, 0, fp->w);
-
- g_assert (fp->w == s->len);
-
- /* Converts binary value V into printable form in the exactly
- FP->W character in buffer S according to format specification
- FP. No null terminator is appended to the buffer. */
- data_out (v, fp, s->str);
-
- text = pspp_locale_to_utf8 (s->str, fp->w, 0);
- g_string_free (s, TRUE);
-
- g_strchomp (text);
-
- return text;
-}
-
-
-static gboolean
-psppire_data_store_clear_datum (GSheetModel *model,
- gint row, gint col)
-
-{
- PsppireDataStore *store = PSPPIRE_DATA_STORE(model);
-
- union value v;
- const struct PsppireVariable *pv = psppire_dict_get_variable(store->dict, col);
-
- const gint index = psppire_variable_get_fv(pv) ;
-
- if ( psppire_variable_get_type(pv) == VAR_NUMERIC)
- v.f = SYSMIS;
- else
- memcpy(v.s, "", MAX_SHORT_STRING);