summaryrefslogtreecommitdiff
path: root/packages/base/src/Internal/Vectorized.hs
diff options
context:
space:
mode:
authorAlberto Ruiz <aruiz@um.es>2015-06-06 13:10:09 +0200
committerAlberto Ruiz <aruiz@um.es>2015-06-06 13:10:09 +0200
commitde69c1cd115cf2702f4ef6c6932d25ae52375e83 (patch)
tree03b0b87816a380bf5628ad791b2f034529eaf4e4 /packages/base/src/Internal/Vectorized.hs
parent3e4cdbadb0277010b0e089615e3053f6705332cb (diff)
remove Tools
Diffstat (limited to 'packages/base/src/Internal/Vectorized.hs')
-rw-r--r--packages/base/src/Internal/Vectorized.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/packages/base/src/Internal/Vectorized.hs b/packages/base/src/Internal/Vectorized.hs
index ddb14c9..b9b8239 100644
--- a/packages/base/src/Internal/Vectorized.hs
+++ b/packages/base/src/Internal/Vectorized.hs
@@ -14,10 +14,8 @@
14 14
15module Internal.Vectorized where 15module Internal.Vectorized where
16 16
17import Internal.Tools
18import Internal.Vector 17import Internal.Vector
19import Internal.Devel 18import Internal.Devel
20
21import Data.Complex 19import Data.Complex
22import Foreign.Marshal.Alloc(free,malloc) 20import Foreign.Marshal.Alloc(free,malloc)
23import Foreign.Marshal.Array(newArray,copyArray) 21import Foreign.Marshal.Array(newArray,copyArray)
@@ -26,9 +24,8 @@ import Foreign.Storable(peek,Storable)
26import Foreign.C.Types 24import Foreign.C.Types
27import Foreign.C.String 25import Foreign.C.String
28import System.IO.Unsafe(unsafePerformIO) 26import System.IO.Unsafe(unsafePerformIO)
29
30import Control.Monad(when) 27import Control.Monad(when)
31import Data.Vector.Storable ( unsafeWith ) 28
32 29
33 30
34fromei x = fromIntegral (fromEnum x) :: CInt 31fromei x = fromIntegral (fromEnum x) :: CInt