{-# 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.AMP.Types.WorkspaceStatusCode
-- 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.AMP.Types.WorkspaceStatusCode
  ( WorkspaceStatusCode
      ( ..,
        WorkspaceStatusCode_ACTIVE,
        WorkspaceStatusCode_CREATING,
        WorkspaceStatusCode_CREATION_FAILED,
        WorkspaceStatusCode_DELETING,
        WorkspaceStatusCode_UPDATING
      ),
  )
where

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

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

pattern WorkspaceStatusCode_ACTIVE :: WorkspaceStatusCode
pattern $bWorkspaceStatusCode_ACTIVE :: WorkspaceStatusCode
$mWorkspaceStatusCode_ACTIVE :: forall r. WorkspaceStatusCode -> (Void# -> r) -> (Void# -> r) -> r
WorkspaceStatusCode_ACTIVE = WorkspaceStatusCode' "ACTIVE"

pattern WorkspaceStatusCode_CREATING :: WorkspaceStatusCode
pattern $bWorkspaceStatusCode_CREATING :: WorkspaceStatusCode
$mWorkspaceStatusCode_CREATING :: forall r. WorkspaceStatusCode -> (Void# -> r) -> (Void# -> r) -> r
WorkspaceStatusCode_CREATING = WorkspaceStatusCode' "CREATING"

pattern WorkspaceStatusCode_CREATION_FAILED :: WorkspaceStatusCode
pattern $bWorkspaceStatusCode_CREATION_FAILED :: WorkspaceStatusCode
$mWorkspaceStatusCode_CREATION_FAILED :: forall r. WorkspaceStatusCode -> (Void# -> r) -> (Void# -> r) -> r
WorkspaceStatusCode_CREATION_FAILED = WorkspaceStatusCode' "CREATION_FAILED"

pattern WorkspaceStatusCode_DELETING :: WorkspaceStatusCode
pattern $bWorkspaceStatusCode_DELETING :: WorkspaceStatusCode
$mWorkspaceStatusCode_DELETING :: forall r. WorkspaceStatusCode -> (Void# -> r) -> (Void# -> r) -> r
WorkspaceStatusCode_DELETING = WorkspaceStatusCode' "DELETING"

pattern WorkspaceStatusCode_UPDATING :: WorkspaceStatusCode
pattern $bWorkspaceStatusCode_UPDATING :: WorkspaceStatusCode
$mWorkspaceStatusCode_UPDATING :: forall r. WorkspaceStatusCode -> (Void# -> r) -> (Void# -> r) -> r
WorkspaceStatusCode_UPDATING = WorkspaceStatusCode' "UPDATING"

{-# COMPLETE
  WorkspaceStatusCode_ACTIVE,
  WorkspaceStatusCode_CREATING,
  WorkspaceStatusCode_CREATION_FAILED,
  WorkspaceStatusCode_DELETING,
  WorkspaceStatusCode_UPDATING,
  WorkspaceStatusCode'
  #-}