Add StrictByteString & LazyByteString type aliases

haskell · Mar 18, 2021 · 57d92a1 · 57d92a1
1 parent b639596
commit 57d92a1
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 0 deletions.
diff --git a/Data/ByteString/Internal.hs b/Data/ByteString/Internal.hs
@@ -32,6 +32,8 @@ module Data.ByteString.Internal (
         , PS -- backwards compatibility shim
         ),
 
+        StrictByteString,
+
         -- * Internal indexing
         findIndexOrLength,
 
@@ -201,6 +203,8 @@ data ByteString = BS {-# UNPACK #-} !(ForeignPtr Word8) -- payload
                      -- ^ @since 0.11.0.0
     deriving (Typeable)
 
+-- | Type synonym for the strict flavour of ByteString
+type StrictByteString = ByteString
 
 -- |
 -- @'PS' foreignPtr offset length@ represents a 'ByteString' with data

diff --git a/Data/ByteString/Lazy/Internal.hs b/Data/ByteString/Lazy/Internal.hs
@@ -24,6 +24,7 @@ module Data.ByteString.Lazy.Internal (
 
         -- * The lazy @ByteString@ type and representation
         ByteString(..),
+        LazyByteString,
         chunk,
         foldrChunks,
         foldlChunks,
@@ -80,6 +81,9 @@ data ByteString = Empty | Chunk {-# UNPACK #-} !S.ByteString ByteString
     deriving (Typeable)
 -- See 'invariant' function later in this module for internal invariants.
 
+-- | Type synonym for the lazy flavour of ByteString
+type LazyByteString = ByteString
+
 instance Eq  ByteString where
     (==)    = eq