module Stratosphere.SageMaker.Domain.CodeRepositoryProperty (
        CodeRepositoryProperty(..), mkCodeRepositoryProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CodeRepositoryProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-domain-coderepository.html>
    CodeRepositoryProperty {CodeRepositoryProperty -> ()
haddock_workaround_ :: (),
                            -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-domain-coderepository.html#cfn-sagemaker-domain-coderepository-repositoryurl>
                            CodeRepositoryProperty -> Value Text
repositoryUrl :: (Value Prelude.Text)}
  deriving stock (CodeRepositoryProperty -> CodeRepositoryProperty -> Bool
(CodeRepositoryProperty -> CodeRepositoryProperty -> Bool)
-> (CodeRepositoryProperty -> CodeRepositoryProperty -> Bool)
-> Eq CodeRepositoryProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CodeRepositoryProperty -> CodeRepositoryProperty -> Bool
== :: CodeRepositoryProperty -> CodeRepositoryProperty -> Bool
$c/= :: CodeRepositoryProperty -> CodeRepositoryProperty -> Bool
/= :: CodeRepositoryProperty -> CodeRepositoryProperty -> Bool
Prelude.Eq, Int -> CodeRepositoryProperty -> ShowS
[CodeRepositoryProperty] -> ShowS
CodeRepositoryProperty -> String
(Int -> CodeRepositoryProperty -> ShowS)
-> (CodeRepositoryProperty -> String)
-> ([CodeRepositoryProperty] -> ShowS)
-> Show CodeRepositoryProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CodeRepositoryProperty -> ShowS
showsPrec :: Int -> CodeRepositoryProperty -> ShowS
$cshow :: CodeRepositoryProperty -> String
show :: CodeRepositoryProperty -> String
$cshowList :: [CodeRepositoryProperty] -> ShowS
showList :: [CodeRepositoryProperty] -> ShowS
Prelude.Show)
mkCodeRepositoryProperty ::
  Value Prelude.Text -> CodeRepositoryProperty
mkCodeRepositoryProperty :: Value Text -> CodeRepositoryProperty
mkCodeRepositoryProperty Value Text
repositoryUrl
  = CodeRepositoryProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), repositoryUrl :: Value Text
repositoryUrl = Value Text
repositoryUrl}
instance ToResourceProperties CodeRepositoryProperty where
  toResourceProperties :: CodeRepositoryProperty -> ResourceProperties
toResourceProperties CodeRepositoryProperty {()
Value Text
haddock_workaround_ :: CodeRepositoryProperty -> ()
repositoryUrl :: CodeRepositoryProperty -> Value Text
haddock_workaround_ :: ()
repositoryUrl :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SageMaker::Domain.CodeRepository",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"RepositoryUrl" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
repositoryUrl]}
instance JSON.ToJSON CodeRepositoryProperty where
  toJSON :: CodeRepositoryProperty -> Value
toJSON CodeRepositoryProperty {()
Value Text
haddock_workaround_ :: CodeRepositoryProperty -> ()
repositoryUrl :: CodeRepositoryProperty -> Value Text
haddock_workaround_ :: ()
repositoryUrl :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"RepositoryUrl" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
repositoryUrl]
instance Property "RepositoryUrl" CodeRepositoryProperty where
  type PropertyType "RepositoryUrl" CodeRepositoryProperty = Value Prelude.Text
  set :: PropertyType "RepositoryUrl" CodeRepositoryProperty
-> CodeRepositoryProperty -> CodeRepositoryProperty
set PropertyType "RepositoryUrl" CodeRepositoryProperty
newValue CodeRepositoryProperty {()
Value Text
haddock_workaround_ :: CodeRepositoryProperty -> ()
repositoryUrl :: CodeRepositoryProperty -> Value Text
haddock_workaround_ :: ()
repositoryUrl :: Value Text
..}
    = CodeRepositoryProperty {repositoryUrl :: Value Text
repositoryUrl = PropertyType "RepositoryUrl" CodeRepositoryProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}