module Chiasma.Data.RenderError where

import Chiasma.Data.Ident (Ident)
import Chiasma.Data.TmuxError (TmuxError)
import Chiasma.Data.Views (ViewsError)

data RenderError =
  NoPrincipal Ident
  |
  Views ViewsError
  |
  Pack Text
  |
  Fatal TmuxError
  deriving (RenderError -> RenderError -> Bool
(RenderError -> RenderError -> Bool)
-> (RenderError -> RenderError -> Bool) -> Eq RenderError
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RenderError -> RenderError -> Bool
$c/= :: RenderError -> RenderError -> Bool
== :: RenderError -> RenderError -> Bool
$c== :: RenderError -> RenderError -> Bool
Eq, Int -> RenderError -> ShowS
[RenderError] -> ShowS
RenderError -> String
(Int -> RenderError -> ShowS)
-> (RenderError -> String)
-> ([RenderError] -> ShowS)
-> Show RenderError
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RenderError] -> ShowS
$cshowList :: [RenderError] -> ShowS
show :: RenderError -> String
$cshow :: RenderError -> String
showsPrec :: Int -> RenderError -> ShowS
$cshowsPrec :: Int -> RenderError -> ShowS
Show)

deepPrisms ''RenderError