{-# LANGUAGE Strict #-}

module Database.PostgreSQL.Replicant.Exception where

import Control.Exception
import Data.Typeable

newtype ReplicantException = ReplicantException String
  deriving (Int -> ReplicantException -> ShowS
[ReplicantException] -> ShowS
ReplicantException -> String
(Int -> ReplicantException -> ShowS)
-> (ReplicantException -> String)
-> ([ReplicantException] -> ShowS)
-> Show ReplicantException
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ReplicantException] -> ShowS
$cshowList :: [ReplicantException] -> ShowS
show :: ReplicantException -> String
$cshow :: ReplicantException -> String
showsPrec :: Int -> ReplicantException -> ShowS
$cshowsPrec :: Int -> ReplicantException -> ShowS
Show, Typeable)

instance Exception ReplicantException