Skip to content

Commit 5a6541a

Browse files
Merge pull request #31 from nilcons/primitive_constr
Export Primitive Vector's constructor
2 parents 2000cc1 + c9d0eaf commit 5a6541a

File tree

2 files changed

+3
-3
lines changed

2 files changed

+3
-3
lines changed

Data/Vector/Primitive.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -17,7 +17,7 @@
1717

1818
module Data.Vector.Primitive (
1919
-- * Primitive vectors
20-
Vector, MVector(..), Prim,
20+
Vector(..), MVector(..), Prim,
2121

2222
-- * Accessors
2323

@@ -173,7 +173,7 @@ import qualified GHC.Exts as Exts
173173
-- | Unboxed vectors of primitive types
174174
data Vector a = Vector {-# UNPACK #-} !Int
175175
{-# UNPACK #-} !Int
176-
{-# UNPACK #-} !ByteArray
176+
{-# UNPACK #-} !ByteArray -- ^ offset, length, underlying byte array
177177
deriving ( Typeable )
178178

179179
instance NFData (Vector a)

Data/Vector/Primitive/Mutable.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -69,7 +69,7 @@ import Data.Typeable ( Typeable )
6969
-- | Mutable vectors of primitive types.
7070
data MVector s a = MVector {-# UNPACK #-} !Int
7171
{-# UNPACK #-} !Int
72-
{-# UNPACK #-} !(MutableByteArray s)
72+
{-# UNPACK #-} !(MutableByteArray s) -- ^ offset, length, underlying mutable byte array
7373
deriving ( Typeable )
7474

7575
type IOVector = MVector RealWorld

0 commit comments

Comments
 (0)