module Polysemy.Http.Data.HttpError where data HttpError = ChunkFailed Text | Internal Text deriving (HttpError -> HttpError -> Bool (HttpError -> HttpError -> Bool) -> (HttpError -> HttpError -> Bool) -> Eq HttpError forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: HttpError -> HttpError -> Bool $c/= :: HttpError -> HttpError -> Bool == :: HttpError -> HttpError -> Bool $c== :: HttpError -> HttpError -> Bool Eq, Int -> HttpError -> ShowS [HttpError] -> ShowS HttpError -> String (Int -> HttpError -> ShowS) -> (HttpError -> String) -> ([HttpError] -> ShowS) -> Show HttpError forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [HttpError] -> ShowS $cshowList :: [HttpError] -> ShowS show :: HttpError -> String $cshow :: HttpError -> String showsPrec :: Int -> HttpError -> ShowS $cshowsPrec :: Int -> HttpError -> ShowS Show)