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