#include <gettext.h>
-/* Returns a copy of IN with each underscore doubled. The caller should free
- the returned string (with free()) when it is no longer needed. */
-char *
-escape_underscores (const char *in)
-{
- char *out = xmalloc (2 * strlen (in) + 1);
- char *p;
-
- p = out;
- for (; *in != '\0'; in++)
- {
- if (*in == '_')
- *p++ = '_';
- *p++ = *in;
- }
- *p = '\0';
-
- return out;
-}
-
/* Formats a value according to VAR's print format and strips white space
appropriately for VAR's type. That is, if VAR is numeric, strips leading
white space (because numbers are right-justified within their fields), and
}
-/* This function must be used whenever a filename generated by glib,
- (eg, from gtk_file_chooser_get_filename) and passed to the C library,
- (eg through a pspp syntax string).
-*/
-gchar *
-convert_glib_filename_to_system_filename (const gchar *fname, GError **err)
-{
- gchar *output_name;
-
-#ifdef G_OS_WIN32
- const gchar *target_encoding;
- gchar *utf8_name = NULL;
-
- g_get_charset (&target_encoding);
-
- output_name = g_convert (fname, -1, target_encoding,
- "UTF-8", NULL, NULL, err);
-#else
- output_name = xstrdup (fname);
-#endif
-
- return output_name;
-}
-
-
-
#define _(msgid) gettext (msgid)
#define N_(msgid) msgid
return param;
}
-char *escape_underscores (const char *);
-
gchar * value_to_text (union value v, const struct variable *);
gchar * value_to_text__ (union value v, const struct fmt_spec *,
const char *encoding);
union value *text_to_value__ (const gchar *text, const struct fmt_spec *,
const gchar *encoding, union value *);
-gchar * convert_glib_filename_to_system_filename (const gchar *fname,
- GError **err);
-
/* Create a deep copy of SRC */
GtkListStore * clone_list_store (const GtkListStore *src);