module Chiasma.Ui.Data.TreeModError where import Chiasma.Data.Ident (Ident) import Chiasma.Ui.Data.View (LayoutView, PaneView) data TreeModError = PaneExists PaneView | LayoutExists LayoutView | PaneMissing Ident | LayoutMissing Ident | AmbiguousPane Ident Int | AmbiguousLayout Ident Int | NoTrees deriving stock (TreeModError -> TreeModError -> Bool (TreeModError -> TreeModError -> Bool) -> (TreeModError -> TreeModError -> Bool) -> Eq TreeModError forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: TreeModError -> TreeModError -> Bool == :: TreeModError -> TreeModError -> Bool $c/= :: TreeModError -> TreeModError -> Bool /= :: TreeModError -> TreeModError -> Bool Eq, Int -> TreeModError -> ShowS [TreeModError] -> ShowS TreeModError -> String (Int -> TreeModError -> ShowS) -> (TreeModError -> String) -> ([TreeModError] -> ShowS) -> Show TreeModError forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> TreeModError -> ShowS showsPrec :: Int -> TreeModError -> ShowS $cshow :: TreeModError -> String show :: TreeModError -> String $cshowList :: [TreeModError] -> ShowS showList :: [TreeModError] -> ShowS Show)