{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.Glue.Types.LabelingSetGenerationTaskRunProperties where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data LabelingSetGenerationTaskRunProperties = LabelingSetGenerationTaskRunProperties'
{
LabelingSetGenerationTaskRunProperties -> Maybe Text
outputS3Path :: Prelude.Maybe Prelude.Text
}
deriving (LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool
(LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool)
-> (LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool)
-> Eq LabelingSetGenerationTaskRunProperties
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool
$c/= :: LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool
== :: LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool
$c== :: LabelingSetGenerationTaskRunProperties
-> LabelingSetGenerationTaskRunProperties -> Bool
Prelude.Eq, ReadPrec [LabelingSetGenerationTaskRunProperties]
ReadPrec LabelingSetGenerationTaskRunProperties
Int -> ReadS LabelingSetGenerationTaskRunProperties
ReadS [LabelingSetGenerationTaskRunProperties]
(Int -> ReadS LabelingSetGenerationTaskRunProperties)
-> ReadS [LabelingSetGenerationTaskRunProperties]
-> ReadPrec LabelingSetGenerationTaskRunProperties
-> ReadPrec [LabelingSetGenerationTaskRunProperties]
-> Read LabelingSetGenerationTaskRunProperties
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [LabelingSetGenerationTaskRunProperties]
$creadListPrec :: ReadPrec [LabelingSetGenerationTaskRunProperties]
readPrec :: ReadPrec LabelingSetGenerationTaskRunProperties
$creadPrec :: ReadPrec LabelingSetGenerationTaskRunProperties
readList :: ReadS [LabelingSetGenerationTaskRunProperties]
$creadList :: ReadS [LabelingSetGenerationTaskRunProperties]
readsPrec :: Int -> ReadS LabelingSetGenerationTaskRunProperties
$creadsPrec :: Int -> ReadS LabelingSetGenerationTaskRunProperties
Prelude.Read, Int -> LabelingSetGenerationTaskRunProperties -> ShowS
[LabelingSetGenerationTaskRunProperties] -> ShowS
LabelingSetGenerationTaskRunProperties -> String
(Int -> LabelingSetGenerationTaskRunProperties -> ShowS)
-> (LabelingSetGenerationTaskRunProperties -> String)
-> ([LabelingSetGenerationTaskRunProperties] -> ShowS)
-> Show LabelingSetGenerationTaskRunProperties
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LabelingSetGenerationTaskRunProperties] -> ShowS
$cshowList :: [LabelingSetGenerationTaskRunProperties] -> ShowS
show :: LabelingSetGenerationTaskRunProperties -> String
$cshow :: LabelingSetGenerationTaskRunProperties -> String
showsPrec :: Int -> LabelingSetGenerationTaskRunProperties -> ShowS
$cshowsPrec :: Int -> LabelingSetGenerationTaskRunProperties -> ShowS
Prelude.Show, (forall x.
LabelingSetGenerationTaskRunProperties
-> Rep LabelingSetGenerationTaskRunProperties x)
-> (forall x.
Rep LabelingSetGenerationTaskRunProperties x
-> LabelingSetGenerationTaskRunProperties)
-> Generic LabelingSetGenerationTaskRunProperties
forall x.
Rep LabelingSetGenerationTaskRunProperties x
-> LabelingSetGenerationTaskRunProperties
forall x.
LabelingSetGenerationTaskRunProperties
-> Rep LabelingSetGenerationTaskRunProperties x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep LabelingSetGenerationTaskRunProperties x
-> LabelingSetGenerationTaskRunProperties
$cfrom :: forall x.
LabelingSetGenerationTaskRunProperties
-> Rep LabelingSetGenerationTaskRunProperties x
Prelude.Generic)
newLabelingSetGenerationTaskRunProperties ::
LabelingSetGenerationTaskRunProperties
newLabelingSetGenerationTaskRunProperties :: LabelingSetGenerationTaskRunProperties
newLabelingSetGenerationTaskRunProperties =
LabelingSetGenerationTaskRunProperties' :: Maybe Text -> LabelingSetGenerationTaskRunProperties
LabelingSetGenerationTaskRunProperties'
{ $sel:outputS3Path:LabelingSetGenerationTaskRunProperties' :: Maybe Text
outputS3Path =
Maybe Text
forall a. Maybe a
Prelude.Nothing
}
labelingSetGenerationTaskRunProperties_outputS3Path :: Lens.Lens' LabelingSetGenerationTaskRunProperties (Prelude.Maybe Prelude.Text)
labelingSetGenerationTaskRunProperties_outputS3Path :: (Maybe Text -> f (Maybe Text))
-> LabelingSetGenerationTaskRunProperties
-> f LabelingSetGenerationTaskRunProperties
labelingSetGenerationTaskRunProperties_outputS3Path = (LabelingSetGenerationTaskRunProperties -> Maybe Text)
-> (LabelingSetGenerationTaskRunProperties
-> Maybe Text -> LabelingSetGenerationTaskRunProperties)
-> Lens
LabelingSetGenerationTaskRunProperties
LabelingSetGenerationTaskRunProperties
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\LabelingSetGenerationTaskRunProperties' {Maybe Text
outputS3Path :: Maybe Text
$sel:outputS3Path:LabelingSetGenerationTaskRunProperties' :: LabelingSetGenerationTaskRunProperties -> Maybe Text
outputS3Path} -> Maybe Text
outputS3Path) (\s :: LabelingSetGenerationTaskRunProperties
s@LabelingSetGenerationTaskRunProperties' {} Maybe Text
a -> LabelingSetGenerationTaskRunProperties
s {$sel:outputS3Path:LabelingSetGenerationTaskRunProperties' :: Maybe Text
outputS3Path = Maybe Text
a} :: LabelingSetGenerationTaskRunProperties)
instance
Core.FromJSON
LabelingSetGenerationTaskRunProperties
where
parseJSON :: Value -> Parser LabelingSetGenerationTaskRunProperties
parseJSON =
String
-> (Object -> Parser LabelingSetGenerationTaskRunProperties)
-> Value
-> Parser LabelingSetGenerationTaskRunProperties
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"LabelingSetGenerationTaskRunProperties"
( \Object
x ->
Maybe Text -> LabelingSetGenerationTaskRunProperties
LabelingSetGenerationTaskRunProperties'
(Maybe Text -> LabelingSetGenerationTaskRunProperties)
-> Parser (Maybe Text)
-> Parser LabelingSetGenerationTaskRunProperties
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"OutputS3Path")
)
instance
Prelude.Hashable
LabelingSetGenerationTaskRunProperties
instance
Prelude.NFData
LabelingSetGenerationTaskRunProperties