@@ -93,7 +93,7 @@ module Streamly.Internal.Data.Array.Foreign
9393 , asBytes
9494 , castUnsafe
9595 , asPtrUnsafe
96− , unsafeAsCString -- asCStringUnsafe?
96+ , asCStringUnsafe
9797 , A.unsafeFreeze -- asImmutableUnsafe?
9898 , A.unsafeThaw -- asMutableUnsafe?
9999
@@ -562,8 +562,8 @@ cast arr =
562562--
563563-- /Pre-release/
564564--
565−unsafeAsCString :: Array a -> (CString -> IO b) -> IO b
566−unsafeAsCString arr act = do
565+asCStringUnsafe :: Array a -> (CString -> IO b) -> IO b
566+asCStringUnsafe arr act = do
567567 let arr1 = asBytes arr <> A.fromList [0]
568568 asPtrUnsafe arr1 $ \ptr -> act (castPtr ptr)
569569