{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.MechanicalTurk.Types.EventType
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.MechanicalTurk.Types.EventType
  ( EventType
      ( ..,
        EventType_AssignmentAbandoned,
        EventType_AssignmentAccepted,
        EventType_AssignmentApproved,
        EventType_AssignmentRejected,
        EventType_AssignmentReturned,
        EventType_AssignmentSubmitted,
        EventType_HITCreated,
        EventType_HITDisposed,
        EventType_HITExpired,
        EventType_HITExtended,
        EventType_HITReviewable,
        EventType_Ping
      ),
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Prelude as Prelude

newtype EventType = EventType'
  { EventType -> Text
fromEventType ::
      Core.Text
  }
  deriving stock
    ( Int -> EventType -> ShowS
[EventType] -> ShowS
EventType -> String
(Int -> EventType -> ShowS)
-> (EventType -> String)
-> ([EventType] -> ShowS)
-> Show EventType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [EventType] -> ShowS
$cshowList :: [EventType] -> ShowS
show :: EventType -> String
$cshow :: EventType -> String
showsPrec :: Int -> EventType -> ShowS
$cshowsPrec :: Int -> EventType -> ShowS
Prelude.Show,
      ReadPrec [EventType]
ReadPrec EventType
Int -> ReadS EventType
ReadS [EventType]
(Int -> ReadS EventType)
-> ReadS [EventType]
-> ReadPrec EventType
-> ReadPrec [EventType]
-> Read EventType
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [EventType]
$creadListPrec :: ReadPrec [EventType]
readPrec :: ReadPrec EventType
$creadPrec :: ReadPrec EventType
readList :: ReadS [EventType]
$creadList :: ReadS [EventType]
readsPrec :: Int -> ReadS EventType
$creadsPrec :: Int -> ReadS EventType
Prelude.Read,
      EventType -> EventType -> Bool
(EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool) -> Eq EventType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: EventType -> EventType -> Bool
$c/= :: EventType -> EventType -> Bool
== :: EventType -> EventType -> Bool
$c== :: EventType -> EventType -> Bool
Prelude.Eq,
      Eq EventType
Eq EventType
-> (EventType -> EventType -> Ordering)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> Bool)
-> (EventType -> EventType -> EventType)
-> (EventType -> EventType -> EventType)
-> Ord EventType
EventType -> EventType -> Bool
EventType -> EventType -> Ordering
EventType -> EventType -> EventType
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 :: EventType -> EventType -> EventType
$cmin :: EventType -> EventType -> EventType
max :: EventType -> EventType -> EventType
$cmax :: EventType -> EventType -> EventType
>= :: EventType -> EventType -> Bool
$c>= :: EventType -> EventType -> Bool
> :: EventType -> EventType -> Bool
$c> :: EventType -> EventType -> Bool
<= :: EventType -> EventType -> Bool
$c<= :: EventType -> EventType -> Bool
< :: EventType -> EventType -> Bool
$c< :: EventType -> EventType -> Bool
compare :: EventType -> EventType -> Ordering
$ccompare :: EventType -> EventType -> Ordering
$cp1Ord :: Eq EventType
Prelude.Ord,
      (forall x. EventType -> Rep EventType x)
-> (forall x. Rep EventType x -> EventType) -> Generic EventType
forall x. Rep EventType x -> EventType
forall x. EventType -> Rep EventType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep EventType x -> EventType
$cfrom :: forall x. EventType -> Rep EventType x
Prelude.Generic
    )
  deriving newtype
    ( Int -> EventType -> Int
EventType -> Int
(Int -> EventType -> Int)
-> (EventType -> Int) -> Hashable EventType
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: EventType -> Int
$chash :: EventType -> Int
hashWithSalt :: Int -> EventType -> Int
$chashWithSalt :: Int -> EventType -> Int
Prelude.Hashable,
      EventType -> ()
(EventType -> ()) -> NFData EventType
forall a. (a -> ()) -> NFData a
rnf :: EventType -> ()
$crnf :: EventType -> ()
Prelude.NFData,
      Text -> Either String EventType
(Text -> Either String EventType) -> FromText EventType
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String EventType
$cfromText :: Text -> Either String EventType
Core.FromText,
      EventType -> Text
(EventType -> Text) -> ToText EventType
forall a. (a -> Text) -> ToText a
toText :: EventType -> Text
$ctoText :: EventType -> Text
Core.ToText,
      EventType -> ByteString
(EventType -> ByteString) -> ToByteString EventType
forall a. (a -> ByteString) -> ToByteString a
toBS :: EventType -> ByteString
$ctoBS :: EventType -> ByteString
Core.ToByteString,
      EventType -> ByteStringBuilder
(EventType -> ByteStringBuilder) -> ToLog EventType
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: EventType -> ByteStringBuilder
$cbuild :: EventType -> ByteStringBuilder
Core.ToLog,
      HeaderName -> EventType -> [Header]
(HeaderName -> EventType -> [Header]) -> ToHeader EventType
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> EventType -> [Header]
$ctoHeader :: HeaderName -> EventType -> [Header]
Core.ToHeader,
      EventType -> QueryString
(EventType -> QueryString) -> ToQuery EventType
forall a. (a -> QueryString) -> ToQuery a
toQuery :: EventType -> QueryString
$ctoQuery :: EventType -> QueryString
Core.ToQuery,
      Value -> Parser [EventType]
Value -> Parser EventType
(Value -> Parser EventType)
-> (Value -> Parser [EventType]) -> FromJSON EventType
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [EventType]
$cparseJSONList :: Value -> Parser [EventType]
parseJSON :: Value -> Parser EventType
$cparseJSON :: Value -> Parser EventType
Core.FromJSON,
      FromJSONKeyFunction [EventType]
FromJSONKeyFunction EventType
FromJSONKeyFunction EventType
-> FromJSONKeyFunction [EventType] -> FromJSONKey EventType
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [EventType]
$cfromJSONKeyList :: FromJSONKeyFunction [EventType]
fromJSONKey :: FromJSONKeyFunction EventType
$cfromJSONKey :: FromJSONKeyFunction EventType
Core.FromJSONKey,
      [EventType] -> Encoding
[EventType] -> Value
EventType -> Encoding
EventType -> Value
(EventType -> Value)
-> (EventType -> Encoding)
-> ([EventType] -> Value)
-> ([EventType] -> Encoding)
-> ToJSON EventType
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [EventType] -> Encoding
$ctoEncodingList :: [EventType] -> Encoding
toJSONList :: [EventType] -> Value
$ctoJSONList :: [EventType] -> Value
toEncoding :: EventType -> Encoding
$ctoEncoding :: EventType -> Encoding
toJSON :: EventType -> Value
$ctoJSON :: EventType -> Value
Core.ToJSON,
      ToJSONKeyFunction [EventType]
ToJSONKeyFunction EventType
ToJSONKeyFunction EventType
-> ToJSONKeyFunction [EventType] -> ToJSONKey EventType
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [EventType]
$ctoJSONKeyList :: ToJSONKeyFunction [EventType]
toJSONKey :: ToJSONKeyFunction EventType
$ctoJSONKey :: ToJSONKeyFunction EventType
Core.ToJSONKey,
      [Node] -> Either String EventType
([Node] -> Either String EventType) -> FromXML EventType
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String EventType
$cparseXML :: [Node] -> Either String EventType
Core.FromXML,
      EventType -> XML
(EventType -> XML) -> ToXML EventType
forall a. (a -> XML) -> ToXML a
toXML :: EventType -> XML
$ctoXML :: EventType -> XML
Core.ToXML
    )

pattern EventType_AssignmentAbandoned :: EventType
pattern $bEventType_AssignmentAbandoned :: EventType
$mEventType_AssignmentAbandoned :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_AssignmentAbandoned = EventType' "AssignmentAbandoned"

pattern EventType_AssignmentAccepted :: EventType
pattern $bEventType_AssignmentAccepted :: EventType
$mEventType_AssignmentAccepted :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_AssignmentAccepted = EventType' "AssignmentAccepted"

pattern EventType_AssignmentApproved :: EventType
pattern $bEventType_AssignmentApproved :: EventType
$mEventType_AssignmentApproved :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_AssignmentApproved = EventType' "AssignmentApproved"

pattern EventType_AssignmentRejected :: EventType
pattern $bEventType_AssignmentRejected :: EventType
$mEventType_AssignmentRejected :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_AssignmentRejected = EventType' "AssignmentRejected"

pattern EventType_AssignmentReturned :: EventType
pattern $bEventType_AssignmentReturned :: EventType
$mEventType_AssignmentReturned :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_AssignmentReturned = EventType' "AssignmentReturned"

pattern EventType_AssignmentSubmitted :: EventType
pattern $bEventType_AssignmentSubmitted :: EventType
$mEventType_AssignmentSubmitted :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_AssignmentSubmitted = EventType' "AssignmentSubmitted"

pattern EventType_HITCreated :: EventType
pattern $bEventType_HITCreated :: EventType
$mEventType_HITCreated :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_HITCreated = EventType' "HITCreated"

pattern EventType_HITDisposed :: EventType
pattern $bEventType_HITDisposed :: EventType
$mEventType_HITDisposed :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_HITDisposed = EventType' "HITDisposed"

pattern EventType_HITExpired :: EventType
pattern $bEventType_HITExpired :: EventType
$mEventType_HITExpired :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_HITExpired = EventType' "HITExpired"

pattern EventType_HITExtended :: EventType
pattern $bEventType_HITExtended :: EventType
$mEventType_HITExtended :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_HITExtended = EventType' "HITExtended"

pattern EventType_HITReviewable :: EventType
pattern $bEventType_HITReviewable :: EventType
$mEventType_HITReviewable :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_HITReviewable = EventType' "HITReviewable"

pattern EventType_Ping :: EventType
pattern $bEventType_Ping :: EventType
$mEventType_Ping :: forall r. EventType -> (Void# -> r) -> (Void# -> r) -> r
EventType_Ping = EventType' "Ping"

{-# COMPLETE
  EventType_AssignmentAbandoned,
  EventType_AssignmentAccepted,
  EventType_AssignmentApproved,
  EventType_AssignmentRejected,
  EventType_AssignmentReturned,
  EventType_AssignmentSubmitted,
  EventType_HITCreated,
  EventType_HITDisposed,
  EventType_HITExpired,
  EventType_HITExtended,
  EventType_HITReviewable,
  EventType_Ping,
  EventType'
  #-}