[Guile-commits] GNU Guile branch, stable-2.0, updated. v2.0.3-216-ge1fbe71

[Andy Wingo]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "GNU Guile".

http://git.savannah.gnu.org/cgit/guile.git/commit/?id=e1fbe716e8596b7027af57623ebc72a0c6393187

The branch, stable-2.0 has been updated
       via  e1fbe716e8596b7027af57623ebc72a0c6393187 (commit)
      from  07c2ca0f0d56ebe515cb4ee9f1c3f4b3e824ca7b (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit e1fbe716e8596b7027af57623ebc72a0c6393187
Author: Andy Wingo <address@hidden>
Date:   Mon Jan 30 16:42:09 2012 +0100

    fix hook invocation during thread guilification
    
    * libguile/gc.c (run_before_gc_c_hook): Don't run pre-GC hooks from a
      thread that is in the process of guilification.

-----------------------------------------------------------------------

Summary of changes:
 libguile/gc.c |    4 ++++
 1 files changed, 4 insertions(+), 0 deletions(-)

diff --git a/libguile/gc.c b/libguile/gc.c
index 7816801..fd37046 100644
--- a/libguile/gc.c
+++ b/libguile/gc.c
@@ -234,6 +234,10 @@ scm_t_c_hook scm_after_gc_c_hook;
 static void
 run_before_gc_c_hook (void)
 {
+  if (!SCM_I_CURRENT_THREAD)
+    /* GC while a thread is spinning up; punt.  */
+    return;
+
   scm_c_hook_run (&scm_before_gc_c_hook, NULL);
 }
 


hooks/post-receive
-- 
GNU Guile