module Chiasma.Data.TmuxOutputBlock where data End = EndSuccess | EndError deriving stock (End -> End -> Bool (End -> End -> Bool) -> (End -> End -> Bool) -> Eq End forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: End -> End -> Bool == :: End -> End -> Bool $c/= :: End -> End -> Bool /= :: End -> End -> Bool Eq, Int -> End -> ShowS [End] -> ShowS End -> String (Int -> End -> ShowS) -> (End -> String) -> ([End] -> ShowS) -> Show End forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> End -> ShowS showsPrec :: Int -> End -> ShowS $cshow :: End -> String show :: End -> String $cshowList :: [End] -> ShowS showList :: [End] -> ShowS Show) data TmuxOutputBlock = Success [Text] | Error [Text] deriving stock (TmuxOutputBlock -> TmuxOutputBlock -> Bool (TmuxOutputBlock -> TmuxOutputBlock -> Bool) -> (TmuxOutputBlock -> TmuxOutputBlock -> Bool) -> Eq TmuxOutputBlock forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: TmuxOutputBlock -> TmuxOutputBlock -> Bool == :: TmuxOutputBlock -> TmuxOutputBlock -> Bool $c/= :: TmuxOutputBlock -> TmuxOutputBlock -> Bool /= :: TmuxOutputBlock -> TmuxOutputBlock -> Bool Eq, Int -> TmuxOutputBlock -> ShowS [TmuxOutputBlock] -> ShowS TmuxOutputBlock -> String (Int -> TmuxOutputBlock -> ShowS) -> (TmuxOutputBlock -> String) -> ([TmuxOutputBlock] -> ShowS) -> Show TmuxOutputBlock forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> TmuxOutputBlock -> ShowS showsPrec :: Int -> TmuxOutputBlock -> ShowS $cshow :: TmuxOutputBlock -> String show :: TmuxOutputBlock -> String $cshowList :: [TmuxOutputBlock] -> ShowS showList :: [TmuxOutputBlock] -> ShowS Show)