module U.Codebase.WatchKind where

data WatchKind = RegularWatch | TestWatch deriving (WatchKind -> WatchKind -> Bool
(WatchKind -> WatchKind -> Bool)
-> (WatchKind -> WatchKind -> Bool) -> Eq WatchKind
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WatchKind -> WatchKind -> Bool
== :: WatchKind -> WatchKind -> Bool
$c/= :: WatchKind -> WatchKind -> Bool
/= :: WatchKind -> WatchKind -> Bool
Eq, Eq WatchKind
Eq WatchKind =>
(WatchKind -> WatchKind -> Ordering)
-> (WatchKind -> WatchKind -> Bool)
-> (WatchKind -> WatchKind -> Bool)
-> (WatchKind -> WatchKind -> Bool)
-> (WatchKind -> WatchKind -> Bool)
-> (WatchKind -> WatchKind -> WatchKind)
-> (WatchKind -> WatchKind -> WatchKind)
-> Ord WatchKind
WatchKind -> WatchKind -> Bool
WatchKind -> WatchKind -> Ordering
WatchKind -> WatchKind -> WatchKind
forall a.
Eq a =>
(a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: WatchKind -> WatchKind -> Ordering
compare :: WatchKind -> WatchKind -> Ordering
$c< :: WatchKind -> WatchKind -> Bool
< :: WatchKind -> WatchKind -> Bool
$c<= :: WatchKind -> WatchKind -> Bool
<= :: WatchKind -> WatchKind -> Bool
$c> :: WatchKind -> WatchKind -> Bool
> :: WatchKind -> WatchKind -> Bool
$c>= :: WatchKind -> WatchKind -> Bool
>= :: WatchKind -> WatchKind -> Bool
$cmax :: WatchKind -> WatchKind -> WatchKind
max :: WatchKind -> WatchKind -> WatchKind
$cmin :: WatchKind -> WatchKind -> WatchKind
min :: WatchKind -> WatchKind -> WatchKind
Ord, Int -> WatchKind -> ShowS
[WatchKind] -> ShowS
WatchKind -> String
(Int -> WatchKind -> ShowS)
-> (WatchKind -> String)
-> ([WatchKind] -> ShowS)
-> Show WatchKind
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WatchKind -> ShowS
showsPrec :: Int -> WatchKind -> ShowS
$cshow :: WatchKind -> String
show :: WatchKind -> String
$cshowList :: [WatchKind] -> ShowS
showList :: [WatchKind] -> ShowS
Show)