X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=tests%2Fmain.c;h=9ed6158f2245e49593f63e87e820ec33a8cf463d;hb=0619b371ff5c35ce062557c9ecf478379020673b;hp=4acd4ed4072d13e6e312462c0ee338eb6e91a415;hpb=4540c325c8fe9f9d8891435747d4330758627c79;p=rodin%2Fchimara.git diff --git a/tests/main.c b/tests/main.c index 4acd4ed..9ed6158 100644 --- a/tests/main.c +++ b/tests/main.c @@ -62,6 +62,24 @@ on_stopped(ChimaraGlk *glk) g_printerr("Stopped!\n"); } +static void +on_char_input(ChimaraGlk *glk, guint32 window_rock, guint keysym) +{ + g_printerr("Character input in window %d: key %d\n", window_rock, keysym); +} + +static void +on_line_input(ChimaraGlk *glk, guint32 window_rock, gchar *text) +{ + g_printerr("Line input in window %d: '%s'\n", window_rock, text); +} + +static void +on_text_buffer_output(ChimaraGlk *glk, guint32 window_rock, gchar *text) +{ + g_printerr("Text buffer output in window %d: '%s'\n", window_rock, text); +} + static GObject * load_object(const gchar *name) { @@ -115,6 +133,9 @@ create_window(void) chimara_glk_set_monospace_font_string(CHIMARA_GLK(glk), "Monospace 12"); g_signal_connect(glk, "started", G_CALLBACK(on_started), NULL); g_signal_connect(glk, "stopped", G_CALLBACK(on_stopped), NULL); + g_signal_connect(glk, "char-input", G_CALLBACK(on_char_input), NULL); + g_signal_connect(glk, "line-input", G_CALLBACK(on_line_input), NULL); + g_signal_connect(glk, "text-buffer-output", G_CALLBACK(on_text_buffer_output), NULL); GtkBox *vbox = GTK_BOX( gtk_builder_get_object(builder, "vbox") ); if(vbox == NULL) @@ -154,7 +175,7 @@ main(int argc, char *argv[]) g_object_unref( G_OBJECT(builder) ); g_object_unref( G_OBJECT(uimanager) ); - if( !chimara_glk_run(CHIMARA_GLK(glk), "../interpreters/glulxe/.libs/glulxe.so", argc, argv, &error) ) { + if( !chimara_glk_run(CHIMARA_GLK(glk), "../interpreters/frotz/.libs/frotz.so", argc, argv, &error) ) { error_dialog(GTK_WINDOW(window), error, "Error starting Glk library: "); return 1; }