Ensure GC initialized when atfork_prepare is called by client

Otherwise, if THREAD_LOCAL_ALLOC, GC_remove_all_threads_but_me would
not find the current thread descriptor in GC_threads.

* pthread_support.c [CAN_HANDLE_FORK] (GC_atfork_prepare): Call GC_init
if not GC_is_initialized.
* win32_threads.c [CAN_HANDLE_FORK] (GC_atfork_prepare): Likewise.

diff --git a/pthread_support.c b/pthread_support.c
index e406322e6e9687ec01b17335328b7b5c9d144edb..effd850da495477708d094fd169ebf0280fce756 100644 (file)
--- a/pthread_support.c
+++ b/pthread_support.c
@@ -1061,6 +1061,7 @@ static void fork_child_proc(void)
   /* Routines for fork handling by client (no-op if pthread_atfork works). */
   GC_API void GC_CALL GC_atfork_prepare(void)
   {
+    if (!EXPECT(GC_is_initialized, TRUE)) GC_init();
 #   if defined(GC_DARWIN_THREADS) && defined(MPROTECT_VDB)
       if (GC_dirty_maintained) {
         GC_ASSERT(0 == GC_handle_fork);

diff --git a/win32_threads.c b/win32_threads.c
index 55658416e76442fa914a07f806d9069e193ae3ed..ae643ba019d05f39a8e5b8d14f8cd134da6e4bd5 100644 (file)
--- a/win32_threads.c
+++ b/win32_threads.c
@@ -1110,6 +1110,7 @@ GC_API void * GC_CALL GC_call_with_gc_active(GC_fn_type fn,
   /* Routines for fork handling by client (no-op if pthread_atfork works). */
   GC_API void GC_CALL GC_atfork_prepare(void)
   {
+    if (!EXPECT(GC_is_initialized, TRUE)) GC_init();
     if (GC_handle_fork <= 0)
       fork_prepare_proc();
   }