From faa259203e54aa3fb8cf6a8ac60d236fd7eb760c Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Thu, 26 Jun 2008 21:06:09 +0000
Subject: [PATCH] Automatic initialization of GC library uses ECL's usual flags

---
 src/gc/win32_threads.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/gc/win32_threads.c b/src/gc/win32_threads.c
index 742b3bb15..239d2d7ae 100755
--- a/src/gc/win32_threads.c
+++ b/src/gc/win32_threads.c
@@ -545,6 +545,8 @@ int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
     DWORD thread_id;
 
     /* initialize everything */
+    GC_all_interior_pointers = 0;
+    GC_no_dls = 1;
     GC_init();
 
     /* start the main thread */
@@ -764,6 +766,8 @@ BOOL WINAPI DllMain(HINSTANCE inst, ULONG reason, LPVOID reserved)
 {
   switch (reason) {
   case DLL_PROCESS_ATTACH:
+    GC_no_dls = 1;
+    GC_all_interior_pointers = 0;
     GC_init();	/* Force initialization before thread attach.	*/
     /* fall through */
   case DLL_THREAD_ATTACH: