summaryrefslogtreecommitdiff
path: root/lib/Data/Packed
diff options
context:
space:
mode:
authorBas van Dijk <v.dijk.bas@gmail.com>2011-12-24 21:39:19 +0100
committerBas van Dijk <v.dijk.bas@gmail.com>2011-12-24 21:39:19 +0100
commit43956aff360476d095b03fbbdef20f18df2dc933 (patch)
tree950e968a34d46011476bb7fe0adf25c2f6c37ae4 /lib/Data/Packed
parent3831bed8a046e53483292a0771ee1ff5b3fecf7a (diff)
Warning police for GHC < 7.4
The previous patch got rid of warnings when ghc >= 7.4. Unfortunately this caused warnings on GHC < 7.4. This patch removes warnings on all versions of GHC.
Diffstat (limited to 'lib/Data/Packed')
-rw-r--r--lib/Data/Packed/Internal/Common.hs2
-rw-r--r--lib/Data/Packed/Internal/Matrix.hs2
-rw-r--r--lib/Data/Packed/Internal/Vector.hs2
3 files changed, 3 insertions, 3 deletions
diff --git a/lib/Data/Packed/Internal/Common.hs b/lib/Data/Packed/Internal/Common.hs
index 60e3444..a8c3c3e 100644
--- a/lib/Data/Packed/Internal/Common.hs
+++ b/lib/Data/Packed/Internal/Common.hs
@@ -27,7 +27,7 @@ module Data.Packed.Internal.Common(
27import Foreign 27import Foreign
28import Control.Monad(when) 28import Control.Monad(when)
29import Foreign.C.String(peekCString) 29import Foreign.C.String(peekCString)
30import Foreign.C.Types(CInt(..), CChar) 30import Foreign.C.Types
31import Foreign.Storable.Complex() 31import Foreign.Storable.Complex()
32import Data.List(transpose,intersperse) 32import Data.List(transpose,intersperse)
33import Control.Exception as E 33import Control.Exception as E
diff --git a/lib/Data/Packed/Internal/Matrix.hs b/lib/Data/Packed/Internal/Matrix.hs
index 9fbaf6d..5d05e50 100644
--- a/lib/Data/Packed/Internal/Matrix.hs
+++ b/lib/Data/Packed/Internal/Matrix.hs
@@ -44,7 +44,7 @@ import Foreign.Marshal.Array(newArray)
44import Foreign.Ptr(Ptr, castPtr) 44import Foreign.Ptr(Ptr, castPtr)
45import Foreign.Storable(Storable, peekElemOff, pokeElemOff, poke, sizeOf) 45import Foreign.Storable(Storable, peekElemOff, pokeElemOff, poke, sizeOf)
46import Data.Complex(Complex) 46import Data.Complex(Complex)
47import Foreign.C.Types(CInt(..), CChar) 47import Foreign.C.Types
48import Foreign.C.String(newCString) 48import Foreign.C.String(newCString)
49import System.IO.Unsafe(unsafePerformIO) 49import System.IO.Unsafe(unsafePerformIO)
50 50
diff --git a/lib/Data/Packed/Internal/Vector.hs b/lib/Data/Packed/Internal/Vector.hs
index 5062bc0..b9dba8e 100644
--- a/lib/Data/Packed/Internal/Vector.hs
+++ b/lib/Data/Packed/Internal/Vector.hs
@@ -38,7 +38,7 @@ import Foreign.ForeignPtr(ForeignPtr, castForeignPtr)
38import Foreign.Ptr(Ptr) 38import Foreign.Ptr(Ptr)
39import Foreign.Storable(Storable, peekElemOff, pokeElemOff, sizeOf) 39import Foreign.Storable(Storable, peekElemOff, pokeElemOff, sizeOf)
40import Foreign.C.String 40import Foreign.C.String
41import Foreign.C.Types(CInt(..), CChar) 41import Foreign.C.Types
42import Data.Complex 42import Data.Complex
43import Control.Monad(when) 43import Control.Monad(when)
44import System.IO.Unsafe(unsafePerformIO) 44import System.IO.Unsafe(unsafePerformIO)