3aba909 · streamly · git.iko.soy

git.iko.soy/streamly

Add INLINE to default instance methods of Unbox

commit3aba90980d9ebe12ee3e2bee6980bb4fea2752b2 authorHarendra Kumar <harendra@composewell.com> dateSun 13 Aug 2023, 03:48 (3 years ago) parent3a0562a

1 file changed+3

unifiedsplit

core/src/Streamly/Internal/Data/Unbox.hs+3

@@ -344,6 +344,7 @@ class Unbox a where

344344 -- | Get the size. Size cannot be zero.

345345 sizeOf :: Proxy a -> Int

346346

347+ {-# INLINE sizeOf #-}

347348 default sizeOf :: (SizeOfRep (Rep a)) => Proxy a -> Int

348349 sizeOf = genericSizeOf

349350

@@ -354,6 +355,7 @@ class Unbox a where

354355 -- of the array, the caller must not assume that.

355356 peekByteIndex :: Int -> MutableByteArray -> IO a

356357

358+ {-# INLINE peekByteIndex #-}

357359 default peekByteIndex :: (Generic a, PeekRep (Rep a)) =>

358360 Int -> MutableByteArray -> IO a

359361 peekByteIndex i arr = genericPeekByteIndex arr i

@@ -365,6 +367,7 @@ class Unbox a where

365367 -- of the array, the caller must not assume that.

366368 pokeByteIndex :: Int -> MutableByteArray -> a -> IO ()

367369

370+ {-# INLINE pokeByteIndex #-}

368371 default pokeByteIndex :: (Generic a, PokeRep (Rep a)) =>

369372 Int -> MutableByteArray -> a -> IO ()