diff options
Diffstat (limited to 'packages/base/src/Data/Packed/Internal')
-rw-r--r-- | packages/base/src/Data/Packed/Internal/Vector.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/packages/base/src/Data/Packed/Internal/Vector.hs b/packages/base/src/Data/Packed/Internal/Vector.hs index ac35596..ac019a8 100644 --- a/packages/base/src/Data/Packed/Internal/Vector.hs +++ b/packages/base/src/Data/Packed/Internal/Vector.hs | |||
@@ -25,7 +25,7 @@ module Data.Packed.Internal.Vector ( | |||
25 | unsafeToForeignPtr, | 25 | unsafeToForeignPtr, |
26 | unsafeFromForeignPtr, | 26 | unsafeFromForeignPtr, |
27 | unsafeWith, | 27 | unsafeWith, |
28 | CInt,Idxs | 28 | CInt, I |
29 | ) where | 29 | ) where |
30 | 30 | ||
31 | import Data.Packed.Internal.Common | 31 | import Data.Packed.Internal.Common |
@@ -56,8 +56,7 @@ import Data.Vector.Storable(Vector, | |||
56 | unsafeFromForeignPtr, | 56 | unsafeFromForeignPtr, |
57 | unsafeWith) | 57 | unsafeWith) |
58 | 58 | ||
59 | 59 | type I = CInt | |
60 | type Idxs = Vector CInt | ||
61 | 60 | ||
62 | -- | Number of elements | 61 | -- | Number of elements |
63 | dim :: (Storable t) => Vector t -> Int | 62 | dim :: (Storable t) => Vector t -> Int |