module Test.Sandwich.Types.General where

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