{-# 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.Glue.Types.BlueprintRunState
-- 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.Glue.Types.BlueprintRunState
  ( BlueprintRunState
      ( ..,
        BlueprintRunState_FAILED,
        BlueprintRunState_ROLLING_BACK,
        BlueprintRunState_RUNNING,
        BlueprintRunState_SUCCEEDED
      ),
  )
where

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

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

pattern BlueprintRunState_FAILED :: BlueprintRunState
pattern $bBlueprintRunState_FAILED :: BlueprintRunState
$mBlueprintRunState_FAILED :: forall r. BlueprintRunState -> (Void# -> r) -> (Void# -> r) -> r
BlueprintRunState_FAILED = BlueprintRunState' "FAILED"

pattern BlueprintRunState_ROLLING_BACK :: BlueprintRunState
pattern $bBlueprintRunState_ROLLING_BACK :: BlueprintRunState
$mBlueprintRunState_ROLLING_BACK :: forall r. BlueprintRunState -> (Void# -> r) -> (Void# -> r) -> r
BlueprintRunState_ROLLING_BACK = BlueprintRunState' "ROLLING_BACK"

pattern BlueprintRunState_RUNNING :: BlueprintRunState
pattern $bBlueprintRunState_RUNNING :: BlueprintRunState
$mBlueprintRunState_RUNNING :: forall r. BlueprintRunState -> (Void# -> r) -> (Void# -> r) -> r
BlueprintRunState_RUNNING = BlueprintRunState' "RUNNING"

pattern BlueprintRunState_SUCCEEDED :: BlueprintRunState
pattern $bBlueprintRunState_SUCCEEDED :: BlueprintRunState
$mBlueprintRunState_SUCCEEDED :: forall r. BlueprintRunState -> (Void# -> r) -> (Void# -> r) -> r
BlueprintRunState_SUCCEEDED = BlueprintRunState' "SUCCEEDED"

{-# COMPLETE
  BlueprintRunState_FAILED,
  BlueprintRunState_ROLLING_BACK,
  BlueprintRunState_RUNNING,
  BlueprintRunState_SUCCEEDED,
  BlueprintRunState'
  #-}