-- | Named boolean for determining if something is an alias or not
module CalamityCommands.AliasType (
  AliasType (..),
) where

import TextShow qualified

data AliasType
  = Alias
  | Original
  deriving (AliasType -> AliasType -> Bool
(AliasType -> AliasType -> Bool)
-> (AliasType -> AliasType -> Bool) -> Eq AliasType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AliasType -> AliasType -> Bool
== :: AliasType -> AliasType -> Bool
$c/= :: AliasType -> AliasType -> Bool
/= :: AliasType -> AliasType -> Bool
Eq, Int -> AliasType
AliasType -> Int
AliasType -> [AliasType]
AliasType -> AliasType
AliasType -> AliasType -> [AliasType]
AliasType -> AliasType -> AliasType -> [AliasType]
(AliasType -> AliasType)
-> (AliasType -> AliasType)
-> (Int -> AliasType)
-> (AliasType -> Int)
-> (AliasType -> [AliasType])
-> (AliasType -> AliasType -> [AliasType])
-> (AliasType -> AliasType -> [AliasType])
-> (AliasType -> AliasType -> AliasType -> [AliasType])
-> Enum AliasType
forall a.
(a -> a)
-> (a -> a)
-> (Int -> a)
-> (a -> Int)
-> (a -> [a])
-> (a -> a -> [a])
-> (a -> a -> [a])
-> (a -> a -> a -> [a])
-> Enum a
$csucc :: AliasType -> AliasType
succ :: AliasType -> AliasType
$cpred :: AliasType -> AliasType
pred :: AliasType -> AliasType
$ctoEnum :: Int -> AliasType
toEnum :: Int -> AliasType
$cfromEnum :: AliasType -> Int
fromEnum :: AliasType -> Int
$cenumFrom :: AliasType -> [AliasType]
enumFrom :: AliasType -> [AliasType]
$cenumFromThen :: AliasType -> AliasType -> [AliasType]
enumFromThen :: AliasType -> AliasType -> [AliasType]
$cenumFromTo :: AliasType -> AliasType -> [AliasType]
enumFromTo :: AliasType -> AliasType -> [AliasType]
$cenumFromThenTo :: AliasType -> AliasType -> AliasType -> [AliasType]
enumFromThenTo :: AliasType -> AliasType -> AliasType -> [AliasType]
Enum, Int -> AliasType -> ShowS
[AliasType] -> ShowS
AliasType -> [Char]
(Int -> AliasType -> ShowS)
-> (AliasType -> [Char])
-> ([AliasType] -> ShowS)
-> Show AliasType
forall a.
(Int -> a -> ShowS) -> (a -> [Char]) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AliasType -> ShowS
showsPrec :: Int -> AliasType -> ShowS
$cshow :: AliasType -> [Char]
show :: AliasType -> [Char]
$cshowList :: [AliasType] -> ShowS
showList :: [AliasType] -> ShowS
Show)
  deriving (Int -> AliasType -> Text
Int -> AliasType -> Text
Int -> AliasType -> Builder
[AliasType] -> Text
[AliasType] -> Text
[AliasType] -> Builder
AliasType -> Text
AliasType -> Text
AliasType -> Builder
(Int -> AliasType -> Builder)
-> (AliasType -> Builder)
-> ([AliasType] -> Builder)
-> (Int -> AliasType -> Text)
-> (AliasType -> Text)
-> ([AliasType] -> Text)
-> (Int -> AliasType -> Text)
-> (AliasType -> Text)
-> ([AliasType] -> Text)
-> TextShow AliasType
forall a.
(Int -> a -> Builder)
-> (a -> Builder)
-> ([a] -> Builder)
-> (Int -> a -> Text)
-> (a -> Text)
-> ([a] -> Text)
-> (Int -> a -> Text)
-> (a -> Text)
-> ([a] -> Text)
-> TextShow a
$cshowbPrec :: Int -> AliasType -> Builder
showbPrec :: Int -> AliasType -> Builder
$cshowb :: AliasType -> Builder
showb :: AliasType -> Builder
$cshowbList :: [AliasType] -> Builder
showbList :: [AliasType] -> Builder
$cshowtPrec :: Int -> AliasType -> Text
showtPrec :: Int -> AliasType -> Text
$cshowt :: AliasType -> Text
showt :: AliasType -> Text
$cshowtList :: [AliasType] -> Text
showtList :: [AliasType] -> Text
$cshowtlPrec :: Int -> AliasType -> Text
showtlPrec :: Int -> AliasType -> Text
$cshowtl :: AliasType -> Text
showtl :: AliasType -> Text
$cshowtlList :: [AliasType] -> Text
showtlList :: [AliasType] -> Text
TextShow.TextShow) via TextShow.FromStringShow AliasType