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