- *n_values = class->n_values;
- return class->values;
-}
-
-GFlagsValue*
-g_flags_class_values (GFlagsClass *class, guint *n_values)
-{
- *n_values = class->n_values;
- return class->values;
+ gchar *msg = g_strdup_vprintf (format, args1);
+ lispobj lisp_msg = alloc_string (msg);
+ g_free (msg);
+
+ funcall3 (log_handler, alloc_string (log_domain),
+ alloc_number ((unsigned int)log_level), lisp_msg);