diff --git a/Data/Vector/Storable/Internal.hs b/Data/Vector/Storable/Internal.hs index 69a46d84215b7ed6660429d3c90cfa22673a8202..0ed2188e72742ef36838c558fa9d578bee3aacd3 100644 --- a/Data/Vector/Storable/Internal.hs +++ b/Data/Vector/Storable/Internal.hs @@ -14,8 +14,8 @@ module Data.Vector.Storable.Internal ( getPtr, setPtr, updPtr ) where -import Foreign.ForeignPtr -import Foreign.Ptr +import Foreign.ForeignPtr () +import Foreign.Ptr () import GHC.ForeignPtr ( ForeignPtr(..) ) import GHC.Ptr ( Ptr(..) ) diff --git a/Data/Vector/Storable/Mutable.hs b/Data/Vector/Storable/Mutable.hs index cfdf6e57590342ee397ed13fb535843eb266c554..5e3cd9aac141bac7242c733c91abef2df8482de0 100644 --- a/Data/Vector/Storable/Mutable.hs +++ b/Data/Vector/Storable/Mutable.hs @@ -82,7 +82,7 @@ import GHC.Prim (byteArrayContents#, unsafeCoerce#) import GHC.ForeignPtr #endif -import Foreign.Ptr +import Foreign.Ptr () import Foreign.Marshal.Array ( advancePtr, copyArray, moveArray ) import Control.Monad.Primitive