{- This file was auto-generated from temporal/api/enums/v1/workflow.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Temporal.Api.Enums.V1.Workflow (
        ContinueAsNewInitiator(..), ContinueAsNewInitiator(),
        ContinueAsNewInitiator'UnrecognizedValue,
        HistoryEventFilterType(..), HistoryEventFilterType(),
        HistoryEventFilterType'UnrecognizedValue, ParentClosePolicy(..),
        ParentClosePolicy(), ParentClosePolicy'UnrecognizedValue,
        PendingActivityState(..), PendingActivityState(),
        PendingActivityState'UnrecognizedValue,
        PendingWorkflowTaskState(..), PendingWorkflowTaskState(),
        PendingWorkflowTaskState'UnrecognizedValue, RetryState(..),
        RetryState(), RetryState'UnrecognizedValue, TimeoutType(..),
        TimeoutType(), TimeoutType'UnrecognizedValue,
        WorkflowExecutionStatus(..), WorkflowExecutionStatus(),
        WorkflowExecutionStatus'UnrecognizedValue,
        WorkflowIdConflictPolicy(..), WorkflowIdConflictPolicy(),
        WorkflowIdConflictPolicy'UnrecognizedValue,
        WorkflowIdReusePolicy(..), WorkflowIdReusePolicy(),
        WorkflowIdReusePolicy'UnrecognizedValue
    ) where
import qualified Data.ProtoLens.Runtime.Control.DeepSeq as Control.DeepSeq
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Prism as Data.ProtoLens.Prism
import qualified Data.ProtoLens.Runtime.Prelude as Prelude
import qualified Data.ProtoLens.Runtime.Data.Int as Data.Int
import qualified Data.ProtoLens.Runtime.Data.Monoid as Data.Monoid
import qualified Data.ProtoLens.Runtime.Data.Word as Data.Word
import qualified Data.ProtoLens.Runtime.Data.ProtoLens as Data.ProtoLens
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Bytes as Data.ProtoLens.Encoding.Bytes
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Growing as Data.ProtoLens.Encoding.Growing
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Parser.Unsafe as Data.ProtoLens.Encoding.Parser.Unsafe
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Encoding.Wire as Data.ProtoLens.Encoding.Wire
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Field as Data.ProtoLens.Field
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Message.Enum as Data.ProtoLens.Message.Enum
import qualified Data.ProtoLens.Runtime.Data.ProtoLens.Service.Types as Data.ProtoLens.Service.Types
import qualified Data.ProtoLens.Runtime.Lens.Family2 as Lens.Family2
import qualified Data.ProtoLens.Runtime.Lens.Family2.Unchecked as Lens.Family2.Unchecked
import qualified Data.ProtoLens.Runtime.Data.Text as Data.Text
import qualified Data.ProtoLens.Runtime.Data.Map as Data.Map
import qualified Data.ProtoLens.Runtime.Data.ByteString as Data.ByteString
import qualified Data.ProtoLens.Runtime.Data.ByteString.Char8 as Data.ByteString.Char8
import qualified Data.ProtoLens.Runtime.Data.Text.Encoding as Data.Text.Encoding
import qualified Data.ProtoLens.Runtime.Data.Vector as Data.Vector
import qualified Data.ProtoLens.Runtime.Data.Vector.Generic as Data.Vector.Generic
import qualified Data.ProtoLens.Runtime.Data.Vector.Unboxed as Data.Vector.Unboxed
import qualified Data.ProtoLens.Runtime.Text.Read as Text.Read
newtype ContinueAsNewInitiator'UnrecognizedValue
  = ContinueAsNewInitiator'UnrecognizedValue Data.Int.Int32
  deriving stock (ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
(ContinueAsNewInitiator'UnrecognizedValue
 -> ContinueAsNewInitiator'UnrecognizedValue -> Bool)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue -> Bool)
-> Eq ContinueAsNewInitiator'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
== :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
$c/= :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
/= :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
Prelude.Eq, Eq ContinueAsNewInitiator'UnrecognizedValue
Eq ContinueAsNewInitiator'UnrecognizedValue =>
(ContinueAsNewInitiator'UnrecognizedValue
 -> ContinueAsNewInitiator'UnrecognizedValue -> Ordering)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue -> Bool)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue -> Bool)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue -> Bool)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue -> Bool)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue)
-> (ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue
    -> ContinueAsNewInitiator'UnrecognizedValue)
-> Ord ContinueAsNewInitiator'UnrecognizedValue
ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Ordering
ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
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
$ccompare :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Ordering
compare :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Ordering
$c< :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
< :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
$c<= :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
<= :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
$c> :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
> :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
$c>= :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
>= :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue -> Bool
$cmax :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
max :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
$cmin :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
min :: ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
-> ContinueAsNewInitiator'UnrecognizedValue
Prelude.Ord, Int -> ContinueAsNewInitiator'UnrecognizedValue -> ShowS
[ContinueAsNewInitiator'UnrecognizedValue] -> ShowS
ContinueAsNewInitiator'UnrecognizedValue -> String
(Int -> ContinueAsNewInitiator'UnrecognizedValue -> ShowS)
-> (ContinueAsNewInitiator'UnrecognizedValue -> String)
-> ([ContinueAsNewInitiator'UnrecognizedValue] -> ShowS)
-> Show ContinueAsNewInitiator'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ContinueAsNewInitiator'UnrecognizedValue -> ShowS
showsPrec :: Int -> ContinueAsNewInitiator'UnrecognizedValue -> ShowS
$cshow :: ContinueAsNewInitiator'UnrecognizedValue -> String
show :: ContinueAsNewInitiator'UnrecognizedValue -> String
$cshowList :: [ContinueAsNewInitiator'UnrecognizedValue] -> ShowS
showList :: [ContinueAsNewInitiator'UnrecognizedValue] -> ShowS
Prelude.Show)
data ContinueAsNewInitiator
  = CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED |
    CONTINUE_AS_NEW_INITIATOR_WORKFLOW |
    CONTINUE_AS_NEW_INITIATOR_RETRY |
    CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE |
    ContinueAsNewInitiator'Unrecognized !ContinueAsNewInitiator'UnrecognizedValue
  deriving stock (Int -> ContinueAsNewInitiator -> ShowS
[ContinueAsNewInitiator] -> ShowS
ContinueAsNewInitiator -> String
(Int -> ContinueAsNewInitiator -> ShowS)
-> (ContinueAsNewInitiator -> String)
-> ([ContinueAsNewInitiator] -> ShowS)
-> Show ContinueAsNewInitiator
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ContinueAsNewInitiator -> ShowS
showsPrec :: Int -> ContinueAsNewInitiator -> ShowS
$cshow :: ContinueAsNewInitiator -> String
show :: ContinueAsNewInitiator -> String
$cshowList :: [ContinueAsNewInitiator] -> ShowS
showList :: [ContinueAsNewInitiator] -> ShowS
Prelude.Show, ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
(ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool)
-> (ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool)
-> Eq ContinueAsNewInitiator
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
== :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
$c/= :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
/= :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
Prelude.Eq, Eq ContinueAsNewInitiator
Eq ContinueAsNewInitiator =>
(ContinueAsNewInitiator -> ContinueAsNewInitiator -> Ordering)
-> (ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool)
-> (ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool)
-> (ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool)
-> (ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool)
-> (ContinueAsNewInitiator
    -> ContinueAsNewInitiator -> ContinueAsNewInitiator)
-> (ContinueAsNewInitiator
    -> ContinueAsNewInitiator -> ContinueAsNewInitiator)
-> Ord ContinueAsNewInitiator
ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
ContinueAsNewInitiator -> ContinueAsNewInitiator -> Ordering
ContinueAsNewInitiator
-> ContinueAsNewInitiator -> ContinueAsNewInitiator
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
$ccompare :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Ordering
compare :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Ordering
$c< :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
< :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
$c<= :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
<= :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
$c> :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
> :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
$c>= :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
>= :: ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
$cmax :: ContinueAsNewInitiator
-> ContinueAsNewInitiator -> ContinueAsNewInitiator
max :: ContinueAsNewInitiator
-> ContinueAsNewInitiator -> ContinueAsNewInitiator
$cmin :: ContinueAsNewInitiator
-> ContinueAsNewInitiator -> ContinueAsNewInitiator
min :: ContinueAsNewInitiator
-> ContinueAsNewInitiator -> ContinueAsNewInitiator
Prelude.Ord)
instance Data.ProtoLens.MessageEnum ContinueAsNewInitiator where
  maybeToEnum :: Int -> Maybe ContinueAsNewInitiator
maybeToEnum Int
0 = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
  maybeToEnum Int
1 = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
  maybeToEnum Int
2 = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
  maybeToEnum Int
3
    = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
  maybeToEnum Int
k
    = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just
        (ContinueAsNewInitiator'UnrecognizedValue -> ContinueAsNewInitiator
ContinueAsNewInitiator'Unrecognized
           (Int32 -> ContinueAsNewInitiator'UnrecognizedValue
ContinueAsNewInitiator'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: ContinueAsNewInitiator -> String
showEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
    = String
"CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED"
  showEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
    = String
"CONTINUE_AS_NEW_INITIATOR_WORKFLOW"
  showEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
    = String
"CONTINUE_AS_NEW_INITIATOR_RETRY"
  showEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
    = String
"CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE"
  showEnum
    (ContinueAsNewInitiator'Unrecognized (ContinueAsNewInitiator'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe ContinueAsNewInitiator
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED"
    = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"CONTINUE_AS_NEW_INITIATOR_WORKFLOW"
    = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"CONTINUE_AS_NEW_INITIATOR_RETRY"
    = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE"
    = ContinueAsNewInitiator -> Maybe ContinueAsNewInitiator
forall a. a -> Maybe a
Prelude.Just ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe ContinueAsNewInitiator)
-> Maybe ContinueAsNewInitiator
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe ContinueAsNewInitiator
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded ContinueAsNewInitiator where
  minBound :: ContinueAsNewInitiator
minBound = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
  maxBound :: ContinueAsNewInitiator
maxBound = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
instance Prelude.Enum ContinueAsNewInitiator where
  toEnum :: Int -> ContinueAsNewInitiator
toEnum Int
k__
    = ContinueAsNewInitiator
-> (ContinueAsNewInitiator -> ContinueAsNewInitiator)
-> Maybe ContinueAsNewInitiator
-> ContinueAsNewInitiator
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> ContinueAsNewInitiator
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum ContinueAsNewInitiator: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        ContinueAsNewInitiator -> ContinueAsNewInitiator
forall a. a -> a
Prelude.id (Int -> Maybe ContinueAsNewInitiator
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: ContinueAsNewInitiator -> Int
fromEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED = Int
0
  fromEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW = Int
1
  fromEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY = Int
2
  fromEnum ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE = Int
3
  fromEnum
    (ContinueAsNewInitiator'Unrecognized (ContinueAsNewInitiator'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: ContinueAsNewInitiator -> ContinueAsNewInitiator
succ ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
    = String -> ContinueAsNewInitiator
forall a. HasCallStack => String -> a
Prelude.error
        String
"ContinueAsNewInitiator.succ: bad argument CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE. This value would be out of bounds."
  succ ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
    = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
  succ ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
    = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
  succ ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
    = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
  succ (ContinueAsNewInitiator'Unrecognized ContinueAsNewInitiator'UnrecognizedValue
_)
    = String -> ContinueAsNewInitiator
forall a. HasCallStack => String -> a
Prelude.error
        String
"ContinueAsNewInitiator.succ: bad argument: unrecognized value"
  pred :: ContinueAsNewInitiator -> ContinueAsNewInitiator
pred ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
    = String -> ContinueAsNewInitiator
forall a. HasCallStack => String -> a
Prelude.error
        String
"ContinueAsNewInitiator.pred: bad argument CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED. This value would be out of bounds."
  pred ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
    = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
  pred ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
    = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_WORKFLOW
  pred ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_CRON_SCHEDULE
    = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_RETRY
  pred (ContinueAsNewInitiator'Unrecognized ContinueAsNewInitiator'UnrecognizedValue
_)
    = String -> ContinueAsNewInitiator
forall a. HasCallStack => String -> a
Prelude.error
        String
"ContinueAsNewInitiator.pred: bad argument: unrecognized value"
  enumFrom :: ContinueAsNewInitiator -> [ContinueAsNewInitiator]
enumFrom = ContinueAsNewInitiator -> [ContinueAsNewInitiator]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: ContinueAsNewInitiator
-> ContinueAsNewInitiator -> [ContinueAsNewInitiator]
enumFromTo = ContinueAsNewInitiator
-> ContinueAsNewInitiator -> [ContinueAsNewInitiator]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: ContinueAsNewInitiator
-> ContinueAsNewInitiator -> [ContinueAsNewInitiator]
enumFromThen = ContinueAsNewInitiator
-> ContinueAsNewInitiator -> [ContinueAsNewInitiator]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: ContinueAsNewInitiator
-> ContinueAsNewInitiator
-> ContinueAsNewInitiator
-> [ContinueAsNewInitiator]
enumFromThenTo = ContinueAsNewInitiator
-> ContinueAsNewInitiator
-> ContinueAsNewInitiator
-> [ContinueAsNewInitiator]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault ContinueAsNewInitiator where
  fieldDefault :: ContinueAsNewInitiator
fieldDefault = ContinueAsNewInitiator
CONTINUE_AS_NEW_INITIATOR_UNSPECIFIED
instance Control.DeepSeq.NFData ContinueAsNewInitiator where
  rnf :: ContinueAsNewInitiator -> ()
rnf ContinueAsNewInitiator
x__ = ContinueAsNewInitiator -> () -> ()
forall a b. a -> b -> b
Prelude.seq ContinueAsNewInitiator
x__ ()
newtype HistoryEventFilterType'UnrecognizedValue
  = HistoryEventFilterType'UnrecognizedValue Data.Int.Int32
  deriving stock (HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
(HistoryEventFilterType'UnrecognizedValue
 -> HistoryEventFilterType'UnrecognizedValue -> Bool)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue -> Bool)
-> Eq HistoryEventFilterType'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
== :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
$c/= :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
/= :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
Prelude.Eq, Eq HistoryEventFilterType'UnrecognizedValue
Eq HistoryEventFilterType'UnrecognizedValue =>
(HistoryEventFilterType'UnrecognizedValue
 -> HistoryEventFilterType'UnrecognizedValue -> Ordering)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue -> Bool)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue -> Bool)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue -> Bool)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue -> Bool)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue)
-> (HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue
    -> HistoryEventFilterType'UnrecognizedValue)
-> Ord HistoryEventFilterType'UnrecognizedValue
HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Ordering
HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
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
$ccompare :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Ordering
compare :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Ordering
$c< :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
< :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
$c<= :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
<= :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
$c> :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
> :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
$c>= :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
>= :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue -> Bool
$cmax :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
max :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
$cmin :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
min :: HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
-> HistoryEventFilterType'UnrecognizedValue
Prelude.Ord, Int -> HistoryEventFilterType'UnrecognizedValue -> ShowS
[HistoryEventFilterType'UnrecognizedValue] -> ShowS
HistoryEventFilterType'UnrecognizedValue -> String
(Int -> HistoryEventFilterType'UnrecognizedValue -> ShowS)
-> (HistoryEventFilterType'UnrecognizedValue -> String)
-> ([HistoryEventFilterType'UnrecognizedValue] -> ShowS)
-> Show HistoryEventFilterType'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> HistoryEventFilterType'UnrecognizedValue -> ShowS
showsPrec :: Int -> HistoryEventFilterType'UnrecognizedValue -> ShowS
$cshow :: HistoryEventFilterType'UnrecognizedValue -> String
show :: HistoryEventFilterType'UnrecognizedValue -> String
$cshowList :: [HistoryEventFilterType'UnrecognizedValue] -> ShowS
showList :: [HistoryEventFilterType'UnrecognizedValue] -> ShowS
Prelude.Show)
data HistoryEventFilterType
  = HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED |
    HISTORY_EVENT_FILTER_TYPE_ALL_EVENT |
    HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT |
    HistoryEventFilterType'Unrecognized !HistoryEventFilterType'UnrecognizedValue
  deriving stock (Int -> HistoryEventFilterType -> ShowS
[HistoryEventFilterType] -> ShowS
HistoryEventFilterType -> String
(Int -> HistoryEventFilterType -> ShowS)
-> (HistoryEventFilterType -> String)
-> ([HistoryEventFilterType] -> ShowS)
-> Show HistoryEventFilterType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> HistoryEventFilterType -> ShowS
showsPrec :: Int -> HistoryEventFilterType -> ShowS
$cshow :: HistoryEventFilterType -> String
show :: HistoryEventFilterType -> String
$cshowList :: [HistoryEventFilterType] -> ShowS
showList :: [HistoryEventFilterType] -> ShowS
Prelude.Show, HistoryEventFilterType -> HistoryEventFilterType -> Bool
(HistoryEventFilterType -> HistoryEventFilterType -> Bool)
-> (HistoryEventFilterType -> HistoryEventFilterType -> Bool)
-> Eq HistoryEventFilterType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
== :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
$c/= :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
/= :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
Prelude.Eq, Eq HistoryEventFilterType
Eq HistoryEventFilterType =>
(HistoryEventFilterType -> HistoryEventFilterType -> Ordering)
-> (HistoryEventFilterType -> HistoryEventFilterType -> Bool)
-> (HistoryEventFilterType -> HistoryEventFilterType -> Bool)
-> (HistoryEventFilterType -> HistoryEventFilterType -> Bool)
-> (HistoryEventFilterType -> HistoryEventFilterType -> Bool)
-> (HistoryEventFilterType
    -> HistoryEventFilterType -> HistoryEventFilterType)
-> (HistoryEventFilterType
    -> HistoryEventFilterType -> HistoryEventFilterType)
-> Ord HistoryEventFilterType
HistoryEventFilterType -> HistoryEventFilterType -> Bool
HistoryEventFilterType -> HistoryEventFilterType -> Ordering
HistoryEventFilterType
-> HistoryEventFilterType -> HistoryEventFilterType
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
$ccompare :: HistoryEventFilterType -> HistoryEventFilterType -> Ordering
compare :: HistoryEventFilterType -> HistoryEventFilterType -> Ordering
$c< :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
< :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
$c<= :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
<= :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
$c> :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
> :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
$c>= :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
>= :: HistoryEventFilterType -> HistoryEventFilterType -> Bool
$cmax :: HistoryEventFilterType
-> HistoryEventFilterType -> HistoryEventFilterType
max :: HistoryEventFilterType
-> HistoryEventFilterType -> HistoryEventFilterType
$cmin :: HistoryEventFilterType
-> HistoryEventFilterType -> HistoryEventFilterType
min :: HistoryEventFilterType
-> HistoryEventFilterType -> HistoryEventFilterType
Prelude.Ord)
instance Data.ProtoLens.MessageEnum HistoryEventFilterType where
  maybeToEnum :: Int -> Maybe HistoryEventFilterType
maybeToEnum Int
0 = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
  maybeToEnum Int
1 = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
  maybeToEnum Int
2 = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
  maybeToEnum Int
k
    = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just
        (HistoryEventFilterType'UnrecognizedValue -> HistoryEventFilterType
HistoryEventFilterType'Unrecognized
           (Int32 -> HistoryEventFilterType'UnrecognizedValue
HistoryEventFilterType'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: HistoryEventFilterType -> String
showEnum HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
    = String
"HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED"
  showEnum HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
    = String
"HISTORY_EVENT_FILTER_TYPE_ALL_EVENT"
  showEnum HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
    = String
"HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT"
  showEnum
    (HistoryEventFilterType'Unrecognized (HistoryEventFilterType'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe HistoryEventFilterType
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED"
    = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"HISTORY_EVENT_FILTER_TYPE_ALL_EVENT"
    = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT"
    = HistoryEventFilterType -> Maybe HistoryEventFilterType
forall a. a -> Maybe a
Prelude.Just HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe HistoryEventFilterType)
-> Maybe HistoryEventFilterType
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe HistoryEventFilterType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded HistoryEventFilterType where
  minBound :: HistoryEventFilterType
minBound = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
  maxBound :: HistoryEventFilterType
maxBound = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
instance Prelude.Enum HistoryEventFilterType where
  toEnum :: Int -> HistoryEventFilterType
toEnum Int
k__
    = HistoryEventFilterType
-> (HistoryEventFilterType -> HistoryEventFilterType)
-> Maybe HistoryEventFilterType
-> HistoryEventFilterType
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> HistoryEventFilterType
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum HistoryEventFilterType: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        HistoryEventFilterType -> HistoryEventFilterType
forall a. a -> a
Prelude.id (Int -> Maybe HistoryEventFilterType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: HistoryEventFilterType -> Int
fromEnum HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED = Int
0
  fromEnum HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT = Int
1
  fromEnum HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT = Int
2
  fromEnum
    (HistoryEventFilterType'Unrecognized (HistoryEventFilterType'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: HistoryEventFilterType -> HistoryEventFilterType
succ HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
    = String -> HistoryEventFilterType
forall a. HasCallStack => String -> a
Prelude.error
        String
"HistoryEventFilterType.succ: bad argument HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT. This value would be out of bounds."
  succ HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
    = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
  succ HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
    = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
  succ (HistoryEventFilterType'Unrecognized HistoryEventFilterType'UnrecognizedValue
_)
    = String -> HistoryEventFilterType
forall a. HasCallStack => String -> a
Prelude.error
        String
"HistoryEventFilterType.succ: bad argument: unrecognized value"
  pred :: HistoryEventFilterType -> HistoryEventFilterType
pred HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
    = String -> HistoryEventFilterType
forall a. HasCallStack => String -> a
Prelude.error
        String
"HistoryEventFilterType.pred: bad argument HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED. This value would be out of bounds."
  pred HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
    = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
  pred HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_CLOSE_EVENT
    = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_ALL_EVENT
  pred (HistoryEventFilterType'Unrecognized HistoryEventFilterType'UnrecognizedValue
_)
    = String -> HistoryEventFilterType
forall a. HasCallStack => String -> a
Prelude.error
        String
"HistoryEventFilterType.pred: bad argument: unrecognized value"
  enumFrom :: HistoryEventFilterType -> [HistoryEventFilterType]
enumFrom = HistoryEventFilterType -> [HistoryEventFilterType]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: HistoryEventFilterType
-> HistoryEventFilterType -> [HistoryEventFilterType]
enumFromTo = HistoryEventFilterType
-> HistoryEventFilterType -> [HistoryEventFilterType]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: HistoryEventFilterType
-> HistoryEventFilterType -> [HistoryEventFilterType]
enumFromThen = HistoryEventFilterType
-> HistoryEventFilterType -> [HistoryEventFilterType]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: HistoryEventFilterType
-> HistoryEventFilterType
-> HistoryEventFilterType
-> [HistoryEventFilterType]
enumFromThenTo = HistoryEventFilterType
-> HistoryEventFilterType
-> HistoryEventFilterType
-> [HistoryEventFilterType]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault HistoryEventFilterType where
  fieldDefault :: HistoryEventFilterType
fieldDefault = HistoryEventFilterType
HISTORY_EVENT_FILTER_TYPE_UNSPECIFIED
instance Control.DeepSeq.NFData HistoryEventFilterType where
  rnf :: HistoryEventFilterType -> ()
rnf HistoryEventFilterType
x__ = HistoryEventFilterType -> () -> ()
forall a b. a -> b -> b
Prelude.seq HistoryEventFilterType
x__ ()
newtype ParentClosePolicy'UnrecognizedValue
  = ParentClosePolicy'UnrecognizedValue Data.Int.Int32
  deriving stock (ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
(ParentClosePolicy'UnrecognizedValue
 -> ParentClosePolicy'UnrecognizedValue -> Bool)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue -> Bool)
-> Eq ParentClosePolicy'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
== :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
$c/= :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
/= :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
Prelude.Eq, Eq ParentClosePolicy'UnrecognizedValue
Eq ParentClosePolicy'UnrecognizedValue =>
(ParentClosePolicy'UnrecognizedValue
 -> ParentClosePolicy'UnrecognizedValue -> Ordering)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue -> Bool)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue -> Bool)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue -> Bool)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue -> Bool)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue)
-> (ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue
    -> ParentClosePolicy'UnrecognizedValue)
-> Ord ParentClosePolicy'UnrecognizedValue
ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Ordering
ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
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
$ccompare :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Ordering
compare :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Ordering
$c< :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
< :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
$c<= :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
<= :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
$c> :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
> :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
$c>= :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
>= :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue -> Bool
$cmax :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
max :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
$cmin :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
min :: ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
-> ParentClosePolicy'UnrecognizedValue
Prelude.Ord, Int -> ParentClosePolicy'UnrecognizedValue -> ShowS
[ParentClosePolicy'UnrecognizedValue] -> ShowS
ParentClosePolicy'UnrecognizedValue -> String
(Int -> ParentClosePolicy'UnrecognizedValue -> ShowS)
-> (ParentClosePolicy'UnrecognizedValue -> String)
-> ([ParentClosePolicy'UnrecognizedValue] -> ShowS)
-> Show ParentClosePolicy'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ParentClosePolicy'UnrecognizedValue -> ShowS
showsPrec :: Int -> ParentClosePolicy'UnrecognizedValue -> ShowS
$cshow :: ParentClosePolicy'UnrecognizedValue -> String
show :: ParentClosePolicy'UnrecognizedValue -> String
$cshowList :: [ParentClosePolicy'UnrecognizedValue] -> ShowS
showList :: [ParentClosePolicy'UnrecognizedValue] -> ShowS
Prelude.Show)
data ParentClosePolicy
  = PARENT_CLOSE_POLICY_UNSPECIFIED |
    PARENT_CLOSE_POLICY_TERMINATE |
    PARENT_CLOSE_POLICY_ABANDON |
    PARENT_CLOSE_POLICY_REQUEST_CANCEL |
    ParentClosePolicy'Unrecognized !ParentClosePolicy'UnrecognizedValue
  deriving stock (Int -> ParentClosePolicy -> ShowS
[ParentClosePolicy] -> ShowS
ParentClosePolicy -> String
(Int -> ParentClosePolicy -> ShowS)
-> (ParentClosePolicy -> String)
-> ([ParentClosePolicy] -> ShowS)
-> Show ParentClosePolicy
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ParentClosePolicy -> ShowS
showsPrec :: Int -> ParentClosePolicy -> ShowS
$cshow :: ParentClosePolicy -> String
show :: ParentClosePolicy -> String
$cshowList :: [ParentClosePolicy] -> ShowS
showList :: [ParentClosePolicy] -> ShowS
Prelude.Show, ParentClosePolicy -> ParentClosePolicy -> Bool
(ParentClosePolicy -> ParentClosePolicy -> Bool)
-> (ParentClosePolicy -> ParentClosePolicy -> Bool)
-> Eq ParentClosePolicy
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ParentClosePolicy -> ParentClosePolicy -> Bool
== :: ParentClosePolicy -> ParentClosePolicy -> Bool
$c/= :: ParentClosePolicy -> ParentClosePolicy -> Bool
/= :: ParentClosePolicy -> ParentClosePolicy -> Bool
Prelude.Eq, Eq ParentClosePolicy
Eq ParentClosePolicy =>
(ParentClosePolicy -> ParentClosePolicy -> Ordering)
-> (ParentClosePolicy -> ParentClosePolicy -> Bool)
-> (ParentClosePolicy -> ParentClosePolicy -> Bool)
-> (ParentClosePolicy -> ParentClosePolicy -> Bool)
-> (ParentClosePolicy -> ParentClosePolicy -> Bool)
-> (ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy)
-> (ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy)
-> Ord ParentClosePolicy
ParentClosePolicy -> ParentClosePolicy -> Bool
ParentClosePolicy -> ParentClosePolicy -> Ordering
ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy
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
$ccompare :: ParentClosePolicy -> ParentClosePolicy -> Ordering
compare :: ParentClosePolicy -> ParentClosePolicy -> Ordering
$c< :: ParentClosePolicy -> ParentClosePolicy -> Bool
< :: ParentClosePolicy -> ParentClosePolicy -> Bool
$c<= :: ParentClosePolicy -> ParentClosePolicy -> Bool
<= :: ParentClosePolicy -> ParentClosePolicy -> Bool
$c> :: ParentClosePolicy -> ParentClosePolicy -> Bool
> :: ParentClosePolicy -> ParentClosePolicy -> Bool
$c>= :: ParentClosePolicy -> ParentClosePolicy -> Bool
>= :: ParentClosePolicy -> ParentClosePolicy -> Bool
$cmax :: ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy
max :: ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy
$cmin :: ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy
min :: ParentClosePolicy -> ParentClosePolicy -> ParentClosePolicy
Prelude.Ord)
instance Data.ProtoLens.MessageEnum ParentClosePolicy where
  maybeToEnum :: Int -> Maybe ParentClosePolicy
maybeToEnum Int
0 = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
  maybeToEnum Int
1 = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE
  maybeToEnum Int
2 = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON
  maybeToEnum Int
3 = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
  maybeToEnum Int
k
    = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just
        (ParentClosePolicy'UnrecognizedValue -> ParentClosePolicy
ParentClosePolicy'Unrecognized
           (Int32 -> ParentClosePolicy'UnrecognizedValue
ParentClosePolicy'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: ParentClosePolicy -> String
showEnum ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
    = String
"PARENT_CLOSE_POLICY_UNSPECIFIED"
  showEnum ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE
    = String
"PARENT_CLOSE_POLICY_TERMINATE"
  showEnum ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON
    = String
"PARENT_CLOSE_POLICY_ABANDON"
  showEnum ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
    = String
"PARENT_CLOSE_POLICY_REQUEST_CANCEL"
  showEnum
    (ParentClosePolicy'Unrecognized (ParentClosePolicy'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe ParentClosePolicy
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PARENT_CLOSE_POLICY_UNSPECIFIED"
    = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PARENT_CLOSE_POLICY_TERMINATE"
    = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PARENT_CLOSE_POLICY_ABANDON"
    = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PARENT_CLOSE_POLICY_REQUEST_CANCEL"
    = ParentClosePolicy -> Maybe ParentClosePolicy
forall a. a -> Maybe a
Prelude.Just ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe ParentClosePolicy) -> Maybe ParentClosePolicy
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe ParentClosePolicy
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded ParentClosePolicy where
  minBound :: ParentClosePolicy
minBound = ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
  maxBound :: ParentClosePolicy
maxBound = ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
instance Prelude.Enum ParentClosePolicy where
  toEnum :: Int -> ParentClosePolicy
toEnum Int
k__
    = ParentClosePolicy
-> (ParentClosePolicy -> ParentClosePolicy)
-> Maybe ParentClosePolicy
-> ParentClosePolicy
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> ParentClosePolicy
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum ParentClosePolicy: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        ParentClosePolicy -> ParentClosePolicy
forall a. a -> a
Prelude.id (Int -> Maybe ParentClosePolicy
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: ParentClosePolicy -> Int
fromEnum ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED = Int
0
  fromEnum ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE = Int
1
  fromEnum ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON = Int
2
  fromEnum ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL = Int
3
  fromEnum
    (ParentClosePolicy'Unrecognized (ParentClosePolicy'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: ParentClosePolicy -> ParentClosePolicy
succ ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
    = String -> ParentClosePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"ParentClosePolicy.succ: bad argument PARENT_CLOSE_POLICY_REQUEST_CANCEL. This value would be out of bounds."
  succ ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
    = ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE
  succ ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE = ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON
  succ ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON
    = ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
  succ (ParentClosePolicy'Unrecognized ParentClosePolicy'UnrecognizedValue
_)
    = String -> ParentClosePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"ParentClosePolicy.succ: bad argument: unrecognized value"
  pred :: ParentClosePolicy -> ParentClosePolicy
pred ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
    = String -> ParentClosePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"ParentClosePolicy.pred: bad argument PARENT_CLOSE_POLICY_UNSPECIFIED. This value would be out of bounds."
  pred ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE
    = ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
  pred ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON = ParentClosePolicy
PARENT_CLOSE_POLICY_TERMINATE
  pred ParentClosePolicy
PARENT_CLOSE_POLICY_REQUEST_CANCEL
    = ParentClosePolicy
PARENT_CLOSE_POLICY_ABANDON
  pred (ParentClosePolicy'Unrecognized ParentClosePolicy'UnrecognizedValue
_)
    = String -> ParentClosePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"ParentClosePolicy.pred: bad argument: unrecognized value"
  enumFrom :: ParentClosePolicy -> [ParentClosePolicy]
enumFrom = ParentClosePolicy -> [ParentClosePolicy]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: ParentClosePolicy -> ParentClosePolicy -> [ParentClosePolicy]
enumFromTo = ParentClosePolicy -> ParentClosePolicy -> [ParentClosePolicy]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: ParentClosePolicy -> ParentClosePolicy -> [ParentClosePolicy]
enumFromThen = ParentClosePolicy -> ParentClosePolicy -> [ParentClosePolicy]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: ParentClosePolicy
-> ParentClosePolicy -> ParentClosePolicy -> [ParentClosePolicy]
enumFromThenTo = ParentClosePolicy
-> ParentClosePolicy -> ParentClosePolicy -> [ParentClosePolicy]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault ParentClosePolicy where
  fieldDefault :: ParentClosePolicy
fieldDefault = ParentClosePolicy
PARENT_CLOSE_POLICY_UNSPECIFIED
instance Control.DeepSeq.NFData ParentClosePolicy where
  rnf :: ParentClosePolicy -> ()
rnf ParentClosePolicy
x__ = ParentClosePolicy -> () -> ()
forall a b. a -> b -> b
Prelude.seq ParentClosePolicy
x__ ()
newtype PendingActivityState'UnrecognizedValue
  = PendingActivityState'UnrecognizedValue Data.Int.Int32
  deriving stock (PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
(PendingActivityState'UnrecognizedValue
 -> PendingActivityState'UnrecognizedValue -> Bool)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue -> Bool)
-> Eq PendingActivityState'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
== :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
$c/= :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
/= :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
Prelude.Eq, Eq PendingActivityState'UnrecognizedValue
Eq PendingActivityState'UnrecognizedValue =>
(PendingActivityState'UnrecognizedValue
 -> PendingActivityState'UnrecognizedValue -> Ordering)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue -> Bool)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue -> Bool)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue -> Bool)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue -> Bool)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue)
-> (PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue
    -> PendingActivityState'UnrecognizedValue)
-> Ord PendingActivityState'UnrecognizedValue
PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Ordering
PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
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
$ccompare :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Ordering
compare :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Ordering
$c< :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
< :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
$c<= :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
<= :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
$c> :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
> :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
$c>= :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
>= :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue -> Bool
$cmax :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
max :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
$cmin :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
min :: PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
-> PendingActivityState'UnrecognizedValue
Prelude.Ord, Int -> PendingActivityState'UnrecognizedValue -> ShowS
[PendingActivityState'UnrecognizedValue] -> ShowS
PendingActivityState'UnrecognizedValue -> String
(Int -> PendingActivityState'UnrecognizedValue -> ShowS)
-> (PendingActivityState'UnrecognizedValue -> String)
-> ([PendingActivityState'UnrecognizedValue] -> ShowS)
-> Show PendingActivityState'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PendingActivityState'UnrecognizedValue -> ShowS
showsPrec :: Int -> PendingActivityState'UnrecognizedValue -> ShowS
$cshow :: PendingActivityState'UnrecognizedValue -> String
show :: PendingActivityState'UnrecognizedValue -> String
$cshowList :: [PendingActivityState'UnrecognizedValue] -> ShowS
showList :: [PendingActivityState'UnrecognizedValue] -> ShowS
Prelude.Show)
data PendingActivityState
  = PENDING_ACTIVITY_STATE_UNSPECIFIED |
    PENDING_ACTIVITY_STATE_SCHEDULED |
    PENDING_ACTIVITY_STATE_STARTED |
    PENDING_ACTIVITY_STATE_CANCEL_REQUESTED |
    PendingActivityState'Unrecognized !PendingActivityState'UnrecognizedValue
  deriving stock (Int -> PendingActivityState -> ShowS
[PendingActivityState] -> ShowS
PendingActivityState -> String
(Int -> PendingActivityState -> ShowS)
-> (PendingActivityState -> String)
-> ([PendingActivityState] -> ShowS)
-> Show PendingActivityState
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PendingActivityState -> ShowS
showsPrec :: Int -> PendingActivityState -> ShowS
$cshow :: PendingActivityState -> String
show :: PendingActivityState -> String
$cshowList :: [PendingActivityState] -> ShowS
showList :: [PendingActivityState] -> ShowS
Prelude.Show, PendingActivityState -> PendingActivityState -> Bool
(PendingActivityState -> PendingActivityState -> Bool)
-> (PendingActivityState -> PendingActivityState -> Bool)
-> Eq PendingActivityState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingActivityState -> PendingActivityState -> Bool
== :: PendingActivityState -> PendingActivityState -> Bool
$c/= :: PendingActivityState -> PendingActivityState -> Bool
/= :: PendingActivityState -> PendingActivityState -> Bool
Prelude.Eq, Eq PendingActivityState
Eq PendingActivityState =>
(PendingActivityState -> PendingActivityState -> Ordering)
-> (PendingActivityState -> PendingActivityState -> Bool)
-> (PendingActivityState -> PendingActivityState -> Bool)
-> (PendingActivityState -> PendingActivityState -> Bool)
-> (PendingActivityState -> PendingActivityState -> Bool)
-> (PendingActivityState
    -> PendingActivityState -> PendingActivityState)
-> (PendingActivityState
    -> PendingActivityState -> PendingActivityState)
-> Ord PendingActivityState
PendingActivityState -> PendingActivityState -> Bool
PendingActivityState -> PendingActivityState -> Ordering
PendingActivityState
-> PendingActivityState -> PendingActivityState
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
$ccompare :: PendingActivityState -> PendingActivityState -> Ordering
compare :: PendingActivityState -> PendingActivityState -> Ordering
$c< :: PendingActivityState -> PendingActivityState -> Bool
< :: PendingActivityState -> PendingActivityState -> Bool
$c<= :: PendingActivityState -> PendingActivityState -> Bool
<= :: PendingActivityState -> PendingActivityState -> Bool
$c> :: PendingActivityState -> PendingActivityState -> Bool
> :: PendingActivityState -> PendingActivityState -> Bool
$c>= :: PendingActivityState -> PendingActivityState -> Bool
>= :: PendingActivityState -> PendingActivityState -> Bool
$cmax :: PendingActivityState
-> PendingActivityState -> PendingActivityState
max :: PendingActivityState
-> PendingActivityState -> PendingActivityState
$cmin :: PendingActivityState
-> PendingActivityState -> PendingActivityState
min :: PendingActivityState
-> PendingActivityState -> PendingActivityState
Prelude.Ord)
instance Data.ProtoLens.MessageEnum PendingActivityState where
  maybeToEnum :: Int -> Maybe PendingActivityState
maybeToEnum Int
0 = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
  maybeToEnum Int
1 = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
  maybeToEnum Int
2 = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
  maybeToEnum Int
3
    = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
  maybeToEnum Int
k
    = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just
        (PendingActivityState'UnrecognizedValue -> PendingActivityState
PendingActivityState'Unrecognized
           (Int32 -> PendingActivityState'UnrecognizedValue
PendingActivityState'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: PendingActivityState -> String
showEnum PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
    = String
"PENDING_ACTIVITY_STATE_UNSPECIFIED"
  showEnum PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
    = String
"PENDING_ACTIVITY_STATE_SCHEDULED"
  showEnum PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
    = String
"PENDING_ACTIVITY_STATE_STARTED"
  showEnum PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
    = String
"PENDING_ACTIVITY_STATE_CANCEL_REQUESTED"
  showEnum
    (PendingActivityState'Unrecognized (PendingActivityState'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe PendingActivityState
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_ACTIVITY_STATE_UNSPECIFIED"
    = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_ACTIVITY_STATE_SCHEDULED"
    = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_ACTIVITY_STATE_STARTED"
    = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_ACTIVITY_STATE_CANCEL_REQUESTED"
    = PendingActivityState -> Maybe PendingActivityState
forall a. a -> Maybe a
Prelude.Just PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe PendingActivityState)
-> Maybe PendingActivityState
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe PendingActivityState
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded PendingActivityState where
  minBound :: PendingActivityState
minBound = PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
  maxBound :: PendingActivityState
maxBound = PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
instance Prelude.Enum PendingActivityState where
  toEnum :: Int -> PendingActivityState
toEnum Int
k__
    = PendingActivityState
-> (PendingActivityState -> PendingActivityState)
-> Maybe PendingActivityState
-> PendingActivityState
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> PendingActivityState
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum PendingActivityState: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        PendingActivityState -> PendingActivityState
forall a. a -> a
Prelude.id (Int -> Maybe PendingActivityState
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: PendingActivityState -> Int
fromEnum PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED = Int
0
  fromEnum PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED = Int
1
  fromEnum PendingActivityState
PENDING_ACTIVITY_STATE_STARTED = Int
2
  fromEnum PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED = Int
3
  fromEnum
    (PendingActivityState'Unrecognized (PendingActivityState'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: PendingActivityState -> PendingActivityState
succ PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
    = String -> PendingActivityState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingActivityState.succ: bad argument PENDING_ACTIVITY_STATE_CANCEL_REQUESTED. This value would be out of bounds."
  succ PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
    = PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
  succ PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
    = PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
  succ PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
    = PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
  succ (PendingActivityState'Unrecognized PendingActivityState'UnrecognizedValue
_)
    = String -> PendingActivityState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingActivityState.succ: bad argument: unrecognized value"
  pred :: PendingActivityState -> PendingActivityState
pred PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
    = String -> PendingActivityState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingActivityState.pred: bad argument PENDING_ACTIVITY_STATE_UNSPECIFIED. This value would be out of bounds."
  pred PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
    = PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
  pred PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
    = PendingActivityState
PENDING_ACTIVITY_STATE_SCHEDULED
  pred PendingActivityState
PENDING_ACTIVITY_STATE_CANCEL_REQUESTED
    = PendingActivityState
PENDING_ACTIVITY_STATE_STARTED
  pred (PendingActivityState'Unrecognized PendingActivityState'UnrecognizedValue
_)
    = String -> PendingActivityState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingActivityState.pred: bad argument: unrecognized value"
  enumFrom :: PendingActivityState -> [PendingActivityState]
enumFrom = PendingActivityState -> [PendingActivityState]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: PendingActivityState
-> PendingActivityState -> [PendingActivityState]
enumFromTo = PendingActivityState
-> PendingActivityState -> [PendingActivityState]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: PendingActivityState
-> PendingActivityState -> [PendingActivityState]
enumFromThen = PendingActivityState
-> PendingActivityState -> [PendingActivityState]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: PendingActivityState
-> PendingActivityState
-> PendingActivityState
-> [PendingActivityState]
enumFromThenTo = PendingActivityState
-> PendingActivityState
-> PendingActivityState
-> [PendingActivityState]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault PendingActivityState where
  fieldDefault :: PendingActivityState
fieldDefault = PendingActivityState
PENDING_ACTIVITY_STATE_UNSPECIFIED
instance Control.DeepSeq.NFData PendingActivityState where
  rnf :: PendingActivityState -> ()
rnf PendingActivityState
x__ = PendingActivityState -> () -> ()
forall a b. a -> b -> b
Prelude.seq PendingActivityState
x__ ()
newtype PendingWorkflowTaskState'UnrecognizedValue
  = PendingWorkflowTaskState'UnrecognizedValue Data.Int.Int32
  deriving stock (PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
(PendingWorkflowTaskState'UnrecognizedValue
 -> PendingWorkflowTaskState'UnrecognizedValue -> Bool)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue -> Bool)
-> Eq PendingWorkflowTaskState'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
== :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
$c/= :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
/= :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
Prelude.Eq, Eq PendingWorkflowTaskState'UnrecognizedValue
Eq PendingWorkflowTaskState'UnrecognizedValue =>
(PendingWorkflowTaskState'UnrecognizedValue
 -> PendingWorkflowTaskState'UnrecognizedValue -> Ordering)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue -> Bool)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue -> Bool)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue -> Bool)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue -> Bool)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue)
-> (PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue
    -> PendingWorkflowTaskState'UnrecognizedValue)
-> Ord PendingWorkflowTaskState'UnrecognizedValue
PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Ordering
PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
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
$ccompare :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Ordering
compare :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Ordering
$c< :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
< :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
$c<= :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
<= :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
$c> :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
> :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
$c>= :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
>= :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue -> Bool
$cmax :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
max :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
$cmin :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
min :: PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState'UnrecognizedValue
Prelude.Ord, Int -> PendingWorkflowTaskState'UnrecognizedValue -> ShowS
[PendingWorkflowTaskState'UnrecognizedValue] -> ShowS
PendingWorkflowTaskState'UnrecognizedValue -> String
(Int -> PendingWorkflowTaskState'UnrecognizedValue -> ShowS)
-> (PendingWorkflowTaskState'UnrecognizedValue -> String)
-> ([PendingWorkflowTaskState'UnrecognizedValue] -> ShowS)
-> Show PendingWorkflowTaskState'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PendingWorkflowTaskState'UnrecognizedValue -> ShowS
showsPrec :: Int -> PendingWorkflowTaskState'UnrecognizedValue -> ShowS
$cshow :: PendingWorkflowTaskState'UnrecognizedValue -> String
show :: PendingWorkflowTaskState'UnrecognizedValue -> String
$cshowList :: [PendingWorkflowTaskState'UnrecognizedValue] -> ShowS
showList :: [PendingWorkflowTaskState'UnrecognizedValue] -> ShowS
Prelude.Show)
data PendingWorkflowTaskState
  = PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED |
    PENDING_WORKFLOW_TASK_STATE_SCHEDULED |
    PENDING_WORKFLOW_TASK_STATE_STARTED |
    PendingWorkflowTaskState'Unrecognized !PendingWorkflowTaskState'UnrecognizedValue
  deriving stock (Int -> PendingWorkflowTaskState -> ShowS
[PendingWorkflowTaskState] -> ShowS
PendingWorkflowTaskState -> String
(Int -> PendingWorkflowTaskState -> ShowS)
-> (PendingWorkflowTaskState -> String)
-> ([PendingWorkflowTaskState] -> ShowS)
-> Show PendingWorkflowTaskState
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PendingWorkflowTaskState -> ShowS
showsPrec :: Int -> PendingWorkflowTaskState -> ShowS
$cshow :: PendingWorkflowTaskState -> String
show :: PendingWorkflowTaskState -> String
$cshowList :: [PendingWorkflowTaskState] -> ShowS
showList :: [PendingWorkflowTaskState] -> ShowS
Prelude.Show, PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
(PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool)
-> (PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool)
-> Eq PendingWorkflowTaskState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
== :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
$c/= :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
/= :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
Prelude.Eq, Eq PendingWorkflowTaskState
Eq PendingWorkflowTaskState =>
(PendingWorkflowTaskState -> PendingWorkflowTaskState -> Ordering)
-> (PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool)
-> (PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool)
-> (PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool)
-> (PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool)
-> (PendingWorkflowTaskState
    -> PendingWorkflowTaskState -> PendingWorkflowTaskState)
-> (PendingWorkflowTaskState
    -> PendingWorkflowTaskState -> PendingWorkflowTaskState)
-> Ord PendingWorkflowTaskState
PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
PendingWorkflowTaskState -> PendingWorkflowTaskState -> Ordering
PendingWorkflowTaskState
-> PendingWorkflowTaskState -> PendingWorkflowTaskState
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
$ccompare :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Ordering
compare :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Ordering
$c< :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
< :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
$c<= :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
<= :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
$c> :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
> :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
$c>= :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
>= :: PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
$cmax :: PendingWorkflowTaskState
-> PendingWorkflowTaskState -> PendingWorkflowTaskState
max :: PendingWorkflowTaskState
-> PendingWorkflowTaskState -> PendingWorkflowTaskState
$cmin :: PendingWorkflowTaskState
-> PendingWorkflowTaskState -> PendingWorkflowTaskState
min :: PendingWorkflowTaskState
-> PendingWorkflowTaskState -> PendingWorkflowTaskState
Prelude.Ord)
instance Data.ProtoLens.MessageEnum PendingWorkflowTaskState where
  maybeToEnum :: Int -> Maybe PendingWorkflowTaskState
maybeToEnum Int
0
    = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
  maybeToEnum Int
1 = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
  maybeToEnum Int
2 = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
  maybeToEnum Int
k
    = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just
        (PendingWorkflowTaskState'UnrecognizedValue
-> PendingWorkflowTaskState
PendingWorkflowTaskState'Unrecognized
           (Int32 -> PendingWorkflowTaskState'UnrecognizedValue
PendingWorkflowTaskState'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: PendingWorkflowTaskState -> String
showEnum PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
    = String
"PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED"
  showEnum PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
    = String
"PENDING_WORKFLOW_TASK_STATE_SCHEDULED"
  showEnum PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
    = String
"PENDING_WORKFLOW_TASK_STATE_STARTED"
  showEnum
    (PendingWorkflowTaskState'Unrecognized (PendingWorkflowTaskState'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe PendingWorkflowTaskState
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED"
    = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_WORKFLOW_TASK_STATE_SCHEDULED"
    = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"PENDING_WORKFLOW_TASK_STATE_STARTED"
    = PendingWorkflowTaskState -> Maybe PendingWorkflowTaskState
forall a. a -> Maybe a
Prelude.Just PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe PendingWorkflowTaskState)
-> Maybe PendingWorkflowTaskState
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe PendingWorkflowTaskState
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded PendingWorkflowTaskState where
  minBound :: PendingWorkflowTaskState
minBound = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
  maxBound :: PendingWorkflowTaskState
maxBound = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
instance Prelude.Enum PendingWorkflowTaskState where
  toEnum :: Int -> PendingWorkflowTaskState
toEnum Int
k__
    = PendingWorkflowTaskState
-> (PendingWorkflowTaskState -> PendingWorkflowTaskState)
-> Maybe PendingWorkflowTaskState
-> PendingWorkflowTaskState
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> PendingWorkflowTaskState
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum PendingWorkflowTaskState: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        PendingWorkflowTaskState -> PendingWorkflowTaskState
forall a. a -> a
Prelude.id (Int -> Maybe PendingWorkflowTaskState
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: PendingWorkflowTaskState -> Int
fromEnum PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED = Int
0
  fromEnum PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED = Int
1
  fromEnum PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED = Int
2
  fromEnum
    (PendingWorkflowTaskState'Unrecognized (PendingWorkflowTaskState'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: PendingWorkflowTaskState -> PendingWorkflowTaskState
succ PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
    = String -> PendingWorkflowTaskState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingWorkflowTaskState.succ: bad argument PENDING_WORKFLOW_TASK_STATE_STARTED. This value would be out of bounds."
  succ PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
    = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
  succ PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
    = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
  succ (PendingWorkflowTaskState'Unrecognized PendingWorkflowTaskState'UnrecognizedValue
_)
    = String -> PendingWorkflowTaskState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingWorkflowTaskState.succ: bad argument: unrecognized value"
  pred :: PendingWorkflowTaskState -> PendingWorkflowTaskState
pred PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
    = String -> PendingWorkflowTaskState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingWorkflowTaskState.pred: bad argument PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED. This value would be out of bounds."
  pred PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
    = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
  pred PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_STARTED
    = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_SCHEDULED
  pred (PendingWorkflowTaskState'Unrecognized PendingWorkflowTaskState'UnrecognizedValue
_)
    = String -> PendingWorkflowTaskState
forall a. HasCallStack => String -> a
Prelude.error
        String
"PendingWorkflowTaskState.pred: bad argument: unrecognized value"
  enumFrom :: PendingWorkflowTaskState -> [PendingWorkflowTaskState]
enumFrom = PendingWorkflowTaskState -> [PendingWorkflowTaskState]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: PendingWorkflowTaskState
-> PendingWorkflowTaskState -> [PendingWorkflowTaskState]
enumFromTo = PendingWorkflowTaskState
-> PendingWorkflowTaskState -> [PendingWorkflowTaskState]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: PendingWorkflowTaskState
-> PendingWorkflowTaskState -> [PendingWorkflowTaskState]
enumFromThen = PendingWorkflowTaskState
-> PendingWorkflowTaskState -> [PendingWorkflowTaskState]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: PendingWorkflowTaskState
-> PendingWorkflowTaskState
-> PendingWorkflowTaskState
-> [PendingWorkflowTaskState]
enumFromThenTo = PendingWorkflowTaskState
-> PendingWorkflowTaskState
-> PendingWorkflowTaskState
-> [PendingWorkflowTaskState]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault PendingWorkflowTaskState where
  fieldDefault :: PendingWorkflowTaskState
fieldDefault = PendingWorkflowTaskState
PENDING_WORKFLOW_TASK_STATE_UNSPECIFIED
instance Control.DeepSeq.NFData PendingWorkflowTaskState where
  rnf :: PendingWorkflowTaskState -> ()
rnf PendingWorkflowTaskState
x__ = PendingWorkflowTaskState -> () -> ()
forall a b. a -> b -> b
Prelude.seq PendingWorkflowTaskState
x__ ()
newtype RetryState'UnrecognizedValue
  = RetryState'UnrecognizedValue Data.Int.Int32
  deriving stock (RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
(RetryState'UnrecognizedValue
 -> RetryState'UnrecognizedValue -> Bool)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> Bool)
-> Eq RetryState'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
== :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
$c/= :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
/= :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
Prelude.Eq, Eq RetryState'UnrecognizedValue
Eq RetryState'UnrecognizedValue =>
(RetryState'UnrecognizedValue
 -> RetryState'UnrecognizedValue -> Ordering)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> Bool)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> Bool)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> Bool)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> Bool)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue)
-> (RetryState'UnrecognizedValue
    -> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue)
-> Ord RetryState'UnrecognizedValue
RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Ordering
RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue
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
$ccompare :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Ordering
compare :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Ordering
$c< :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
< :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
$c<= :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
<= :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
$c> :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
> :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
$c>= :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
>= :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> Bool
$cmax :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue
max :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue
$cmin :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue
min :: RetryState'UnrecognizedValue
-> RetryState'UnrecognizedValue -> RetryState'UnrecognizedValue
Prelude.Ord, Int -> RetryState'UnrecognizedValue -> ShowS
[RetryState'UnrecognizedValue] -> ShowS
RetryState'UnrecognizedValue -> String
(Int -> RetryState'UnrecognizedValue -> ShowS)
-> (RetryState'UnrecognizedValue -> String)
-> ([RetryState'UnrecognizedValue] -> ShowS)
-> Show RetryState'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RetryState'UnrecognizedValue -> ShowS
showsPrec :: Int -> RetryState'UnrecognizedValue -> ShowS
$cshow :: RetryState'UnrecognizedValue -> String
show :: RetryState'UnrecognizedValue -> String
$cshowList :: [RetryState'UnrecognizedValue] -> ShowS
showList :: [RetryState'UnrecognizedValue] -> ShowS
Prelude.Show)
data RetryState
  = RETRY_STATE_UNSPECIFIED |
    RETRY_STATE_IN_PROGRESS |
    RETRY_STATE_NON_RETRYABLE_FAILURE |
    RETRY_STATE_TIMEOUT |
    RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED |
    RETRY_STATE_RETRY_POLICY_NOT_SET |
    RETRY_STATE_INTERNAL_SERVER_ERROR |
    RETRY_STATE_CANCEL_REQUESTED |
    RetryState'Unrecognized !RetryState'UnrecognizedValue
  deriving stock (Int -> RetryState -> ShowS
[RetryState] -> ShowS
RetryState -> String
(Int -> RetryState -> ShowS)
-> (RetryState -> String)
-> ([RetryState] -> ShowS)
-> Show RetryState
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RetryState -> ShowS
showsPrec :: Int -> RetryState -> ShowS
$cshow :: RetryState -> String
show :: RetryState -> String
$cshowList :: [RetryState] -> ShowS
showList :: [RetryState] -> ShowS
Prelude.Show, RetryState -> RetryState -> Bool
(RetryState -> RetryState -> Bool)
-> (RetryState -> RetryState -> Bool) -> Eq RetryState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RetryState -> RetryState -> Bool
== :: RetryState -> RetryState -> Bool
$c/= :: RetryState -> RetryState -> Bool
/= :: RetryState -> RetryState -> Bool
Prelude.Eq, Eq RetryState
Eq RetryState =>
(RetryState -> RetryState -> Ordering)
-> (RetryState -> RetryState -> Bool)
-> (RetryState -> RetryState -> Bool)
-> (RetryState -> RetryState -> Bool)
-> (RetryState -> RetryState -> Bool)
-> (RetryState -> RetryState -> RetryState)
-> (RetryState -> RetryState -> RetryState)
-> Ord RetryState
RetryState -> RetryState -> Bool
RetryState -> RetryState -> Ordering
RetryState -> RetryState -> RetryState
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
$ccompare :: RetryState -> RetryState -> Ordering
compare :: RetryState -> RetryState -> Ordering
$c< :: RetryState -> RetryState -> Bool
< :: RetryState -> RetryState -> Bool
$c<= :: RetryState -> RetryState -> Bool
<= :: RetryState -> RetryState -> Bool
$c> :: RetryState -> RetryState -> Bool
> :: RetryState -> RetryState -> Bool
$c>= :: RetryState -> RetryState -> Bool
>= :: RetryState -> RetryState -> Bool
$cmax :: RetryState -> RetryState -> RetryState
max :: RetryState -> RetryState -> RetryState
$cmin :: RetryState -> RetryState -> RetryState
min :: RetryState -> RetryState -> RetryState
Prelude.Ord)
instance Data.ProtoLens.MessageEnum RetryState where
  maybeToEnum :: Int -> Maybe RetryState
maybeToEnum Int
0 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_UNSPECIFIED
  maybeToEnum Int
1 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_IN_PROGRESS
  maybeToEnum Int
2 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE
  maybeToEnum Int
3 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_TIMEOUT
  maybeToEnum Int
4 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED
  maybeToEnum Int
5 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
  maybeToEnum Int
6 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
  maybeToEnum Int
7 = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_CANCEL_REQUESTED
  maybeToEnum Int
k
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just
        (RetryState'UnrecognizedValue -> RetryState
RetryState'Unrecognized
           (Int32 -> RetryState'UnrecognizedValue
RetryState'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: RetryState -> String
showEnum RetryState
RETRY_STATE_UNSPECIFIED = String
"RETRY_STATE_UNSPECIFIED"
  showEnum RetryState
RETRY_STATE_IN_PROGRESS = String
"RETRY_STATE_IN_PROGRESS"
  showEnum RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE
    = String
"RETRY_STATE_NON_RETRYABLE_FAILURE"
  showEnum RetryState
RETRY_STATE_TIMEOUT = String
"RETRY_STATE_TIMEOUT"
  showEnum RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED
    = String
"RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED"
  showEnum RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
    = String
"RETRY_STATE_RETRY_POLICY_NOT_SET"
  showEnum RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
    = String
"RETRY_STATE_INTERNAL_SERVER_ERROR"
  showEnum RetryState
RETRY_STATE_CANCEL_REQUESTED
    = String
"RETRY_STATE_CANCEL_REQUESTED"
  showEnum (RetryState'Unrecognized (RetryState'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe RetryState
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_UNSPECIFIED"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_IN_PROGRESS"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_IN_PROGRESS
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_NON_RETRYABLE_FAILURE"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_TIMEOUT"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_TIMEOUT
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_RETRY_POLICY_NOT_SET"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_INTERNAL_SERVER_ERROR"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"RETRY_STATE_CANCEL_REQUESTED"
    = RetryState -> Maybe RetryState
forall a. a -> Maybe a
Prelude.Just RetryState
RETRY_STATE_CANCEL_REQUESTED
    | Bool
Prelude.otherwise
    = Maybe Int -> (Int -> Maybe RetryState) -> Maybe RetryState
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe RetryState
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded RetryState where
  minBound :: RetryState
minBound = RetryState
RETRY_STATE_UNSPECIFIED
  maxBound :: RetryState
maxBound = RetryState
RETRY_STATE_CANCEL_REQUESTED
instance Prelude.Enum RetryState where
  toEnum :: Int -> RetryState
toEnum Int
k__
    = RetryState
-> (RetryState -> RetryState) -> Maybe RetryState -> RetryState
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> RetryState
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum RetryState: " (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        RetryState -> RetryState
forall a. a -> a
Prelude.id (Int -> Maybe RetryState
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: RetryState -> Int
fromEnum RetryState
RETRY_STATE_UNSPECIFIED = Int
0
  fromEnum RetryState
RETRY_STATE_IN_PROGRESS = Int
1
  fromEnum RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE = Int
2
  fromEnum RetryState
RETRY_STATE_TIMEOUT = Int
3
  fromEnum RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED = Int
4
  fromEnum RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET = Int
5
  fromEnum RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR = Int
6
  fromEnum RetryState
RETRY_STATE_CANCEL_REQUESTED = Int
7
  fromEnum (RetryState'Unrecognized (RetryState'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: RetryState -> RetryState
succ RetryState
RETRY_STATE_CANCEL_REQUESTED
    = String -> RetryState
forall a. HasCallStack => String -> a
Prelude.error
        String
"RetryState.succ: bad argument RETRY_STATE_CANCEL_REQUESTED. This value would be out of bounds."
  succ RetryState
RETRY_STATE_UNSPECIFIED = RetryState
RETRY_STATE_IN_PROGRESS
  succ RetryState
RETRY_STATE_IN_PROGRESS = RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE
  succ RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE = RetryState
RETRY_STATE_TIMEOUT
  succ RetryState
RETRY_STATE_TIMEOUT = RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED
  succ RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED
    = RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
  succ RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
    = RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
  succ RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
    = RetryState
RETRY_STATE_CANCEL_REQUESTED
  succ (RetryState'Unrecognized RetryState'UnrecognizedValue
_)
    = String -> RetryState
forall a. HasCallStack => String -> a
Prelude.error String
"RetryState.succ: bad argument: unrecognized value"
  pred :: RetryState -> RetryState
pred RetryState
RETRY_STATE_UNSPECIFIED
    = String -> RetryState
forall a. HasCallStack => String -> a
Prelude.error
        String
"RetryState.pred: bad argument RETRY_STATE_UNSPECIFIED. This value would be out of bounds."
  pred RetryState
RETRY_STATE_IN_PROGRESS = RetryState
RETRY_STATE_UNSPECIFIED
  pred RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE = RetryState
RETRY_STATE_IN_PROGRESS
  pred RetryState
RETRY_STATE_TIMEOUT = RetryState
RETRY_STATE_NON_RETRYABLE_FAILURE
  pred RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED = RetryState
RETRY_STATE_TIMEOUT
  pred RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
    = RetryState
RETRY_STATE_MAXIMUM_ATTEMPTS_REACHED
  pred RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
    = RetryState
RETRY_STATE_RETRY_POLICY_NOT_SET
  pred RetryState
RETRY_STATE_CANCEL_REQUESTED
    = RetryState
RETRY_STATE_INTERNAL_SERVER_ERROR
  pred (RetryState'Unrecognized RetryState'UnrecognizedValue
_)
    = String -> RetryState
forall a. HasCallStack => String -> a
Prelude.error String
"RetryState.pred: bad argument: unrecognized value"
  enumFrom :: RetryState -> [RetryState]
enumFrom = RetryState -> [RetryState]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: RetryState -> RetryState -> [RetryState]
enumFromTo = RetryState -> RetryState -> [RetryState]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: RetryState -> RetryState -> [RetryState]
enumFromThen = RetryState -> RetryState -> [RetryState]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: RetryState -> RetryState -> RetryState -> [RetryState]
enumFromThenTo = RetryState -> RetryState -> RetryState -> [RetryState]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault RetryState where
  fieldDefault :: RetryState
fieldDefault = RetryState
RETRY_STATE_UNSPECIFIED
instance Control.DeepSeq.NFData RetryState where
  rnf :: RetryState -> ()
rnf RetryState
x__ = RetryState -> () -> ()
forall a b. a -> b -> b
Prelude.seq RetryState
x__ ()
newtype TimeoutType'UnrecognizedValue
  = TimeoutType'UnrecognizedValue Data.Int.Int32
  deriving stock (TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
(TimeoutType'UnrecognizedValue
 -> TimeoutType'UnrecognizedValue -> Bool)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> Bool)
-> Eq TimeoutType'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
== :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
$c/= :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
/= :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
Prelude.Eq, Eq TimeoutType'UnrecognizedValue
Eq TimeoutType'UnrecognizedValue =>
(TimeoutType'UnrecognizedValue
 -> TimeoutType'UnrecognizedValue -> Ordering)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> Bool)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> Bool)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> Bool)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> Bool)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue)
-> (TimeoutType'UnrecognizedValue
    -> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue)
-> Ord TimeoutType'UnrecognizedValue
TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Ordering
TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue
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
$ccompare :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Ordering
compare :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Ordering
$c< :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
< :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
$c<= :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
<= :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
$c> :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
> :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
$c>= :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
>= :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> Bool
$cmax :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue
max :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue
$cmin :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue
min :: TimeoutType'UnrecognizedValue
-> TimeoutType'UnrecognizedValue -> TimeoutType'UnrecognizedValue
Prelude.Ord, Int -> TimeoutType'UnrecognizedValue -> ShowS
[TimeoutType'UnrecognizedValue] -> ShowS
TimeoutType'UnrecognizedValue -> String
(Int -> TimeoutType'UnrecognizedValue -> ShowS)
-> (TimeoutType'UnrecognizedValue -> String)
-> ([TimeoutType'UnrecognizedValue] -> ShowS)
-> Show TimeoutType'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TimeoutType'UnrecognizedValue -> ShowS
showsPrec :: Int -> TimeoutType'UnrecognizedValue -> ShowS
$cshow :: TimeoutType'UnrecognizedValue -> String
show :: TimeoutType'UnrecognizedValue -> String
$cshowList :: [TimeoutType'UnrecognizedValue] -> ShowS
showList :: [TimeoutType'UnrecognizedValue] -> ShowS
Prelude.Show)
data TimeoutType
  = TIMEOUT_TYPE_UNSPECIFIED |
    TIMEOUT_TYPE_START_TO_CLOSE |
    TIMEOUT_TYPE_SCHEDULE_TO_START |
    TIMEOUT_TYPE_SCHEDULE_TO_CLOSE |
    TIMEOUT_TYPE_HEARTBEAT |
    TimeoutType'Unrecognized !TimeoutType'UnrecognizedValue
  deriving stock (Int -> TimeoutType -> ShowS
[TimeoutType] -> ShowS
TimeoutType -> String
(Int -> TimeoutType -> ShowS)
-> (TimeoutType -> String)
-> ([TimeoutType] -> ShowS)
-> Show TimeoutType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TimeoutType -> ShowS
showsPrec :: Int -> TimeoutType -> ShowS
$cshow :: TimeoutType -> String
show :: TimeoutType -> String
$cshowList :: [TimeoutType] -> ShowS
showList :: [TimeoutType] -> ShowS
Prelude.Show, TimeoutType -> TimeoutType -> Bool
(TimeoutType -> TimeoutType -> Bool)
-> (TimeoutType -> TimeoutType -> Bool) -> Eq TimeoutType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimeoutType -> TimeoutType -> Bool
== :: TimeoutType -> TimeoutType -> Bool
$c/= :: TimeoutType -> TimeoutType -> Bool
/= :: TimeoutType -> TimeoutType -> Bool
Prelude.Eq, Eq TimeoutType
Eq TimeoutType =>
(TimeoutType -> TimeoutType -> Ordering)
-> (TimeoutType -> TimeoutType -> Bool)
-> (TimeoutType -> TimeoutType -> Bool)
-> (TimeoutType -> TimeoutType -> Bool)
-> (TimeoutType -> TimeoutType -> Bool)
-> (TimeoutType -> TimeoutType -> TimeoutType)
-> (TimeoutType -> TimeoutType -> TimeoutType)
-> Ord TimeoutType
TimeoutType -> TimeoutType -> Bool
TimeoutType -> TimeoutType -> Ordering
TimeoutType -> TimeoutType -> TimeoutType
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
$ccompare :: TimeoutType -> TimeoutType -> Ordering
compare :: TimeoutType -> TimeoutType -> Ordering
$c< :: TimeoutType -> TimeoutType -> Bool
< :: TimeoutType -> TimeoutType -> Bool
$c<= :: TimeoutType -> TimeoutType -> Bool
<= :: TimeoutType -> TimeoutType -> Bool
$c> :: TimeoutType -> TimeoutType -> Bool
> :: TimeoutType -> TimeoutType -> Bool
$c>= :: TimeoutType -> TimeoutType -> Bool
>= :: TimeoutType -> TimeoutType -> Bool
$cmax :: TimeoutType -> TimeoutType -> TimeoutType
max :: TimeoutType -> TimeoutType -> TimeoutType
$cmin :: TimeoutType -> TimeoutType -> TimeoutType
min :: TimeoutType -> TimeoutType -> TimeoutType
Prelude.Ord)
instance Data.ProtoLens.MessageEnum TimeoutType where
  maybeToEnum :: Int -> Maybe TimeoutType
maybeToEnum Int
0 = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_UNSPECIFIED
  maybeToEnum Int
1 = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE
  maybeToEnum Int
2 = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START
  maybeToEnum Int
3 = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE
  maybeToEnum Int
4 = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_HEARTBEAT
  maybeToEnum Int
k
    = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just
        (TimeoutType'UnrecognizedValue -> TimeoutType
TimeoutType'Unrecognized
           (Int32 -> TimeoutType'UnrecognizedValue
TimeoutType'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: TimeoutType -> String
showEnum TimeoutType
TIMEOUT_TYPE_UNSPECIFIED = String
"TIMEOUT_TYPE_UNSPECIFIED"
  showEnum TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE
    = String
"TIMEOUT_TYPE_START_TO_CLOSE"
  showEnum TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START
    = String
"TIMEOUT_TYPE_SCHEDULE_TO_START"
  showEnum TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE
    = String
"TIMEOUT_TYPE_SCHEDULE_TO_CLOSE"
  showEnum TimeoutType
TIMEOUT_TYPE_HEARTBEAT = String
"TIMEOUT_TYPE_HEARTBEAT"
  showEnum
    (TimeoutType'Unrecognized (TimeoutType'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe TimeoutType
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TIMEOUT_TYPE_UNSPECIFIED"
    = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TIMEOUT_TYPE_START_TO_CLOSE"
    = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TIMEOUT_TYPE_SCHEDULE_TO_START"
    = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TIMEOUT_TYPE_SCHEDULE_TO_CLOSE"
    = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TIMEOUT_TYPE_HEARTBEAT"
    = TimeoutType -> Maybe TimeoutType
forall a. a -> Maybe a
Prelude.Just TimeoutType
TIMEOUT_TYPE_HEARTBEAT
    | Bool
Prelude.otherwise
    = Maybe Int -> (Int -> Maybe TimeoutType) -> Maybe TimeoutType
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe TimeoutType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded TimeoutType where
  minBound :: TimeoutType
minBound = TimeoutType
TIMEOUT_TYPE_UNSPECIFIED
  maxBound :: TimeoutType
maxBound = TimeoutType
TIMEOUT_TYPE_HEARTBEAT
instance Prelude.Enum TimeoutType where
  toEnum :: Int -> TimeoutType
toEnum Int
k__
    = TimeoutType
-> (TimeoutType -> TimeoutType) -> Maybe TimeoutType -> TimeoutType
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> TimeoutType
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum TimeoutType: " (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        TimeoutType -> TimeoutType
forall a. a -> a
Prelude.id (Int -> Maybe TimeoutType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: TimeoutType -> Int
fromEnum TimeoutType
TIMEOUT_TYPE_UNSPECIFIED = Int
0
  fromEnum TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE = Int
1
  fromEnum TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START = Int
2
  fromEnum TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE = Int
3
  fromEnum TimeoutType
TIMEOUT_TYPE_HEARTBEAT = Int
4
  fromEnum
    (TimeoutType'Unrecognized (TimeoutType'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: TimeoutType -> TimeoutType
succ TimeoutType
TIMEOUT_TYPE_HEARTBEAT
    = String -> TimeoutType
forall a. HasCallStack => String -> a
Prelude.error
        String
"TimeoutType.succ: bad argument TIMEOUT_TYPE_HEARTBEAT. This value would be out of bounds."
  succ TimeoutType
TIMEOUT_TYPE_UNSPECIFIED = TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE
  succ TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE = TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START
  succ TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START
    = TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE
  succ TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE = TimeoutType
TIMEOUT_TYPE_HEARTBEAT
  succ (TimeoutType'Unrecognized TimeoutType'UnrecognizedValue
_)
    = String -> TimeoutType
forall a. HasCallStack => String -> a
Prelude.error
        String
"TimeoutType.succ: bad argument: unrecognized value"
  pred :: TimeoutType -> TimeoutType
pred TimeoutType
TIMEOUT_TYPE_UNSPECIFIED
    = String -> TimeoutType
forall a. HasCallStack => String -> a
Prelude.error
        String
"TimeoutType.pred: bad argument TIMEOUT_TYPE_UNSPECIFIED. This value would be out of bounds."
  pred TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE = TimeoutType
TIMEOUT_TYPE_UNSPECIFIED
  pred TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START = TimeoutType
TIMEOUT_TYPE_START_TO_CLOSE
  pred TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE
    = TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_START
  pred TimeoutType
TIMEOUT_TYPE_HEARTBEAT = TimeoutType
TIMEOUT_TYPE_SCHEDULE_TO_CLOSE
  pred (TimeoutType'Unrecognized TimeoutType'UnrecognizedValue
_)
    = String -> TimeoutType
forall a. HasCallStack => String -> a
Prelude.error
        String
"TimeoutType.pred: bad argument: unrecognized value"
  enumFrom :: TimeoutType -> [TimeoutType]
enumFrom = TimeoutType -> [TimeoutType]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: TimeoutType -> TimeoutType -> [TimeoutType]
enumFromTo = TimeoutType -> TimeoutType -> [TimeoutType]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: TimeoutType -> TimeoutType -> [TimeoutType]
enumFromThen = TimeoutType -> TimeoutType -> [TimeoutType]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: TimeoutType -> TimeoutType -> TimeoutType -> [TimeoutType]
enumFromThenTo = TimeoutType -> TimeoutType -> TimeoutType -> [TimeoutType]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault TimeoutType where
  fieldDefault :: TimeoutType
fieldDefault = TimeoutType
TIMEOUT_TYPE_UNSPECIFIED
instance Control.DeepSeq.NFData TimeoutType where
  rnf :: TimeoutType -> ()
rnf TimeoutType
x__ = TimeoutType -> () -> ()
forall a b. a -> b -> b
Prelude.seq TimeoutType
x__ ()
newtype WorkflowExecutionStatus'UnrecognizedValue
  = WorkflowExecutionStatus'UnrecognizedValue Data.Int.Int32
  deriving stock (WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
(WorkflowExecutionStatus'UnrecognizedValue
 -> WorkflowExecutionStatus'UnrecognizedValue -> Bool)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue -> Bool)
-> Eq WorkflowExecutionStatus'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
== :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
$c/= :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
/= :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
Prelude.Eq, Eq WorkflowExecutionStatus'UnrecognizedValue
Eq WorkflowExecutionStatus'UnrecognizedValue =>
(WorkflowExecutionStatus'UnrecognizedValue
 -> WorkflowExecutionStatus'UnrecognizedValue -> Ordering)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue -> Bool)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue -> Bool)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue -> Bool)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue -> Bool)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue)
-> (WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue
    -> WorkflowExecutionStatus'UnrecognizedValue)
-> Ord WorkflowExecutionStatus'UnrecognizedValue
WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Ordering
WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
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
$ccompare :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Ordering
compare :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Ordering
$c< :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
< :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
$c<= :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
<= :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
$c> :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
> :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
$c>= :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
>= :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue -> Bool
$cmax :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
max :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
$cmin :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
min :: WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus'UnrecognizedValue
Prelude.Ord, Int -> WorkflowExecutionStatus'UnrecognizedValue -> ShowS
[WorkflowExecutionStatus'UnrecognizedValue] -> ShowS
WorkflowExecutionStatus'UnrecognizedValue -> String
(Int -> WorkflowExecutionStatus'UnrecognizedValue -> ShowS)
-> (WorkflowExecutionStatus'UnrecognizedValue -> String)
-> ([WorkflowExecutionStatus'UnrecognizedValue] -> ShowS)
-> Show WorkflowExecutionStatus'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowExecutionStatus'UnrecognizedValue -> ShowS
showsPrec :: Int -> WorkflowExecutionStatus'UnrecognizedValue -> ShowS
$cshow :: WorkflowExecutionStatus'UnrecognizedValue -> String
show :: WorkflowExecutionStatus'UnrecognizedValue -> String
$cshowList :: [WorkflowExecutionStatus'UnrecognizedValue] -> ShowS
showList :: [WorkflowExecutionStatus'UnrecognizedValue] -> ShowS
Prelude.Show)
data WorkflowExecutionStatus
  = WORKFLOW_EXECUTION_STATUS_UNSPECIFIED |
    WORKFLOW_EXECUTION_STATUS_RUNNING |
    WORKFLOW_EXECUTION_STATUS_COMPLETED |
    WORKFLOW_EXECUTION_STATUS_FAILED |
    WORKFLOW_EXECUTION_STATUS_CANCELED |
    WORKFLOW_EXECUTION_STATUS_TERMINATED |
    WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW |
    WORKFLOW_EXECUTION_STATUS_TIMED_OUT |
    WorkflowExecutionStatus'Unrecognized !WorkflowExecutionStatus'UnrecognizedValue
  deriving stock (Int -> WorkflowExecutionStatus -> ShowS
[WorkflowExecutionStatus] -> ShowS
WorkflowExecutionStatus -> String
(Int -> WorkflowExecutionStatus -> ShowS)
-> (WorkflowExecutionStatus -> String)
-> ([WorkflowExecutionStatus] -> ShowS)
-> Show WorkflowExecutionStatus
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowExecutionStatus -> ShowS
showsPrec :: Int -> WorkflowExecutionStatus -> ShowS
$cshow :: WorkflowExecutionStatus -> String
show :: WorkflowExecutionStatus -> String
$cshowList :: [WorkflowExecutionStatus] -> ShowS
showList :: [WorkflowExecutionStatus] -> ShowS
Prelude.Show, WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
(WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool)
-> (WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool)
-> Eq WorkflowExecutionStatus
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
== :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
$c/= :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
/= :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
Prelude.Eq, Eq WorkflowExecutionStatus
Eq WorkflowExecutionStatus =>
(WorkflowExecutionStatus -> WorkflowExecutionStatus -> Ordering)
-> (WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool)
-> (WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool)
-> (WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool)
-> (WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool)
-> (WorkflowExecutionStatus
    -> WorkflowExecutionStatus -> WorkflowExecutionStatus)
-> (WorkflowExecutionStatus
    -> WorkflowExecutionStatus -> WorkflowExecutionStatus)
-> Ord WorkflowExecutionStatus
WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
WorkflowExecutionStatus -> WorkflowExecutionStatus -> Ordering
WorkflowExecutionStatus
-> WorkflowExecutionStatus -> WorkflowExecutionStatus
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
$ccompare :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Ordering
compare :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Ordering
$c< :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
< :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
$c<= :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
<= :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
$c> :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
> :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
$c>= :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
>= :: WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
$cmax :: WorkflowExecutionStatus
-> WorkflowExecutionStatus -> WorkflowExecutionStatus
max :: WorkflowExecutionStatus
-> WorkflowExecutionStatus -> WorkflowExecutionStatus
$cmin :: WorkflowExecutionStatus
-> WorkflowExecutionStatus -> WorkflowExecutionStatus
min :: WorkflowExecutionStatus
-> WorkflowExecutionStatus -> WorkflowExecutionStatus
Prelude.Ord)
instance Data.ProtoLens.MessageEnum WorkflowExecutionStatus where
  maybeToEnum :: Int -> Maybe WorkflowExecutionStatus
maybeToEnum Int
0 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
  maybeToEnum Int
1 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
  maybeToEnum Int
2 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
  maybeToEnum Int
3 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
  maybeToEnum Int
4 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
  maybeToEnum Int
5 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
  maybeToEnum Int
6
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
  maybeToEnum Int
7 = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
  maybeToEnum Int
k
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just
        (WorkflowExecutionStatus'UnrecognizedValue
-> WorkflowExecutionStatus
WorkflowExecutionStatus'Unrecognized
           (Int32 -> WorkflowExecutionStatus'UnrecognizedValue
WorkflowExecutionStatus'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: WorkflowExecutionStatus -> String
showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
    = String
"WORKFLOW_EXECUTION_STATUS_UNSPECIFIED"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
    = String
"WORKFLOW_EXECUTION_STATUS_RUNNING"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
    = String
"WORKFLOW_EXECUTION_STATUS_COMPLETED"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
    = String
"WORKFLOW_EXECUTION_STATUS_FAILED"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
    = String
"WORKFLOW_EXECUTION_STATUS_CANCELED"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
    = String
"WORKFLOW_EXECUTION_STATUS_TERMINATED"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
    = String
"WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW"
  showEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
    = String
"WORKFLOW_EXECUTION_STATUS_TIMED_OUT"
  showEnum
    (WorkflowExecutionStatus'Unrecognized (WorkflowExecutionStatus'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe WorkflowExecutionStatus
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_UNSPECIFIED"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_RUNNING"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_COMPLETED"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_FAILED"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_CANCELED"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_TERMINATED"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_EXECUTION_STATUS_TIMED_OUT"
    = WorkflowExecutionStatus -> Maybe WorkflowExecutionStatus
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe WorkflowExecutionStatus)
-> Maybe WorkflowExecutionStatus
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe WorkflowExecutionStatus
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded WorkflowExecutionStatus where
  minBound :: WorkflowExecutionStatus
minBound = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
  maxBound :: WorkflowExecutionStatus
maxBound = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
instance Prelude.Enum WorkflowExecutionStatus where
  toEnum :: Int -> WorkflowExecutionStatus
toEnum Int
k__
    = WorkflowExecutionStatus
-> (WorkflowExecutionStatus -> WorkflowExecutionStatus)
-> Maybe WorkflowExecutionStatus
-> WorkflowExecutionStatus
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> WorkflowExecutionStatus
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum WorkflowExecutionStatus: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        WorkflowExecutionStatus -> WorkflowExecutionStatus
forall a. a -> a
Prelude.id (Int -> Maybe WorkflowExecutionStatus
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: WorkflowExecutionStatus -> Int
fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED = Int
0
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING = Int
1
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED = Int
2
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED = Int
3
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED = Int
4
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED = Int
5
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW = Int
6
  fromEnum WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT = Int
7
  fromEnum
    (WorkflowExecutionStatus'Unrecognized (WorkflowExecutionStatus'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: WorkflowExecutionStatus -> WorkflowExecutionStatus
succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
    = String -> WorkflowExecutionStatus
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowExecutionStatus.succ: bad argument WORKFLOW_EXECUTION_STATUS_TIMED_OUT. This value would be out of bounds."
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
  succ WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
  succ (WorkflowExecutionStatus'Unrecognized WorkflowExecutionStatus'UnrecognizedValue
_)
    = String -> WorkflowExecutionStatus
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowExecutionStatus.succ: bad argument: unrecognized value"
  pred :: WorkflowExecutionStatus -> WorkflowExecutionStatus
pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
    = String -> WorkflowExecutionStatus
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowExecutionStatus.pred: bad argument WORKFLOW_EXECUTION_STATUS_UNSPECIFIED. This value would be out of bounds."
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_RUNNING
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_COMPLETED
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_FAILED
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CANCELED
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TERMINATED
  pred WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_TIMED_OUT
    = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_CONTINUED_AS_NEW
  pred (WorkflowExecutionStatus'Unrecognized WorkflowExecutionStatus'UnrecognizedValue
_)
    = String -> WorkflowExecutionStatus
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowExecutionStatus.pred: bad argument: unrecognized value"
  enumFrom :: WorkflowExecutionStatus -> [WorkflowExecutionStatus]
enumFrom = WorkflowExecutionStatus -> [WorkflowExecutionStatus]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: WorkflowExecutionStatus
-> WorkflowExecutionStatus -> [WorkflowExecutionStatus]
enumFromTo = WorkflowExecutionStatus
-> WorkflowExecutionStatus -> [WorkflowExecutionStatus]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: WorkflowExecutionStatus
-> WorkflowExecutionStatus -> [WorkflowExecutionStatus]
enumFromThen = WorkflowExecutionStatus
-> WorkflowExecutionStatus -> [WorkflowExecutionStatus]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: WorkflowExecutionStatus
-> WorkflowExecutionStatus
-> WorkflowExecutionStatus
-> [WorkflowExecutionStatus]
enumFromThenTo = WorkflowExecutionStatus
-> WorkflowExecutionStatus
-> WorkflowExecutionStatus
-> [WorkflowExecutionStatus]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault WorkflowExecutionStatus where
  fieldDefault :: WorkflowExecutionStatus
fieldDefault = WorkflowExecutionStatus
WORKFLOW_EXECUTION_STATUS_UNSPECIFIED
instance Control.DeepSeq.NFData WorkflowExecutionStatus where
  rnf :: WorkflowExecutionStatus -> ()
rnf WorkflowExecutionStatus
x__ = WorkflowExecutionStatus -> () -> ()
forall a b. a -> b -> b
Prelude.seq WorkflowExecutionStatus
x__ ()
newtype WorkflowIdConflictPolicy'UnrecognizedValue
  = WorkflowIdConflictPolicy'UnrecognizedValue Data.Int.Int32
  deriving stock (WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
(WorkflowIdConflictPolicy'UnrecognizedValue
 -> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool)
-> Eq WorkflowIdConflictPolicy'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
== :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
$c/= :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
/= :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
Prelude.Eq, Eq WorkflowIdConflictPolicy'UnrecognizedValue
Eq WorkflowIdConflictPolicy'UnrecognizedValue =>
(WorkflowIdConflictPolicy'UnrecognizedValue
 -> WorkflowIdConflictPolicy'UnrecognizedValue -> Ordering)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue)
-> (WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue
    -> WorkflowIdConflictPolicy'UnrecognizedValue)
-> Ord WorkflowIdConflictPolicy'UnrecognizedValue
WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Ordering
WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
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
$ccompare :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Ordering
compare :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Ordering
$c< :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
< :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
$c<= :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
<= :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
$c> :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
> :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
$c>= :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
>= :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue -> Bool
$cmax :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
max :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
$cmin :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
min :: WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy'UnrecognizedValue
Prelude.Ord, Int -> WorkflowIdConflictPolicy'UnrecognizedValue -> ShowS
[WorkflowIdConflictPolicy'UnrecognizedValue] -> ShowS
WorkflowIdConflictPolicy'UnrecognizedValue -> String
(Int -> WorkflowIdConflictPolicy'UnrecognizedValue -> ShowS)
-> (WorkflowIdConflictPolicy'UnrecognizedValue -> String)
-> ([WorkflowIdConflictPolicy'UnrecognizedValue] -> ShowS)
-> Show WorkflowIdConflictPolicy'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowIdConflictPolicy'UnrecognizedValue -> ShowS
showsPrec :: Int -> WorkflowIdConflictPolicy'UnrecognizedValue -> ShowS
$cshow :: WorkflowIdConflictPolicy'UnrecognizedValue -> String
show :: WorkflowIdConflictPolicy'UnrecognizedValue -> String
$cshowList :: [WorkflowIdConflictPolicy'UnrecognizedValue] -> ShowS
showList :: [WorkflowIdConflictPolicy'UnrecognizedValue] -> ShowS
Prelude.Show)
data WorkflowIdConflictPolicy
  = WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED |
    WORKFLOW_ID_CONFLICT_POLICY_FAIL |
    WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING |
    WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING |
    WorkflowIdConflictPolicy'Unrecognized !WorkflowIdConflictPolicy'UnrecognizedValue
  deriving stock (Int -> WorkflowIdConflictPolicy -> ShowS
[WorkflowIdConflictPolicy] -> ShowS
WorkflowIdConflictPolicy -> String
(Int -> WorkflowIdConflictPolicy -> ShowS)
-> (WorkflowIdConflictPolicy -> String)
-> ([WorkflowIdConflictPolicy] -> ShowS)
-> Show WorkflowIdConflictPolicy
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowIdConflictPolicy -> ShowS
showsPrec :: Int -> WorkflowIdConflictPolicy -> ShowS
$cshow :: WorkflowIdConflictPolicy -> String
show :: WorkflowIdConflictPolicy -> String
$cshowList :: [WorkflowIdConflictPolicy] -> ShowS
showList :: [WorkflowIdConflictPolicy] -> ShowS
Prelude.Show, WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
(WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool)
-> (WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool)
-> Eq WorkflowIdConflictPolicy
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
== :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
$c/= :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
/= :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
Prelude.Eq, Eq WorkflowIdConflictPolicy
Eq WorkflowIdConflictPolicy =>
(WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Ordering)
-> (WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool)
-> (WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool)
-> (WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool)
-> (WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool)
-> (WorkflowIdConflictPolicy
    -> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy)
-> (WorkflowIdConflictPolicy
    -> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy)
-> Ord WorkflowIdConflictPolicy
WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Ordering
WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
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
$ccompare :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Ordering
compare :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Ordering
$c< :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
< :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
$c<= :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
<= :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
$c> :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
> :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
$c>= :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
>= :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy -> Bool
$cmax :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
max :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
$cmin :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
min :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
Prelude.Ord)
instance Data.ProtoLens.MessageEnum WorkflowIdConflictPolicy where
  maybeToEnum :: Int -> Maybe WorkflowIdConflictPolicy
maybeToEnum Int
0
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
  maybeToEnum Int
1 = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
  maybeToEnum Int
2
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
  maybeToEnum Int
3
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
  maybeToEnum Int
k
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just
        (WorkflowIdConflictPolicy'UnrecognizedValue
-> WorkflowIdConflictPolicy
WorkflowIdConflictPolicy'Unrecognized
           (Int32 -> WorkflowIdConflictPolicy'UnrecognizedValue
WorkflowIdConflictPolicy'UnrecognizedValue
              (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: WorkflowIdConflictPolicy -> String
showEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
    = String
"WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED"
  showEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
    = String
"WORKFLOW_ID_CONFLICT_POLICY_FAIL"
  showEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
    = String
"WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING"
  showEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
    = String
"WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING"
  showEnum
    (WorkflowIdConflictPolicy'Unrecognized (WorkflowIdConflictPolicy'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe WorkflowIdConflictPolicy
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED"
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_CONFLICT_POLICY_FAIL"
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING"
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING"
    = WorkflowIdConflictPolicy -> Maybe WorkflowIdConflictPolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe WorkflowIdConflictPolicy)
-> Maybe WorkflowIdConflictPolicy
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe WorkflowIdConflictPolicy
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded WorkflowIdConflictPolicy where
  minBound :: WorkflowIdConflictPolicy
minBound = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
  maxBound :: WorkflowIdConflictPolicy
maxBound = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
instance Prelude.Enum WorkflowIdConflictPolicy where
  toEnum :: Int -> WorkflowIdConflictPolicy
toEnum Int
k__
    = WorkflowIdConflictPolicy
-> (WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy)
-> Maybe WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> WorkflowIdConflictPolicy
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum WorkflowIdConflictPolicy: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
forall a. a -> a
Prelude.id (Int -> Maybe WorkflowIdConflictPolicy
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: WorkflowIdConflictPolicy -> Int
fromEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED = Int
0
  fromEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL = Int
1
  fromEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING = Int
2
  fromEnum WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING = Int
3
  fromEnum
    (WorkflowIdConflictPolicy'Unrecognized (WorkflowIdConflictPolicy'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
succ WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
    = String -> WorkflowIdConflictPolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdConflictPolicy.succ: bad argument WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING. This value would be out of bounds."
  succ WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
    = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
  succ WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
    = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
  succ WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
    = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
  succ (WorkflowIdConflictPolicy'Unrecognized WorkflowIdConflictPolicy'UnrecognizedValue
_)
    = String -> WorkflowIdConflictPolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdConflictPolicy.succ: bad argument: unrecognized value"
  pred :: WorkflowIdConflictPolicy -> WorkflowIdConflictPolicy
pred WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
    = String -> WorkflowIdConflictPolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdConflictPolicy.pred: bad argument WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED. This value would be out of bounds."
  pred WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
    = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
  pred WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
    = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_FAIL
  pred WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_TERMINATE_EXISTING
    = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_USE_EXISTING
  pred (WorkflowIdConflictPolicy'Unrecognized WorkflowIdConflictPolicy'UnrecognizedValue
_)
    = String -> WorkflowIdConflictPolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdConflictPolicy.pred: bad argument: unrecognized value"
  enumFrom :: WorkflowIdConflictPolicy -> [WorkflowIdConflictPolicy]
enumFrom = WorkflowIdConflictPolicy -> [WorkflowIdConflictPolicy]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> [WorkflowIdConflictPolicy]
enumFromTo = WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> [WorkflowIdConflictPolicy]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> [WorkflowIdConflictPolicy]
enumFromThen = WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy -> [WorkflowIdConflictPolicy]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy
-> [WorkflowIdConflictPolicy]
enumFromThenTo = WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy
-> WorkflowIdConflictPolicy
-> [WorkflowIdConflictPolicy]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault WorkflowIdConflictPolicy where
  fieldDefault :: WorkflowIdConflictPolicy
fieldDefault = WorkflowIdConflictPolicy
WORKFLOW_ID_CONFLICT_POLICY_UNSPECIFIED
instance Control.DeepSeq.NFData WorkflowIdConflictPolicy where
  rnf :: WorkflowIdConflictPolicy -> ()
rnf WorkflowIdConflictPolicy
x__ = WorkflowIdConflictPolicy -> () -> ()
forall a b. a -> b -> b
Prelude.seq WorkflowIdConflictPolicy
x__ ()
newtype WorkflowIdReusePolicy'UnrecognizedValue
  = WorkflowIdReusePolicy'UnrecognizedValue Data.Int.Int32
  deriving stock (WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
(WorkflowIdReusePolicy'UnrecognizedValue
 -> WorkflowIdReusePolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue -> Bool)
-> Eq WorkflowIdReusePolicy'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
== :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
$c/= :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
/= :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
Prelude.Eq, Eq WorkflowIdReusePolicy'UnrecognizedValue
Eq WorkflowIdReusePolicy'UnrecognizedValue =>
(WorkflowIdReusePolicy'UnrecognizedValue
 -> WorkflowIdReusePolicy'UnrecognizedValue -> Ordering)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue -> Bool)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue)
-> (WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue
    -> WorkflowIdReusePolicy'UnrecognizedValue)
-> Ord WorkflowIdReusePolicy'UnrecognizedValue
WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Ordering
WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
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
$ccompare :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Ordering
compare :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Ordering
$c< :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
< :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
$c<= :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
<= :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
$c> :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
> :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
$c>= :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
>= :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue -> Bool
$cmax :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
max :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
$cmin :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
min :: WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
-> WorkflowIdReusePolicy'UnrecognizedValue
Prelude.Ord, Int -> WorkflowIdReusePolicy'UnrecognizedValue -> ShowS
[WorkflowIdReusePolicy'UnrecognizedValue] -> ShowS
WorkflowIdReusePolicy'UnrecognizedValue -> String
(Int -> WorkflowIdReusePolicy'UnrecognizedValue -> ShowS)
-> (WorkflowIdReusePolicy'UnrecognizedValue -> String)
-> ([WorkflowIdReusePolicy'UnrecognizedValue] -> ShowS)
-> Show WorkflowIdReusePolicy'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowIdReusePolicy'UnrecognizedValue -> ShowS
showsPrec :: Int -> WorkflowIdReusePolicy'UnrecognizedValue -> ShowS
$cshow :: WorkflowIdReusePolicy'UnrecognizedValue -> String
show :: WorkflowIdReusePolicy'UnrecognizedValue -> String
$cshowList :: [WorkflowIdReusePolicy'UnrecognizedValue] -> ShowS
showList :: [WorkflowIdReusePolicy'UnrecognizedValue] -> ShowS
Prelude.Show)
data WorkflowIdReusePolicy
  = WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED |
    WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE |
    WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY |
    WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE |
    WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING |
    WorkflowIdReusePolicy'Unrecognized !WorkflowIdReusePolicy'UnrecognizedValue
  deriving stock (Int -> WorkflowIdReusePolicy -> ShowS
[WorkflowIdReusePolicy] -> ShowS
WorkflowIdReusePolicy -> String
(Int -> WorkflowIdReusePolicy -> ShowS)
-> (WorkflowIdReusePolicy -> String)
-> ([WorkflowIdReusePolicy] -> ShowS)
-> Show WorkflowIdReusePolicy
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> WorkflowIdReusePolicy -> ShowS
showsPrec :: Int -> WorkflowIdReusePolicy -> ShowS
$cshow :: WorkflowIdReusePolicy -> String
show :: WorkflowIdReusePolicy -> String
$cshowList :: [WorkflowIdReusePolicy] -> ShowS
showList :: [WorkflowIdReusePolicy] -> ShowS
Prelude.Show, WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
(WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool)
-> (WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool)
-> Eq WorkflowIdReusePolicy
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
== :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
$c/= :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
/= :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
Prelude.Eq, Eq WorkflowIdReusePolicy
Eq WorkflowIdReusePolicy =>
(WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Ordering)
-> (WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool)
-> (WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool)
-> (WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool)
-> (WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool)
-> (WorkflowIdReusePolicy
    -> WorkflowIdReusePolicy -> WorkflowIdReusePolicy)
-> (WorkflowIdReusePolicy
    -> WorkflowIdReusePolicy -> WorkflowIdReusePolicy)
-> Ord WorkflowIdReusePolicy
WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Ordering
WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> WorkflowIdReusePolicy
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
$ccompare :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Ordering
compare :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Ordering
$c< :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
< :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
$c<= :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
<= :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
$c> :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
> :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
$c>= :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
>= :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
$cmax :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> WorkflowIdReusePolicy
max :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> WorkflowIdReusePolicy
$cmin :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> WorkflowIdReusePolicy
min :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> WorkflowIdReusePolicy
Prelude.Ord)
instance Data.ProtoLens.MessageEnum WorkflowIdReusePolicy where
  maybeToEnum :: Int -> Maybe WorkflowIdReusePolicy
maybeToEnum Int
0 = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
  maybeToEnum Int
1
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
  maybeToEnum Int
2
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
  maybeToEnum Int
3
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
  maybeToEnum Int
4
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
  maybeToEnum Int
k
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just
        (WorkflowIdReusePolicy'UnrecognizedValue -> WorkflowIdReusePolicy
WorkflowIdReusePolicy'Unrecognized
           (Int32 -> WorkflowIdReusePolicy'UnrecognizedValue
WorkflowIdReusePolicy'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
  showEnum :: WorkflowIdReusePolicy -> String
showEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
    = String
"WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED"
  showEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
    = String
"WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE"
  showEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
    = String
"WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY"
  showEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
    = String
"WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE"
  showEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
    = String
"WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING"
  showEnum
    (WorkflowIdReusePolicy'Unrecognized (WorkflowIdReusePolicy'UnrecognizedValue Int32
k))
    = Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
  readEnum :: String -> Maybe WorkflowIdReusePolicy
readEnum String
k
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED"
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE"
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
        String
k String
"WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY"
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE"
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
    | String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING"
    = WorkflowIdReusePolicy -> Maybe WorkflowIdReusePolicy
forall a. a -> Maybe a
Prelude.Just WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
    | Bool
Prelude.otherwise
    = Maybe Int
-> (Int -> Maybe WorkflowIdReusePolicy)
-> Maybe WorkflowIdReusePolicy
forall a b. Maybe a -> (a -> Maybe b) -> Maybe b
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
(Prelude.>>=) (String -> Maybe Int
forall a. Read a => String -> Maybe a
Text.Read.readMaybe String
k) Int -> Maybe WorkflowIdReusePolicy
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded WorkflowIdReusePolicy where
  minBound :: WorkflowIdReusePolicy
minBound = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
  maxBound :: WorkflowIdReusePolicy
maxBound = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
instance Prelude.Enum WorkflowIdReusePolicy where
  toEnum :: Int -> WorkflowIdReusePolicy
toEnum Int
k__
    = WorkflowIdReusePolicy
-> (WorkflowIdReusePolicy -> WorkflowIdReusePolicy)
-> Maybe WorkflowIdReusePolicy
-> WorkflowIdReusePolicy
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
        (String -> WorkflowIdReusePolicy
forall a. HasCallStack => String -> a
Prelude.error
           (String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
              String
"toEnum: unknown value for enum WorkflowIdReusePolicy: "
              (Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
        WorkflowIdReusePolicy -> WorkflowIdReusePolicy
forall a. a -> a
Prelude.id (Int -> Maybe WorkflowIdReusePolicy
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
  fromEnum :: WorkflowIdReusePolicy -> Int
fromEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED = Int
0
  fromEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE = Int
1
  fromEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY = Int
2
  fromEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE = Int
3
  fromEnum WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING = Int
4
  fromEnum
    (WorkflowIdReusePolicy'Unrecognized (WorkflowIdReusePolicy'UnrecognizedValue Int32
k))
    = Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
  succ :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy
succ WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
    = String -> WorkflowIdReusePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdReusePolicy.succ: bad argument WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING. This value would be out of bounds."
  succ WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
  succ WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
  succ WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
  succ WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
  succ (WorkflowIdReusePolicy'Unrecognized WorkflowIdReusePolicy'UnrecognizedValue
_)
    = String -> WorkflowIdReusePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdReusePolicy.succ: bad argument: unrecognized value"
  pred :: WorkflowIdReusePolicy -> WorkflowIdReusePolicy
pred WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
    = String -> WorkflowIdReusePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdReusePolicy.pred: bad argument WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED. This value would be out of bounds."
  pred WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
  pred WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE
  pred WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE_FAILED_ONLY
  pred WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_TERMINATE_IF_RUNNING
    = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_REJECT_DUPLICATE
  pred (WorkflowIdReusePolicy'Unrecognized WorkflowIdReusePolicy'UnrecognizedValue
_)
    = String -> WorkflowIdReusePolicy
forall a. HasCallStack => String -> a
Prelude.error
        String
"WorkflowIdReusePolicy.pred: bad argument: unrecognized value"
  enumFrom :: WorkflowIdReusePolicy -> [WorkflowIdReusePolicy]
enumFrom = WorkflowIdReusePolicy -> [WorkflowIdReusePolicy]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
  enumFromTo :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> [WorkflowIdReusePolicy]
enumFromTo = WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> [WorkflowIdReusePolicy]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
  enumFromThen :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> [WorkflowIdReusePolicy]
enumFromThen = WorkflowIdReusePolicy
-> WorkflowIdReusePolicy -> [WorkflowIdReusePolicy]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
  enumFromThenTo :: WorkflowIdReusePolicy
-> WorkflowIdReusePolicy
-> WorkflowIdReusePolicy
-> [WorkflowIdReusePolicy]
enumFromThenTo = WorkflowIdReusePolicy
-> WorkflowIdReusePolicy
-> WorkflowIdReusePolicy
-> [WorkflowIdReusePolicy]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault WorkflowIdReusePolicy where
  fieldDefault :: WorkflowIdReusePolicy
fieldDefault = WorkflowIdReusePolicy
WORKFLOW_ID_REUSE_POLICY_UNSPECIFIED
instance Control.DeepSeq.NFData WorkflowIdReusePolicy where
  rnf :: WorkflowIdReusePolicy -> ()
rnf WorkflowIdReusePolicy
x__ = WorkflowIdReusePolicy -> () -> ()
forall a b. a -> b -> b
Prelude.seq WorkflowIdReusePolicy
x__ ()