{-# LANGUAGE DeriveAnyClass #-} module Hercules.API.Forge.SimpleForge where import Hercules.API.Forge.Forge (Forge) import Hercules.API.Prelude data SimpleForge = SimpleForge { SimpleForge -> Id Forge id :: Id Forge, SimpleForge -> Name Forge name :: Name Forge, SimpleForge -> Text displayName :: Text } deriving (forall x. Rep SimpleForge x -> SimpleForge forall x. SimpleForge -> Rep SimpleForge x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep SimpleForge x -> SimpleForge $cfrom :: forall x. SimpleForge -> Rep SimpleForge x Generic, Int -> SimpleForge -> ShowS [SimpleForge] -> ShowS SimpleForge -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [SimpleForge] -> ShowS $cshowList :: [SimpleForge] -> ShowS show :: SimpleForge -> String $cshow :: SimpleForge -> String showsPrec :: Int -> SimpleForge -> ShowS $cshowsPrec :: Int -> SimpleForge -> ShowS Show, SimpleForge -> SimpleForge -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: SimpleForge -> SimpleForge -> Bool $c/= :: SimpleForge -> SimpleForge -> Bool == :: SimpleForge -> SimpleForge -> Bool $c== :: SimpleForge -> SimpleForge -> Bool Eq, SimpleForge -> () forall a. (a -> ()) -> NFData a rnf :: SimpleForge -> () $crnf :: SimpleForge -> () NFData, [SimpleForge] -> Encoding [SimpleForge] -> Value SimpleForge -> Encoding SimpleForge -> Value forall a. (a -> Value) -> (a -> Encoding) -> ([a] -> Value) -> ([a] -> Encoding) -> ToJSON a toEncodingList :: [SimpleForge] -> Encoding $ctoEncodingList :: [SimpleForge] -> Encoding toJSONList :: [SimpleForge] -> Value $ctoJSONList :: [SimpleForge] -> Value toEncoding :: SimpleForge -> Encoding $ctoEncoding :: SimpleForge -> Encoding toJSON :: SimpleForge -> Value $ctoJSON :: SimpleForge -> Value ToJSON, Value -> Parser [SimpleForge] Value -> Parser SimpleForge forall a. (Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a parseJSONList :: Value -> Parser [SimpleForge] $cparseJSONList :: Value -> Parser [SimpleForge] parseJSON :: Value -> Parser SimpleForge $cparseJSON :: Value -> Parser SimpleForge FromJSON, Proxy SimpleForge -> Declare (Definitions Schema) NamedSchema forall a. (Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a declareNamedSchema :: Proxy SimpleForge -> Declare (Definitions Schema) NamedSchema $cdeclareNamedSchema :: Proxy SimpleForge -> Declare (Definitions Schema) NamedSchema ToSchema)