{-# 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.TaskQueue (
BuildIdTaskReachability(..), BuildIdTaskReachability(),
BuildIdTaskReachability'UnrecognizedValue,
DescribeTaskQueueMode(..), DescribeTaskQueueMode(),
DescribeTaskQueueMode'UnrecognizedValue, TaskQueueKind(..),
TaskQueueKind(), TaskQueueKind'UnrecognizedValue,
TaskQueueType(..), TaskQueueType(),
TaskQueueType'UnrecognizedValue, TaskReachability(..),
TaskReachability(), TaskReachability'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 BuildIdTaskReachability'UnrecognizedValue
= BuildIdTaskReachability'UnrecognizedValue Data.Int.Int32
deriving stock (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
(BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool)
-> Eq BuildIdTaskReachability'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
== :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
$c/= :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
/= :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
Prelude.Eq, Eq BuildIdTaskReachability'UnrecognizedValue
Eq BuildIdTaskReachability'UnrecognizedValue =>
(BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Ordering)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue)
-> (BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue)
-> Ord BuildIdTaskReachability'UnrecognizedValue
BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Ordering
BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'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 :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Ordering
compare :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Ordering
$c< :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
< :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
$c<= :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
<= :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
$c> :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
> :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
$c>= :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
>= :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue -> Bool
$cmax :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
max :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
$cmin :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
min :: BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability'UnrecognizedValue
Prelude.Ord, Int -> BuildIdTaskReachability'UnrecognizedValue -> ShowS
[BuildIdTaskReachability'UnrecognizedValue] -> ShowS
BuildIdTaskReachability'UnrecognizedValue -> String
(Int -> BuildIdTaskReachability'UnrecognizedValue -> ShowS)
-> (BuildIdTaskReachability'UnrecognizedValue -> String)
-> ([BuildIdTaskReachability'UnrecognizedValue] -> ShowS)
-> Show BuildIdTaskReachability'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> BuildIdTaskReachability'UnrecognizedValue -> ShowS
showsPrec :: Int -> BuildIdTaskReachability'UnrecognizedValue -> ShowS
$cshow :: BuildIdTaskReachability'UnrecognizedValue -> String
show :: BuildIdTaskReachability'UnrecognizedValue -> String
$cshowList :: [BuildIdTaskReachability'UnrecognizedValue] -> ShowS
showList :: [BuildIdTaskReachability'UnrecognizedValue] -> ShowS
Prelude.Show)
data BuildIdTaskReachability
= BUILD_ID_TASK_REACHABILITY_UNSPECIFIED |
BUILD_ID_TASK_REACHABILITY_REACHABLE |
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY |
BUILD_ID_TASK_REACHABILITY_UNREACHABLE |
BuildIdTaskReachability'Unrecognized !BuildIdTaskReachability'UnrecognizedValue
deriving stock (Int -> BuildIdTaskReachability -> ShowS
[BuildIdTaskReachability] -> ShowS
BuildIdTaskReachability -> String
(Int -> BuildIdTaskReachability -> ShowS)
-> (BuildIdTaskReachability -> String)
-> ([BuildIdTaskReachability] -> ShowS)
-> Show BuildIdTaskReachability
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> BuildIdTaskReachability -> ShowS
showsPrec :: Int -> BuildIdTaskReachability -> ShowS
$cshow :: BuildIdTaskReachability -> String
show :: BuildIdTaskReachability -> String
$cshowList :: [BuildIdTaskReachability] -> ShowS
showList :: [BuildIdTaskReachability] -> ShowS
Prelude.Show, BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
(BuildIdTaskReachability -> BuildIdTaskReachability -> Bool)
-> (BuildIdTaskReachability -> BuildIdTaskReachability -> Bool)
-> Eq BuildIdTaskReachability
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
== :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
$c/= :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
/= :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
Prelude.Eq, Eq BuildIdTaskReachability
Eq BuildIdTaskReachability =>
(BuildIdTaskReachability -> BuildIdTaskReachability -> Ordering)
-> (BuildIdTaskReachability -> BuildIdTaskReachability -> Bool)
-> (BuildIdTaskReachability -> BuildIdTaskReachability -> Bool)
-> (BuildIdTaskReachability -> BuildIdTaskReachability -> Bool)
-> (BuildIdTaskReachability -> BuildIdTaskReachability -> Bool)
-> (BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability)
-> (BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability)
-> Ord BuildIdTaskReachability
BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
BuildIdTaskReachability -> BuildIdTaskReachability -> Ordering
BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability
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 :: BuildIdTaskReachability -> BuildIdTaskReachability -> Ordering
compare :: BuildIdTaskReachability -> BuildIdTaskReachability -> Ordering
$c< :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
< :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
$c<= :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
<= :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
$c> :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
> :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
$c>= :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
>= :: BuildIdTaskReachability -> BuildIdTaskReachability -> Bool
$cmax :: BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability
max :: BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability
$cmin :: BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability
min :: BuildIdTaskReachability
-> BuildIdTaskReachability -> BuildIdTaskReachability
Prelude.Ord)
instance Data.ProtoLens.MessageEnum BuildIdTaskReachability where
maybeToEnum :: Int -> Maybe BuildIdTaskReachability
maybeToEnum Int
0 = BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
maybeToEnum Int
1 = BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
maybeToEnum Int
2
= BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
maybeToEnum Int
3 = BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
maybeToEnum Int
k
= BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just
(BuildIdTaskReachability'UnrecognizedValue
-> BuildIdTaskReachability
BuildIdTaskReachability'Unrecognized
(Int32 -> BuildIdTaskReachability'UnrecognizedValue
BuildIdTaskReachability'UnrecognizedValue
(Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: BuildIdTaskReachability -> String
showEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
= String
"BUILD_ID_TASK_REACHABILITY_UNSPECIFIED"
showEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
= String
"BUILD_ID_TASK_REACHABILITY_REACHABLE"
showEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
= String
"BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY"
showEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
= String
"BUILD_ID_TASK_REACHABILITY_UNREACHABLE"
showEnum
(BuildIdTaskReachability'Unrecognized (BuildIdTaskReachability'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe BuildIdTaskReachability
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"BUILD_ID_TASK_REACHABILITY_UNSPECIFIED"
= BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"BUILD_ID_TASK_REACHABILITY_REACHABLE"
= BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY"
= BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"BUILD_ID_TASK_REACHABILITY_UNREACHABLE"
= BuildIdTaskReachability -> Maybe BuildIdTaskReachability
forall a. a -> Maybe a
Prelude.Just BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
| Bool
Prelude.otherwise
= Maybe Int
-> (Int -> Maybe BuildIdTaskReachability)
-> Maybe BuildIdTaskReachability
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 BuildIdTaskReachability
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded BuildIdTaskReachability where
minBound :: BuildIdTaskReachability
minBound = BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
maxBound :: BuildIdTaskReachability
maxBound = BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
instance Prelude.Enum BuildIdTaskReachability where
toEnum :: Int -> BuildIdTaskReachability
toEnum Int
k__
= BuildIdTaskReachability
-> (BuildIdTaskReachability -> BuildIdTaskReachability)
-> Maybe BuildIdTaskReachability
-> BuildIdTaskReachability
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> BuildIdTaskReachability
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum BuildIdTaskReachability: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
BuildIdTaskReachability -> BuildIdTaskReachability
forall a. a -> a
Prelude.id (Int -> Maybe BuildIdTaskReachability
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: BuildIdTaskReachability -> Int
fromEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED = Int
0
fromEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE = Int
1
fromEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY = Int
2
fromEnum BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE = Int
3
fromEnum
(BuildIdTaskReachability'Unrecognized (BuildIdTaskReachability'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: BuildIdTaskReachability -> BuildIdTaskReachability
succ BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
= String -> BuildIdTaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"BuildIdTaskReachability.succ: bad argument BUILD_ID_TASK_REACHABILITY_UNREACHABLE. This value would be out of bounds."
succ BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
= BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
succ BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
= BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
succ BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
= BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
succ (BuildIdTaskReachability'Unrecognized BuildIdTaskReachability'UnrecognizedValue
_)
= String -> BuildIdTaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"BuildIdTaskReachability.succ: bad argument: unrecognized value"
pred :: BuildIdTaskReachability -> BuildIdTaskReachability
pred BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
= String -> BuildIdTaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"BuildIdTaskReachability.pred: bad argument BUILD_ID_TASK_REACHABILITY_UNSPECIFIED. This value would be out of bounds."
pred BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
= BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
pred BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
= BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_REACHABLE
pred BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNREACHABLE
= BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_CLOSED_WORKFLOWS_ONLY
pred (BuildIdTaskReachability'Unrecognized BuildIdTaskReachability'UnrecognizedValue
_)
= String -> BuildIdTaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"BuildIdTaskReachability.pred: bad argument: unrecognized value"
enumFrom :: BuildIdTaskReachability -> [BuildIdTaskReachability]
enumFrom = BuildIdTaskReachability -> [BuildIdTaskReachability]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: BuildIdTaskReachability
-> BuildIdTaskReachability -> [BuildIdTaskReachability]
enumFromTo = BuildIdTaskReachability
-> BuildIdTaskReachability -> [BuildIdTaskReachability]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: BuildIdTaskReachability
-> BuildIdTaskReachability -> [BuildIdTaskReachability]
enumFromThen = BuildIdTaskReachability
-> BuildIdTaskReachability -> [BuildIdTaskReachability]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: BuildIdTaskReachability
-> BuildIdTaskReachability
-> BuildIdTaskReachability
-> [BuildIdTaskReachability]
enumFromThenTo = BuildIdTaskReachability
-> BuildIdTaskReachability
-> BuildIdTaskReachability
-> [BuildIdTaskReachability]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault BuildIdTaskReachability where
fieldDefault :: BuildIdTaskReachability
fieldDefault = BuildIdTaskReachability
BUILD_ID_TASK_REACHABILITY_UNSPECIFIED
instance Control.DeepSeq.NFData BuildIdTaskReachability where
rnf :: BuildIdTaskReachability -> ()
rnf BuildIdTaskReachability
x__ = BuildIdTaskReachability -> () -> ()
forall a b. a -> b -> b
Prelude.seq BuildIdTaskReachability
x__ ()
newtype DescribeTaskQueueMode'UnrecognizedValue
= DescribeTaskQueueMode'UnrecognizedValue Data.Int.Int32
deriving stock (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
(DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool)
-> Eq DescribeTaskQueueMode'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
== :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
$c/= :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
/= :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
Prelude.Eq, Eq DescribeTaskQueueMode'UnrecognizedValue
Eq DescribeTaskQueueMode'UnrecognizedValue =>
(DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Ordering)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue)
-> (DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue)
-> Ord DescribeTaskQueueMode'UnrecognizedValue
DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Ordering
DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'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 :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Ordering
compare :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Ordering
$c< :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
< :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
$c<= :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
<= :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
$c> :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
> :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
$c>= :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
>= :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue -> Bool
$cmax :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
max :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
$cmin :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
min :: DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
-> DescribeTaskQueueMode'UnrecognizedValue
Prelude.Ord, Int -> DescribeTaskQueueMode'UnrecognizedValue -> ShowS
[DescribeTaskQueueMode'UnrecognizedValue] -> ShowS
DescribeTaskQueueMode'UnrecognizedValue -> String
(Int -> DescribeTaskQueueMode'UnrecognizedValue -> ShowS)
-> (DescribeTaskQueueMode'UnrecognizedValue -> String)
-> ([DescribeTaskQueueMode'UnrecognizedValue] -> ShowS)
-> Show DescribeTaskQueueMode'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DescribeTaskQueueMode'UnrecognizedValue -> ShowS
showsPrec :: Int -> DescribeTaskQueueMode'UnrecognizedValue -> ShowS
$cshow :: DescribeTaskQueueMode'UnrecognizedValue -> String
show :: DescribeTaskQueueMode'UnrecognizedValue -> String
$cshowList :: [DescribeTaskQueueMode'UnrecognizedValue] -> ShowS
showList :: [DescribeTaskQueueMode'UnrecognizedValue] -> ShowS
Prelude.Show)
data DescribeTaskQueueMode
= DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED |
DESCRIBE_TASK_QUEUE_MODE_ENHANCED |
DescribeTaskQueueMode'Unrecognized !DescribeTaskQueueMode'UnrecognizedValue
deriving stock (Int -> DescribeTaskQueueMode -> ShowS
[DescribeTaskQueueMode] -> ShowS
DescribeTaskQueueMode -> String
(Int -> DescribeTaskQueueMode -> ShowS)
-> (DescribeTaskQueueMode -> String)
-> ([DescribeTaskQueueMode] -> ShowS)
-> Show DescribeTaskQueueMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DescribeTaskQueueMode -> ShowS
showsPrec :: Int -> DescribeTaskQueueMode -> ShowS
$cshow :: DescribeTaskQueueMode -> String
show :: DescribeTaskQueueMode -> String
$cshowList :: [DescribeTaskQueueMode] -> ShowS
showList :: [DescribeTaskQueueMode] -> ShowS
Prelude.Show, DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
(DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool)
-> (DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool)
-> Eq DescribeTaskQueueMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
== :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
$c/= :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
/= :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
Prelude.Eq, Eq DescribeTaskQueueMode
Eq DescribeTaskQueueMode =>
(DescribeTaskQueueMode -> DescribeTaskQueueMode -> Ordering)
-> (DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool)
-> (DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool)
-> (DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool)
-> (DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool)
-> (DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode)
-> (DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode)
-> Ord DescribeTaskQueueMode
DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
DescribeTaskQueueMode -> DescribeTaskQueueMode -> Ordering
DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode
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 :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Ordering
compare :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Ordering
$c< :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
< :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
$c<= :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
<= :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
$c> :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
> :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
$c>= :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
>= :: DescribeTaskQueueMode -> DescribeTaskQueueMode -> Bool
$cmax :: DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode
max :: DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode
$cmin :: DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode
min :: DescribeTaskQueueMode
-> DescribeTaskQueueMode -> DescribeTaskQueueMode
Prelude.Ord)
instance Data.ProtoLens.MessageEnum DescribeTaskQueueMode where
maybeToEnum :: Int -> Maybe DescribeTaskQueueMode
maybeToEnum Int
0 = DescribeTaskQueueMode -> Maybe DescribeTaskQueueMode
forall a. a -> Maybe a
Prelude.Just DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
maybeToEnum Int
1 = DescribeTaskQueueMode -> Maybe DescribeTaskQueueMode
forall a. a -> Maybe a
Prelude.Just DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
maybeToEnum Int
k
= DescribeTaskQueueMode -> Maybe DescribeTaskQueueMode
forall a. a -> Maybe a
Prelude.Just
(DescribeTaskQueueMode'UnrecognizedValue -> DescribeTaskQueueMode
DescribeTaskQueueMode'Unrecognized
(Int32 -> DescribeTaskQueueMode'UnrecognizedValue
DescribeTaskQueueMode'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: DescribeTaskQueueMode -> String
showEnum DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
= String
"DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED"
showEnum DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
= String
"DESCRIBE_TASK_QUEUE_MODE_ENHANCED"
showEnum
(DescribeTaskQueueMode'Unrecognized (DescribeTaskQueueMode'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe DescribeTaskQueueMode
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED"
= DescribeTaskQueueMode -> Maybe DescribeTaskQueueMode
forall a. a -> Maybe a
Prelude.Just DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"DESCRIBE_TASK_QUEUE_MODE_ENHANCED"
= DescribeTaskQueueMode -> Maybe DescribeTaskQueueMode
forall a. a -> Maybe a
Prelude.Just DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
| Bool
Prelude.otherwise
= Maybe Int
-> (Int -> Maybe DescribeTaskQueueMode)
-> Maybe DescribeTaskQueueMode
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 DescribeTaskQueueMode
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded DescribeTaskQueueMode where
minBound :: DescribeTaskQueueMode
minBound = DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
maxBound :: DescribeTaskQueueMode
maxBound = DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
instance Prelude.Enum DescribeTaskQueueMode where
toEnum :: Int -> DescribeTaskQueueMode
toEnum Int
k__
= DescribeTaskQueueMode
-> (DescribeTaskQueueMode -> DescribeTaskQueueMode)
-> Maybe DescribeTaskQueueMode
-> DescribeTaskQueueMode
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> DescribeTaskQueueMode
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum DescribeTaskQueueMode: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
DescribeTaskQueueMode -> DescribeTaskQueueMode
forall a. a -> a
Prelude.id (Int -> Maybe DescribeTaskQueueMode
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: DescribeTaskQueueMode -> Int
fromEnum DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED = Int
0
fromEnum DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED = Int
1
fromEnum
(DescribeTaskQueueMode'Unrecognized (DescribeTaskQueueMode'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: DescribeTaskQueueMode -> DescribeTaskQueueMode
succ DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
= String -> DescribeTaskQueueMode
forall a. HasCallStack => String -> a
Prelude.error
String
"DescribeTaskQueueMode.succ: bad argument DESCRIBE_TASK_QUEUE_MODE_ENHANCED. This value would be out of bounds."
succ DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
= DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
succ (DescribeTaskQueueMode'Unrecognized DescribeTaskQueueMode'UnrecognizedValue
_)
= String -> DescribeTaskQueueMode
forall a. HasCallStack => String -> a
Prelude.error
String
"DescribeTaskQueueMode.succ: bad argument: unrecognized value"
pred :: DescribeTaskQueueMode -> DescribeTaskQueueMode
pred DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
= String -> DescribeTaskQueueMode
forall a. HasCallStack => String -> a
Prelude.error
String
"DescribeTaskQueueMode.pred: bad argument DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED. This value would be out of bounds."
pred DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_ENHANCED
= DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
pred (DescribeTaskQueueMode'Unrecognized DescribeTaskQueueMode'UnrecognizedValue
_)
= String -> DescribeTaskQueueMode
forall a. HasCallStack => String -> a
Prelude.error
String
"DescribeTaskQueueMode.pred: bad argument: unrecognized value"
enumFrom :: DescribeTaskQueueMode -> [DescribeTaskQueueMode]
enumFrom = DescribeTaskQueueMode -> [DescribeTaskQueueMode]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: DescribeTaskQueueMode
-> DescribeTaskQueueMode -> [DescribeTaskQueueMode]
enumFromTo = DescribeTaskQueueMode
-> DescribeTaskQueueMode -> [DescribeTaskQueueMode]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: DescribeTaskQueueMode
-> DescribeTaskQueueMode -> [DescribeTaskQueueMode]
enumFromThen = DescribeTaskQueueMode
-> DescribeTaskQueueMode -> [DescribeTaskQueueMode]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: DescribeTaskQueueMode
-> DescribeTaskQueueMode
-> DescribeTaskQueueMode
-> [DescribeTaskQueueMode]
enumFromThenTo = DescribeTaskQueueMode
-> DescribeTaskQueueMode
-> DescribeTaskQueueMode
-> [DescribeTaskQueueMode]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault DescribeTaskQueueMode where
fieldDefault :: DescribeTaskQueueMode
fieldDefault = DescribeTaskQueueMode
DESCRIBE_TASK_QUEUE_MODE_UNSPECIFIED
instance Control.DeepSeq.NFData DescribeTaskQueueMode where
rnf :: DescribeTaskQueueMode -> ()
rnf DescribeTaskQueueMode
x__ = DescribeTaskQueueMode -> () -> ()
forall a b. a -> b -> b
Prelude.seq DescribeTaskQueueMode
x__ ()
newtype TaskQueueKind'UnrecognizedValue
= TaskQueueKind'UnrecognizedValue Data.Int.Int32
deriving stock (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
(TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool)
-> Eq TaskQueueKind'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
== :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
$c/= :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
/= :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
Prelude.Eq, Eq TaskQueueKind'UnrecognizedValue
Eq TaskQueueKind'UnrecognizedValue =>
(TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Ordering)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue)
-> (TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue)
-> Ord TaskQueueKind'UnrecognizedValue
TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Ordering
TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'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 :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Ordering
compare :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Ordering
$c< :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
< :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
$c<= :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
<= :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
$c> :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
> :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
$c>= :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
>= :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue -> Bool
$cmax :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
max :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
$cmin :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
min :: TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
-> TaskQueueKind'UnrecognizedValue
Prelude.Ord, Int -> TaskQueueKind'UnrecognizedValue -> ShowS
[TaskQueueKind'UnrecognizedValue] -> ShowS
TaskQueueKind'UnrecognizedValue -> String
(Int -> TaskQueueKind'UnrecognizedValue -> ShowS)
-> (TaskQueueKind'UnrecognizedValue -> String)
-> ([TaskQueueKind'UnrecognizedValue] -> ShowS)
-> Show TaskQueueKind'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskQueueKind'UnrecognizedValue -> ShowS
showsPrec :: Int -> TaskQueueKind'UnrecognizedValue -> ShowS
$cshow :: TaskQueueKind'UnrecognizedValue -> String
show :: TaskQueueKind'UnrecognizedValue -> String
$cshowList :: [TaskQueueKind'UnrecognizedValue] -> ShowS
showList :: [TaskQueueKind'UnrecognizedValue] -> ShowS
Prelude.Show)
data TaskQueueKind
= TASK_QUEUE_KIND_UNSPECIFIED |
TASK_QUEUE_KIND_NORMAL |
TASK_QUEUE_KIND_STICKY |
TaskQueueKind'Unrecognized !TaskQueueKind'UnrecognizedValue
deriving stock (Int -> TaskQueueKind -> ShowS
[TaskQueueKind] -> ShowS
TaskQueueKind -> String
(Int -> TaskQueueKind -> ShowS)
-> (TaskQueueKind -> String)
-> ([TaskQueueKind] -> ShowS)
-> Show TaskQueueKind
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskQueueKind -> ShowS
showsPrec :: Int -> TaskQueueKind -> ShowS
$cshow :: TaskQueueKind -> String
show :: TaskQueueKind -> String
$cshowList :: [TaskQueueKind] -> ShowS
showList :: [TaskQueueKind] -> ShowS
Prelude.Show, TaskQueueKind -> TaskQueueKind -> Bool
(TaskQueueKind -> TaskQueueKind -> Bool)
-> (TaskQueueKind -> TaskQueueKind -> Bool) -> Eq TaskQueueKind
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskQueueKind -> TaskQueueKind -> Bool
== :: TaskQueueKind -> TaskQueueKind -> Bool
$c/= :: TaskQueueKind -> TaskQueueKind -> Bool
/= :: TaskQueueKind -> TaskQueueKind -> Bool
Prelude.Eq, Eq TaskQueueKind
Eq TaskQueueKind =>
(TaskQueueKind -> TaskQueueKind -> Ordering)
-> (TaskQueueKind -> TaskQueueKind -> Bool)
-> (TaskQueueKind -> TaskQueueKind -> Bool)
-> (TaskQueueKind -> TaskQueueKind -> Bool)
-> (TaskQueueKind -> TaskQueueKind -> Bool)
-> (TaskQueueKind -> TaskQueueKind -> TaskQueueKind)
-> (TaskQueueKind -> TaskQueueKind -> TaskQueueKind)
-> Ord TaskQueueKind
TaskQueueKind -> TaskQueueKind -> Bool
TaskQueueKind -> TaskQueueKind -> Ordering
TaskQueueKind -> TaskQueueKind -> TaskQueueKind
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 :: TaskQueueKind -> TaskQueueKind -> Ordering
compare :: TaskQueueKind -> TaskQueueKind -> Ordering
$c< :: TaskQueueKind -> TaskQueueKind -> Bool
< :: TaskQueueKind -> TaskQueueKind -> Bool
$c<= :: TaskQueueKind -> TaskQueueKind -> Bool
<= :: TaskQueueKind -> TaskQueueKind -> Bool
$c> :: TaskQueueKind -> TaskQueueKind -> Bool
> :: TaskQueueKind -> TaskQueueKind -> Bool
$c>= :: TaskQueueKind -> TaskQueueKind -> Bool
>= :: TaskQueueKind -> TaskQueueKind -> Bool
$cmax :: TaskQueueKind -> TaskQueueKind -> TaskQueueKind
max :: TaskQueueKind -> TaskQueueKind -> TaskQueueKind
$cmin :: TaskQueueKind -> TaskQueueKind -> TaskQueueKind
min :: TaskQueueKind -> TaskQueueKind -> TaskQueueKind
Prelude.Ord)
instance Data.ProtoLens.MessageEnum TaskQueueKind where
maybeToEnum :: Int -> Maybe TaskQueueKind
maybeToEnum Int
0 = TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
maybeToEnum Int
1 = TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just TaskQueueKind
TASK_QUEUE_KIND_NORMAL
maybeToEnum Int
2 = TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just TaskQueueKind
TASK_QUEUE_KIND_STICKY
maybeToEnum Int
k
= TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just
(TaskQueueKind'UnrecognizedValue -> TaskQueueKind
TaskQueueKind'Unrecognized
(Int32 -> TaskQueueKind'UnrecognizedValue
TaskQueueKind'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: TaskQueueKind -> String
showEnum TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
= String
"TASK_QUEUE_KIND_UNSPECIFIED"
showEnum TaskQueueKind
TASK_QUEUE_KIND_NORMAL = String
"TASK_QUEUE_KIND_NORMAL"
showEnum TaskQueueKind
TASK_QUEUE_KIND_STICKY = String
"TASK_QUEUE_KIND_STICKY"
showEnum
(TaskQueueKind'Unrecognized (TaskQueueKind'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe TaskQueueKind
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_KIND_UNSPECIFIED"
= TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_KIND_NORMAL"
= TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just TaskQueueKind
TASK_QUEUE_KIND_NORMAL
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_KIND_STICKY"
= TaskQueueKind -> Maybe TaskQueueKind
forall a. a -> Maybe a
Prelude.Just TaskQueueKind
TASK_QUEUE_KIND_STICKY
| Bool
Prelude.otherwise
= Maybe Int -> (Int -> Maybe TaskQueueKind) -> Maybe TaskQueueKind
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 TaskQueueKind
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded TaskQueueKind where
minBound :: TaskQueueKind
minBound = TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
maxBound :: TaskQueueKind
maxBound = TaskQueueKind
TASK_QUEUE_KIND_STICKY
instance Prelude.Enum TaskQueueKind where
toEnum :: Int -> TaskQueueKind
toEnum Int
k__
= TaskQueueKind
-> (TaskQueueKind -> TaskQueueKind)
-> Maybe TaskQueueKind
-> TaskQueueKind
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> TaskQueueKind
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum TaskQueueKind: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
TaskQueueKind -> TaskQueueKind
forall a. a -> a
Prelude.id (Int -> Maybe TaskQueueKind
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: TaskQueueKind -> Int
fromEnum TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED = Int
0
fromEnum TaskQueueKind
TASK_QUEUE_KIND_NORMAL = Int
1
fromEnum TaskQueueKind
TASK_QUEUE_KIND_STICKY = Int
2
fromEnum
(TaskQueueKind'Unrecognized (TaskQueueKind'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: TaskQueueKind -> TaskQueueKind
succ TaskQueueKind
TASK_QUEUE_KIND_STICKY
= String -> TaskQueueKind
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueKind.succ: bad argument TASK_QUEUE_KIND_STICKY. This value would be out of bounds."
succ TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED = TaskQueueKind
TASK_QUEUE_KIND_NORMAL
succ TaskQueueKind
TASK_QUEUE_KIND_NORMAL = TaskQueueKind
TASK_QUEUE_KIND_STICKY
succ (TaskQueueKind'Unrecognized TaskQueueKind'UnrecognizedValue
_)
= String -> TaskQueueKind
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueKind.succ: bad argument: unrecognized value"
pred :: TaskQueueKind -> TaskQueueKind
pred TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
= String -> TaskQueueKind
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueKind.pred: bad argument TASK_QUEUE_KIND_UNSPECIFIED. This value would be out of bounds."
pred TaskQueueKind
TASK_QUEUE_KIND_NORMAL = TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
pred TaskQueueKind
TASK_QUEUE_KIND_STICKY = TaskQueueKind
TASK_QUEUE_KIND_NORMAL
pred (TaskQueueKind'Unrecognized TaskQueueKind'UnrecognizedValue
_)
= String -> TaskQueueKind
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueKind.pred: bad argument: unrecognized value"
enumFrom :: TaskQueueKind -> [TaskQueueKind]
enumFrom = TaskQueueKind -> [TaskQueueKind]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: TaskQueueKind -> TaskQueueKind -> [TaskQueueKind]
enumFromTo = TaskQueueKind -> TaskQueueKind -> [TaskQueueKind]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: TaskQueueKind -> TaskQueueKind -> [TaskQueueKind]
enumFromThen = TaskQueueKind -> TaskQueueKind -> [TaskQueueKind]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: TaskQueueKind -> TaskQueueKind -> TaskQueueKind -> [TaskQueueKind]
enumFromThenTo = TaskQueueKind -> TaskQueueKind -> TaskQueueKind -> [TaskQueueKind]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault TaskQueueKind where
fieldDefault :: TaskQueueKind
fieldDefault = TaskQueueKind
TASK_QUEUE_KIND_UNSPECIFIED
instance Control.DeepSeq.NFData TaskQueueKind where
rnf :: TaskQueueKind -> ()
rnf TaskQueueKind
x__ = TaskQueueKind -> () -> ()
forall a b. a -> b -> b
Prelude.seq TaskQueueKind
x__ ()
newtype TaskQueueType'UnrecognizedValue
= TaskQueueType'UnrecognizedValue Data.Int.Int32
deriving stock (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
(TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool)
-> Eq TaskQueueType'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
== :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
$c/= :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
/= :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
Prelude.Eq, Eq TaskQueueType'UnrecognizedValue
Eq TaskQueueType'UnrecognizedValue =>
(TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Ordering)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue)
-> (TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue)
-> Ord TaskQueueType'UnrecognizedValue
TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Ordering
TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'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 :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Ordering
compare :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Ordering
$c< :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
< :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
$c<= :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
<= :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
$c> :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
> :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
$c>= :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
>= :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue -> Bool
$cmax :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
max :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
$cmin :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
min :: TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
-> TaskQueueType'UnrecognizedValue
Prelude.Ord, Int -> TaskQueueType'UnrecognizedValue -> ShowS
[TaskQueueType'UnrecognizedValue] -> ShowS
TaskQueueType'UnrecognizedValue -> String
(Int -> TaskQueueType'UnrecognizedValue -> ShowS)
-> (TaskQueueType'UnrecognizedValue -> String)
-> ([TaskQueueType'UnrecognizedValue] -> ShowS)
-> Show TaskQueueType'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskQueueType'UnrecognizedValue -> ShowS
showsPrec :: Int -> TaskQueueType'UnrecognizedValue -> ShowS
$cshow :: TaskQueueType'UnrecognizedValue -> String
show :: TaskQueueType'UnrecognizedValue -> String
$cshowList :: [TaskQueueType'UnrecognizedValue] -> ShowS
showList :: [TaskQueueType'UnrecognizedValue] -> ShowS
Prelude.Show)
data TaskQueueType
= TASK_QUEUE_TYPE_UNSPECIFIED |
TASK_QUEUE_TYPE_WORKFLOW |
TASK_QUEUE_TYPE_ACTIVITY |
TASK_QUEUE_TYPE_NEXUS |
TaskQueueType'Unrecognized !TaskQueueType'UnrecognizedValue
deriving stock (Int -> TaskQueueType -> ShowS
[TaskQueueType] -> ShowS
TaskQueueType -> String
(Int -> TaskQueueType -> ShowS)
-> (TaskQueueType -> String)
-> ([TaskQueueType] -> ShowS)
-> Show TaskQueueType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskQueueType -> ShowS
showsPrec :: Int -> TaskQueueType -> ShowS
$cshow :: TaskQueueType -> String
show :: TaskQueueType -> String
$cshowList :: [TaskQueueType] -> ShowS
showList :: [TaskQueueType] -> ShowS
Prelude.Show, TaskQueueType -> TaskQueueType -> Bool
(TaskQueueType -> TaskQueueType -> Bool)
-> (TaskQueueType -> TaskQueueType -> Bool) -> Eq TaskQueueType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskQueueType -> TaskQueueType -> Bool
== :: TaskQueueType -> TaskQueueType -> Bool
$c/= :: TaskQueueType -> TaskQueueType -> Bool
/= :: TaskQueueType -> TaskQueueType -> Bool
Prelude.Eq, Eq TaskQueueType
Eq TaskQueueType =>
(TaskQueueType -> TaskQueueType -> Ordering)
-> (TaskQueueType -> TaskQueueType -> Bool)
-> (TaskQueueType -> TaskQueueType -> Bool)
-> (TaskQueueType -> TaskQueueType -> Bool)
-> (TaskQueueType -> TaskQueueType -> Bool)
-> (TaskQueueType -> TaskQueueType -> TaskQueueType)
-> (TaskQueueType -> TaskQueueType -> TaskQueueType)
-> Ord TaskQueueType
TaskQueueType -> TaskQueueType -> Bool
TaskQueueType -> TaskQueueType -> Ordering
TaskQueueType -> TaskQueueType -> TaskQueueType
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 :: TaskQueueType -> TaskQueueType -> Ordering
compare :: TaskQueueType -> TaskQueueType -> Ordering
$c< :: TaskQueueType -> TaskQueueType -> Bool
< :: TaskQueueType -> TaskQueueType -> Bool
$c<= :: TaskQueueType -> TaskQueueType -> Bool
<= :: TaskQueueType -> TaskQueueType -> Bool
$c> :: TaskQueueType -> TaskQueueType -> Bool
> :: TaskQueueType -> TaskQueueType -> Bool
$c>= :: TaskQueueType -> TaskQueueType -> Bool
>= :: TaskQueueType -> TaskQueueType -> Bool
$cmax :: TaskQueueType -> TaskQueueType -> TaskQueueType
max :: TaskQueueType -> TaskQueueType -> TaskQueueType
$cmin :: TaskQueueType -> TaskQueueType -> TaskQueueType
min :: TaskQueueType -> TaskQueueType -> TaskQueueType
Prelude.Ord)
instance Data.ProtoLens.MessageEnum TaskQueueType where
maybeToEnum :: Int -> Maybe TaskQueueType
maybeToEnum Int
0 = TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
maybeToEnum Int
1 = TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW
maybeToEnum Int
2 = TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY
maybeToEnum Int
3 = TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_NEXUS
maybeToEnum Int
k
= TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just
(TaskQueueType'UnrecognizedValue -> TaskQueueType
TaskQueueType'Unrecognized
(Int32 -> TaskQueueType'UnrecognizedValue
TaskQueueType'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: TaskQueueType -> String
showEnum TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
= String
"TASK_QUEUE_TYPE_UNSPECIFIED"
showEnum TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW = String
"TASK_QUEUE_TYPE_WORKFLOW"
showEnum TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY = String
"TASK_QUEUE_TYPE_ACTIVITY"
showEnum TaskQueueType
TASK_QUEUE_TYPE_NEXUS = String
"TASK_QUEUE_TYPE_NEXUS"
showEnum
(TaskQueueType'Unrecognized (TaskQueueType'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe TaskQueueType
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_TYPE_UNSPECIFIED"
= TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_TYPE_WORKFLOW"
= TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_TYPE_ACTIVITY"
= TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_QUEUE_TYPE_NEXUS"
= TaskQueueType -> Maybe TaskQueueType
forall a. a -> Maybe a
Prelude.Just TaskQueueType
TASK_QUEUE_TYPE_NEXUS
| Bool
Prelude.otherwise
= Maybe Int -> (Int -> Maybe TaskQueueType) -> Maybe TaskQueueType
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 TaskQueueType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded TaskQueueType where
minBound :: TaskQueueType
minBound = TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
maxBound :: TaskQueueType
maxBound = TaskQueueType
TASK_QUEUE_TYPE_NEXUS
instance Prelude.Enum TaskQueueType where
toEnum :: Int -> TaskQueueType
toEnum Int
k__
= TaskQueueType
-> (TaskQueueType -> TaskQueueType)
-> Maybe TaskQueueType
-> TaskQueueType
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> TaskQueueType
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum TaskQueueType: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
TaskQueueType -> TaskQueueType
forall a. a -> a
Prelude.id (Int -> Maybe TaskQueueType
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: TaskQueueType -> Int
fromEnum TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED = Int
0
fromEnum TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW = Int
1
fromEnum TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY = Int
2
fromEnum TaskQueueType
TASK_QUEUE_TYPE_NEXUS = Int
3
fromEnum
(TaskQueueType'Unrecognized (TaskQueueType'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: TaskQueueType -> TaskQueueType
succ TaskQueueType
TASK_QUEUE_TYPE_NEXUS
= String -> TaskQueueType
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueType.succ: bad argument TASK_QUEUE_TYPE_NEXUS. This value would be out of bounds."
succ TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED = TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW
succ TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW = TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY
succ TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY = TaskQueueType
TASK_QUEUE_TYPE_NEXUS
succ (TaskQueueType'Unrecognized TaskQueueType'UnrecognizedValue
_)
= String -> TaskQueueType
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueType.succ: bad argument: unrecognized value"
pred :: TaskQueueType -> TaskQueueType
pred TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
= String -> TaskQueueType
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueType.pred: bad argument TASK_QUEUE_TYPE_UNSPECIFIED. This value would be out of bounds."
pred TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW = TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
pred TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY = TaskQueueType
TASK_QUEUE_TYPE_WORKFLOW
pred TaskQueueType
TASK_QUEUE_TYPE_NEXUS = TaskQueueType
TASK_QUEUE_TYPE_ACTIVITY
pred (TaskQueueType'Unrecognized TaskQueueType'UnrecognizedValue
_)
= String -> TaskQueueType
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskQueueType.pred: bad argument: unrecognized value"
enumFrom :: TaskQueueType -> [TaskQueueType]
enumFrom = TaskQueueType -> [TaskQueueType]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: TaskQueueType -> TaskQueueType -> [TaskQueueType]
enumFromTo = TaskQueueType -> TaskQueueType -> [TaskQueueType]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: TaskQueueType -> TaskQueueType -> [TaskQueueType]
enumFromThen = TaskQueueType -> TaskQueueType -> [TaskQueueType]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: TaskQueueType -> TaskQueueType -> TaskQueueType -> [TaskQueueType]
enumFromThenTo = TaskQueueType -> TaskQueueType -> TaskQueueType -> [TaskQueueType]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault TaskQueueType where
fieldDefault :: TaskQueueType
fieldDefault = TaskQueueType
TASK_QUEUE_TYPE_UNSPECIFIED
instance Control.DeepSeq.NFData TaskQueueType where
rnf :: TaskQueueType -> ()
rnf TaskQueueType
x__ = TaskQueueType -> () -> ()
forall a b. a -> b -> b
Prelude.seq TaskQueueType
x__ ()
newtype TaskReachability'UnrecognizedValue
= TaskReachability'UnrecognizedValue Data.Int.Int32
deriving stock (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
(TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool)
-> Eq TaskReachability'UnrecognizedValue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
== :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
$c/= :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
/= :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
Prelude.Eq, Eq TaskReachability'UnrecognizedValue
Eq TaskReachability'UnrecognizedValue =>
(TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Ordering)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue)
-> (TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue)
-> Ord TaskReachability'UnrecognizedValue
TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Ordering
TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'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 :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Ordering
compare :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Ordering
$c< :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
< :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
$c<= :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
<= :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
$c> :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
> :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
$c>= :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
>= :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue -> Bool
$cmax :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
max :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
$cmin :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
min :: TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
-> TaskReachability'UnrecognizedValue
Prelude.Ord, Int -> TaskReachability'UnrecognizedValue -> ShowS
[TaskReachability'UnrecognizedValue] -> ShowS
TaskReachability'UnrecognizedValue -> String
(Int -> TaskReachability'UnrecognizedValue -> ShowS)
-> (TaskReachability'UnrecognizedValue -> String)
-> ([TaskReachability'UnrecognizedValue] -> ShowS)
-> Show TaskReachability'UnrecognizedValue
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskReachability'UnrecognizedValue -> ShowS
showsPrec :: Int -> TaskReachability'UnrecognizedValue -> ShowS
$cshow :: TaskReachability'UnrecognizedValue -> String
show :: TaskReachability'UnrecognizedValue -> String
$cshowList :: [TaskReachability'UnrecognizedValue] -> ShowS
showList :: [TaskReachability'UnrecognizedValue] -> ShowS
Prelude.Show)
data TaskReachability
= TASK_REACHABILITY_UNSPECIFIED |
TASK_REACHABILITY_NEW_WORKFLOWS |
TASK_REACHABILITY_EXISTING_WORKFLOWS |
TASK_REACHABILITY_OPEN_WORKFLOWS |
TASK_REACHABILITY_CLOSED_WORKFLOWS |
TaskReachability'Unrecognized !TaskReachability'UnrecognizedValue
deriving stock (Int -> TaskReachability -> ShowS
[TaskReachability] -> ShowS
TaskReachability -> String
(Int -> TaskReachability -> ShowS)
-> (TaskReachability -> String)
-> ([TaskReachability] -> ShowS)
-> Show TaskReachability
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TaskReachability -> ShowS
showsPrec :: Int -> TaskReachability -> ShowS
$cshow :: TaskReachability -> String
show :: TaskReachability -> String
$cshowList :: [TaskReachability] -> ShowS
showList :: [TaskReachability] -> ShowS
Prelude.Show, TaskReachability -> TaskReachability -> Bool
(TaskReachability -> TaskReachability -> Bool)
-> (TaskReachability -> TaskReachability -> Bool)
-> Eq TaskReachability
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TaskReachability -> TaskReachability -> Bool
== :: TaskReachability -> TaskReachability -> Bool
$c/= :: TaskReachability -> TaskReachability -> Bool
/= :: TaskReachability -> TaskReachability -> Bool
Prelude.Eq, Eq TaskReachability
Eq TaskReachability =>
(TaskReachability -> TaskReachability -> Ordering)
-> (TaskReachability -> TaskReachability -> Bool)
-> (TaskReachability -> TaskReachability -> Bool)
-> (TaskReachability -> TaskReachability -> Bool)
-> (TaskReachability -> TaskReachability -> Bool)
-> (TaskReachability -> TaskReachability -> TaskReachability)
-> (TaskReachability -> TaskReachability -> TaskReachability)
-> Ord TaskReachability
TaskReachability -> TaskReachability -> Bool
TaskReachability -> TaskReachability -> Ordering
TaskReachability -> TaskReachability -> TaskReachability
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 :: TaskReachability -> TaskReachability -> Ordering
compare :: TaskReachability -> TaskReachability -> Ordering
$c< :: TaskReachability -> TaskReachability -> Bool
< :: TaskReachability -> TaskReachability -> Bool
$c<= :: TaskReachability -> TaskReachability -> Bool
<= :: TaskReachability -> TaskReachability -> Bool
$c> :: TaskReachability -> TaskReachability -> Bool
> :: TaskReachability -> TaskReachability -> Bool
$c>= :: TaskReachability -> TaskReachability -> Bool
>= :: TaskReachability -> TaskReachability -> Bool
$cmax :: TaskReachability -> TaskReachability -> TaskReachability
max :: TaskReachability -> TaskReachability -> TaskReachability
$cmin :: TaskReachability -> TaskReachability -> TaskReachability
min :: TaskReachability -> TaskReachability -> TaskReachability
Prelude.Ord)
instance Data.ProtoLens.MessageEnum TaskReachability where
maybeToEnum :: Int -> Maybe TaskReachability
maybeToEnum Int
0 = TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_UNSPECIFIED
maybeToEnum Int
1 = TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
maybeToEnum Int
2 = TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
maybeToEnum Int
3 = TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
maybeToEnum Int
4 = TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
maybeToEnum Int
k
= TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just
(TaskReachability'UnrecognizedValue -> TaskReachability
TaskReachability'Unrecognized
(Int32 -> TaskReachability'UnrecognizedValue
TaskReachability'UnrecognizedValue (Int -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int
k)))
showEnum :: TaskReachability -> String
showEnum TaskReachability
TASK_REACHABILITY_UNSPECIFIED
= String
"TASK_REACHABILITY_UNSPECIFIED"
showEnum TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
= String
"TASK_REACHABILITY_NEW_WORKFLOWS"
showEnum TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
= String
"TASK_REACHABILITY_EXISTING_WORKFLOWS"
showEnum TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
= String
"TASK_REACHABILITY_OPEN_WORKFLOWS"
showEnum TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
= String
"TASK_REACHABILITY_CLOSED_WORKFLOWS"
showEnum
(TaskReachability'Unrecognized (TaskReachability'UnrecognizedValue Int32
k))
= Int32 -> String
forall a. Show a => a -> String
Prelude.show Int32
k
readEnum :: String -> Maybe TaskReachability
readEnum String
k
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_REACHABILITY_UNSPECIFIED"
= TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_UNSPECIFIED
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_REACHABILITY_NEW_WORKFLOWS"
= TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_REACHABILITY_EXISTING_WORKFLOWS"
= TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_REACHABILITY_OPEN_WORKFLOWS"
= TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
| String -> String -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) String
k String
"TASK_REACHABILITY_CLOSED_WORKFLOWS"
= TaskReachability -> Maybe TaskReachability
forall a. a -> Maybe a
Prelude.Just TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
| Bool
Prelude.otherwise
= Maybe Int
-> (Int -> Maybe TaskReachability) -> Maybe TaskReachability
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 TaskReachability
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum
instance Prelude.Bounded TaskReachability where
minBound :: TaskReachability
minBound = TaskReachability
TASK_REACHABILITY_UNSPECIFIED
maxBound :: TaskReachability
maxBound = TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
instance Prelude.Enum TaskReachability where
toEnum :: Int -> TaskReachability
toEnum Int
k__
= TaskReachability
-> (TaskReachability -> TaskReachability)
-> Maybe TaskReachability
-> TaskReachability
forall b a. b -> (a -> b) -> Maybe a -> b
Prelude.maybe
(String -> TaskReachability
forall a. HasCallStack => String -> a
Prelude.error
(String -> ShowS
forall a. [a] -> [a] -> [a]
(Prelude.++)
String
"toEnum: unknown value for enum TaskReachability: "
(Int -> String
forall a. Show a => a -> String
Prelude.show Int
k__)))
TaskReachability -> TaskReachability
forall a. a -> a
Prelude.id (Int -> Maybe TaskReachability
forall a. MessageEnum a => Int -> Maybe a
Data.ProtoLens.maybeToEnum Int
k__)
fromEnum :: TaskReachability -> Int
fromEnum TaskReachability
TASK_REACHABILITY_UNSPECIFIED = Int
0
fromEnum TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS = Int
1
fromEnum TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS = Int
2
fromEnum TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS = Int
3
fromEnum TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS = Int
4
fromEnum
(TaskReachability'Unrecognized (TaskReachability'UnrecognizedValue Int32
k))
= Int32 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
k
succ :: TaskReachability -> TaskReachability
succ TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
= String -> TaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskReachability.succ: bad argument TASK_REACHABILITY_CLOSED_WORKFLOWS. This value would be out of bounds."
succ TaskReachability
TASK_REACHABILITY_UNSPECIFIED
= TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
succ TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
succ TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
succ TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
succ (TaskReachability'Unrecognized TaskReachability'UnrecognizedValue
_)
= String -> TaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskReachability.succ: bad argument: unrecognized value"
pred :: TaskReachability -> TaskReachability
pred TaskReachability
TASK_REACHABILITY_UNSPECIFIED
= String -> TaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskReachability.pred: bad argument TASK_REACHABILITY_UNSPECIFIED. This value would be out of bounds."
pred TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_UNSPECIFIED
pred TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_NEW_WORKFLOWS
pred TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_EXISTING_WORKFLOWS
pred TaskReachability
TASK_REACHABILITY_CLOSED_WORKFLOWS
= TaskReachability
TASK_REACHABILITY_OPEN_WORKFLOWS
pred (TaskReachability'Unrecognized TaskReachability'UnrecognizedValue
_)
= String -> TaskReachability
forall a. HasCallStack => String -> a
Prelude.error
String
"TaskReachability.pred: bad argument: unrecognized value"
enumFrom :: TaskReachability -> [TaskReachability]
enumFrom = TaskReachability -> [TaskReachability]
forall a. (Enum a, Bounded a) => a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFrom
enumFromTo :: TaskReachability -> TaskReachability -> [TaskReachability]
enumFromTo = TaskReachability -> TaskReachability -> [TaskReachability]
forall a. Enum a => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromTo
enumFromThen :: TaskReachability -> TaskReachability -> [TaskReachability]
enumFromThen = TaskReachability -> TaskReachability -> [TaskReachability]
forall a. (Enum a, Bounded a) => a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThen
enumFromThenTo :: TaskReachability
-> TaskReachability -> TaskReachability -> [TaskReachability]
enumFromThenTo = TaskReachability
-> TaskReachability -> TaskReachability -> [TaskReachability]
forall a. Enum a => a -> a -> a -> [a]
Data.ProtoLens.Message.Enum.messageEnumFromThenTo
instance Data.ProtoLens.FieldDefault TaskReachability where
fieldDefault :: TaskReachability
fieldDefault = TaskReachability
TASK_REACHABILITY_UNSPECIFIED
instance Control.DeepSeq.NFData TaskReachability where
rnf :: TaskReachability -> ()
rnf TaskReachability
x__ = TaskReachability -> () -> ()
forall a b. a -> b -> b
Prelude.seq TaskReachability
x__ ()