module ServantSerf.Exception.UnknownOption where

import qualified Control.Monad.Catch as Exception

newtype UnknownOption
  = UnknownOption String
  deriving (UnknownOption -> UnknownOption -> Bool
(UnknownOption -> UnknownOption -> Bool)
-> (UnknownOption -> UnknownOption -> Bool) -> Eq UnknownOption
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UnknownOption -> UnknownOption -> Bool
== :: UnknownOption -> UnknownOption -> Bool
$c/= :: UnknownOption -> UnknownOption -> Bool
/= :: UnknownOption -> UnknownOption -> Bool
Eq, Int -> UnknownOption -> ShowS
[UnknownOption] -> ShowS
UnknownOption -> String
(Int -> UnknownOption -> ShowS)
-> (UnknownOption -> String)
-> ([UnknownOption] -> ShowS)
-> Show UnknownOption
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> UnknownOption -> ShowS
showsPrec :: Int -> UnknownOption -> ShowS
$cshow :: UnknownOption -> String
show :: UnknownOption -> String
$cshowList :: [UnknownOption] -> ShowS
showList :: [UnknownOption] -> ShowS
Show)

instance Exception.Exception UnknownOption