summaryrefslogtreecommitdiff
path: root/packages/base/src
diff options
context:
space:
mode:
authorKevin Slagle <kjslag@gmail.com>2016-10-26 22:56:24 -0700
committerKevin Slagle <kjslag@gmail.com>2016-10-26 22:56:24 -0700
commitc1fdf466a51401bb4e3a36a3398e155361477330 (patch)
treee72d8a63fd5b6f57f7f73ac22789c01b212d2164 /packages/base/src
parent3d7aa0b176573422e1a569078195407b168f8b2e (diff)
inline dim and subVector since these are inlined by the vector package
Diffstat (limited to 'packages/base/src')
-rw-r--r--packages/base/src/Internal/Vector.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/packages/base/src/Internal/Vector.hs b/packages/base/src/Internal/Vector.hs
index c4a310d..67d0416 100644
--- a/packages/base/src/Internal/Vector.hs
+++ b/packages/base/src/Internal/Vector.hs
@@ -62,6 +62,7 @@ ti = fromIntegral
62-- | Number of elements 62-- | Number of elements
63dim :: (Storable t) => Vector t -> Int 63dim :: (Storable t) => Vector t -> Int
64dim = Vector.length 64dim = Vector.length
65{-# INLINE dim #-}
65 66
66 67
67-- C-Haskell vector adapter 68-- C-Haskell vector adapter
@@ -139,6 +140,7 @@ subVector :: Storable t => Int -- ^ index of the starting element
139 -> Vector t -- ^ source 140 -> Vector t -- ^ source
140 -> Vector t -- ^ result 141 -> Vector t -- ^ result
141subVector = Vector.slice 142subVector = Vector.slice
143{-# INLINE subVector #-}
142 144
143 145
144 146