module Distribution.Solver.Types.Flag ( FlagType(..) ) where import Prelude (Eq, Show) data FlagType = Manual | Automatic deriving (FlagType -> FlagType -> Bool (FlagType -> FlagType -> Bool) -> (FlagType -> FlagType -> Bool) -> Eq FlagType forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: FlagType -> FlagType -> Bool == :: FlagType -> FlagType -> Bool $c/= :: FlagType -> FlagType -> Bool /= :: FlagType -> FlagType -> Bool Eq, Int -> FlagType -> ShowS [FlagType] -> ShowS FlagType -> String (Int -> FlagType -> ShowS) -> (FlagType -> String) -> ([FlagType] -> ShowS) -> Show FlagType forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> FlagType -> ShowS showsPrec :: Int -> FlagType -> ShowS $cshow :: FlagType -> String show :: FlagType -> String $cshowList :: [FlagType] -> ShowS showList :: [FlagType] -> ShowS Show)