module Data.StorableVector.Memory where import Foreign.Storable (Storable) import qualified Foreign.ForeignPtr as F {-# INLINE mallocForeignPtrArray #-} mallocForeignPtrArray :: Storable a => Int -> IO (F.ForeignPtr a) mallocForeignPtrArray :: forall a. Storable a => Int -> IO (ForeignPtr a) mallocForeignPtrArray = forall a. Storable a => Int -> IO (ForeignPtr a) F.mallocForeignPtrArray