{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Amazonka.S3.Types.RequestPayer
( RequestPayer
( ..,
RequestPayer_Requester
),
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import Amazonka.S3.Internal
newtype RequestPayer = RequestPayer'
{ RequestPayer -> Text
fromRequestPayer ::
Data.Text
}
deriving stock
( Int -> RequestPayer -> ShowS
[RequestPayer] -> ShowS
RequestPayer -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RequestPayer] -> ShowS
$cshowList :: [RequestPayer] -> ShowS
show :: RequestPayer -> String
$cshow :: RequestPayer -> String
showsPrec :: Int -> RequestPayer -> ShowS
$cshowsPrec :: Int -> RequestPayer -> ShowS
Prelude.Show,
ReadPrec [RequestPayer]
ReadPrec RequestPayer
Int -> ReadS RequestPayer
ReadS [RequestPayer]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RequestPayer]
$creadListPrec :: ReadPrec [RequestPayer]
readPrec :: ReadPrec RequestPayer
$creadPrec :: ReadPrec RequestPayer
readList :: ReadS [RequestPayer]
$creadList :: ReadS [RequestPayer]
readsPrec :: Int -> ReadS RequestPayer
$creadsPrec :: Int -> ReadS RequestPayer
Prelude.Read,
RequestPayer -> RequestPayer -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RequestPayer -> RequestPayer -> Bool
$c/= :: RequestPayer -> RequestPayer -> Bool
== :: RequestPayer -> RequestPayer -> Bool
$c== :: RequestPayer -> RequestPayer -> Bool
Prelude.Eq,
Eq RequestPayer
RequestPayer -> RequestPayer -> Bool
RequestPayer -> RequestPayer -> Ordering
RequestPayer -> RequestPayer -> RequestPayer
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: RequestPayer -> RequestPayer -> RequestPayer
$cmin :: RequestPayer -> RequestPayer -> RequestPayer
max :: RequestPayer -> RequestPayer -> RequestPayer
$cmax :: RequestPayer -> RequestPayer -> RequestPayer
>= :: RequestPayer -> RequestPayer -> Bool
$c>= :: RequestPayer -> RequestPayer -> Bool
> :: RequestPayer -> RequestPayer -> Bool
$c> :: RequestPayer -> RequestPayer -> Bool
<= :: RequestPayer -> RequestPayer -> Bool
$c<= :: RequestPayer -> RequestPayer -> Bool
< :: RequestPayer -> RequestPayer -> Bool
$c< :: RequestPayer -> RequestPayer -> Bool
compare :: RequestPayer -> RequestPayer -> Ordering
$ccompare :: RequestPayer -> RequestPayer -> Ordering
Prelude.Ord,
forall x. Rep RequestPayer x -> RequestPayer
forall x. RequestPayer -> Rep RequestPayer x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RequestPayer x -> RequestPayer
$cfrom :: forall x. RequestPayer -> Rep RequestPayer x
Prelude.Generic
)
deriving newtype
( Eq RequestPayer
Int -> RequestPayer -> Int
RequestPayer -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: RequestPayer -> Int
$chash :: RequestPayer -> Int
hashWithSalt :: Int -> RequestPayer -> Int
$chashWithSalt :: Int -> RequestPayer -> Int
Prelude.Hashable,
RequestPayer -> ()
forall a. (a -> ()) -> NFData a
rnf :: RequestPayer -> ()
$crnf :: RequestPayer -> ()
Prelude.NFData,
Text -> Either String RequestPayer
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String RequestPayer
$cfromText :: Text -> Either String RequestPayer
Data.FromText,
RequestPayer -> Text
forall a. (a -> Text) -> ToText a
toText :: RequestPayer -> Text
$ctoText :: RequestPayer -> Text
Data.ToText,
RequestPayer -> ByteString
forall a. (a -> ByteString) -> ToByteString a
toBS :: RequestPayer -> ByteString
$ctoBS :: RequestPayer -> ByteString
Data.ToByteString,
RequestPayer -> ByteStringBuilder
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: RequestPayer -> ByteStringBuilder
$cbuild :: RequestPayer -> ByteStringBuilder
Data.ToLog,
HeaderName -> RequestPayer -> [Header]
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> RequestPayer -> [Header]
$ctoHeader :: HeaderName -> RequestPayer -> [Header]
Data.ToHeader,
RequestPayer -> QueryString
forall a. (a -> QueryString) -> ToQuery a
toQuery :: RequestPayer -> QueryString
$ctoQuery :: RequestPayer -> QueryString
Data.ToQuery,
Value -> Parser [RequestPayer]
Value -> Parser RequestPayer
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [RequestPayer]
$cparseJSONList :: Value -> Parser [RequestPayer]
parseJSON :: Value -> Parser RequestPayer
$cparseJSON :: Value -> Parser RequestPayer
Data.FromJSON,
FromJSONKeyFunction [RequestPayer]
FromJSONKeyFunction RequestPayer
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [RequestPayer]
$cfromJSONKeyList :: FromJSONKeyFunction [RequestPayer]
fromJSONKey :: FromJSONKeyFunction RequestPayer
$cfromJSONKey :: FromJSONKeyFunction RequestPayer
Data.FromJSONKey,
[RequestPayer] -> Encoding
[RequestPayer] -> Value
RequestPayer -> Encoding
RequestPayer -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [RequestPayer] -> Encoding
$ctoEncodingList :: [RequestPayer] -> Encoding
toJSONList :: [RequestPayer] -> Value
$ctoJSONList :: [RequestPayer] -> Value
toEncoding :: RequestPayer -> Encoding
$ctoEncoding :: RequestPayer -> Encoding
toJSON :: RequestPayer -> Value
$ctoJSON :: RequestPayer -> Value
Data.ToJSON,
ToJSONKeyFunction [RequestPayer]
ToJSONKeyFunction RequestPayer
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [RequestPayer]
$ctoJSONKeyList :: ToJSONKeyFunction [RequestPayer]
toJSONKey :: ToJSONKeyFunction RequestPayer
$ctoJSONKey :: ToJSONKeyFunction RequestPayer
Data.ToJSONKey,
[Node] -> Either String RequestPayer
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String RequestPayer
$cparseXML :: [Node] -> Either String RequestPayer
Data.FromXML,
RequestPayer -> XML
forall a. (a -> XML) -> ToXML a
toXML :: RequestPayer -> XML
$ctoXML :: RequestPayer -> XML
Data.ToXML
)
pattern RequestPayer_Requester :: RequestPayer
pattern $bRequestPayer_Requester :: RequestPayer
$mRequestPayer_Requester :: forall {r}. RequestPayer -> ((# #) -> r) -> ((# #) -> r) -> r
RequestPayer_Requester = RequestPayer' "requester"
{-# COMPLETE
RequestPayer_Requester,
RequestPayer'
#-}