-- | Conversions from 'Data.ByteString.Short.ShortByteString'.
module Unwitch.Convert.ShortByteString
  ( toByteString
  , toWord8s
  , fromWord8s
  )
where

import Data.ByteString (ByteString)
import Data.ByteString.Short (ShortByteString)
import Data.ByteString.Short qualified as SBS
import Data.Word (Word8)

toByteString :: ShortByteString -> ByteString
toByteString :: ShortByteString -> ByteString
toByteString = ShortByteString -> ByteString
SBS.fromShort

toWord8s :: ShortByteString -> [Word8]
toWord8s :: ShortByteString -> [Word8]
toWord8s = ShortByteString -> [Word8]
SBS.unpack

fromWord8s :: [Word8] -> ShortByteString
fromWord8s :: [Word8] -> ShortByteString
fromWord8s = [Word8] -> ShortByteString
SBS.pack