{-# OPTIONS_GHC -fno-warn-orphans #-}

module Blessings.ByteString.Lazy
    ( module Blessings
    ) where

import Blessings
import Blessings.Internal
import qualified Data.ByteString.Lazy.Char8 as L


instance Blessable L.ByteString where
  length = fromIntegral . L.length
  drop = L.drop . fromIntegral
  take = L.take . fromIntegral
  intercalate = L.intercalate
  fromWord8 = L.pack . show