From 158e71360bfad8b8ee037e0f6ab81a6e8ced2e03 Mon Sep 17 00:00:00 2001
From: "Ben.Lippmeier@anu.edu.au" <unknown>
Date: Tue, 17 Nov 2009 05:06:48 +0000
Subject: [PATCH] Windows DLLs: disable extra shutdownHaskell() when unloading
 the RTS DLL

---
 rts/RtsDllMain.c |    6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/rts/RtsDllMain.c b/rts/RtsDllMain.c
index 250b63e..3e5af68 100644
--- a/rts/RtsDllMain.c
+++ b/rts/RtsDllMain.c
@@ -30,7 +30,11 @@ DllMain ( HINSTANCE hInstance
    *       you pass to the RTS.
    */
   switch (reason) {
-  case DLL_PROCESS_DETACH: shutdownHaskell();
+  
+  // shutdownHaskelAndExit() is already being called,
+  //	so I don't think we need this. BL 2009/11/17
+ 
+  //case DLL_PROCESS_DETACH: shutdownHaskell();
   }
   return TRUE;
 }
-- 
1.7.10.4