[commit: base] master: Remove unnecessary import (Windows only) (3a9ff6b)

[Simon Peyton Jones]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/base

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/3a9ff6bed8c15329e980702a96bc3ef5324e9c33

>---------------------------------------------------------------

commit 3a9ff6bed8c15329e980702a96bc3ef5324e9c33
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Fri Jul 29 11:19:42 2011 +0100

    Remove unnecessary import (Windows only)
    
    ...and add a comment

>---------------------------------------------------------------

 GHC/ConsoleHandler.hs |   12 +++++++-----
 1 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/GHC/ConsoleHandler.hs b/GHC/ConsoleHandler.hs
index a72b2b2..95810d6 100644
--- a/GHC/ConsoleHandler.hs
+++ b/GHC/ConsoleHandler.hs
@@ -29,6 +29,13 @@ module GHC.ConsoleHandler
 
 {-
 #include "rts/Signals.h"
+
+Note: this #include is inside a Haskell comment
+      but it brings into scope some #defines
+      that are used by CPP below (eg STG_SIG_DFL).
+      Having it in a comment means that there's no
+      danger that C-like crap will be misunderstood
+      by GHC
 -}
 
 import Foreign
@@ -41,11 +48,6 @@ import GHC.Conc
 import Control.Concurrent.MVar
 import Data.Typeable
 
-#ifdef mingw32_HOST_OS
-import Data.Maybe
-import GHC.Base
-#endif
-
 data Handler
  = Default
  | Ignore