{-# 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.MediaLive.Types.PassThroughSettings where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data PassThroughSettings = PassThroughSettings'
{
}
deriving (PassThroughSettings -> PassThroughSettings -> Bool
(PassThroughSettings -> PassThroughSettings -> Bool)
-> (PassThroughSettings -> PassThroughSettings -> Bool)
-> Eq PassThroughSettings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PassThroughSettings -> PassThroughSettings -> Bool
$c/= :: PassThroughSettings -> PassThroughSettings -> Bool
== :: PassThroughSettings -> PassThroughSettings -> Bool
$c== :: PassThroughSettings -> PassThroughSettings -> Bool
Prelude.Eq, ReadPrec [PassThroughSettings]
ReadPrec PassThroughSettings
Int -> ReadS PassThroughSettings
ReadS [PassThroughSettings]
(Int -> ReadS PassThroughSettings)
-> ReadS [PassThroughSettings]
-> ReadPrec PassThroughSettings
-> ReadPrec [PassThroughSettings]
-> Read PassThroughSettings
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [PassThroughSettings]
$creadListPrec :: ReadPrec [PassThroughSettings]
readPrec :: ReadPrec PassThroughSettings
$creadPrec :: ReadPrec PassThroughSettings
readList :: ReadS [PassThroughSettings]
$creadList :: ReadS [PassThroughSettings]
readsPrec :: Int -> ReadS PassThroughSettings
$creadsPrec :: Int -> ReadS PassThroughSettings
Prelude.Read, Int -> PassThroughSettings -> ShowS
[PassThroughSettings] -> ShowS
PassThroughSettings -> String
(Int -> PassThroughSettings -> ShowS)
-> (PassThroughSettings -> String)
-> ([PassThroughSettings] -> ShowS)
-> Show PassThroughSettings
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PassThroughSettings] -> ShowS
$cshowList :: [PassThroughSettings] -> ShowS
show :: PassThroughSettings -> String
$cshow :: PassThroughSettings -> String
showsPrec :: Int -> PassThroughSettings -> ShowS
$cshowsPrec :: Int -> PassThroughSettings -> ShowS
Prelude.Show, (forall x. PassThroughSettings -> Rep PassThroughSettings x)
-> (forall x. Rep PassThroughSettings x -> PassThroughSettings)
-> Generic PassThroughSettings
forall x. Rep PassThroughSettings x -> PassThroughSettings
forall x. PassThroughSettings -> Rep PassThroughSettings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PassThroughSettings x -> PassThroughSettings
$cfrom :: forall x. PassThroughSettings -> Rep PassThroughSettings x
Prelude.Generic)
newPassThroughSettings ::
PassThroughSettings
newPassThroughSettings :: PassThroughSettings
newPassThroughSettings = PassThroughSettings
PassThroughSettings'
instance Core.FromJSON PassThroughSettings where
parseJSON :: Value -> Parser PassThroughSettings
parseJSON =
String
-> (Object -> Parser PassThroughSettings)
-> Value
-> Parser PassThroughSettings
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"PassThroughSettings"
(\Object
x -> PassThroughSettings -> Parser PassThroughSettings
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PassThroughSettings
PassThroughSettings')
instance Prelude.Hashable PassThroughSettings
instance Prelude.NFData PassThroughSettings
instance Core.ToJSON PassThroughSettings where
toJSON :: PassThroughSettings -> Value
toJSON = Value -> PassThroughSettings -> Value
forall a b. a -> b -> a
Prelude.const (Object -> Value
Core.Object Object
forall a. Monoid a => a
Prelude.mempty)