Updated interpreters

[projects/chimara/chimara.git] / libchimara / garglk.c

diff --git a/libchimara/garglk.c b/libchimara/garglk.c
index 181414e5227bf5db061429aefaef59b15a4d107d..e7333a6d2bc1cfaa575b04c9665659bf978f47e3 100644 (file)
--- a/libchimara/garglk.c
+++ b/libchimara/garglk.c
@@ -79,7 +79,6 @@ garglk_set_program_info(const char *info)
 void 
 garglk_set_story_name(const char *name)
 {
-       g_printerr("garglk_set_story_name(\"%s\");\n", name);
        ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
        glk_data->story_name = g_strdup(name);
        g_object_notify(G_OBJECT(glk_data->self), "story-name");
@@ -159,6 +158,14 @@ garglk_unput_string_uni(glui32 *str)
        WARNING(_("Not implemented"));
 }
 
+/* TODO document */
+void
+garglk_set_zcolors_stream(strid_t str, glui32 fg, glui32 bg)
+{
+       VALID_STREAM(str, return);
+       WARNING(_("Not implemented"));
+}
+
 /**
  * garglk_set_zcolors:
  * @fg: one of the <code>zcolor_</code> constants.
@@ -179,7 +186,7 @@ garglk_set_zcolors(glui32 fg, glui32 bg)
        g_return_if_fail(glk_data->current_stream != NULL);
        g_return_if_fail(glk_data->current_stream->window != NULL);
        
-       WARNING(_("Not implemented"));
+       garglk_set_zcolors_stream(glk_data->current_stream, fg, bg);
 }
 
 static void
@@ -188,6 +195,17 @@ apply_reverse_color(GtkTextTag *tag, gpointer data)
        g_object_set_data( G_OBJECT(tag), "reverse_color", data );
 }
 
+/* TODO document */
+void
+garglk_set_reversevideo_stream(strid_t str, glui32 reverse)
+{
+       VALID_STREAM(str, return);
+       
+       GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(str->window->widget) );
+       GtkTextTagTable *tags = gtk_text_buffer_get_tag_table(buffer);
+       gtk_text_tag_table_foreach( tags, apply_reverse_color, GINT_TO_POINTER(reverse) );
+}
+
 /**
  * garglk_set_reversevideo:
  * @reverse: nonzero for reverse colors, zero for normal colors.
@@ -203,7 +221,5 @@ garglk_set_reversevideo(glui32 reverse)
        g_return_if_fail(glk_data->current_stream != NULL);
        g_return_if_fail(glk_data->current_stream->window != NULL);
 
-       GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(glk_data->current_stream->window->widget) );
-       GtkTextTagTable *tags = gtk_text_buffer_get_tag_table(buffer);
-       gtk_text_tag_table_foreach( tags, apply_reverse_color, GINT_TO_POINTER(reverse) );
+       garglk_set_reversevideo_stream(glk_data->current_stream, reverse);
 }