diff --git a/packages/gtk/GtkImpl.st b/packages/gtk/GtkImpl.st
index 55be9ec..62a5881 100644
--- a/packages/gtk/GtkImpl.st
+++ b/packages/gtk/GtkImpl.st
@@ -517,8 +517,9 @@ Gtk class extend [
 
 	[
             [sem wait.
-            [context acquireWait; dispatch]
-                ensure: [context releaseSignal].
+            "[context acquireWait; dispatch]
+                ensure: [context releaseSignal]."
+	    context handle.
             loop isRunning] whileTrue]
                  ensure: [loop unref]
     ]
diff --git a/packages/gtk/MoreFuncs.st b/packages/gtk/MoreFuncs.st
index 6ef5e78..36726f8 100644
--- a/packages/gtk/MoreFuncs.st
+++ b/packages/gtk/MoreFuncs.st
@@ -1,4 +1,11 @@
 GMainContext extend [
+
+    handle [
+        <category: 'C call-outs'>
+        <asyncCCall: 'gstGtkMainContextHandle' args: #(#self )>
+
+    ]
+
     dispatch [
 	<category: 'C call-outs'>
 	<asyncCCall: 'g_main_context_dispatch' args: #(#self )>
diff --git a/packages/gtk/gst-gtk.c b/packages/gtk/gst-gtk.c
index cc5456c..aac1e2d 100644
--- a/packages/gtk/gst-gtk.c
+++ b/packages/gtk/gst-gtk.c
@@ -745,6 +745,14 @@ main_context_release_signal (GMainContext *context)
   g_mutex_unlock (mutex);
 }
 
+static void
+main_context_handle (GMainContext *context)
+{
+  main_context_acquire_wait (context);
+  g_main_context_dispatch (context);
+  main_context_release_signal (context);
+}
+
 static gpointer
 main_loop_thread (gpointer semaphore)
 {
@@ -1143,6 +1151,7 @@ gst_initModule (proxy)
   _gst_vm_proxy->defineCFunc ("gstGtkMain", create_main_loop_thread);
   _gst_vm_proxy->defineCFunc ("gstGtkMainContextAcquireWait", main_context_acquire_wait);
   _gst_vm_proxy->defineCFunc ("gstGtkMainContextReleaseSignal", main_context_release_signal);
+  _gst_vm_proxy->defineCFunc ("gstGtkMainContextHandle", main_context_handle);
   _gst_vm_proxy->defineCFunc ("gstGtkGetProperty", object_get_property);
   _gst_vm_proxy->defineCFunc ("gstGtkSetProperty", object_set_property);
   _gst_vm_proxy->defineCFunc ("gstGtkGetChildProperty", container_get_child_property);