module Conversion.ByteString () where
import BasePrelude
import Conversion
import qualified Data.ByteString as BS
import qualified Data.ByteString.Lazy as BL
import qualified Data.ByteString.Builder as BB
instance Conversion BS.ByteString [Word8] where
convert = BS.unpack
instance Conversion BS.ByteString BL.ByteString where
convert = BL.fromStrict
instance Conversion BS.ByteString BB.Builder where
convert = BB.byteString
instance Conversion BL.ByteString [Word8] where
convert = BL.unpack
instance Conversion BL.ByteString BS.ByteString where
convert = BL.toStrict
instance Conversion BL.ByteString BB.Builder where
convert = BB.lazyByteString
instance Conversion BB.Builder [Word8] where
convert = convert . BB.toLazyByteString
instance Conversion BB.Builder BS.ByteString where
convert = convert . BB.toLazyByteString
instance Conversion BB.Builder BL.ByteString where
convert = BB.toLazyByteString
instance Conversion [Word8] BS.ByteString where
convert = BS.pack
instance Conversion [Word8] BL.ByteString where
convert = BL.pack
instance Conversion [Word8] BB.Builder where
convert = foldMap BB.word8
instance Conversion Word8 BS.ByteString where
convert = BS.singleton
instance Conversion Word8 BL.ByteString where
convert = BL.singleton
instance Conversion Word8 BB.Builder where
convert = BB.word8