From f6165587bada5f0bffc8704f28cbaa1fe4112212 Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Mon, 28 Aug 2017 11:24:44 -0700 Subject: [PATCH] glib: Name thread. --- src/glib/glib-thread.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/glib/glib-thread.scm b/src/glib/glib-thread.scm index 3d6493b23..2b1dd8051 100644 --- a/src/glib/glib-thread.scm +++ b/src/glib/glib-thread.scm @@ -83,7 +83,8 @@ Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA. (%trace ";run-glib yields\n") (yield-current-thread) (%trace ";run-glib loops\n") - (glib-thread-loop)))))) + (glib-thread-loop)))) + 'glib)) (detach-thread glib-thread)) (define (exit-glib-thread) -- 2.25.1