module Program.Mighty.ByteString where import Data.ByteString (ByteString) import qualified Data.ByteString.Char8 as BS -- | Converting showalbe data to 'ByteString'. bshow :: Show a => a -> ByteString bshow :: forall a. Show a => a -> ByteString bshow = String -> ByteString BS.pack forall b c a. (b -> c) -> (a -> b) -> a -> c . forall a. Show a => a -> String show infixr 5 +++ -- | Appending two 'ByteString'. (+++) :: ByteString -> ByteString -> ByteString +++ :: ByteString -> ByteString -> ByteString (+++) = ByteString -> ByteString -> ByteString BS.append