[commit: base] master: Warning police (ae6c9e8)

[Manuel Chakravarty]

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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/ae6c9e8c75027bc9352ad9d6c79ead4a355155bd

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

commit ae6c9e8c75027bc9352ad9d6c79ead4a355155bd
Author: Manuel M T Chakravarty <chak at cse.unsw.edu.au>
Date:   Sun Jul 31 18:22:45 2011 +1000

    Warning police

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

 GHC/Stats.hsc |    3 +--
 1 files changed, 1 insertions(+), 2 deletions(-)

diff --git a/GHC/Stats.hsc b/GHC/Stats.hsc
index b929b54..676caf6 100644
--- a/GHC/Stats.hsc
+++ b/GHC/Stats.hsc
@@ -7,11 +7,9 @@ module GHC.Stats
     , getGCStats
 ) where
 
-import Foreign.C.Types
 import Foreign.Marshal.Alloc
 import Foreign.Storable
 import Foreign.Ptr
-import System.Mem
 import Data.Int
 
 #include "Rts.h"
@@ -65,6 +63,7 @@ data GCStats = GCStats
 -- | Retrieves garbage collection and memory statistics as of the last
 -- garbage collection.  If you would like your statistics as recent as
 -- possible, first run a 'performGC' from "System.Mem".
+getGCStats :: IO GCStats
 getGCStats = allocaBytes (#size GCStats) $ \p -> do
     getGCStats_ p
     bytes_allocated <- (# peek GCStats, bytes_allocated) p