diff options
Diffstat (limited to 'libguile/threads.c')
-rw-r--r-- | libguile/threads.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/libguile/threads.c b/libguile/threads.c index 0c68221d7..33f092768 100644 --- a/libguile/threads.c +++ b/libguile/threads.c @@ -411,6 +411,9 @@ create_thread (scm_t_catch_body body, void *body_data, all_threads = new_threads; thread_count++; scm_i_plugin_mutex_unlock (&thread_admin_mutex); + + scm_remember_upto_here_1 (root); + scm_i_enter_guile (parent); } |