{-# 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.Workflow.V1.Message (
CallbackInfo(), CallbackInfo'Trigger(),
CallbackInfo'Trigger'Variant(..),
_CallbackInfo'Trigger'WorkflowClosed,
CallbackInfo'WorkflowClosed(), NewWorkflowExecutionInfo(),
NexusOperationCancellationInfo(), PendingActivityInfo(),
PendingActivityInfo'AssignedBuildId(..),
_PendingActivityInfo'UseWorkflowBuildId,
_PendingActivityInfo'LastIndependentlyAssignedBuildId,
PendingChildExecutionInfo(), PendingNexusOperationInfo(),
PendingWorkflowTaskInfo(), ResetPointInfo(), ResetPoints(),
WorkflowExecutionConfig(), WorkflowExecutionInfo()
) 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
import qualified Proto.Google.Protobuf.Duration
import qualified Proto.Google.Protobuf.Empty
import qualified Proto.Google.Protobuf.Timestamp
import qualified Proto.Temporal.Api.Common.V1.Message
import qualified Proto.Temporal.Api.Enums.V1.Common
import qualified Proto.Temporal.Api.Enums.V1.Workflow
import qualified Proto.Temporal.Api.Failure.V1.Message
import qualified Proto.Temporal.Api.Taskqueue.V1.Message
data CallbackInfo
= CallbackInfo'_constructor {CallbackInfo -> Maybe Callback
_CallbackInfo'callback :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Callback),
CallbackInfo -> Maybe CallbackInfo'Trigger
_CallbackInfo'trigger :: !(Prelude.Maybe CallbackInfo'Trigger),
CallbackInfo -> Maybe Timestamp
_CallbackInfo'registrationTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
CallbackInfo -> CallbackState
_CallbackInfo'state :: !Proto.Temporal.Api.Enums.V1.Common.CallbackState,
CallbackInfo -> Int32
_CallbackInfo'attempt :: !Data.Int.Int32,
CallbackInfo -> Maybe Timestamp
_CallbackInfo'lastAttemptCompleteTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
CallbackInfo -> Maybe Failure
_CallbackInfo'lastAttemptFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
CallbackInfo -> Maybe Timestamp
_CallbackInfo'nextAttemptScheduleTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
CallbackInfo -> FieldSet
_CallbackInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (CallbackInfo -> CallbackInfo -> Bool
(CallbackInfo -> CallbackInfo -> Bool)
-> (CallbackInfo -> CallbackInfo -> Bool) -> Eq CallbackInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CallbackInfo -> CallbackInfo -> Bool
== :: CallbackInfo -> CallbackInfo -> Bool
$c/= :: CallbackInfo -> CallbackInfo -> Bool
/= :: CallbackInfo -> CallbackInfo -> Bool
Prelude.Eq, Eq CallbackInfo
Eq CallbackInfo =>
(CallbackInfo -> CallbackInfo -> Ordering)
-> (CallbackInfo -> CallbackInfo -> Bool)
-> (CallbackInfo -> CallbackInfo -> Bool)
-> (CallbackInfo -> CallbackInfo -> Bool)
-> (CallbackInfo -> CallbackInfo -> Bool)
-> (CallbackInfo -> CallbackInfo -> CallbackInfo)
-> (CallbackInfo -> CallbackInfo -> CallbackInfo)
-> Ord CallbackInfo
CallbackInfo -> CallbackInfo -> Bool
CallbackInfo -> CallbackInfo -> Ordering
CallbackInfo -> CallbackInfo -> CallbackInfo
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 :: CallbackInfo -> CallbackInfo -> Ordering
compare :: CallbackInfo -> CallbackInfo -> Ordering
$c< :: CallbackInfo -> CallbackInfo -> Bool
< :: CallbackInfo -> CallbackInfo -> Bool
$c<= :: CallbackInfo -> CallbackInfo -> Bool
<= :: CallbackInfo -> CallbackInfo -> Bool
$c> :: CallbackInfo -> CallbackInfo -> Bool
> :: CallbackInfo -> CallbackInfo -> Bool
$c>= :: CallbackInfo -> CallbackInfo -> Bool
>= :: CallbackInfo -> CallbackInfo -> Bool
$cmax :: CallbackInfo -> CallbackInfo -> CallbackInfo
max :: CallbackInfo -> CallbackInfo -> CallbackInfo
$cmin :: CallbackInfo -> CallbackInfo -> CallbackInfo
min :: CallbackInfo -> CallbackInfo -> CallbackInfo
Prelude.Ord)
instance Prelude.Show CallbackInfo where
showsPrec :: Int -> CallbackInfo -> ShowS
showsPrec Int
_ CallbackInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(CallbackInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CallbackInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField CallbackInfo "callback" Proto.Temporal.Api.Common.V1.Message.Callback where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "callback"
-> (Callback -> f Callback) -> CallbackInfo -> f CallbackInfo
fieldOf Proxy# "callback"
_
= ((Maybe Callback -> f (Maybe Callback))
-> CallbackInfo -> f CallbackInfo)
-> ((Callback -> f Callback)
-> Maybe Callback -> f (Maybe Callback))
-> (Callback -> f Callback)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Callback)
-> (CallbackInfo -> Maybe Callback -> CallbackInfo)
-> Lens CallbackInfo CallbackInfo (Maybe Callback) (Maybe Callback)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Callback
_CallbackInfo'callback
(\ CallbackInfo
x__ Maybe Callback
y__ -> CallbackInfo
x__ {_CallbackInfo'callback = y__}))
(Callback -> Lens' (Maybe Callback) Callback
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Callback
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallbackInfo "maybe'callback" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Callback) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'callback"
-> (Maybe Callback -> f (Maybe Callback))
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "maybe'callback"
_
= ((Maybe Callback -> f (Maybe Callback))
-> CallbackInfo -> f CallbackInfo)
-> ((Maybe Callback -> f (Maybe Callback))
-> Maybe Callback -> f (Maybe Callback))
-> (Maybe Callback -> f (Maybe Callback))
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Callback)
-> (CallbackInfo -> Maybe Callback -> CallbackInfo)
-> Lens CallbackInfo CallbackInfo (Maybe Callback) (Maybe Callback)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Callback
_CallbackInfo'callback
(\ CallbackInfo
x__ Maybe Callback
y__ -> CallbackInfo
x__ {_CallbackInfo'callback = y__}))
(Maybe Callback -> f (Maybe Callback))
-> Maybe Callback -> f (Maybe Callback)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "trigger" CallbackInfo'Trigger where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "trigger"
-> (CallbackInfo'Trigger -> f CallbackInfo'Trigger)
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "trigger"
_
= ((Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> CallbackInfo -> f CallbackInfo)
-> ((CallbackInfo'Trigger -> f CallbackInfo'Trigger)
-> Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> (CallbackInfo'Trigger -> f CallbackInfo'Trigger)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe CallbackInfo'Trigger)
-> (CallbackInfo -> Maybe CallbackInfo'Trigger -> CallbackInfo)
-> Lens
CallbackInfo
CallbackInfo
(Maybe CallbackInfo'Trigger)
(Maybe CallbackInfo'Trigger)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe CallbackInfo'Trigger
_CallbackInfo'trigger
(\ CallbackInfo
x__ Maybe CallbackInfo'Trigger
y__ -> CallbackInfo
x__ {_CallbackInfo'trigger = y__}))
(CallbackInfo'Trigger
-> Lens' (Maybe CallbackInfo'Trigger) CallbackInfo'Trigger
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CallbackInfo'Trigger
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallbackInfo "maybe'trigger" (Prelude.Maybe CallbackInfo'Trigger) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'trigger"
-> (Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "maybe'trigger"
_
= ((Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> CallbackInfo -> f CallbackInfo)
-> ((Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> (Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe CallbackInfo'Trigger)
-> (CallbackInfo -> Maybe CallbackInfo'Trigger -> CallbackInfo)
-> Lens
CallbackInfo
CallbackInfo
(Maybe CallbackInfo'Trigger)
(Maybe CallbackInfo'Trigger)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe CallbackInfo'Trigger
_CallbackInfo'trigger
(\ CallbackInfo
x__ Maybe CallbackInfo'Trigger
y__ -> CallbackInfo
x__ {_CallbackInfo'trigger = y__}))
(Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger))
-> Maybe CallbackInfo'Trigger -> f (Maybe CallbackInfo'Trigger)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "registrationTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "registrationTime"
-> (Timestamp -> f Timestamp) -> CallbackInfo -> f CallbackInfo
fieldOf Proxy# "registrationTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo -> f CallbackInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Timestamp)
-> (CallbackInfo -> Maybe Timestamp -> CallbackInfo)
-> Lens
CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Timestamp
_CallbackInfo'registrationTime
(\ CallbackInfo
x__ Maybe Timestamp
y__ -> CallbackInfo
x__ {_CallbackInfo'registrationTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallbackInfo "maybe'registrationTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'registrationTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "maybe'registrationTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo -> f CallbackInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Timestamp)
-> (CallbackInfo -> Maybe Timestamp -> CallbackInfo)
-> Lens
CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Timestamp
_CallbackInfo'registrationTime
(\ CallbackInfo
x__ Maybe Timestamp
y__ -> CallbackInfo
x__ {_CallbackInfo'registrationTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "state" Proto.Temporal.Api.Enums.V1.Common.CallbackState where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "state"
-> (CallbackState -> f CallbackState)
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "state"
_
= ((CallbackState -> f CallbackState)
-> CallbackInfo -> f CallbackInfo)
-> ((CallbackState -> f CallbackState)
-> CallbackState -> f CallbackState)
-> (CallbackState -> f CallbackState)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> CallbackState)
-> (CallbackInfo -> CallbackState -> CallbackInfo)
-> Lens CallbackInfo CallbackInfo CallbackState CallbackState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> CallbackState
_CallbackInfo'state (\ CallbackInfo
x__ CallbackState
y__ -> CallbackInfo
x__ {_CallbackInfo'state = y__}))
(CallbackState -> f CallbackState)
-> CallbackState -> f CallbackState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "attempt" Data.Int.Int32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32) -> CallbackInfo -> f CallbackInfo
fieldOf Proxy# "attempt"
_
= ((Int32 -> f Int32) -> CallbackInfo -> f CallbackInfo)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Int32)
-> (CallbackInfo -> Int32 -> CallbackInfo)
-> Lens CallbackInfo CallbackInfo Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Int32
_CallbackInfo'attempt
(\ CallbackInfo
x__ Int32
y__ -> CallbackInfo
x__ {_CallbackInfo'attempt = y__}))
(Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "lastAttemptCompleteTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastAttemptCompleteTime"
-> (Timestamp -> f Timestamp) -> CallbackInfo -> f CallbackInfo
fieldOf Proxy# "lastAttemptCompleteTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo -> f CallbackInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Timestamp)
-> (CallbackInfo -> Maybe Timestamp -> CallbackInfo)
-> Lens
CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Timestamp
_CallbackInfo'lastAttemptCompleteTime
(\ CallbackInfo
x__ Maybe Timestamp
y__ -> CallbackInfo
x__ {_CallbackInfo'lastAttemptCompleteTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallbackInfo "maybe'lastAttemptCompleteTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastAttemptCompleteTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "maybe'lastAttemptCompleteTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo -> f CallbackInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Timestamp)
-> (CallbackInfo -> Maybe Timestamp -> CallbackInfo)
-> Lens
CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Timestamp
_CallbackInfo'lastAttemptCompleteTime
(\ CallbackInfo
x__ Maybe Timestamp
y__ -> CallbackInfo
x__ {_CallbackInfo'lastAttemptCompleteTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "lastAttemptFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastAttemptFailure"
-> (Failure -> f Failure) -> CallbackInfo -> f CallbackInfo
fieldOf Proxy# "lastAttemptFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> CallbackInfo -> f CallbackInfo)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Failure)
-> (CallbackInfo -> Maybe Failure -> CallbackInfo)
-> Lens CallbackInfo CallbackInfo (Maybe Failure) (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Failure
_CallbackInfo'lastAttemptFailure
(\ CallbackInfo
x__ Maybe Failure
y__ -> CallbackInfo
x__ {_CallbackInfo'lastAttemptFailure = y__}))
(Failure -> Lens' (Maybe Failure) Failure
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Failure
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallbackInfo "maybe'lastAttemptFailure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastAttemptFailure"
-> (Maybe Failure -> f (Maybe Failure))
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "maybe'lastAttemptFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> CallbackInfo -> f CallbackInfo)
-> ((Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Failure)
-> (CallbackInfo -> Maybe Failure -> CallbackInfo)
-> Lens CallbackInfo CallbackInfo (Maybe Failure) (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Failure
_CallbackInfo'lastAttemptFailure
(\ CallbackInfo
x__ Maybe Failure
y__ -> CallbackInfo
x__ {_CallbackInfo'lastAttemptFailure = y__}))
(Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo "nextAttemptScheduleTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextAttemptScheduleTime"
-> (Timestamp -> f Timestamp) -> CallbackInfo -> f CallbackInfo
fieldOf Proxy# "nextAttemptScheduleTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo -> f CallbackInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Timestamp)
-> (CallbackInfo -> Maybe Timestamp -> CallbackInfo)
-> Lens
CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Timestamp
_CallbackInfo'nextAttemptScheduleTime
(\ CallbackInfo
x__ Maybe Timestamp
y__ -> CallbackInfo
x__ {_CallbackInfo'nextAttemptScheduleTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField CallbackInfo "maybe'nextAttemptScheduleTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nextAttemptScheduleTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo
-> f CallbackInfo
fieldOf Proxy# "maybe'nextAttemptScheduleTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo -> f CallbackInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> CallbackInfo
-> f CallbackInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo -> Maybe Timestamp)
-> (CallbackInfo -> Maybe Timestamp -> CallbackInfo)
-> Lens
CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> Maybe Timestamp
_CallbackInfo'nextAttemptScheduleTime
(\ CallbackInfo
x__ Maybe Timestamp
y__ -> CallbackInfo
x__ {_CallbackInfo'nextAttemptScheduleTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message CallbackInfo where
messageName :: Proxy CallbackInfo -> Text
messageName Proxy CallbackInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.CallbackInfo"
packedMessageDescriptor :: Proxy CallbackInfo -> ByteString
packedMessageDescriptor Proxy CallbackInfo
_
= ByteString
"\n\
\\fCallbackInfo\DC2<\n\
\\bcallback\CAN\SOH \SOH(\v2 .temporal.api.common.v1.CallbackR\bcallback\DC2H\n\
\\atrigger\CAN\STX \SOH(\v2..temporal.api.workflow.v1.CallbackInfo.TriggerR\atrigger\DC2G\n\
\\DC1registration_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\DLEregistrationTime\DC2:\n\
\\ENQstate\CAN\EOT \SOH(\SO2$.temporal.api.enums.v1.CallbackStateR\ENQstate\DC2\CAN\n\
\\aattempt\CAN\ENQ \SOH(\ENQR\aattempt\DC2W\n\
\\SUBlast_attempt_complete_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\ETBlastAttemptCompleteTime\DC2R\n\
\\DC4last_attempt_failure\CAN\a \SOH(\v2 .temporal.api.failure.v1.FailureR\DC2lastAttemptFailure\DC2W\n\
\\SUBnext_attempt_schedule_time\CAN\b \SOH(\v2\SUB.google.protobuf.TimestampR\ETBnextAttemptScheduleTime\SUB\DLE\n\
\\SOWorkflowClosed\SUBv\n\
\\aTrigger\DC2`\n\
\\SIworkflow_closed\CAN\SOH \SOH(\v25.temporal.api.workflow.v1.CallbackInfo.WorkflowClosedH\NULR\SOworkflowClosedB\t\n\
\\avariant"
packedFileDescriptor :: Proxy CallbackInfo -> ByteString
packedFileDescriptor Proxy CallbackInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor CallbackInfo)
fieldsByTag
= let
callback__field_descriptor :: FieldDescriptor CallbackInfo
callback__field_descriptor
= String
-> FieldTypeDescriptor Callback
-> FieldAccessor CallbackInfo Callback
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"callback"
(MessageOrGroup -> FieldTypeDescriptor Callback
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Callback)
(Lens CallbackInfo CallbackInfo (Maybe Callback) (Maybe Callback)
-> FieldAccessor CallbackInfo Callback
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'callback")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
trigger__field_descriptor :: FieldDescriptor CallbackInfo
trigger__field_descriptor
= String
-> FieldTypeDescriptor CallbackInfo'Trigger
-> FieldAccessor CallbackInfo CallbackInfo'Trigger
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"trigger"
(MessageOrGroup -> FieldTypeDescriptor CallbackInfo'Trigger
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor CallbackInfo'Trigger)
(Lens
CallbackInfo
CallbackInfo
(Maybe CallbackInfo'Trigger)
(Maybe CallbackInfo'Trigger)
-> FieldAccessor CallbackInfo CallbackInfo'Trigger
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'trigger")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
registrationTime__field_descriptor :: FieldDescriptor CallbackInfo
registrationTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor CallbackInfo Timestamp
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"registration_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor CallbackInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'registrationTime")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
state__field_descriptor :: FieldDescriptor CallbackInfo
state__field_descriptor
= String
-> FieldTypeDescriptor CallbackState
-> FieldAccessor CallbackInfo CallbackState
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"state"
(ScalarField CallbackState -> FieldTypeDescriptor CallbackState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField CallbackState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Common.CallbackState)
(WireDefault CallbackState
-> Lens CallbackInfo CallbackInfo CallbackState CallbackState
-> FieldAccessor CallbackInfo CallbackState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault CallbackState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
attempt__field_descriptor :: FieldDescriptor CallbackInfo
attempt__field_descriptor
= String
-> FieldTypeDescriptor Int32
-> FieldAccessor CallbackInfo Int32
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"attempt"
(ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(WireDefault Int32
-> Lens CallbackInfo CallbackInfo Int32 Int32
-> FieldAccessor CallbackInfo Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
lastAttemptCompleteTime__field_descriptor :: FieldDescriptor CallbackInfo
lastAttemptCompleteTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor CallbackInfo Timestamp
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_attempt_complete_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor CallbackInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptCompleteTime")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
lastAttemptFailure__field_descriptor :: FieldDescriptor CallbackInfo
lastAttemptFailure__field_descriptor
= String
-> FieldTypeDescriptor Failure
-> FieldAccessor CallbackInfo Failure
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_attempt_failure"
(MessageOrGroup -> FieldTypeDescriptor Failure
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Failure.V1.Message.Failure)
(Lens CallbackInfo CallbackInfo (Maybe Failure) (Maybe Failure)
-> FieldAccessor CallbackInfo Failure
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptFailure")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
nextAttemptScheduleTime__field_descriptor :: FieldDescriptor CallbackInfo
nextAttemptScheduleTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor CallbackInfo Timestamp
-> FieldDescriptor CallbackInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"next_attempt_schedule_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens CallbackInfo CallbackInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor CallbackInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'nextAttemptScheduleTime")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo
in
[(Tag, FieldDescriptor CallbackInfo)]
-> Map Tag (FieldDescriptor CallbackInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CallbackInfo
callback__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor CallbackInfo
trigger__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor CallbackInfo
registrationTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor CallbackInfo
state__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor CallbackInfo
attempt__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor CallbackInfo
lastAttemptCompleteTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor CallbackInfo
lastAttemptFailure__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor CallbackInfo
nextAttemptScheduleTime__field_descriptor)]
unknownFields :: Lens' CallbackInfo FieldSet
unknownFields
= (CallbackInfo -> FieldSet)
-> (CallbackInfo -> FieldSet -> CallbackInfo)
-> Lens' CallbackInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo -> FieldSet
_CallbackInfo'_unknownFields
(\ CallbackInfo
x__ FieldSet
y__ -> CallbackInfo
x__ {_CallbackInfo'_unknownFields = y__})
defMessage :: CallbackInfo
defMessage
= CallbackInfo'_constructor
{_CallbackInfo'callback :: Maybe Callback
_CallbackInfo'callback = Maybe Callback
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'trigger :: Maybe CallbackInfo'Trigger
_CallbackInfo'trigger = Maybe CallbackInfo'Trigger
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'registrationTime :: Maybe Timestamp
_CallbackInfo'registrationTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'state :: CallbackState
_CallbackInfo'state = CallbackState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_CallbackInfo'attempt :: Int32
_CallbackInfo'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_CallbackInfo'lastAttemptCompleteTime :: Maybe Timestamp
_CallbackInfo'lastAttemptCompleteTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'lastAttemptFailure :: Maybe Failure
_CallbackInfo'lastAttemptFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'nextAttemptScheduleTime :: Maybe Timestamp
_CallbackInfo'nextAttemptScheduleTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'_unknownFields :: FieldSet
_CallbackInfo'_unknownFields = []}
parseMessage :: Parser CallbackInfo
parseMessage
= let
loop ::
CallbackInfo -> Data.ProtoLens.Encoding.Bytes.Parser CallbackInfo
loop :: CallbackInfo -> Parser CallbackInfo
loop CallbackInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Callback -> String -> Parser Callback
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"callback"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"callback") y x)
Word64
18
-> do y <- Parser CallbackInfo'Trigger
-> String -> Parser CallbackInfo'Trigger
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"trigger"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"trigger") y x)
Word64
26
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"registration_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"registrationTime") y x)
Word64
32
-> do y <- Parser CallbackState -> String -> Parser CallbackState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> CallbackState) -> Parser Int -> Parser CallbackState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> CallbackState
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"state"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x)
Word64
40
-> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"attempt"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
Word64
50
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_attempt_complete_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastAttemptCompleteTime") y x)
Word64
58
-> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_attempt_failure"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastAttemptFailure") y x)
Word64
66
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"next_attempt_schedule_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"nextAttemptScheduleTime") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser CallbackInfo -> String -> Parser CallbackInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do CallbackInfo -> Parser CallbackInfo
loop CallbackInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"CallbackInfo"
buildMessage :: CallbackInfo -> Builder
buildMessage
= \ CallbackInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Callback)
CallbackInfo
CallbackInfo
(Maybe Callback)
(Maybe Callback)
-> CallbackInfo -> Maybe Callback
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'callback") CallbackInfo
_x
of
Maybe Callback
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Callback
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (Callback -> ByteString) -> Callback -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Callback -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Callback
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe CallbackInfo'Trigger)
CallbackInfo
CallbackInfo
(Maybe CallbackInfo'Trigger)
(Maybe CallbackInfo'Trigger)
-> CallbackInfo -> Maybe CallbackInfo'Trigger
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'trigger") CallbackInfo
_x
of
Maybe CallbackInfo'Trigger
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just CallbackInfo'Trigger
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (CallbackInfo'Trigger -> ByteString)
-> CallbackInfo'Trigger
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
CallbackInfo'Trigger -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CallbackInfo'Trigger
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
CallbackInfo
CallbackInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> CallbackInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'registrationTime") CallbackInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: CallbackState
_v = FoldLike
CallbackState CallbackInfo CallbackInfo CallbackState CallbackState
-> CallbackInfo -> CallbackState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state") CallbackInfo
_x
in
if CallbackState -> CallbackState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) CallbackState
_v CallbackState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
((Int -> Builder)
-> (CallbackState -> Int) -> CallbackState -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
CallbackState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum CallbackState
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int32
_v = FoldLike Int32 CallbackInfo CallbackInfo Int32 Int32
-> CallbackInfo -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") CallbackInfo
_x
in
if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Int32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
CallbackInfo
CallbackInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> CallbackInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptCompleteTime") CallbackInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Failure)
CallbackInfo
CallbackInfo
(Maybe Failure)
(Maybe Failure)
-> CallbackInfo -> Maybe Failure
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptFailure") CallbackInfo
_x
of
Maybe Failure
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Failure
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Failure
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
CallbackInfo
CallbackInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> CallbackInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'nextAttemptScheduleTime")
CallbackInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet CallbackInfo CallbackInfo FieldSet FieldSet
-> CallbackInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet CallbackInfo CallbackInfo FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CallbackInfo FieldSet
Data.ProtoLens.unknownFields CallbackInfo
_x)))))))))
instance Control.DeepSeq.NFData CallbackInfo where
rnf :: CallbackInfo -> ()
rnf
= \ CallbackInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> FieldSet
_CallbackInfo'_unknownFields CallbackInfo
x__)
(Maybe Callback -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Maybe Callback
_CallbackInfo'callback CallbackInfo
x__)
(Maybe CallbackInfo'Trigger -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Maybe CallbackInfo'Trigger
_CallbackInfo'trigger CallbackInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Maybe Timestamp
_CallbackInfo'registrationTime CallbackInfo
x__)
(CallbackState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> CallbackState
_CallbackInfo'state CallbackInfo
x__)
(Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Int32
_CallbackInfo'attempt CallbackInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Maybe Timestamp
_CallbackInfo'lastAttemptCompleteTime CallbackInfo
x__)
(Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Maybe Failure
_CallbackInfo'lastAttemptFailure CallbackInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo -> Maybe Timestamp
_CallbackInfo'nextAttemptScheduleTime CallbackInfo
x__) ()))))))))
data CallbackInfo'Trigger
= CallbackInfo'Trigger'_constructor {CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant
_CallbackInfo'Trigger'variant :: !(Prelude.Maybe CallbackInfo'Trigger'Variant),
CallbackInfo'Trigger -> FieldSet
_CallbackInfo'Trigger'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
(CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool)
-> (CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool)
-> Eq CallbackInfo'Trigger
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
== :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
$c/= :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
/= :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
Prelude.Eq, Eq CallbackInfo'Trigger
Eq CallbackInfo'Trigger =>
(CallbackInfo'Trigger -> CallbackInfo'Trigger -> Ordering)
-> (CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool)
-> (CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool)
-> (CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool)
-> (CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool)
-> (CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger)
-> (CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger)
-> Ord CallbackInfo'Trigger
CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
CallbackInfo'Trigger -> CallbackInfo'Trigger -> Ordering
CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger
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 :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Ordering
compare :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Ordering
$c< :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
< :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
$c<= :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
<= :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
$c> :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
> :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
$c>= :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
>= :: CallbackInfo'Trigger -> CallbackInfo'Trigger -> Bool
$cmax :: CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger
max :: CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger
$cmin :: CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger
min :: CallbackInfo'Trigger
-> CallbackInfo'Trigger -> CallbackInfo'Trigger
Prelude.Ord)
instance Prelude.Show CallbackInfo'Trigger where
showsPrec :: Int -> CallbackInfo'Trigger -> ShowS
showsPrec Int
_ CallbackInfo'Trigger
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(CallbackInfo'Trigger -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CallbackInfo'Trigger
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data CallbackInfo'Trigger'Variant
= CallbackInfo'Trigger'WorkflowClosed !CallbackInfo'WorkflowClosed
deriving stock (Int -> CallbackInfo'Trigger'Variant -> ShowS
[CallbackInfo'Trigger'Variant] -> ShowS
CallbackInfo'Trigger'Variant -> String
(Int -> CallbackInfo'Trigger'Variant -> ShowS)
-> (CallbackInfo'Trigger'Variant -> String)
-> ([CallbackInfo'Trigger'Variant] -> ShowS)
-> Show CallbackInfo'Trigger'Variant
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CallbackInfo'Trigger'Variant -> ShowS
showsPrec :: Int -> CallbackInfo'Trigger'Variant -> ShowS
$cshow :: CallbackInfo'Trigger'Variant -> String
show :: CallbackInfo'Trigger'Variant -> String
$cshowList :: [CallbackInfo'Trigger'Variant] -> ShowS
showList :: [CallbackInfo'Trigger'Variant] -> ShowS
Prelude.Show, CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
(CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool)
-> Eq CallbackInfo'Trigger'Variant
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
== :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
$c/= :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
/= :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
Prelude.Eq, Eq CallbackInfo'Trigger'Variant
Eq CallbackInfo'Trigger'Variant =>
(CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Ordering)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant)
-> (CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant)
-> Ord CallbackInfo'Trigger'Variant
CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Ordering
CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant
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 :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Ordering
compare :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Ordering
$c< :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
< :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
$c<= :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
<= :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
$c> :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
> :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
$c>= :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
>= :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> Bool
$cmax :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant
max :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant
$cmin :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant
min :: CallbackInfo'Trigger'Variant
-> CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger'Variant
Prelude.Ord)
instance Data.ProtoLens.Field.HasField CallbackInfo'Trigger "maybe'variant" (Prelude.Maybe CallbackInfo'Trigger'Variant) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'variant"
-> (Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> CallbackInfo'Trigger
-> f CallbackInfo'Trigger
fieldOf Proxy# "maybe'variant"
_
= ((Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> CallbackInfo'Trigger -> f CallbackInfo'Trigger)
-> ((Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> (Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> CallbackInfo'Trigger
-> f CallbackInfo'Trigger
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant)
-> (CallbackInfo'Trigger
-> Maybe CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger)
-> Lens
CallbackInfo'Trigger
CallbackInfo'Trigger
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'Trigger'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant
_CallbackInfo'Trigger'variant
(\ CallbackInfo'Trigger
x__ Maybe CallbackInfo'Trigger'Variant
y__ -> CallbackInfo'Trigger
x__ {_CallbackInfo'Trigger'variant = y__}))
(Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField CallbackInfo'Trigger "maybe'workflowClosed" (Prelude.Maybe CallbackInfo'WorkflowClosed) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowClosed"
-> (Maybe CallbackInfo'WorkflowClosed
-> f (Maybe CallbackInfo'WorkflowClosed))
-> CallbackInfo'Trigger
-> f CallbackInfo'Trigger
fieldOf Proxy# "maybe'workflowClosed"
_
= ((Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> CallbackInfo'Trigger -> f CallbackInfo'Trigger)
-> ((Maybe CallbackInfo'WorkflowClosed
-> f (Maybe CallbackInfo'WorkflowClosed))
-> Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> (Maybe CallbackInfo'WorkflowClosed
-> f (Maybe CallbackInfo'WorkflowClosed))
-> CallbackInfo'Trigger
-> f CallbackInfo'Trigger
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant)
-> (CallbackInfo'Trigger
-> Maybe CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger)
-> Lens
CallbackInfo'Trigger
CallbackInfo'Trigger
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'Trigger'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant
_CallbackInfo'Trigger'variant
(\ CallbackInfo'Trigger
x__ Maybe CallbackInfo'Trigger'Variant
y__ -> CallbackInfo'Trigger
x__ {_CallbackInfo'Trigger'variant = y__}))
((Maybe CallbackInfo'Trigger'Variant
-> Maybe CallbackInfo'WorkflowClosed)
-> (Maybe CallbackInfo'Trigger'Variant
-> Maybe CallbackInfo'WorkflowClosed
-> Maybe CallbackInfo'Trigger'Variant)
-> Lens
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'WorkflowClosed)
(Maybe CallbackInfo'WorkflowClosed)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
(\ Maybe CallbackInfo'Trigger'Variant
x__
-> case Maybe CallbackInfo'Trigger'Variant
x__ of
(Prelude.Just (CallbackInfo'Trigger'WorkflowClosed CallbackInfo'WorkflowClosed
x__val))
-> CallbackInfo'WorkflowClosed -> Maybe CallbackInfo'WorkflowClosed
forall a. a -> Maybe a
Prelude.Just CallbackInfo'WorkflowClosed
x__val
Maybe CallbackInfo'Trigger'Variant
_otherwise -> Maybe CallbackInfo'WorkflowClosed
forall a. Maybe a
Prelude.Nothing)
(\ Maybe CallbackInfo'Trigger'Variant
_ Maybe CallbackInfo'WorkflowClosed
y__ -> (CallbackInfo'WorkflowClosed -> CallbackInfo'Trigger'Variant)
-> Maybe CallbackInfo'WorkflowClosed
-> Maybe CallbackInfo'Trigger'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CallbackInfo'WorkflowClosed -> CallbackInfo'Trigger'Variant
CallbackInfo'Trigger'WorkflowClosed Maybe CallbackInfo'WorkflowClosed
y__))
instance Data.ProtoLens.Field.HasField CallbackInfo'Trigger "workflowClosed" CallbackInfo'WorkflowClosed where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowClosed"
-> (CallbackInfo'WorkflowClosed -> f CallbackInfo'WorkflowClosed)
-> CallbackInfo'Trigger
-> f CallbackInfo'Trigger
fieldOf Proxy# "workflowClosed"
_
= ((Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> CallbackInfo'Trigger -> f CallbackInfo'Trigger)
-> ((CallbackInfo'WorkflowClosed -> f CallbackInfo'WorkflowClosed)
-> Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> (CallbackInfo'WorkflowClosed -> f CallbackInfo'WorkflowClosed)
-> CallbackInfo'Trigger
-> f CallbackInfo'Trigger
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant)
-> (CallbackInfo'Trigger
-> Maybe CallbackInfo'Trigger'Variant -> CallbackInfo'Trigger)
-> Lens
CallbackInfo'Trigger
CallbackInfo'Trigger
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'Trigger'Variant)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant
_CallbackInfo'Trigger'variant
(\ CallbackInfo'Trigger
x__ Maybe CallbackInfo'Trigger'Variant
y__ -> CallbackInfo'Trigger
x__ {_CallbackInfo'Trigger'variant = y__}))
(((Maybe CallbackInfo'WorkflowClosed
-> f (Maybe CallbackInfo'WorkflowClosed))
-> Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant))
-> ((CallbackInfo'WorkflowClosed -> f CallbackInfo'WorkflowClosed)
-> Maybe CallbackInfo'WorkflowClosed
-> f (Maybe CallbackInfo'WorkflowClosed))
-> (CallbackInfo'WorkflowClosed -> f CallbackInfo'WorkflowClosed)
-> Maybe CallbackInfo'Trigger'Variant
-> f (Maybe CallbackInfo'Trigger'Variant)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Maybe CallbackInfo'Trigger'Variant
-> Maybe CallbackInfo'WorkflowClosed)
-> (Maybe CallbackInfo'Trigger'Variant
-> Maybe CallbackInfo'WorkflowClosed
-> Maybe CallbackInfo'Trigger'Variant)
-> Lens
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'WorkflowClosed)
(Maybe CallbackInfo'WorkflowClosed)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
(\ Maybe CallbackInfo'Trigger'Variant
x__
-> case Maybe CallbackInfo'Trigger'Variant
x__ of
(Prelude.Just (CallbackInfo'Trigger'WorkflowClosed CallbackInfo'WorkflowClosed
x__val))
-> CallbackInfo'WorkflowClosed -> Maybe CallbackInfo'WorkflowClosed
forall a. a -> Maybe a
Prelude.Just CallbackInfo'WorkflowClosed
x__val
Maybe CallbackInfo'Trigger'Variant
_otherwise -> Maybe CallbackInfo'WorkflowClosed
forall a. Maybe a
Prelude.Nothing)
(\ Maybe CallbackInfo'Trigger'Variant
_ Maybe CallbackInfo'WorkflowClosed
y__ -> (CallbackInfo'WorkflowClosed -> CallbackInfo'Trigger'Variant)
-> Maybe CallbackInfo'WorkflowClosed
-> Maybe CallbackInfo'Trigger'Variant
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap CallbackInfo'WorkflowClosed -> CallbackInfo'Trigger'Variant
CallbackInfo'Trigger'WorkflowClosed Maybe CallbackInfo'WorkflowClosed
y__))
(CallbackInfo'WorkflowClosed
-> Lens'
(Maybe CallbackInfo'WorkflowClosed) CallbackInfo'WorkflowClosed
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens CallbackInfo'WorkflowClosed
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message CallbackInfo'Trigger where
messageName :: Proxy CallbackInfo'Trigger -> Text
messageName Proxy CallbackInfo'Trigger
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.CallbackInfo.Trigger"
packedMessageDescriptor :: Proxy CallbackInfo'Trigger -> ByteString
packedMessageDescriptor Proxy CallbackInfo'Trigger
_
= ByteString
"\n\
\\aTrigger\DC2`\n\
\\SIworkflow_closed\CAN\SOH \SOH(\v25.temporal.api.workflow.v1.CallbackInfo.WorkflowClosedH\NULR\SOworkflowClosedB\t\n\
\\avariant"
packedFileDescriptor :: Proxy CallbackInfo'Trigger -> ByteString
packedFileDescriptor Proxy CallbackInfo'Trigger
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor CallbackInfo'Trigger)
fieldsByTag
= let
workflowClosed__field_descriptor :: FieldDescriptor CallbackInfo'Trigger
workflowClosed__field_descriptor
= String
-> FieldTypeDescriptor CallbackInfo'WorkflowClosed
-> FieldAccessor CallbackInfo'Trigger CallbackInfo'WorkflowClosed
-> FieldDescriptor CallbackInfo'Trigger
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_closed"
(MessageOrGroup -> FieldTypeDescriptor CallbackInfo'WorkflowClosed
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor CallbackInfo'WorkflowClosed)
(Lens' CallbackInfo'Trigger (Maybe CallbackInfo'WorkflowClosed)
-> FieldAccessor CallbackInfo'Trigger CallbackInfo'WorkflowClosed
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowClosed")) ::
Data.ProtoLens.FieldDescriptor CallbackInfo'Trigger
in
[(Tag, FieldDescriptor CallbackInfo'Trigger)]
-> Map Tag (FieldDescriptor CallbackInfo'Trigger)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor CallbackInfo'Trigger
workflowClosed__field_descriptor)]
unknownFields :: Lens' CallbackInfo'Trigger FieldSet
unknownFields
= (CallbackInfo'Trigger -> FieldSet)
-> (CallbackInfo'Trigger -> FieldSet -> CallbackInfo'Trigger)
-> Lens' CallbackInfo'Trigger FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo'Trigger -> FieldSet
_CallbackInfo'Trigger'_unknownFields
(\ CallbackInfo'Trigger
x__ FieldSet
y__ -> CallbackInfo'Trigger
x__ {_CallbackInfo'Trigger'_unknownFields = y__})
defMessage :: CallbackInfo'Trigger
defMessage
= CallbackInfo'Trigger'_constructor
{_CallbackInfo'Trigger'variant :: Maybe CallbackInfo'Trigger'Variant
_CallbackInfo'Trigger'variant = Maybe CallbackInfo'Trigger'Variant
forall a. Maybe a
Prelude.Nothing,
_CallbackInfo'Trigger'_unknownFields :: FieldSet
_CallbackInfo'Trigger'_unknownFields = []}
parseMessage :: Parser CallbackInfo'Trigger
parseMessage
= let
loop ::
CallbackInfo'Trigger
-> Data.ProtoLens.Encoding.Bytes.Parser CallbackInfo'Trigger
loop :: CallbackInfo'Trigger -> Parser CallbackInfo'Trigger
loop CallbackInfo'Trigger
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser CallbackInfo'WorkflowClosed
-> String -> Parser CallbackInfo'WorkflowClosed
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_closed"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowClosed") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser CallbackInfo'Trigger
-> String -> Parser CallbackInfo'Trigger
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do CallbackInfo'Trigger -> Parser CallbackInfo'Trigger
loop CallbackInfo'Trigger
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"Trigger"
buildMessage :: CallbackInfo'Trigger -> Builder
buildMessage
= \ CallbackInfo'Trigger
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe CallbackInfo'Trigger'Variant)
CallbackInfo'Trigger
CallbackInfo'Trigger
(Maybe CallbackInfo'Trigger'Variant)
(Maybe CallbackInfo'Trigger'Variant)
-> CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'variant") CallbackInfo'Trigger
_x
of
Maybe CallbackInfo'Trigger'Variant
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just (CallbackInfo'Trigger'WorkflowClosed CallbackInfo'WorkflowClosed
v))
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (CallbackInfo'WorkflowClosed -> ByteString)
-> CallbackInfo'WorkflowClosed
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
CallbackInfo'WorkflowClosed -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage CallbackInfo'WorkflowClosed
v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
CallbackInfo'Trigger
CallbackInfo'Trigger
FieldSet
FieldSet
-> CallbackInfo'Trigger -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
CallbackInfo'Trigger
CallbackInfo'Trigger
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CallbackInfo'Trigger FieldSet
Data.ProtoLens.unknownFields CallbackInfo'Trigger
_x))
instance Control.DeepSeq.NFData CallbackInfo'Trigger where
rnf :: CallbackInfo'Trigger -> ()
rnf
= \ CallbackInfo'Trigger
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo'Trigger -> FieldSet
_CallbackInfo'Trigger'_unknownFields CallbackInfo'Trigger
x__)
(Maybe CallbackInfo'Trigger'Variant -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (CallbackInfo'Trigger -> Maybe CallbackInfo'Trigger'Variant
_CallbackInfo'Trigger'variant CallbackInfo'Trigger
x__) ())
instance Control.DeepSeq.NFData CallbackInfo'Trigger'Variant where
rnf :: CallbackInfo'Trigger'Variant -> ()
rnf (CallbackInfo'Trigger'WorkflowClosed CallbackInfo'WorkflowClosed
x__)
= CallbackInfo'WorkflowClosed -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf CallbackInfo'WorkflowClosed
x__
_CallbackInfo'Trigger'WorkflowClosed ::
Data.ProtoLens.Prism.Prism' CallbackInfo'Trigger'Variant CallbackInfo'WorkflowClosed
_CallbackInfo'Trigger'WorkflowClosed :: Prism' CallbackInfo'Trigger'Variant CallbackInfo'WorkflowClosed
_CallbackInfo'Trigger'WorkflowClosed
= (CallbackInfo'WorkflowClosed -> CallbackInfo'Trigger'Variant)
-> (CallbackInfo'Trigger'Variant
-> Maybe CallbackInfo'WorkflowClosed)
-> Prism' CallbackInfo'Trigger'Variant CallbackInfo'WorkflowClosed
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
CallbackInfo'WorkflowClosed -> CallbackInfo'Trigger'Variant
CallbackInfo'Trigger'WorkflowClosed
(\ CallbackInfo'Trigger'Variant
p__
-> case CallbackInfo'Trigger'Variant
p__ of
(CallbackInfo'Trigger'WorkflowClosed CallbackInfo'WorkflowClosed
p__val)
-> CallbackInfo'WorkflowClosed -> Maybe CallbackInfo'WorkflowClosed
forall a. a -> Maybe a
Prelude.Just CallbackInfo'WorkflowClosed
p__val)
data CallbackInfo'WorkflowClosed
= CallbackInfo'WorkflowClosed'_constructor {CallbackInfo'WorkflowClosed -> FieldSet
_CallbackInfo'WorkflowClosed'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
(CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Bool)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Bool)
-> Eq CallbackInfo'WorkflowClosed
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
== :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
$c/= :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
/= :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
Prelude.Eq, Eq CallbackInfo'WorkflowClosed
Eq CallbackInfo'WorkflowClosed =>
(CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Ordering)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Bool)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Bool)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Bool)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Bool)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed)
-> (CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed)
-> Ord CallbackInfo'WorkflowClosed
CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Ordering
CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed
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 :: CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Ordering
compare :: CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> Ordering
$c< :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
< :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
$c<= :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
<= :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
$c> :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
> :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
$c>= :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
>= :: CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed -> Bool
$cmax :: CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed
max :: CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed
$cmin :: CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed
min :: CallbackInfo'WorkflowClosed
-> CallbackInfo'WorkflowClosed -> CallbackInfo'WorkflowClosed
Prelude.Ord)
instance Prelude.Show CallbackInfo'WorkflowClosed where
showsPrec :: Int -> CallbackInfo'WorkflowClosed -> ShowS
showsPrec Int
_ CallbackInfo'WorkflowClosed
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(CallbackInfo'WorkflowClosed -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort CallbackInfo'WorkflowClosed
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Message CallbackInfo'WorkflowClosed where
messageName :: Proxy CallbackInfo'WorkflowClosed -> Text
messageName Proxy CallbackInfo'WorkflowClosed
_
= String -> Text
Data.Text.pack
String
"temporal.api.workflow.v1.CallbackInfo.WorkflowClosed"
packedMessageDescriptor :: Proxy CallbackInfo'WorkflowClosed -> ByteString
packedMessageDescriptor Proxy CallbackInfo'WorkflowClosed
_
= ByteString
"\n\
\\SOWorkflowClosed"
packedFileDescriptor :: Proxy CallbackInfo'WorkflowClosed -> ByteString
packedFileDescriptor Proxy CallbackInfo'WorkflowClosed
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor CallbackInfo'WorkflowClosed)
fieldsByTag = let in [(Tag, FieldDescriptor CallbackInfo'WorkflowClosed)]
-> Map Tag (FieldDescriptor CallbackInfo'WorkflowClosed)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList []
unknownFields :: Lens' CallbackInfo'WorkflowClosed FieldSet
unknownFields
= (CallbackInfo'WorkflowClosed -> FieldSet)
-> (CallbackInfo'WorkflowClosed
-> FieldSet -> CallbackInfo'WorkflowClosed)
-> Lens' CallbackInfo'WorkflowClosed FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
CallbackInfo'WorkflowClosed -> FieldSet
_CallbackInfo'WorkflowClosed'_unknownFields
(\ CallbackInfo'WorkflowClosed
x__ FieldSet
y__
-> CallbackInfo'WorkflowClosed
x__ {_CallbackInfo'WorkflowClosed'_unknownFields = y__})
defMessage :: CallbackInfo'WorkflowClosed
defMessage
= CallbackInfo'WorkflowClosed'_constructor
{_CallbackInfo'WorkflowClosed'_unknownFields :: FieldSet
_CallbackInfo'WorkflowClosed'_unknownFields = []}
parseMessage :: Parser CallbackInfo'WorkflowClosed
parseMessage
= let
loop ::
CallbackInfo'WorkflowClosed
-> Data.ProtoLens.Encoding.Bytes.Parser CallbackInfo'WorkflowClosed
loop :: CallbackInfo'WorkflowClosed -> Parser CallbackInfo'WorkflowClosed
loop CallbackInfo'WorkflowClosed
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser CallbackInfo'WorkflowClosed
-> String -> Parser CallbackInfo'WorkflowClosed
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do CallbackInfo'WorkflowClosed -> Parser CallbackInfo'WorkflowClosed
loop CallbackInfo'WorkflowClosed
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"WorkflowClosed"
buildMessage :: CallbackInfo'WorkflowClosed -> Builder
buildMessage
= \ CallbackInfo'WorkflowClosed
_x
-> FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
CallbackInfo'WorkflowClosed
CallbackInfo'WorkflowClosed
FieldSet
FieldSet
-> CallbackInfo'WorkflowClosed -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
CallbackInfo'WorkflowClosed
CallbackInfo'WorkflowClosed
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' CallbackInfo'WorkflowClosed FieldSet
Data.ProtoLens.unknownFields CallbackInfo'WorkflowClosed
_x)
instance Control.DeepSeq.NFData CallbackInfo'WorkflowClosed where
rnf :: CallbackInfo'WorkflowClosed -> ()
rnf
= \ CallbackInfo'WorkflowClosed
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(CallbackInfo'WorkflowClosed -> FieldSet
_CallbackInfo'WorkflowClosed'_unknownFields CallbackInfo'WorkflowClosed
x__) ()
data NewWorkflowExecutionInfo
= NewWorkflowExecutionInfo'_constructor {NewWorkflowExecutionInfo -> Text
_NewWorkflowExecutionInfo'workflowId :: !Data.Text.Text,
NewWorkflowExecutionInfo -> Maybe WorkflowType
_NewWorkflowExecutionInfo'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
NewWorkflowExecutionInfo -> Maybe TaskQueue
_NewWorkflowExecutionInfo'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
NewWorkflowExecutionInfo -> Maybe Payloads
_NewWorkflowExecutionInfo'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
NewWorkflowExecutionInfo -> WorkflowIdReusePolicy
_NewWorkflowExecutionInfo'workflowIdReusePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy,
NewWorkflowExecutionInfo -> Maybe RetryPolicy
_NewWorkflowExecutionInfo'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
NewWorkflowExecutionInfo -> Text
_NewWorkflowExecutionInfo'cronSchedule :: !Data.Text.Text,
NewWorkflowExecutionInfo -> Maybe Memo
_NewWorkflowExecutionInfo'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
NewWorkflowExecutionInfo -> Maybe SearchAttributes
_NewWorkflowExecutionInfo'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
:: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
NewWorkflowExecutionInfo -> FieldSet
_NewWorkflowExecutionInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
(NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool)
-> (NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool)
-> Eq NewWorkflowExecutionInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
== :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
$c/= :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
/= :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
Prelude.Eq, Eq NewWorkflowExecutionInfo
Eq NewWorkflowExecutionInfo =>
(NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Ordering)
-> (NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool)
-> (NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool)
-> (NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool)
-> (NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool)
-> (NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo)
-> (NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo)
-> Ord NewWorkflowExecutionInfo
NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Ordering
NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo
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 :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Ordering
compare :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Ordering
$c< :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
< :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
$c<= :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
<= :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
$c> :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
> :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
$c>= :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
>= :: NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo -> Bool
$cmax :: NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo
max :: NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo
$cmin :: NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo
min :: NewWorkflowExecutionInfo
-> NewWorkflowExecutionInfo -> NewWorkflowExecutionInfo
Prelude.Ord)
instance Prelude.Show NewWorkflowExecutionInfo where
showsPrec :: Int -> NewWorkflowExecutionInfo -> ShowS
showsPrec Int
_ NewWorkflowExecutionInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(NewWorkflowExecutionInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NewWorkflowExecutionInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "workflowId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "workflowId"
_
= ((Text -> f Text)
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Text)
-> (NewWorkflowExecutionInfo -> Text -> NewWorkflowExecutionInfo)
-> Lens NewWorkflowExecutionInfo NewWorkflowExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Text
_NewWorkflowExecutionInfo'workflowId
(\ NewWorkflowExecutionInfo
x__ Text
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "workflowType"
_
= ((Maybe WorkflowType -> f (Maybe WorkflowType))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((WorkflowType -> f WorkflowType)
-> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe WorkflowType)
-> (NewWorkflowExecutionInfo
-> Maybe WorkflowType -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe WorkflowType
_NewWorkflowExecutionInfo'workflowType
(\ NewWorkflowExecutionInfo
x__ Maybe WorkflowType
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowType = y__}))
(WorkflowType -> Lens' (Maybe WorkflowType) WorkflowType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'workflowType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowType"
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'workflowType"
_
= ((Maybe WorkflowType -> f (Maybe WorkflowType))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe WorkflowType)
-> (NewWorkflowExecutionInfo
-> Maybe WorkflowType -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe WorkflowType
_NewWorkflowExecutionInfo'workflowType
(\ NewWorkflowExecutionInfo
x__ Maybe WorkflowType
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowType = y__}))
(Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "taskQueue"
_
= ((Maybe TaskQueue -> f (Maybe TaskQueue))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((TaskQueue -> f TaskQueue)
-> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe TaskQueue)
-> (NewWorkflowExecutionInfo
-> Maybe TaskQueue -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe TaskQueue)
(Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe TaskQueue
_NewWorkflowExecutionInfo'taskQueue
(\ NewWorkflowExecutionInfo
x__ Maybe TaskQueue
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'taskQueue = y__}))
(TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'taskQueue"
_
= ((Maybe TaskQueue -> f (Maybe TaskQueue))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe TaskQueue)
-> (NewWorkflowExecutionInfo
-> Maybe TaskQueue -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe TaskQueue)
(Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe TaskQueue
_NewWorkflowExecutionInfo'taskQueue
(\ NewWorkflowExecutionInfo
x__ Maybe TaskQueue
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'taskQueue = y__}))
(Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "input"
_
= ((Maybe Payloads -> f (Maybe Payloads))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Payloads -> f Payloads)
-> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Payloads)
-> (NewWorkflowExecutionInfo
-> Maybe Payloads -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Payloads)
(Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Payloads
_NewWorkflowExecutionInfo'input
(\ NewWorkflowExecutionInfo
x__ Maybe Payloads
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'input = y__}))
(Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'input" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'input"
-> (Maybe Payloads -> f (Maybe Payloads))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'input"
_
= ((Maybe Payloads -> f (Maybe Payloads))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Payloads)
-> (NewWorkflowExecutionInfo
-> Maybe Payloads -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Payloads)
(Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Payloads
_NewWorkflowExecutionInfo'input
(\ NewWorkflowExecutionInfo
x__ Maybe Payloads
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'input = y__}))
(Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "workflowExecutionTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Duration)
-> (NewWorkflowExecutionInfo
-> Maybe Duration -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowExecutionTimeout
(\ NewWorkflowExecutionInfo
x__ Maybe Duration
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowExecutionTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Duration)
-> (NewWorkflowExecutionInfo
-> Maybe Duration -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowExecutionTimeout
(\ NewWorkflowExecutionInfo
x__ Maybe Duration
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowExecutionTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "workflowRunTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Duration)
-> (NewWorkflowExecutionInfo
-> Maybe Duration -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowRunTimeout
(\ NewWorkflowExecutionInfo
x__ Maybe Duration
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowRunTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'workflowRunTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Duration)
-> (NewWorkflowExecutionInfo
-> Maybe Duration -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowRunTimeout
(\ NewWorkflowExecutionInfo
x__ Maybe Duration
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowRunTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "workflowTaskTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Duration)
-> (NewWorkflowExecutionInfo
-> Maybe Duration -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowTaskTimeout
(\ NewWorkflowExecutionInfo
x__ Maybe Duration
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowTaskTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Duration)
-> (NewWorkflowExecutionInfo
-> Maybe Duration -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowTaskTimeout
(\ NewWorkflowExecutionInfo
x__ Maybe Duration
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowTaskTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "workflowIdReusePolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdReusePolicy"
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "workflowIdReusePolicy"
_
= ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> WorkflowIdReusePolicy)
-> (NewWorkflowExecutionInfo
-> WorkflowIdReusePolicy -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
WorkflowIdReusePolicy
WorkflowIdReusePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> WorkflowIdReusePolicy
_NewWorkflowExecutionInfo'workflowIdReusePolicy
(\ NewWorkflowExecutionInfo
x__ WorkflowIdReusePolicy
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'workflowIdReusePolicy = y__}))
(WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "retryPolicy"
_
= ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((RetryPolicy -> f RetryPolicy)
-> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe RetryPolicy)
-> (NewWorkflowExecutionInfo
-> Maybe RetryPolicy -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe RetryPolicy)
(Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe RetryPolicy
_NewWorkflowExecutionInfo'retryPolicy
(\ NewWorkflowExecutionInfo
x__ Maybe RetryPolicy
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'retryPolicy = y__}))
(RetryPolicy -> Lens' (Maybe RetryPolicy) RetryPolicy
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RetryPolicy
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'retryPolicy" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'retryPolicy"
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'retryPolicy"
_
= ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe RetryPolicy)
-> (NewWorkflowExecutionInfo
-> Maybe RetryPolicy -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe RetryPolicy)
(Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe RetryPolicy
_NewWorkflowExecutionInfo'retryPolicy
(\ NewWorkflowExecutionInfo
x__ Maybe RetryPolicy
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'retryPolicy = y__}))
(Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "cronSchedule" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "cronSchedule"
_
= ((Text -> f Text)
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Text)
-> (NewWorkflowExecutionInfo -> Text -> NewWorkflowExecutionInfo)
-> Lens NewWorkflowExecutionInfo NewWorkflowExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Text
_NewWorkflowExecutionInfo'cronSchedule
(\ NewWorkflowExecutionInfo
x__ Text
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'cronSchedule = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "memo"
_
= ((Maybe Memo -> f (Maybe Memo))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Memo)
-> (NewWorkflowExecutionInfo
-> Maybe Memo -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Memo
_NewWorkflowExecutionInfo'memo
(\ NewWorkflowExecutionInfo
x__ Maybe Memo
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'memo = y__}))
(Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'memo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'memo"
-> (Maybe Memo -> f (Maybe Memo))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'memo"
_
= ((Maybe Memo -> f (Maybe Memo))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Memo)
-> (NewWorkflowExecutionInfo
-> Maybe Memo -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Memo
_NewWorkflowExecutionInfo'memo
(\ NewWorkflowExecutionInfo
x__ Maybe Memo
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'memo = y__}))
(Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "searchAttributes"
_
= ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((SearchAttributes -> f SearchAttributes)
-> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe SearchAttributes)
-> (NewWorkflowExecutionInfo
-> Maybe SearchAttributes -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe SearchAttributes
_NewWorkflowExecutionInfo'searchAttributes
(\ NewWorkflowExecutionInfo
x__ Maybe SearchAttributes
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'searchAttributes = y__}))
(SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'searchAttributes"
_
= ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe SearchAttributes)
-> (NewWorkflowExecutionInfo
-> Maybe SearchAttributes -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe SearchAttributes
_NewWorkflowExecutionInfo'searchAttributes
(\ NewWorkflowExecutionInfo
x__ Maybe SearchAttributes
y__
-> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'searchAttributes = y__}))
(Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "header" Proto.Temporal.Api.Common.V1.Message.Header where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "header"
_
= ((Maybe Header -> f (Maybe Header))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Header)
-> (NewWorkflowExecutionInfo
-> Maybe Header -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Header)
(Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Header
_NewWorkflowExecutionInfo'header
(\ NewWorkflowExecutionInfo
x__ Maybe Header
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'header = y__}))
(Header -> Lens' (Maybe Header) Header
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Header
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NewWorkflowExecutionInfo "maybe'header" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'header"
-> (Maybe Header -> f (Maybe Header))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
fieldOf Proxy# "maybe'header"
_
= ((Maybe Header -> f (Maybe Header))
-> NewWorkflowExecutionInfo -> f NewWorkflowExecutionInfo)
-> ((Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> NewWorkflowExecutionInfo
-> f NewWorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NewWorkflowExecutionInfo -> Maybe Header)
-> (NewWorkflowExecutionInfo
-> Maybe Header -> NewWorkflowExecutionInfo)
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Header)
(Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> Maybe Header
_NewWorkflowExecutionInfo'header
(\ NewWorkflowExecutionInfo
x__ Maybe Header
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'header = y__}))
(Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NewWorkflowExecutionInfo where
messageName :: Proxy NewWorkflowExecutionInfo -> Text
messageName Proxy NewWorkflowExecutionInfo
_
= String -> Text
Data.Text.pack
String
"temporal.api.workflow.v1.NewWorkflowExecutionInfo"
packedMessageDescriptor :: Proxy NewWorkflowExecutionInfo -> ByteString
packedMessageDescriptor Proxy NewWorkflowExecutionInfo
_
= ByteString
"\n\
\\CANNewWorkflowExecutionInfo\DC2\US\n\
\\vworkflow_id\CAN\SOH \SOH(\tR\n\
\workflowId\DC2I\n\
\\rworkflow_type\CAN\STX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
\\n\
\task_queue\CAN\ETX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
\\ENQinput\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
\\SUBworkflow_execution_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
\\DC4workflow_run_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
\\NAKworkflow_task_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2e\n\
\\CANworkflow_id_reuse_policy\CAN\b \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2F\n\
\\fretry_policy\CAN\t \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
\\rcron_schedule\CAN\n\
\ \SOH(\tR\fcronSchedule\DC20\n\
\\EOTmemo\CAN\v \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
\\DC1search_attributes\CAN\f \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC26\n\
\\ACKheader\CAN\r \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader"
packedFileDescriptor :: Proxy NewWorkflowExecutionInfo -> ByteString
packedFileDescriptor Proxy NewWorkflowExecutionInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor NewWorkflowExecutionInfo)
fieldsByTag
= let
workflowId__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
workflowId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor NewWorkflowExecutionInfo Text
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens NewWorkflowExecutionInfo NewWorkflowExecutionInfo Text Text
-> FieldAccessor NewWorkflowExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowId")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
workflowType__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
workflowType__field_descriptor
= String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor NewWorkflowExecutionInfo WorkflowType
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_type"
(MessageOrGroup -> FieldTypeDescriptor WorkflowType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowType)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
-> FieldAccessor NewWorkflowExecutionInfo WorkflowType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
taskQueue__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
taskQueue__field_descriptor
= String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor NewWorkflowExecutionInfo TaskQueue
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"task_queue"
(MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe TaskQueue)
(Maybe TaskQueue)
-> FieldAccessor NewWorkflowExecutionInfo TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
input__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
input__field_descriptor
= String
-> FieldTypeDescriptor Payloads
-> FieldAccessor NewWorkflowExecutionInfo Payloads
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"input"
(MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Payloads)
(Maybe Payloads)
-> FieldAccessor NewWorkflowExecutionInfo Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
workflowExecutionTimeout__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
workflowExecutionTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor NewWorkflowExecutionInfo Duration
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_execution_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor NewWorkflowExecutionInfo Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecutionTimeout")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
workflowRunTimeout__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
workflowRunTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor NewWorkflowExecutionInfo Duration
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_run_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor NewWorkflowExecutionInfo Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowRunTimeout")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
workflowTaskTimeout__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
workflowTaskTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor NewWorkflowExecutionInfo Duration
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_task_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor NewWorkflowExecutionInfo Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowTaskTimeout")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
workflowIdReusePolicy__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
workflowIdReusePolicy__field_descriptor
= String
-> FieldTypeDescriptor WorkflowIdReusePolicy
-> FieldAccessor NewWorkflowExecutionInfo WorkflowIdReusePolicy
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_id_reuse_policy"
(ScalarField WorkflowIdReusePolicy
-> FieldTypeDescriptor WorkflowIdReusePolicy
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowIdReusePolicy
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy)
(WireDefault WorkflowIdReusePolicy
-> Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
WorkflowIdReusePolicy
WorkflowIdReusePolicy
-> FieldAccessor NewWorkflowExecutionInfo WorkflowIdReusePolicy
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault WorkflowIdReusePolicy
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowIdReusePolicy")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
retryPolicy__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
retryPolicy__field_descriptor
= String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor NewWorkflowExecutionInfo RetryPolicy
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"retry_policy"
(MessageOrGroup -> FieldTypeDescriptor RetryPolicy
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.RetryPolicy)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe RetryPolicy)
(Maybe RetryPolicy)
-> FieldAccessor NewWorkflowExecutionInfo RetryPolicy
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'retryPolicy")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
cronSchedule__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
cronSchedule__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor NewWorkflowExecutionInfo Text
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"cron_schedule"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens NewWorkflowExecutionInfo NewWorkflowExecutionInfo Text Text
-> FieldAccessor NewWorkflowExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cronSchedule")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
memo__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
memo__field_descriptor
= String
-> FieldTypeDescriptor Memo
-> FieldAccessor NewWorkflowExecutionInfo Memo
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"memo"
(MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
-> FieldAccessor NewWorkflowExecutionInfo Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
searchAttributes__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
searchAttributes__field_descriptor
= String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor NewWorkflowExecutionInfo SearchAttributes
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"search_attributes"
(MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
-> FieldAccessor NewWorkflowExecutionInfo SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
header__field_descriptor :: FieldDescriptor NewWorkflowExecutionInfo
header__field_descriptor
= String
-> FieldTypeDescriptor Header
-> FieldAccessor NewWorkflowExecutionInfo Header
-> FieldDescriptor NewWorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"header"
(MessageOrGroup -> FieldTypeDescriptor Header
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Header)
(Lens
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Header)
(Maybe Header)
-> FieldAccessor NewWorkflowExecutionInfo Header
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header")) ::
Data.ProtoLens.FieldDescriptor NewWorkflowExecutionInfo
in
[(Tag, FieldDescriptor NewWorkflowExecutionInfo)]
-> Map Tag (FieldDescriptor NewWorkflowExecutionInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NewWorkflowExecutionInfo
workflowId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NewWorkflowExecutionInfo
workflowType__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor NewWorkflowExecutionInfo
taskQueue__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor NewWorkflowExecutionInfo
input__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor NewWorkflowExecutionInfo
workflowExecutionTimeout__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor NewWorkflowExecutionInfo
workflowRunTimeout__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor NewWorkflowExecutionInfo
workflowTaskTimeout__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor NewWorkflowExecutionInfo
workflowIdReusePolicy__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor NewWorkflowExecutionInfo
retryPolicy__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor NewWorkflowExecutionInfo
cronSchedule__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor NewWorkflowExecutionInfo
memo__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor NewWorkflowExecutionInfo
searchAttributes__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor NewWorkflowExecutionInfo
header__field_descriptor)]
unknownFields :: Lens' NewWorkflowExecutionInfo FieldSet
unknownFields
= (NewWorkflowExecutionInfo -> FieldSet)
-> (NewWorkflowExecutionInfo
-> FieldSet -> NewWorkflowExecutionInfo)
-> Lens' NewWorkflowExecutionInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NewWorkflowExecutionInfo -> FieldSet
_NewWorkflowExecutionInfo'_unknownFields
(\ NewWorkflowExecutionInfo
x__ FieldSet
y__ -> NewWorkflowExecutionInfo
x__ {_NewWorkflowExecutionInfo'_unknownFields = y__})
defMessage :: NewWorkflowExecutionInfo
defMessage
= NewWorkflowExecutionInfo'_constructor
{_NewWorkflowExecutionInfo'workflowId :: Text
_NewWorkflowExecutionInfo'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_NewWorkflowExecutionInfo'workflowType :: Maybe WorkflowType
_NewWorkflowExecutionInfo'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'taskQueue :: Maybe TaskQueue
_NewWorkflowExecutionInfo'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'input :: Maybe Payloads
_NewWorkflowExecutionInfo'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'workflowExecutionTimeout :: Maybe Duration
_NewWorkflowExecutionInfo'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'workflowRunTimeout :: Maybe Duration
_NewWorkflowExecutionInfo'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'workflowTaskTimeout :: Maybe Duration
_NewWorkflowExecutionInfo'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'workflowIdReusePolicy :: WorkflowIdReusePolicy
_NewWorkflowExecutionInfo'workflowIdReusePolicy = WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_NewWorkflowExecutionInfo'retryPolicy :: Maybe RetryPolicy
_NewWorkflowExecutionInfo'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'cronSchedule :: Text
_NewWorkflowExecutionInfo'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_NewWorkflowExecutionInfo'memo :: Maybe Memo
_NewWorkflowExecutionInfo'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'searchAttributes :: Maybe SearchAttributes
_NewWorkflowExecutionInfo'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'header :: Maybe Header
_NewWorkflowExecutionInfo'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
_NewWorkflowExecutionInfo'_unknownFields :: FieldSet
_NewWorkflowExecutionInfo'_unknownFields = []}
parseMessage :: Parser NewWorkflowExecutionInfo
parseMessage
= let
loop ::
NewWorkflowExecutionInfo
-> Data.ProtoLens.Encoding.Bytes.Parser NewWorkflowExecutionInfo
loop :: NewWorkflowExecutionInfo -> Parser NewWorkflowExecutionInfo
loop NewWorkflowExecutionInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"workflow_id"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
Word64
18
-> do y <- Parser WorkflowType -> String -> Parser WorkflowType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_type"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowType") y x)
Word64
26
-> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"task_queue"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
Word64
34
-> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"input"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"input") y x)
Word64
42
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_execution_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
Word64
50
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_run_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
Word64
58
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_task_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
Word64
64
-> do y <- Parser WorkflowIdReusePolicy
-> String -> Parser WorkflowIdReusePolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> WorkflowIdReusePolicy)
-> Parser Int -> Parser WorkflowIdReusePolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> WorkflowIdReusePolicy
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"workflow_id_reuse_policy"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowIdReusePolicy") y x)
Word64
74
-> do y <- Parser RetryPolicy -> String -> Parser RetryPolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"retry_policy"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"retryPolicy") y x)
Word64
82
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"cron_schedule"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"cronSchedule") y x)
Word64
90
-> do y <- Parser Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"memo"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
Word64
98
-> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"search_attributes"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"searchAttributes") y x)
Word64
106
-> do y <- Parser Header -> String -> Parser Header
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"header"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"header") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser NewWorkflowExecutionInfo
-> String -> Parser NewWorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do NewWorkflowExecutionInfo -> Parser NewWorkflowExecutionInfo
loop NewWorkflowExecutionInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"NewWorkflowExecutionInfo"
buildMessage :: NewWorkflowExecutionInfo -> Builder
buildMessage
= \ NewWorkflowExecutionInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike
Text NewWorkflowExecutionInfo NewWorkflowExecutionInfo Text Text
-> NewWorkflowExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowId") NewWorkflowExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkflowType)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
-> NewWorkflowExecutionInfo -> Maybe WorkflowType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowType") NewWorkflowExecutionInfo
_x
of
Maybe WorkflowType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkflowType
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (WorkflowType -> ByteString) -> WorkflowType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
WorkflowType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowType
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe TaskQueue)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe TaskQueue)
(Maybe TaskQueue)
-> NewWorkflowExecutionInfo -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") NewWorkflowExecutionInfo
_x
of
Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just TaskQueue
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Payloads)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Payloads)
(Maybe Payloads)
-> NewWorkflowExecutionInfo -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'input") NewWorkflowExecutionInfo
_x
of
Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Payloads
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> NewWorkflowExecutionInfo -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecutionTimeout") NewWorkflowExecutionInfo
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> NewWorkflowExecutionInfo -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowRunTimeout") NewWorkflowExecutionInfo
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> NewWorkflowExecutionInfo -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowTaskTimeout") NewWorkflowExecutionInfo
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: WorkflowIdReusePolicy
_v
= FoldLike
WorkflowIdReusePolicy
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
WorkflowIdReusePolicy
WorkflowIdReusePolicy
-> NewWorkflowExecutionInfo -> WorkflowIdReusePolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowIdReusePolicy") NewWorkflowExecutionInfo
_x
in
if WorkflowIdReusePolicy -> WorkflowIdReusePolicy -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowIdReusePolicy
_v WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
64)
((Int -> Builder)
-> (WorkflowIdReusePolicy -> Int)
-> WorkflowIdReusePolicy
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
WorkflowIdReusePolicy -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowIdReusePolicy
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe RetryPolicy)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe RetryPolicy)
(Maybe RetryPolicy)
-> NewWorkflowExecutionInfo -> Maybe RetryPolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'retryPolicy") NewWorkflowExecutionInfo
_x
of
Maybe RetryPolicy
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just RetryPolicy
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
((ByteString -> Builder)
-> (RetryPolicy -> ByteString) -> RetryPolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
RetryPolicy -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RetryPolicy
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike
Text NewWorkflowExecutionInfo NewWorkflowExecutionInfo Text Text
-> NewWorkflowExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"cronSchedule") NewWorkflowExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Memo)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
-> NewWorkflowExecutionInfo -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo") NewWorkflowExecutionInfo
_x
of
Maybe Memo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Memo
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Memo
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe SearchAttributes)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
-> NewWorkflowExecutionInfo -> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'searchAttributes")
NewWorkflowExecutionInfo
_x
of
Maybe SearchAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just SearchAttributes
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SearchAttributes
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Header)
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
(Maybe Header)
(Maybe Header)
-> NewWorkflowExecutionInfo -> Maybe Header
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'header")
NewWorkflowExecutionInfo
_x
of
Maybe Header
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Header
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
106)
((ByteString -> Builder)
-> (Header -> ByteString) -> Header -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Header -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Header
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
FieldSet
FieldSet
-> NewWorkflowExecutionInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
FoldLike
FieldSet
NewWorkflowExecutionInfo
NewWorkflowExecutionInfo
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NewWorkflowExecutionInfo FieldSet
Data.ProtoLens.unknownFields NewWorkflowExecutionInfo
_x))))))))))))))
instance Control.DeepSeq.NFData NewWorkflowExecutionInfo where
rnf :: NewWorkflowExecutionInfo -> ()
rnf
= \ NewWorkflowExecutionInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> FieldSet
_NewWorkflowExecutionInfo'_unknownFields NewWorkflowExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Text
_NewWorkflowExecutionInfo'workflowId NewWorkflowExecutionInfo
x__)
(Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe WorkflowType
_NewWorkflowExecutionInfo'workflowType NewWorkflowExecutionInfo
x__)
(Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe TaskQueue
_NewWorkflowExecutionInfo'taskQueue NewWorkflowExecutionInfo
x__)
(Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe Payloads
_NewWorkflowExecutionInfo'input NewWorkflowExecutionInfo
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowExecutionTimeout NewWorkflowExecutionInfo
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowRunTimeout NewWorkflowExecutionInfo
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe Duration
_NewWorkflowExecutionInfo'workflowTaskTimeout NewWorkflowExecutionInfo
x__)
(WorkflowIdReusePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> WorkflowIdReusePolicy
_NewWorkflowExecutionInfo'workflowIdReusePolicy NewWorkflowExecutionInfo
x__)
(Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe RetryPolicy
_NewWorkflowExecutionInfo'retryPolicy NewWorkflowExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Text
_NewWorkflowExecutionInfo'cronSchedule NewWorkflowExecutionInfo
x__)
(Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe Memo
_NewWorkflowExecutionInfo'memo NewWorkflowExecutionInfo
x__)
(Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe SearchAttributes
_NewWorkflowExecutionInfo'searchAttributes NewWorkflowExecutionInfo
x__)
(Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NewWorkflowExecutionInfo -> Maybe Header
_NewWorkflowExecutionInfo'header NewWorkflowExecutionInfo
x__)
())))))))))))))
data NexusOperationCancellationInfo
= NexusOperationCancellationInfo'_constructor {NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'requestedTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
NexusOperationCancellationInfo -> NexusOperationCancellationState
_NexusOperationCancellationInfo'state :: !Proto.Temporal.Api.Enums.V1.Common.NexusOperationCancellationState,
NexusOperationCancellationInfo -> Int32
_NexusOperationCancellationInfo'attempt :: !Data.Int.Int32,
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'lastAttemptCompleteTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
NexusOperationCancellationInfo -> Maybe Failure
_NexusOperationCancellationInfo'lastAttemptFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'nextAttemptScheduleTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
NexusOperationCancellationInfo -> FieldSet
_NexusOperationCancellationInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
(NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool)
-> Eq NexusOperationCancellationInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
== :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
$c/= :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
/= :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
Prelude.Eq, Eq NexusOperationCancellationInfo
Eq NexusOperationCancellationInfo =>
(NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Ordering)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo
-> NexusOperationCancellationInfo)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationInfo
-> NexusOperationCancellationInfo)
-> Ord NexusOperationCancellationInfo
NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Ordering
NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> NexusOperationCancellationInfo
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 :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Ordering
compare :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Ordering
$c< :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
< :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
$c<= :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
<= :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
$c> :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
> :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
$c>= :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
>= :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> Bool
$cmax :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> NexusOperationCancellationInfo
max :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> NexusOperationCancellationInfo
$cmin :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> NexusOperationCancellationInfo
min :: NexusOperationCancellationInfo
-> NexusOperationCancellationInfo -> NexusOperationCancellationInfo
Prelude.Ord)
instance Prelude.Show NexusOperationCancellationInfo where
showsPrec :: Int -> NexusOperationCancellationInfo -> ShowS
showsPrec Int
_ NexusOperationCancellationInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(NexusOperationCancellationInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationCancellationInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "requestedTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestedTime"
-> (Timestamp -> f Timestamp)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "requestedTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Timestamp)
-> (NexusOperationCancellationInfo
-> Maybe Timestamp -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'requestedTime
(\ NexusOperationCancellationInfo
x__ Maybe Timestamp
y__
-> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'requestedTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "maybe'requestedTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'requestedTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "maybe'requestedTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Timestamp)
-> (NexusOperationCancellationInfo
-> Maybe Timestamp -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'requestedTime
(\ NexusOperationCancellationInfo
x__ Maybe Timestamp
y__
-> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'requestedTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "state" Proto.Temporal.Api.Enums.V1.Common.NexusOperationCancellationState where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "state"
-> (NexusOperationCancellationState
-> f NexusOperationCancellationState)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "state"
_
= ((NexusOperationCancellationState
-> f NexusOperationCancellationState)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((NexusOperationCancellationState
-> f NexusOperationCancellationState)
-> NexusOperationCancellationState
-> f NexusOperationCancellationState)
-> (NexusOperationCancellationState
-> f NexusOperationCancellationState)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> NexusOperationCancellationState)
-> (NexusOperationCancellationInfo
-> NexusOperationCancellationState
-> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
NexusOperationCancellationState
NexusOperationCancellationState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> NexusOperationCancellationState
_NexusOperationCancellationInfo'state
(\ NexusOperationCancellationInfo
x__ NexusOperationCancellationState
y__ -> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'state = y__}))
(NexusOperationCancellationState
-> f NexusOperationCancellationState)
-> NexusOperationCancellationState
-> f NexusOperationCancellationState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "attempt" Data.Int.Int32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "attempt"
_
= ((Int32 -> f Int32)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Int32)
-> (NexusOperationCancellationInfo
-> Int32 -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
Int32
Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Int32
_NexusOperationCancellationInfo'attempt
(\ NexusOperationCancellationInfo
x__ Int32
y__ -> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'attempt = y__}))
(Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "lastAttemptCompleteTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastAttemptCompleteTime"
-> (Timestamp -> f Timestamp)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "lastAttemptCompleteTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Timestamp)
-> (NexusOperationCancellationInfo
-> Maybe Timestamp -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'lastAttemptCompleteTime
(\ NexusOperationCancellationInfo
x__ Maybe Timestamp
y__
-> NexusOperationCancellationInfo
x__
{_NexusOperationCancellationInfo'lastAttemptCompleteTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "maybe'lastAttemptCompleteTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastAttemptCompleteTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "maybe'lastAttemptCompleteTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Timestamp)
-> (NexusOperationCancellationInfo
-> Maybe Timestamp -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'lastAttemptCompleteTime
(\ NexusOperationCancellationInfo
x__ Maybe Timestamp
y__
-> NexusOperationCancellationInfo
x__
{_NexusOperationCancellationInfo'lastAttemptCompleteTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "lastAttemptFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastAttemptFailure"
-> (Failure -> f Failure)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "lastAttemptFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Failure)
-> (NexusOperationCancellationInfo
-> Maybe Failure -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Failure)
(Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Failure
_NexusOperationCancellationInfo'lastAttemptFailure
(\ NexusOperationCancellationInfo
x__ Maybe Failure
y__
-> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'lastAttemptFailure = y__}))
(Failure -> Lens' (Maybe Failure) Failure
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Failure
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "maybe'lastAttemptFailure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastAttemptFailure"
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "maybe'lastAttemptFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Failure)
-> (NexusOperationCancellationInfo
-> Maybe Failure -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Failure)
(Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Failure
_NexusOperationCancellationInfo'lastAttemptFailure
(\ NexusOperationCancellationInfo
x__ Maybe Failure
y__
-> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'lastAttemptFailure = y__}))
(Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "nextAttemptScheduleTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextAttemptScheduleTime"
-> (Timestamp -> f Timestamp)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "nextAttemptScheduleTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Timestamp)
-> (NexusOperationCancellationInfo
-> Maybe Timestamp -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'nextAttemptScheduleTime
(\ NexusOperationCancellationInfo
x__ Maybe Timestamp
y__
-> NexusOperationCancellationInfo
x__
{_NexusOperationCancellationInfo'nextAttemptScheduleTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NexusOperationCancellationInfo "maybe'nextAttemptScheduleTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nextAttemptScheduleTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
fieldOf Proxy# "maybe'nextAttemptScheduleTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((NexusOperationCancellationInfo -> Maybe Timestamp)
-> (NexusOperationCancellationInfo
-> Maybe Timestamp -> NexusOperationCancellationInfo)
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'nextAttemptScheduleTime
(\ NexusOperationCancellationInfo
x__ Maybe Timestamp
y__
-> NexusOperationCancellationInfo
x__
{_NexusOperationCancellationInfo'nextAttemptScheduleTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationCancellationInfo where
messageName :: Proxy NexusOperationCancellationInfo -> Text
messageName Proxy NexusOperationCancellationInfo
_
= String -> Text
Data.Text.pack
String
"temporal.api.workflow.v1.NexusOperationCancellationInfo"
packedMessageDescriptor :: Proxy NexusOperationCancellationInfo -> ByteString
packedMessageDescriptor Proxy NexusOperationCancellationInfo
_
= ByteString
"\n\
\\RSNexusOperationCancellationInfo\DC2A\n\
\\SOrequested_time\CAN\SOH \SOH(\v2\SUB.google.protobuf.TimestampR\rrequestedTime\DC2L\n\
\\ENQstate\CAN\STX \SOH(\SO26.temporal.api.enums.v1.NexusOperationCancellationStateR\ENQstate\DC2\CAN\n\
\\aattempt\CAN\ETX \SOH(\ENQR\aattempt\DC2W\n\
\\SUBlast_attempt_complete_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\ETBlastAttemptCompleteTime\DC2R\n\
\\DC4last_attempt_failure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\DC2lastAttemptFailure\DC2W\n\
\\SUBnext_attempt_schedule_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\ETBnextAttemptScheduleTime"
packedFileDescriptor :: Proxy NexusOperationCancellationInfo -> ByteString
packedFileDescriptor Proxy NexusOperationCancellationInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor NexusOperationCancellationInfo)
fieldsByTag
= let
requestedTime__field_descriptor :: FieldDescriptor NexusOperationCancellationInfo
requestedTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor NexusOperationCancellationInfo Timestamp
-> FieldDescriptor NexusOperationCancellationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"requested_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor NexusOperationCancellationInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'requestedTime")) ::
Data.ProtoLens.FieldDescriptor NexusOperationCancellationInfo
state__field_descriptor :: FieldDescriptor NexusOperationCancellationInfo
state__field_descriptor
= String
-> FieldTypeDescriptor NexusOperationCancellationState
-> FieldAccessor
NexusOperationCancellationInfo NexusOperationCancellationState
-> FieldDescriptor NexusOperationCancellationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"state"
(ScalarField NexusOperationCancellationState
-> FieldTypeDescriptor NexusOperationCancellationState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField NexusOperationCancellationState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Common.NexusOperationCancellationState)
(WireDefault NexusOperationCancellationState
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
NexusOperationCancellationState
NexusOperationCancellationState
-> FieldAccessor
NexusOperationCancellationInfo NexusOperationCancellationState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault NexusOperationCancellationState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state")) ::
Data.ProtoLens.FieldDescriptor NexusOperationCancellationInfo
attempt__field_descriptor :: FieldDescriptor NexusOperationCancellationInfo
attempt__field_descriptor
= String
-> FieldTypeDescriptor Int32
-> FieldAccessor NexusOperationCancellationInfo Int32
-> FieldDescriptor NexusOperationCancellationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"attempt"
(ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(WireDefault Int32
-> Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
Int32
Int32
-> FieldAccessor NexusOperationCancellationInfo Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
Data.ProtoLens.FieldDescriptor NexusOperationCancellationInfo
lastAttemptCompleteTime__field_descriptor :: FieldDescriptor NexusOperationCancellationInfo
lastAttemptCompleteTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor NexusOperationCancellationInfo Timestamp
-> FieldDescriptor NexusOperationCancellationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_attempt_complete_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor NexusOperationCancellationInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptCompleteTime")) ::
Data.ProtoLens.FieldDescriptor NexusOperationCancellationInfo
lastAttemptFailure__field_descriptor :: FieldDescriptor NexusOperationCancellationInfo
lastAttemptFailure__field_descriptor
= String
-> FieldTypeDescriptor Failure
-> FieldAccessor NexusOperationCancellationInfo Failure
-> FieldDescriptor NexusOperationCancellationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_attempt_failure"
(MessageOrGroup -> FieldTypeDescriptor Failure
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Failure.V1.Message.Failure)
(Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Failure)
(Maybe Failure)
-> FieldAccessor NexusOperationCancellationInfo Failure
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptFailure")) ::
Data.ProtoLens.FieldDescriptor NexusOperationCancellationInfo
nextAttemptScheduleTime__field_descriptor :: FieldDescriptor NexusOperationCancellationInfo
nextAttemptScheduleTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor NexusOperationCancellationInfo Timestamp
-> FieldDescriptor NexusOperationCancellationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"next_attempt_schedule_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor NexusOperationCancellationInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'nextAttemptScheduleTime")) ::
Data.ProtoLens.FieldDescriptor NexusOperationCancellationInfo
in
[(Tag, FieldDescriptor NexusOperationCancellationInfo)]
-> Map Tag (FieldDescriptor NexusOperationCancellationInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationCancellationInfo
requestedTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NexusOperationCancellationInfo
state__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor NexusOperationCancellationInfo
attempt__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor NexusOperationCancellationInfo
lastAttemptCompleteTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor NexusOperationCancellationInfo
lastAttemptFailure__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor NexusOperationCancellationInfo
nextAttemptScheduleTime__field_descriptor)]
unknownFields :: Lens' NexusOperationCancellationInfo FieldSet
unknownFields
= (NexusOperationCancellationInfo -> FieldSet)
-> (NexusOperationCancellationInfo
-> FieldSet -> NexusOperationCancellationInfo)
-> Lens' NexusOperationCancellationInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
NexusOperationCancellationInfo -> FieldSet
_NexusOperationCancellationInfo'_unknownFields
(\ NexusOperationCancellationInfo
x__ FieldSet
y__
-> NexusOperationCancellationInfo
x__ {_NexusOperationCancellationInfo'_unknownFields = y__})
defMessage :: NexusOperationCancellationInfo
defMessage
= NexusOperationCancellationInfo'_constructor
{_NexusOperationCancellationInfo'requestedTime :: Maybe Timestamp
_NexusOperationCancellationInfo'requestedTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_NexusOperationCancellationInfo'state :: NexusOperationCancellationState
_NexusOperationCancellationInfo'state = NexusOperationCancellationState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_NexusOperationCancellationInfo'attempt :: Int32
_NexusOperationCancellationInfo'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_NexusOperationCancellationInfo'lastAttemptCompleteTime :: Maybe Timestamp
_NexusOperationCancellationInfo'lastAttemptCompleteTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_NexusOperationCancellationInfo'lastAttemptFailure :: Maybe Failure
_NexusOperationCancellationInfo'lastAttemptFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
_NexusOperationCancellationInfo'nextAttemptScheduleTime :: Maybe Timestamp
_NexusOperationCancellationInfo'nextAttemptScheduleTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_NexusOperationCancellationInfo'_unknownFields :: FieldSet
_NexusOperationCancellationInfo'_unknownFields = []}
parseMessage :: Parser NexusOperationCancellationInfo
parseMessage
= let
loop ::
NexusOperationCancellationInfo
-> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationCancellationInfo
loop :: NexusOperationCancellationInfo
-> Parser NexusOperationCancellationInfo
loop NexusOperationCancellationInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"requested_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"requestedTime") y x)
Word64
16
-> do y <- Parser NexusOperationCancellationState
-> String -> Parser NexusOperationCancellationState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> NexusOperationCancellationState)
-> Parser Int -> Parser NexusOperationCancellationState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> NexusOperationCancellationState
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"state"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x)
Word64
24
-> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"attempt"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
Word64
34
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_attempt_complete_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastAttemptCompleteTime") y x)
Word64
42
-> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_attempt_failure"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastAttemptFailure") y x)
Word64
50
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"next_attempt_schedule_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"nextAttemptScheduleTime") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser NexusOperationCancellationInfo
-> String -> Parser NexusOperationCancellationInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do NexusOperationCancellationInfo
-> Parser NexusOperationCancellationInfo
loop NexusOperationCancellationInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
String
"NexusOperationCancellationInfo"
buildMessage :: NexusOperationCancellationInfo -> Builder
buildMessage
= \ NexusOperationCancellationInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> NexusOperationCancellationInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'requestedTime") NexusOperationCancellationInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: NexusOperationCancellationState
_v = FoldLike
NexusOperationCancellationState
NexusOperationCancellationInfo
NexusOperationCancellationInfo
NexusOperationCancellationState
NexusOperationCancellationState
-> NexusOperationCancellationInfo
-> NexusOperationCancellationState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state") NexusOperationCancellationInfo
_x
in
if NexusOperationCancellationState
-> NexusOperationCancellationState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) NexusOperationCancellationState
_v NexusOperationCancellationState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
16)
((Int -> Builder)
-> (NexusOperationCancellationState -> Int)
-> NexusOperationCancellationState
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
NexusOperationCancellationState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum NexusOperationCancellationState
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int32
_v = FoldLike
Int32
NexusOperationCancellationInfo
NexusOperationCancellationInfo
Int32
Int32
-> NexusOperationCancellationInfo -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") NexusOperationCancellationInfo
_x
in
if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> NexusOperationCancellationInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptCompleteTime") NexusOperationCancellationInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Failure)
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Failure)
(Maybe Failure)
-> NexusOperationCancellationInfo -> Maybe Failure
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptFailure") NexusOperationCancellationInfo
_x
of
Maybe Failure
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Failure
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Failure
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
NexusOperationCancellationInfo
NexusOperationCancellationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> NexusOperationCancellationInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'nextAttemptScheduleTime") NexusOperationCancellationInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
NexusOperationCancellationInfo
NexusOperationCancellationInfo
FieldSet
FieldSet
-> NexusOperationCancellationInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
NexusOperationCancellationInfo
NexusOperationCancellationInfo
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationCancellationInfo FieldSet
Data.ProtoLens.unknownFields NexusOperationCancellationInfo
_x)))))))
instance Control.DeepSeq.NFData NexusOperationCancellationInfo where
rnf :: NexusOperationCancellationInfo -> ()
rnf
= \ NexusOperationCancellationInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> FieldSet
_NexusOperationCancellationInfo'_unknownFields NexusOperationCancellationInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'requestedTime NexusOperationCancellationInfo
x__)
(NexusOperationCancellationState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> NexusOperationCancellationState
_NexusOperationCancellationInfo'state NexusOperationCancellationInfo
x__)
(Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> Int32
_NexusOperationCancellationInfo'attempt NexusOperationCancellationInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'lastAttemptCompleteTime NexusOperationCancellationInfo
x__)
(Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> Maybe Failure
_NexusOperationCancellationInfo'lastAttemptFailure NexusOperationCancellationInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(NexusOperationCancellationInfo -> Maybe Timestamp
_NexusOperationCancellationInfo'nextAttemptScheduleTime NexusOperationCancellationInfo
x__)
()))))))
data PendingActivityInfo
= PendingActivityInfo'_constructor {PendingActivityInfo -> Text
_PendingActivityInfo'activityId :: !Data.Text.Text,
PendingActivityInfo -> Maybe ActivityType
_PendingActivityInfo'activityType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType),
PendingActivityInfo -> PendingActivityState
_PendingActivityInfo'state :: !Proto.Temporal.Api.Enums.V1.Workflow.PendingActivityState,
PendingActivityInfo -> Maybe Payloads
_PendingActivityInfo'heartbeatDetails :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastHeartbeatTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastStartedTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingActivityInfo -> Int32
_PendingActivityInfo'attempt :: !Data.Int.Int32,
PendingActivityInfo -> Int32
_PendingActivityInfo'maximumAttempts :: !Data.Int.Int32,
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'scheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'expirationTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingActivityInfo -> Maybe Failure
_PendingActivityInfo'lastFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
PendingActivityInfo -> Text
_PendingActivityInfo'lastWorkerIdentity :: !Data.Text.Text,
PendingActivityInfo -> Maybe WorkerVersionStamp
_PendingActivityInfo'lastWorkerVersionStamp :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId :: !(Prelude.Maybe PendingActivityInfo'AssignedBuildId),
PendingActivityInfo -> FieldSet
_PendingActivityInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (PendingActivityInfo -> PendingActivityInfo -> Bool
(PendingActivityInfo -> PendingActivityInfo -> Bool)
-> (PendingActivityInfo -> PendingActivityInfo -> Bool)
-> Eq PendingActivityInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingActivityInfo -> PendingActivityInfo -> Bool
== :: PendingActivityInfo -> PendingActivityInfo -> Bool
$c/= :: PendingActivityInfo -> PendingActivityInfo -> Bool
/= :: PendingActivityInfo -> PendingActivityInfo -> Bool
Prelude.Eq, Eq PendingActivityInfo
Eq PendingActivityInfo =>
(PendingActivityInfo -> PendingActivityInfo -> Ordering)
-> (PendingActivityInfo -> PendingActivityInfo -> Bool)
-> (PendingActivityInfo -> PendingActivityInfo -> Bool)
-> (PendingActivityInfo -> PendingActivityInfo -> Bool)
-> (PendingActivityInfo -> PendingActivityInfo -> Bool)
-> (PendingActivityInfo
-> PendingActivityInfo -> PendingActivityInfo)
-> (PendingActivityInfo
-> PendingActivityInfo -> PendingActivityInfo)
-> Ord PendingActivityInfo
PendingActivityInfo -> PendingActivityInfo -> Bool
PendingActivityInfo -> PendingActivityInfo -> Ordering
PendingActivityInfo -> PendingActivityInfo -> PendingActivityInfo
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 :: PendingActivityInfo -> PendingActivityInfo -> Ordering
compare :: PendingActivityInfo -> PendingActivityInfo -> Ordering
$c< :: PendingActivityInfo -> PendingActivityInfo -> Bool
< :: PendingActivityInfo -> PendingActivityInfo -> Bool
$c<= :: PendingActivityInfo -> PendingActivityInfo -> Bool
<= :: PendingActivityInfo -> PendingActivityInfo -> Bool
$c> :: PendingActivityInfo -> PendingActivityInfo -> Bool
> :: PendingActivityInfo -> PendingActivityInfo -> Bool
$c>= :: PendingActivityInfo -> PendingActivityInfo -> Bool
>= :: PendingActivityInfo -> PendingActivityInfo -> Bool
$cmax :: PendingActivityInfo -> PendingActivityInfo -> PendingActivityInfo
max :: PendingActivityInfo -> PendingActivityInfo -> PendingActivityInfo
$cmin :: PendingActivityInfo -> PendingActivityInfo -> PendingActivityInfo
min :: PendingActivityInfo -> PendingActivityInfo -> PendingActivityInfo
Prelude.Ord)
instance Prelude.Show PendingActivityInfo where
showsPrec :: Int -> PendingActivityInfo -> ShowS
showsPrec Int
_ PendingActivityInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(PendingActivityInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PendingActivityInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data PendingActivityInfo'AssignedBuildId
= PendingActivityInfo'UseWorkflowBuildId !Proto.Google.Protobuf.Empty.Empty |
PendingActivityInfo'LastIndependentlyAssignedBuildId !Data.Text.Text
deriving stock (Int -> PendingActivityInfo'AssignedBuildId -> ShowS
[PendingActivityInfo'AssignedBuildId] -> ShowS
PendingActivityInfo'AssignedBuildId -> String
(Int -> PendingActivityInfo'AssignedBuildId -> ShowS)
-> (PendingActivityInfo'AssignedBuildId -> String)
-> ([PendingActivityInfo'AssignedBuildId] -> ShowS)
-> Show PendingActivityInfo'AssignedBuildId
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> PendingActivityInfo'AssignedBuildId -> ShowS
showsPrec :: Int -> PendingActivityInfo'AssignedBuildId -> ShowS
$cshow :: PendingActivityInfo'AssignedBuildId -> String
show :: PendingActivityInfo'AssignedBuildId -> String
$cshowList :: [PendingActivityInfo'AssignedBuildId] -> ShowS
showList :: [PendingActivityInfo'AssignedBuildId] -> ShowS
Prelude.Show, PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
(PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool)
-> Eq PendingActivityInfo'AssignedBuildId
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
== :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
$c/= :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
/= :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
Prelude.Eq, Eq PendingActivityInfo'AssignedBuildId
Eq PendingActivityInfo'AssignedBuildId =>
(PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Ordering)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId)
-> Ord PendingActivityInfo'AssignedBuildId
PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Ordering
PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
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 :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Ordering
compare :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Ordering
$c< :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
< :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
$c<= :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
<= :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
$c> :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
> :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
$c>= :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
>= :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId -> Bool
$cmax :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
max :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
$cmin :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
min :: PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo'AssignedBuildId
Prelude.Ord)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "activityId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text) -> PendingActivityInfo -> f PendingActivityInfo
fieldOf Proxy# "activityId"
_
= ((Text -> f Text) -> PendingActivityInfo -> f PendingActivityInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Text)
-> (PendingActivityInfo -> Text -> PendingActivityInfo)
-> Lens PendingActivityInfo PendingActivityInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Text
_PendingActivityInfo'activityId
(\ PendingActivityInfo
x__ Text
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'activityId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "activityType" Proto.Temporal.Api.Common.V1.Message.ActivityType where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityType"
-> (ActivityType -> f ActivityType)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "activityType"
_
= ((Maybe ActivityType -> f (Maybe ActivityType))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((ActivityType -> f ActivityType)
-> Maybe ActivityType -> f (Maybe ActivityType))
-> (ActivityType -> f ActivityType)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe ActivityType)
-> (PendingActivityInfo
-> Maybe ActivityType -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe ActivityType)
(Maybe ActivityType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe ActivityType
_PendingActivityInfo'activityType
(\ PendingActivityInfo
x__ Maybe ActivityType
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'activityType = y__}))
(ActivityType -> Lens' (Maybe ActivityType) ActivityType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'activityType" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityType"
-> (Maybe ActivityType -> f (Maybe ActivityType))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'activityType"
_
= ((Maybe ActivityType -> f (Maybe ActivityType))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe ActivityType -> f (Maybe ActivityType))
-> Maybe ActivityType -> f (Maybe ActivityType))
-> (Maybe ActivityType -> f (Maybe ActivityType))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe ActivityType)
-> (PendingActivityInfo
-> Maybe ActivityType -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe ActivityType)
(Maybe ActivityType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe ActivityType
_PendingActivityInfo'activityType
(\ PendingActivityInfo
x__ Maybe ActivityType
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'activityType = y__}))
(Maybe ActivityType -> f (Maybe ActivityType))
-> Maybe ActivityType -> f (Maybe ActivityType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "state" Proto.Temporal.Api.Enums.V1.Workflow.PendingActivityState where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "state"
-> (PendingActivityState -> f PendingActivityState)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "state"
_
= ((PendingActivityState -> f PendingActivityState)
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((PendingActivityState -> f PendingActivityState)
-> PendingActivityState -> f PendingActivityState)
-> (PendingActivityState -> f PendingActivityState)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> PendingActivityState)
-> (PendingActivityInfo
-> PendingActivityState -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
PendingActivityState
PendingActivityState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> PendingActivityState
_PendingActivityInfo'state
(\ PendingActivityInfo
x__ PendingActivityState
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'state = y__}))
(PendingActivityState -> f PendingActivityState)
-> PendingActivityState -> f PendingActivityState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "heartbeatDetails" Proto.Temporal.Api.Common.V1.Message.Payloads where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "heartbeatDetails"
-> (Payloads -> f Payloads)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "heartbeatDetails"
_
= ((Maybe Payloads -> f (Maybe Payloads))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Payloads -> f Payloads)
-> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Payloads)
-> (PendingActivityInfo -> Maybe Payloads -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Payloads)
(Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Payloads
_PendingActivityInfo'heartbeatDetails
(\ PendingActivityInfo
x__ Maybe Payloads
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'heartbeatDetails = y__}))
(Payloads -> Lens' (Maybe Payloads) Payloads
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payloads
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'heartbeatDetails" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'heartbeatDetails"
-> (Maybe Payloads -> f (Maybe Payloads))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'heartbeatDetails"
_
= ((Maybe Payloads -> f (Maybe Payloads))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Payloads)
-> (PendingActivityInfo -> Maybe Payloads -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Payloads)
(Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Payloads
_PendingActivityInfo'heartbeatDetails
(\ PendingActivityInfo
x__ Maybe Payloads
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'heartbeatDetails = y__}))
(Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "lastHeartbeatTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastHeartbeatTime"
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "lastHeartbeatTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastHeartbeatTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastHeartbeatTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'lastHeartbeatTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastHeartbeatTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'lastHeartbeatTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastHeartbeatTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastHeartbeatTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "lastStartedTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastStartedTime"
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "lastStartedTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastStartedTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastStartedTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'lastStartedTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastStartedTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'lastStartedTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastStartedTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastStartedTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "attempt" Data.Int.Int32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "attempt"
_
= ((Int32 -> f Int32)
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Int32)
-> (PendingActivityInfo -> Int32 -> PendingActivityInfo)
-> Lens PendingActivityInfo PendingActivityInfo Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Int32
_PendingActivityInfo'attempt
(\ PendingActivityInfo
x__ Int32
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'attempt = y__}))
(Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maximumAttempts" Data.Int.Int32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maximumAttempts"
-> (Int32 -> f Int32)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maximumAttempts"
_
= ((Int32 -> f Int32)
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Int32)
-> (PendingActivityInfo -> Int32 -> PendingActivityInfo)
-> Lens PendingActivityInfo PendingActivityInfo Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Int32
_PendingActivityInfo'maximumAttempts
(\ PendingActivityInfo
x__ Int32
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'maximumAttempts = y__}))
(Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "scheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledTime"
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "scheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'scheduledTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'scheduledTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'scheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'scheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'scheduledTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'scheduledTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "expirationTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "expirationTime"
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "expirationTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'expirationTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'expirationTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'expirationTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'expirationTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'expirationTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Timestamp)
-> (PendingActivityInfo -> Maybe Timestamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'expirationTime
(\ PendingActivityInfo
x__ Maybe Timestamp
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'expirationTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "lastFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastFailure"
-> (Failure -> f Failure)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "lastFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Failure)
-> (PendingActivityInfo -> Maybe Failure -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Failure)
(Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Failure
_PendingActivityInfo'lastFailure
(\ PendingActivityInfo
x__ Maybe Failure
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastFailure = y__}))
(Failure -> Lens' (Maybe Failure) Failure
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Failure
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'lastFailure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastFailure"
-> (Maybe Failure -> f (Maybe Failure))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'lastFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe Failure)
-> (PendingActivityInfo -> Maybe Failure -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Failure)
(Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe Failure
_PendingActivityInfo'lastFailure
(\ PendingActivityInfo
x__ Maybe Failure
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastFailure = y__}))
(Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "lastWorkerIdentity" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastWorkerIdentity"
-> (Text -> f Text) -> PendingActivityInfo -> f PendingActivityInfo
fieldOf Proxy# "lastWorkerIdentity"
_
= ((Text -> f Text) -> PendingActivityInfo -> f PendingActivityInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Text)
-> (PendingActivityInfo -> Text -> PendingActivityInfo)
-> Lens PendingActivityInfo PendingActivityInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Text
_PendingActivityInfo'lastWorkerIdentity
(\ PendingActivityInfo
x__ Text
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'lastWorkerIdentity = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "lastWorkerVersionStamp" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastWorkerVersionStamp"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "lastWorkerVersionStamp"
_
= ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe WorkerVersionStamp)
-> (PendingActivityInfo
-> Maybe WorkerVersionStamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe WorkerVersionStamp
_PendingActivityInfo'lastWorkerVersionStamp
(\ PendingActivityInfo
x__ Maybe WorkerVersionStamp
y__
-> PendingActivityInfo
x__ {_PendingActivityInfo'lastWorkerVersionStamp = y__}))
(WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'lastWorkerVersionStamp" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastWorkerVersionStamp"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'lastWorkerVersionStamp"
_
= ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe WorkerVersionStamp)
-> (PendingActivityInfo
-> Maybe WorkerVersionStamp -> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe WorkerVersionStamp
_PendingActivityInfo'lastWorkerVersionStamp
(\ PendingActivityInfo
x__ Maybe WorkerVersionStamp
y__
-> PendingActivityInfo
x__ {_PendingActivityInfo'lastWorkerVersionStamp = y__}))
(Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'assignedBuildId" (Prelude.Maybe PendingActivityInfo'AssignedBuildId) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'assignedBuildId"
-> (Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'assignedBuildId"
_
= ((Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> (Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo
-> Maybe PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId
(\ PendingActivityInfo
x__ Maybe PendingActivityInfo'AssignedBuildId
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'assignedBuildId = y__}))
(Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'useWorkflowBuildId" (Prelude.Maybe Proto.Google.Protobuf.Empty.Empty) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'useWorkflowBuildId"
-> (Maybe Empty -> f (Maybe Empty))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'useWorkflowBuildId"
_
= ((Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Empty -> f (Maybe Empty))
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> (Maybe Empty -> f (Maybe Empty))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo
-> Maybe PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId
(\ PendingActivityInfo
x__ Maybe PendingActivityInfo'AssignedBuildId
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'assignedBuildId = y__}))
((Maybe PendingActivityInfo'AssignedBuildId -> Maybe Empty)
-> (Maybe PendingActivityInfo'AssignedBuildId
-> Maybe Empty -> Maybe PendingActivityInfo'AssignedBuildId)
-> Lens
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe Empty)
(Maybe Empty)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
(\ Maybe PendingActivityInfo'AssignedBuildId
x__
-> case Maybe PendingActivityInfo'AssignedBuildId
x__ of
(Prelude.Just (PendingActivityInfo'UseWorkflowBuildId Empty
x__val))
-> Empty -> Maybe Empty
forall a. a -> Maybe a
Prelude.Just Empty
x__val
Maybe PendingActivityInfo'AssignedBuildId
_otherwise -> Maybe Empty
forall a. Maybe a
Prelude.Nothing)
(\ Maybe PendingActivityInfo'AssignedBuildId
_ Maybe Empty
y__
-> (Empty -> PendingActivityInfo'AssignedBuildId)
-> Maybe Empty -> Maybe PendingActivityInfo'AssignedBuildId
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Empty -> PendingActivityInfo'AssignedBuildId
PendingActivityInfo'UseWorkflowBuildId Maybe Empty
y__))
instance Data.ProtoLens.Field.HasField PendingActivityInfo "useWorkflowBuildId" Proto.Google.Protobuf.Empty.Empty where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "useWorkflowBuildId"
-> (Empty -> f Empty)
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "useWorkflowBuildId"
_
= ((Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Empty -> f Empty)
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> (Empty -> f Empty)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo
-> Maybe PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId
(\ PendingActivityInfo
x__ Maybe PendingActivityInfo'AssignedBuildId
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'assignedBuildId = y__}))
(((Maybe Empty -> f (Maybe Empty))
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> ((Empty -> f Empty) -> Maybe Empty -> f (Maybe Empty))
-> (Empty -> f Empty)
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Maybe PendingActivityInfo'AssignedBuildId -> Maybe Empty)
-> (Maybe PendingActivityInfo'AssignedBuildId
-> Maybe Empty -> Maybe PendingActivityInfo'AssignedBuildId)
-> Lens
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe Empty)
(Maybe Empty)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
(\ Maybe PendingActivityInfo'AssignedBuildId
x__
-> case Maybe PendingActivityInfo'AssignedBuildId
x__ of
(Prelude.Just (PendingActivityInfo'UseWorkflowBuildId Empty
x__val))
-> Empty -> Maybe Empty
forall a. a -> Maybe a
Prelude.Just Empty
x__val
Maybe PendingActivityInfo'AssignedBuildId
_otherwise -> Maybe Empty
forall a. Maybe a
Prelude.Nothing)
(\ Maybe PendingActivityInfo'AssignedBuildId
_ Maybe Empty
y__
-> (Empty -> PendingActivityInfo'AssignedBuildId)
-> Maybe Empty -> Maybe PendingActivityInfo'AssignedBuildId
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap Empty -> PendingActivityInfo'AssignedBuildId
PendingActivityInfo'UseWorkflowBuildId Maybe Empty
y__))
(Empty -> Lens' (Maybe Empty) Empty
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Empty
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField PendingActivityInfo "maybe'lastIndependentlyAssignedBuildId" (Prelude.Maybe Data.Text.Text) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastIndependentlyAssignedBuildId"
-> (Maybe Text -> f (Maybe Text))
-> PendingActivityInfo
-> f PendingActivityInfo
fieldOf Proxy# "maybe'lastIndependentlyAssignedBuildId"
_
= ((Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Maybe Text -> f (Maybe Text))
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> (Maybe Text -> f (Maybe Text))
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo
-> Maybe PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId
(\ PendingActivityInfo
x__ Maybe PendingActivityInfo'AssignedBuildId
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'assignedBuildId = y__}))
((Maybe PendingActivityInfo'AssignedBuildId -> Maybe Text)
-> (Maybe PendingActivityInfo'AssignedBuildId
-> Maybe Text -> Maybe PendingActivityInfo'AssignedBuildId)
-> Lens
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
(\ Maybe PendingActivityInfo'AssignedBuildId
x__
-> case Maybe PendingActivityInfo'AssignedBuildId
x__ of
(Prelude.Just (PendingActivityInfo'LastIndependentlyAssignedBuildId Text
x__val))
-> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
Maybe PendingActivityInfo'AssignedBuildId
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
(\ Maybe PendingActivityInfo'AssignedBuildId
_ Maybe Text
y__
-> (Text -> PendingActivityInfo'AssignedBuildId)
-> Maybe Text -> Maybe PendingActivityInfo'AssignedBuildId
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Text -> PendingActivityInfo'AssignedBuildId
PendingActivityInfo'LastIndependentlyAssignedBuildId Maybe Text
y__))
instance Data.ProtoLens.Field.HasField PendingActivityInfo "lastIndependentlyAssignedBuildId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastIndependentlyAssignedBuildId"
-> (Text -> f Text) -> PendingActivityInfo -> f PendingActivityInfo
fieldOf Proxy# "lastIndependentlyAssignedBuildId"
_
= ((Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> PendingActivityInfo -> f PendingActivityInfo)
-> ((Text -> f Text)
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> (Text -> f Text)
-> PendingActivityInfo
-> f PendingActivityInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo
-> Maybe PendingActivityInfo'AssignedBuildId
-> PendingActivityInfo)
-> Lens
PendingActivityInfo
PendingActivityInfo
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId
(\ PendingActivityInfo
x__ Maybe PendingActivityInfo'AssignedBuildId
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'assignedBuildId = y__}))
(((Maybe Text -> f (Maybe Text))
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId))
-> ((Text -> f Text) -> Maybe Text -> f (Maybe Text))
-> (Text -> f Text)
-> Maybe PendingActivityInfo'AssignedBuildId
-> f (Maybe PendingActivityInfo'AssignedBuildId)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Maybe PendingActivityInfo'AssignedBuildId -> Maybe Text)
-> (Maybe PendingActivityInfo'AssignedBuildId
-> Maybe Text -> Maybe PendingActivityInfo'AssignedBuildId)
-> Lens
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
(\ Maybe PendingActivityInfo'AssignedBuildId
x__
-> case Maybe PendingActivityInfo'AssignedBuildId
x__ of
(Prelude.Just (PendingActivityInfo'LastIndependentlyAssignedBuildId Text
x__val))
-> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
x__val
Maybe PendingActivityInfo'AssignedBuildId
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
(\ Maybe PendingActivityInfo'AssignedBuildId
_ Maybe Text
y__
-> (Text -> PendingActivityInfo'AssignedBuildId)
-> Maybe Text -> Maybe PendingActivityInfo'AssignedBuildId
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Text -> PendingActivityInfo'AssignedBuildId
PendingActivityInfo'LastIndependentlyAssignedBuildId Maybe Text
y__))
(Text -> Lens' (Maybe Text) Text
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault))
instance Data.ProtoLens.Message PendingActivityInfo where
messageName :: Proxy PendingActivityInfo -> Text
messageName Proxy PendingActivityInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.PendingActivityInfo"
packedMessageDescriptor :: Proxy PendingActivityInfo -> ByteString
packedMessageDescriptor Proxy PendingActivityInfo
_
= ByteString
"\n\
\\DC3PendingActivityInfo\DC2\US\n\
\\vactivity_id\CAN\SOH \SOH(\tR\n\
\activityId\DC2I\n\
\\ractivity_type\CAN\STX \SOH(\v2$.temporal.api.common.v1.ActivityTypeR\factivityType\DC2A\n\
\\ENQstate\CAN\ETX \SOH(\SO2+.temporal.api.enums.v1.PendingActivityStateR\ENQstate\DC2M\n\
\\DC1heartbeat_details\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\DLEheartbeatDetails\DC2J\n\
\\DC3last_heartbeat_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\DC1lastHeartbeatTime\DC2F\n\
\\DC1last_started_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\SIlastStartedTime\DC2\CAN\n\
\\aattempt\CAN\a \SOH(\ENQR\aattempt\DC2)\n\
\\DLEmaximum_attempts\CAN\b \SOH(\ENQR\SImaximumAttempts\DC2A\n\
\\SOscheduled_time\CAN\t \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2C\n\
\\SIexpiration_time\CAN\n\
\ \SOH(\v2\SUB.google.protobuf.TimestampR\SOexpirationTime\DC2C\n\
\\flast_failure\CAN\v \SOH(\v2 .temporal.api.failure.v1.FailureR\vlastFailure\DC20\n\
\\DC4last_worker_identity\CAN\f \SOH(\tR\DC2lastWorkerIdentity\DC2K\n\
\\NAKuse_workflow_build_id\CAN\r \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\DC2useWorkflowBuildId\DC2P\n\
\$last_independently_assigned_build_id\CAN\SO \SOH(\tH\NULR lastIndependentlyAssignedBuildId\DC2e\n\
\\EMlast_worker_version_stamp\CAN\SI \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\SYNlastWorkerVersionStampB\DC3\n\
\\DC1assigned_build_id"
packedFileDescriptor :: Proxy PendingActivityInfo -> ByteString
packedFileDescriptor Proxy PendingActivityInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor PendingActivityInfo)
fieldsByTag
= let
activityId__field_descriptor :: FieldDescriptor PendingActivityInfo
activityId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingActivityInfo Text
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"activity_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens PendingActivityInfo PendingActivityInfo Text Text
-> FieldAccessor PendingActivityInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityId")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
activityType__field_descriptor :: FieldDescriptor PendingActivityInfo
activityType__field_descriptor
= String
-> FieldTypeDescriptor ActivityType
-> FieldAccessor PendingActivityInfo ActivityType
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"activity_type"
(MessageOrGroup -> FieldTypeDescriptor ActivityType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.ActivityType)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe ActivityType)
(Maybe ActivityType)
-> FieldAccessor PendingActivityInfo ActivityType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'activityType")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
state__field_descriptor :: FieldDescriptor PendingActivityInfo
state__field_descriptor
= String
-> FieldTypeDescriptor PendingActivityState
-> FieldAccessor PendingActivityInfo PendingActivityState
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"state"
(ScalarField PendingActivityState
-> FieldTypeDescriptor PendingActivityState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField PendingActivityState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.PendingActivityState)
(WireDefault PendingActivityState
-> Lens
PendingActivityInfo
PendingActivityInfo
PendingActivityState
PendingActivityState
-> FieldAccessor PendingActivityInfo PendingActivityState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault PendingActivityState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
heartbeatDetails__field_descriptor :: FieldDescriptor PendingActivityInfo
heartbeatDetails__field_descriptor
= String
-> FieldTypeDescriptor Payloads
-> FieldAccessor PendingActivityInfo Payloads
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"heartbeat_details"
(MessageOrGroup -> FieldTypeDescriptor Payloads
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payloads)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Payloads)
(Maybe Payloads)
-> FieldAccessor PendingActivityInfo Payloads
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'heartbeatDetails")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
lastHeartbeatTime__field_descriptor :: FieldDescriptor PendingActivityInfo
lastHeartbeatTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingActivityInfo Timestamp
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_heartbeat_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingActivityInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastHeartbeatTime")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
lastStartedTime__field_descriptor :: FieldDescriptor PendingActivityInfo
lastStartedTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingActivityInfo Timestamp
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_started_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingActivityInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastStartedTime")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
attempt__field_descriptor :: FieldDescriptor PendingActivityInfo
attempt__field_descriptor
= String
-> FieldTypeDescriptor Int32
-> FieldAccessor PendingActivityInfo Int32
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"attempt"
(ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(WireDefault Int32
-> Lens PendingActivityInfo PendingActivityInfo Int32 Int32
-> FieldAccessor PendingActivityInfo Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
maximumAttempts__field_descriptor :: FieldDescriptor PendingActivityInfo
maximumAttempts__field_descriptor
= String
-> FieldTypeDescriptor Int32
-> FieldAccessor PendingActivityInfo Int32
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"maximum_attempts"
(ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(WireDefault Int32
-> Lens PendingActivityInfo PendingActivityInfo Int32 Int32
-> FieldAccessor PendingActivityInfo Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumAttempts")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
scheduledTime__field_descriptor :: FieldDescriptor PendingActivityInfo
scheduledTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingActivityInfo Timestamp
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"scheduled_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingActivityInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
expirationTime__field_descriptor :: FieldDescriptor PendingActivityInfo
expirationTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingActivityInfo Timestamp
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"expiration_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingActivityInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'expirationTime")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
lastFailure__field_descriptor :: FieldDescriptor PendingActivityInfo
lastFailure__field_descriptor
= String
-> FieldTypeDescriptor Failure
-> FieldAccessor PendingActivityInfo Failure
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_failure"
(MessageOrGroup -> FieldTypeDescriptor Failure
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Failure.V1.Message.Failure)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe Failure)
(Maybe Failure)
-> FieldAccessor PendingActivityInfo Failure
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastFailure")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
lastWorkerIdentity__field_descriptor :: FieldDescriptor PendingActivityInfo
lastWorkerIdentity__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingActivityInfo Text
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_worker_identity"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens PendingActivityInfo PendingActivityInfo Text Text
-> FieldAccessor PendingActivityInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"lastWorkerIdentity")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
lastWorkerVersionStamp__field_descriptor :: FieldDescriptor PendingActivityInfo
lastWorkerVersionStamp__field_descriptor
= String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor PendingActivityInfo WorkerVersionStamp
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_worker_version_stamp"
(MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
(Lens
PendingActivityInfo
PendingActivityInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
-> FieldAccessor PendingActivityInfo WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastWorkerVersionStamp")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
useWorkflowBuildId__field_descriptor :: FieldDescriptor PendingActivityInfo
useWorkflowBuildId__field_descriptor
= String
-> FieldTypeDescriptor Empty
-> FieldAccessor PendingActivityInfo Empty
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"use_workflow_build_id"
(MessageOrGroup -> FieldTypeDescriptor Empty
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Empty.Empty)
(Lens' PendingActivityInfo (Maybe Empty)
-> FieldAccessor PendingActivityInfo Empty
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'useWorkflowBuildId")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
lastIndependentlyAssignedBuildId__field_descriptor :: FieldDescriptor PendingActivityInfo
lastIndependentlyAssignedBuildId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingActivityInfo Text
-> FieldDescriptor PendingActivityInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_independently_assigned_build_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(Lens' PendingActivityInfo (Maybe Text)
-> FieldAccessor PendingActivityInfo Text
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'lastIndependentlyAssignedBuildId")) ::
Data.ProtoLens.FieldDescriptor PendingActivityInfo
in
[(Tag, FieldDescriptor PendingActivityInfo)]
-> Map Tag (FieldDescriptor PendingActivityInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PendingActivityInfo
activityId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PendingActivityInfo
activityType__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PendingActivityInfo
state__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PendingActivityInfo
heartbeatDetails__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PendingActivityInfo
lastHeartbeatTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor PendingActivityInfo
lastStartedTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor PendingActivityInfo
attempt__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor PendingActivityInfo
maximumAttempts__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor PendingActivityInfo
scheduledTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor PendingActivityInfo
expirationTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor PendingActivityInfo
lastFailure__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor PendingActivityInfo
lastWorkerIdentity__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor PendingActivityInfo
lastWorkerVersionStamp__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor PendingActivityInfo
useWorkflowBuildId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
14,
FieldDescriptor PendingActivityInfo
lastIndependentlyAssignedBuildId__field_descriptor)]
unknownFields :: Lens' PendingActivityInfo FieldSet
unknownFields
= (PendingActivityInfo -> FieldSet)
-> (PendingActivityInfo -> FieldSet -> PendingActivityInfo)
-> Lens' PendingActivityInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingActivityInfo -> FieldSet
_PendingActivityInfo'_unknownFields
(\ PendingActivityInfo
x__ FieldSet
y__ -> PendingActivityInfo
x__ {_PendingActivityInfo'_unknownFields = y__})
defMessage :: PendingActivityInfo
defMessage
= PendingActivityInfo'_constructor
{_PendingActivityInfo'activityId :: Text
_PendingActivityInfo'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingActivityInfo'activityType :: Maybe ActivityType
_PendingActivityInfo'activityType = Maybe ActivityType
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'state :: PendingActivityState
_PendingActivityInfo'state = PendingActivityState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingActivityInfo'heartbeatDetails :: Maybe Payloads
_PendingActivityInfo'heartbeatDetails = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'lastHeartbeatTime :: Maybe Timestamp
_PendingActivityInfo'lastHeartbeatTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'lastStartedTime :: Maybe Timestamp
_PendingActivityInfo'lastStartedTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'attempt :: Int32
_PendingActivityInfo'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingActivityInfo'maximumAttempts :: Int32
_PendingActivityInfo'maximumAttempts = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingActivityInfo'scheduledTime :: Maybe Timestamp
_PendingActivityInfo'scheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'expirationTime :: Maybe Timestamp
_PendingActivityInfo'expirationTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'lastFailure :: Maybe Failure
_PendingActivityInfo'lastFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'lastWorkerIdentity :: Text
_PendingActivityInfo'lastWorkerIdentity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingActivityInfo'lastWorkerVersionStamp :: Maybe WorkerVersionStamp
_PendingActivityInfo'lastWorkerVersionStamp = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'assignedBuildId :: Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId = Maybe PendingActivityInfo'AssignedBuildId
forall a. Maybe a
Prelude.Nothing,
_PendingActivityInfo'_unknownFields :: FieldSet
_PendingActivityInfo'_unknownFields = []}
parseMessage :: Parser PendingActivityInfo
parseMessage
= let
loop ::
PendingActivityInfo
-> Data.ProtoLens.Encoding.Bytes.Parser PendingActivityInfo
loop :: PendingActivityInfo -> Parser PendingActivityInfo
loop PendingActivityInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"activity_id"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"activityId") y x)
Word64
18
-> do y <- Parser ActivityType -> String -> Parser ActivityType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"activity_type"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"activityType") y x)
Word64
24
-> do y <- Parser PendingActivityState
-> String -> Parser PendingActivityState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> PendingActivityState)
-> Parser Int -> Parser PendingActivityState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> PendingActivityState
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"state"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x)
Word64
34
-> do y <- Parser Payloads -> String -> Parser Payloads
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"heartbeat_details"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"heartbeatDetails") y x)
Word64
42
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_heartbeat_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastHeartbeatTime") y x)
Word64
50
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_started_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastStartedTime") y x)
Word64
56
-> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"attempt"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
Word64
64
-> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"maximum_attempts"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"maximumAttempts") y x)
Word64
74
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"scheduled_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"scheduledTime") y x)
Word64
82
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"expiration_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"expirationTime") y x)
Word64
90
-> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_failure"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"lastFailure") y x)
Word64
98
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"last_worker_identity"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastWorkerIdentity") y x)
Word64
122
-> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_worker_version_stamp"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastWorkerVersionStamp") y x)
Word64
106
-> do y <- Parser Empty -> String -> Parser Empty
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"use_workflow_build_id"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"useWorkflowBuildId") y x)
Word64
114
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"last_independently_assigned_build_id"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field
@"lastIndependentlyAssignedBuildId")
y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser PendingActivityInfo -> String -> Parser PendingActivityInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do PendingActivityInfo -> Parser PendingActivityInfo
loop PendingActivityInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PendingActivityInfo"
buildMessage :: PendingActivityInfo -> Builder
buildMessage
= \ PendingActivityInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text PendingActivityInfo PendingActivityInfo Text Text
-> PendingActivityInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"activityId") PendingActivityInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe ActivityType)
PendingActivityInfo
PendingActivityInfo
(Maybe ActivityType)
(Maybe ActivityType)
-> PendingActivityInfo -> Maybe ActivityType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'activityType") PendingActivityInfo
_x
of
Maybe ActivityType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just ActivityType
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (ActivityType -> ByteString) -> ActivityType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
ActivityType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityType
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: PendingActivityState
_v = FoldLike
PendingActivityState
PendingActivityInfo
PendingActivityInfo
PendingActivityState
PendingActivityState
-> PendingActivityInfo -> PendingActivityState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state") PendingActivityInfo
_x
in
if PendingActivityState -> PendingActivityState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) PendingActivityState
_v PendingActivityState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
((Int -> Builder)
-> (PendingActivityState -> Int) -> PendingActivityState -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
PendingActivityState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum PendingActivityState
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Payloads)
PendingActivityInfo
PendingActivityInfo
(Maybe Payloads)
(Maybe Payloads)
-> PendingActivityInfo -> Maybe Payloads
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'heartbeatDetails") PendingActivityInfo
_x
of
Maybe Payloads
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Payloads
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Payloads -> ByteString) -> Payloads -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Payloads -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payloads
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingActivityInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastHeartbeatTime") PendingActivityInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingActivityInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastStartedTime") PendingActivityInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int32
_v = FoldLike Int32 PendingActivityInfo PendingActivityInfo Int32 Int32
-> PendingActivityInfo -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") PendingActivityInfo
_x
in
if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int32
_v
= FoldLike Int32 PendingActivityInfo PendingActivityInfo Int32 Int32
-> PendingActivityInfo -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maximumAttempts") PendingActivityInfo
_x
in
if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
64)
((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingActivityInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime") PendingActivityInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingActivityInfo
PendingActivityInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingActivityInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'expirationTime")
PendingActivityInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Failure)
PendingActivityInfo
PendingActivityInfo
(Maybe Failure)
(Maybe Failure)
-> PendingActivityInfo -> Maybe Failure
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastFailure")
PendingActivityInfo
_x
of
Maybe Failure
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Failure
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Failure
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text PendingActivityInfo PendingActivityInfo Text Text
-> PendingActivityInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"lastWorkerIdentity")
PendingActivityInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkerVersionStamp)
PendingActivityInfo
PendingActivityInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
-> PendingActivityInfo -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'lastWorkerVersionStamp")
PendingActivityInfo
_x
of
Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkerVersionStamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
122)
((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkerVersionStamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe PendingActivityInfo'AssignedBuildId)
PendingActivityInfo
PendingActivityInfo
(Maybe PendingActivityInfo'AssignedBuildId)
(Maybe PendingActivityInfo'AssignedBuildId)
-> PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'assignedBuildId")
PendingActivityInfo
_x
of
Maybe PendingActivityInfo'AssignedBuildId
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just (PendingActivityInfo'UseWorkflowBuildId Empty
v))
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
106)
((ByteString -> Builder)
-> (Empty -> ByteString) -> Empty -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Empty -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Empty
v)
(Prelude.Just (PendingActivityInfo'LastIndependentlyAssignedBuildId Text
v))
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
114)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet PendingActivityInfo PendingActivityInfo FieldSet FieldSet
-> PendingActivityInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
FoldLike
FieldSet PendingActivityInfo PendingActivityInfo FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PendingActivityInfo FieldSet
Data.ProtoLens.unknownFields
PendingActivityInfo
_x)))))))))))))))
instance Control.DeepSeq.NFData PendingActivityInfo where
rnf :: PendingActivityInfo -> ()
rnf
= \ PendingActivityInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> FieldSet
_PendingActivityInfo'_unknownFields PendingActivityInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Text
_PendingActivityInfo'activityId PendingActivityInfo
x__)
(Maybe ActivityType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe ActivityType
_PendingActivityInfo'activityType PendingActivityInfo
x__)
(PendingActivityState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> PendingActivityState
_PendingActivityInfo'state PendingActivityInfo
x__)
(Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe Payloads
_PendingActivityInfo'heartbeatDetails PendingActivityInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastHeartbeatTime PendingActivityInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'lastStartedTime PendingActivityInfo
x__)
(Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Int32
_PendingActivityInfo'attempt PendingActivityInfo
x__)
(Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Int32
_PendingActivityInfo'maximumAttempts PendingActivityInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'scheduledTime PendingActivityInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe Timestamp
_PendingActivityInfo'expirationTime PendingActivityInfo
x__)
(Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe Failure
_PendingActivityInfo'lastFailure PendingActivityInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Text
_PendingActivityInfo'lastWorkerIdentity PendingActivityInfo
x__)
(Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe WorkerVersionStamp
_PendingActivityInfo'lastWorkerVersionStamp
PendingActivityInfo
x__)
(Maybe PendingActivityInfo'AssignedBuildId -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingActivityInfo -> Maybe PendingActivityInfo'AssignedBuildId
_PendingActivityInfo'assignedBuildId PendingActivityInfo
x__)
()))))))))))))))
instance Control.DeepSeq.NFData PendingActivityInfo'AssignedBuildId where
rnf :: PendingActivityInfo'AssignedBuildId -> ()
rnf (PendingActivityInfo'UseWorkflowBuildId Empty
x__)
= Empty -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Empty
x__
rnf (PendingActivityInfo'LastIndependentlyAssignedBuildId Text
x__)
= Text -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf Text
x__
_PendingActivityInfo'UseWorkflowBuildId ::
Data.ProtoLens.Prism.Prism' PendingActivityInfo'AssignedBuildId Proto.Google.Protobuf.Empty.Empty
_PendingActivityInfo'UseWorkflowBuildId :: Prism' PendingActivityInfo'AssignedBuildId Empty
_PendingActivityInfo'UseWorkflowBuildId
= (Empty -> PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo'AssignedBuildId -> Maybe Empty)
-> Prism' PendingActivityInfo'AssignedBuildId Empty
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
Empty -> PendingActivityInfo'AssignedBuildId
PendingActivityInfo'UseWorkflowBuildId
(\ PendingActivityInfo'AssignedBuildId
p__
-> case PendingActivityInfo'AssignedBuildId
p__ of
(PendingActivityInfo'UseWorkflowBuildId Empty
p__val)
-> Empty -> Maybe Empty
forall a. a -> Maybe a
Prelude.Just Empty
p__val
PendingActivityInfo'AssignedBuildId
_otherwise -> Maybe Empty
forall a. Maybe a
Prelude.Nothing)
_PendingActivityInfo'LastIndependentlyAssignedBuildId ::
Data.ProtoLens.Prism.Prism' PendingActivityInfo'AssignedBuildId Data.Text.Text
_PendingActivityInfo'LastIndependentlyAssignedBuildId :: Prism' PendingActivityInfo'AssignedBuildId Text
_PendingActivityInfo'LastIndependentlyAssignedBuildId
= (Text -> PendingActivityInfo'AssignedBuildId)
-> (PendingActivityInfo'AssignedBuildId -> Maybe Text)
-> Prism' PendingActivityInfo'AssignedBuildId Text
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
Text -> PendingActivityInfo'AssignedBuildId
PendingActivityInfo'LastIndependentlyAssignedBuildId
(\ PendingActivityInfo'AssignedBuildId
p__
-> case PendingActivityInfo'AssignedBuildId
p__ of
(PendingActivityInfo'LastIndependentlyAssignedBuildId Text
p__val)
-> Text -> Maybe Text
forall a. a -> Maybe a
Prelude.Just Text
p__val
PendingActivityInfo'AssignedBuildId
_otherwise -> Maybe Text
forall a. Maybe a
Prelude.Nothing)
data PendingChildExecutionInfo
= PendingChildExecutionInfo'_constructor {PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'workflowId :: !Data.Text.Text,
PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'runId :: !Data.Text.Text,
PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'workflowTypeName :: !Data.Text.Text,
PendingChildExecutionInfo -> Int64
_PendingChildExecutionInfo'initiatedId :: !Data.Int.Int64,
PendingChildExecutionInfo -> ParentClosePolicy
_PendingChildExecutionInfo'parentClosePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.ParentClosePolicy,
PendingChildExecutionInfo -> FieldSet
_PendingChildExecutionInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
(PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool)
-> (PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool)
-> Eq PendingChildExecutionInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
== :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
$c/= :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
/= :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
Prelude.Eq, Eq PendingChildExecutionInfo
Eq PendingChildExecutionInfo =>
(PendingChildExecutionInfo
-> PendingChildExecutionInfo -> Ordering)
-> (PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool)
-> (PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool)
-> (PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool)
-> (PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool)
-> (PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo)
-> (PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo)
-> Ord PendingChildExecutionInfo
PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
PendingChildExecutionInfo -> PendingChildExecutionInfo -> Ordering
PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo
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 :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Ordering
compare :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Ordering
$c< :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
< :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
$c<= :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
<= :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
$c> :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
> :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
$c>= :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
>= :: PendingChildExecutionInfo -> PendingChildExecutionInfo -> Bool
$cmax :: PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo
max :: PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo
$cmin :: PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo
min :: PendingChildExecutionInfo
-> PendingChildExecutionInfo -> PendingChildExecutionInfo
Prelude.Ord)
instance Prelude.Show PendingChildExecutionInfo where
showsPrec :: Int -> PendingChildExecutionInfo -> ShowS
showsPrec Int
_ PendingChildExecutionInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(PendingChildExecutionInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PendingChildExecutionInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PendingChildExecutionInfo "workflowId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
fieldOf Proxy# "workflowId"
_
= ((Text -> f Text)
-> PendingChildExecutionInfo -> f PendingChildExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingChildExecutionInfo -> Text)
-> (PendingChildExecutionInfo -> Text -> PendingChildExecutionInfo)
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'workflowId
(\ PendingChildExecutionInfo
x__ Text
y__ -> PendingChildExecutionInfo
x__ {_PendingChildExecutionInfo'workflowId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingChildExecutionInfo "runId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
fieldOf Proxy# "runId"
_
= ((Text -> f Text)
-> PendingChildExecutionInfo -> f PendingChildExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingChildExecutionInfo -> Text)
-> (PendingChildExecutionInfo -> Text -> PendingChildExecutionInfo)
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'runId
(\ PendingChildExecutionInfo
x__ Text
y__ -> PendingChildExecutionInfo
x__ {_PendingChildExecutionInfo'runId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingChildExecutionInfo "workflowTypeName" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTypeName"
-> (Text -> f Text)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
fieldOf Proxy# "workflowTypeName"
_
= ((Text -> f Text)
-> PendingChildExecutionInfo -> f PendingChildExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingChildExecutionInfo -> Text)
-> (PendingChildExecutionInfo -> Text -> PendingChildExecutionInfo)
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'workflowTypeName
(\ PendingChildExecutionInfo
x__ Text
y__
-> PendingChildExecutionInfo
x__ {_PendingChildExecutionInfo'workflowTypeName = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingChildExecutionInfo "initiatedId" Data.Int.Int64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedId"
-> (Int64 -> f Int64)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
fieldOf Proxy# "initiatedId"
_
= ((Int64 -> f Int64)
-> PendingChildExecutionInfo -> f PendingChildExecutionInfo)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingChildExecutionInfo -> Int64)
-> (PendingChildExecutionInfo
-> Int64 -> PendingChildExecutionInfo)
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingChildExecutionInfo -> Int64
_PendingChildExecutionInfo'initiatedId
(\ PendingChildExecutionInfo
x__ Int64
y__ -> PendingChildExecutionInfo
x__ {_PendingChildExecutionInfo'initiatedId = y__}))
(Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingChildExecutionInfo "parentClosePolicy" Proto.Temporal.Api.Enums.V1.Workflow.ParentClosePolicy where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentClosePolicy"
-> (ParentClosePolicy -> f ParentClosePolicy)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
fieldOf Proxy# "parentClosePolicy"
_
= ((ParentClosePolicy -> f ParentClosePolicy)
-> PendingChildExecutionInfo -> f PendingChildExecutionInfo)
-> ((ParentClosePolicy -> f ParentClosePolicy)
-> ParentClosePolicy -> f ParentClosePolicy)
-> (ParentClosePolicy -> f ParentClosePolicy)
-> PendingChildExecutionInfo
-> f PendingChildExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingChildExecutionInfo -> ParentClosePolicy)
-> (PendingChildExecutionInfo
-> ParentClosePolicy -> PendingChildExecutionInfo)
-> Lens
PendingChildExecutionInfo
PendingChildExecutionInfo
ParentClosePolicy
ParentClosePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingChildExecutionInfo -> ParentClosePolicy
_PendingChildExecutionInfo'parentClosePolicy
(\ PendingChildExecutionInfo
x__ ParentClosePolicy
y__
-> PendingChildExecutionInfo
x__ {_PendingChildExecutionInfo'parentClosePolicy = y__}))
(ParentClosePolicy -> f ParentClosePolicy)
-> ParentClosePolicy -> f ParentClosePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PendingChildExecutionInfo where
messageName :: Proxy PendingChildExecutionInfo -> Text
messageName Proxy PendingChildExecutionInfo
_
= String -> Text
Data.Text.pack
String
"temporal.api.workflow.v1.PendingChildExecutionInfo"
packedMessageDescriptor :: Proxy PendingChildExecutionInfo -> ByteString
packedMessageDescriptor Proxy PendingChildExecutionInfo
_
= ByteString
"\n\
\\EMPendingChildExecutionInfo\DC2\US\n\
\\vworkflow_id\CAN\SOH \SOH(\tR\n\
\workflowId\DC2\NAK\n\
\\ACKrun_id\CAN\STX \SOH(\tR\ENQrunId\DC2,\n\
\\DC2workflow_type_name\CAN\ETX \SOH(\tR\DLEworkflowTypeName\DC2!\n\
\\finitiated_id\CAN\EOT \SOH(\ETXR\vinitiatedId\DC2X\n\
\\DC3parent_close_policy\CAN\ENQ \SOH(\SO2(.temporal.api.enums.v1.ParentClosePolicyR\DC1parentClosePolicy"
packedFileDescriptor :: Proxy PendingChildExecutionInfo -> ByteString
packedFileDescriptor Proxy PendingChildExecutionInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor PendingChildExecutionInfo)
fieldsByTag
= let
workflowId__field_descriptor :: FieldDescriptor PendingChildExecutionInfo
workflowId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingChildExecutionInfo Text
-> FieldDescriptor PendingChildExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Text Text
-> FieldAccessor PendingChildExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowId")) ::
Data.ProtoLens.FieldDescriptor PendingChildExecutionInfo
runId__field_descriptor :: FieldDescriptor PendingChildExecutionInfo
runId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingChildExecutionInfo Text
-> FieldDescriptor PendingChildExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"run_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Text Text
-> FieldAccessor PendingChildExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
Data.ProtoLens.FieldDescriptor PendingChildExecutionInfo
workflowTypeName__field_descriptor :: FieldDescriptor PendingChildExecutionInfo
workflowTypeName__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingChildExecutionInfo Text
-> FieldDescriptor PendingChildExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_type_name"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Text Text
-> FieldAccessor PendingChildExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowTypeName")) ::
Data.ProtoLens.FieldDescriptor PendingChildExecutionInfo
initiatedId__field_descriptor :: FieldDescriptor PendingChildExecutionInfo
initiatedId__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor PendingChildExecutionInfo Int64
-> FieldDescriptor PendingChildExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"initiated_id"
(ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(WireDefault Int64
-> Lens
PendingChildExecutionInfo PendingChildExecutionInfo Int64 Int64
-> FieldAccessor PendingChildExecutionInfo Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"initiatedId")) ::
Data.ProtoLens.FieldDescriptor PendingChildExecutionInfo
parentClosePolicy__field_descriptor :: FieldDescriptor PendingChildExecutionInfo
parentClosePolicy__field_descriptor
= String
-> FieldTypeDescriptor ParentClosePolicy
-> FieldAccessor PendingChildExecutionInfo ParentClosePolicy
-> FieldDescriptor PendingChildExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"parent_close_policy"
(ScalarField ParentClosePolicy
-> FieldTypeDescriptor ParentClosePolicy
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ParentClosePolicy
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.ParentClosePolicy)
(WireDefault ParentClosePolicy
-> Lens
PendingChildExecutionInfo
PendingChildExecutionInfo
ParentClosePolicy
ParentClosePolicy
-> FieldAccessor PendingChildExecutionInfo ParentClosePolicy
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault ParentClosePolicy
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"parentClosePolicy")) ::
Data.ProtoLens.FieldDescriptor PendingChildExecutionInfo
in
[(Tag, FieldDescriptor PendingChildExecutionInfo)]
-> Map Tag (FieldDescriptor PendingChildExecutionInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PendingChildExecutionInfo
workflowId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PendingChildExecutionInfo
runId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PendingChildExecutionInfo
workflowTypeName__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PendingChildExecutionInfo
initiatedId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PendingChildExecutionInfo
parentClosePolicy__field_descriptor)]
unknownFields :: Lens' PendingChildExecutionInfo FieldSet
unknownFields
= (PendingChildExecutionInfo -> FieldSet)
-> (PendingChildExecutionInfo
-> FieldSet -> PendingChildExecutionInfo)
-> Lens' PendingChildExecutionInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingChildExecutionInfo -> FieldSet
_PendingChildExecutionInfo'_unknownFields
(\ PendingChildExecutionInfo
x__ FieldSet
y__
-> PendingChildExecutionInfo
x__ {_PendingChildExecutionInfo'_unknownFields = y__})
defMessage :: PendingChildExecutionInfo
defMessage
= PendingChildExecutionInfo'_constructor
{_PendingChildExecutionInfo'workflowId :: Text
_PendingChildExecutionInfo'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingChildExecutionInfo'runId :: Text
_PendingChildExecutionInfo'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingChildExecutionInfo'workflowTypeName :: Text
_PendingChildExecutionInfo'workflowTypeName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingChildExecutionInfo'initiatedId :: Int64
_PendingChildExecutionInfo'initiatedId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingChildExecutionInfo'parentClosePolicy :: ParentClosePolicy
_PendingChildExecutionInfo'parentClosePolicy = ParentClosePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingChildExecutionInfo'_unknownFields :: FieldSet
_PendingChildExecutionInfo'_unknownFields = []}
parseMessage :: Parser PendingChildExecutionInfo
parseMessage
= let
loop ::
PendingChildExecutionInfo
-> Data.ProtoLens.Encoding.Bytes.Parser PendingChildExecutionInfo
loop :: PendingChildExecutionInfo -> Parser PendingChildExecutionInfo
loop PendingChildExecutionInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"workflow_id"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
Word64
18
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"run_id"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
Word64
26
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"workflow_type_name"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowTypeName") y x)
Word64
32
-> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"initiated_id"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"initiatedId") y x)
Word64
40
-> do y <- Parser ParentClosePolicy -> String -> Parser ParentClosePolicy
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> ParentClosePolicy)
-> Parser Int -> Parser ParentClosePolicy
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> ParentClosePolicy
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"parent_close_policy"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"parentClosePolicy") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser PendingChildExecutionInfo
-> String -> Parser PendingChildExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do PendingChildExecutionInfo -> Parser PendingChildExecutionInfo
loop PendingChildExecutionInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PendingChildExecutionInfo"
buildMessage :: PendingChildExecutionInfo -> Builder
buildMessage
= \ PendingChildExecutionInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike
Text PendingChildExecutionInfo PendingChildExecutionInfo Text Text
-> PendingChildExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowId") PendingChildExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike
Text PendingChildExecutionInfo PendingChildExecutionInfo Text Text
-> PendingChildExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") PendingChildExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike
Text PendingChildExecutionInfo PendingChildExecutionInfo Text Text
-> PendingChildExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"workflowTypeName") PendingChildExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int64
_v
= FoldLike
Int64
PendingChildExecutionInfo
PendingChildExecutionInfo
Int64
Int64
-> PendingChildExecutionInfo -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"initiatedId") PendingChildExecutionInfo
_x
in
if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
32)
((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: ParentClosePolicy
_v
= FoldLike
ParentClosePolicy
PendingChildExecutionInfo
PendingChildExecutionInfo
ParentClosePolicy
ParentClosePolicy
-> PendingChildExecutionInfo -> ParentClosePolicy
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"parentClosePolicy") PendingChildExecutionInfo
_x
in
if ParentClosePolicy -> ParentClosePolicy -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ParentClosePolicy
_v ParentClosePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
((Int -> Builder)
-> (ParentClosePolicy -> Int) -> ParentClosePolicy -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
ParentClosePolicy -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ParentClosePolicy
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
PendingChildExecutionInfo
PendingChildExecutionInfo
FieldSet
FieldSet
-> PendingChildExecutionInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
PendingChildExecutionInfo
PendingChildExecutionInfo
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PendingChildExecutionInfo FieldSet
Data.ProtoLens.unknownFields PendingChildExecutionInfo
_x))))))
instance Control.DeepSeq.NFData PendingChildExecutionInfo where
rnf :: PendingChildExecutionInfo -> ()
rnf
= \ PendingChildExecutionInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingChildExecutionInfo -> FieldSet
_PendingChildExecutionInfo'_unknownFields PendingChildExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'workflowId PendingChildExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'runId PendingChildExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingChildExecutionInfo -> Text
_PendingChildExecutionInfo'workflowTypeName PendingChildExecutionInfo
x__)
(Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingChildExecutionInfo -> Int64
_PendingChildExecutionInfo'initiatedId PendingChildExecutionInfo
x__)
(ParentClosePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingChildExecutionInfo -> ParentClosePolicy
_PendingChildExecutionInfo'parentClosePolicy PendingChildExecutionInfo
x__) ())))))
data PendingNexusOperationInfo
= PendingNexusOperationInfo'_constructor {PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'endpoint :: !Data.Text.Text,
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'service :: !Data.Text.Text,
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'operation :: !Data.Text.Text,
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'operationId :: !Data.Text.Text,
PendingNexusOperationInfo -> Maybe Duration
_PendingNexusOperationInfo'scheduleToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'scheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingNexusOperationInfo -> PendingNexusOperationState
_PendingNexusOperationInfo'state :: !Proto.Temporal.Api.Enums.V1.Common.PendingNexusOperationState,
PendingNexusOperationInfo -> Int32
_PendingNexusOperationInfo'attempt :: !Data.Int.Int32,
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'lastAttemptCompleteTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingNexusOperationInfo -> Maybe Failure
_PendingNexusOperationInfo'lastAttemptFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'nextAttemptScheduleTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingNexusOperationInfo -> Maybe NexusOperationCancellationInfo
_PendingNexusOperationInfo'cancellationInfo :: !(Prelude.Maybe NexusOperationCancellationInfo),
PendingNexusOperationInfo -> FieldSet
_PendingNexusOperationInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
(PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool)
-> (PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool)
-> Eq PendingNexusOperationInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
== :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
$c/= :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
/= :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
Prelude.Eq, Eq PendingNexusOperationInfo
Eq PendingNexusOperationInfo =>
(PendingNexusOperationInfo
-> PendingNexusOperationInfo -> Ordering)
-> (PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool)
-> (PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool)
-> (PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool)
-> (PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool)
-> (PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo)
-> (PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo)
-> Ord PendingNexusOperationInfo
PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
PendingNexusOperationInfo -> PendingNexusOperationInfo -> Ordering
PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo
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 :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Ordering
compare :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Ordering
$c< :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
< :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
$c<= :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
<= :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
$c> :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
> :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
$c>= :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
>= :: PendingNexusOperationInfo -> PendingNexusOperationInfo -> Bool
$cmax :: PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo
max :: PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo
$cmin :: PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo
min :: PendingNexusOperationInfo
-> PendingNexusOperationInfo -> PendingNexusOperationInfo
Prelude.Ord)
instance Prelude.Show PendingNexusOperationInfo where
showsPrec :: Int -> PendingNexusOperationInfo -> ShowS
showsPrec Int
_ PendingNexusOperationInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(PendingNexusOperationInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PendingNexusOperationInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "endpoint" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "endpoint"
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "endpoint"
_
= ((Text -> f Text)
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Text)
-> (PendingNexusOperationInfo -> Text -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'endpoint
(\ PendingNexusOperationInfo
x__ Text
y__ -> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'endpoint = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "service" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "service"
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "service"
_
= ((Text -> f Text)
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Text)
-> (PendingNexusOperationInfo -> Text -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'service
(\ PendingNexusOperationInfo
x__ Text
y__ -> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'service = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "operation" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operation"
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "operation"
_
= ((Text -> f Text)
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Text)
-> (PendingNexusOperationInfo -> Text -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'operation
(\ PendingNexusOperationInfo
x__ Text
y__ -> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'operation = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "operationId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operationId"
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "operationId"
_
= ((Text -> f Text)
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Text)
-> (PendingNexusOperationInfo -> Text -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'operationId
(\ PendingNexusOperationInfo
x__ Text
y__ -> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'operationId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "scheduleToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToCloseTimeout"
-> (Duration -> f Duration)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "scheduleToCloseTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Duration)
-> (PendingNexusOperationInfo
-> Maybe Duration -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Duration
_PendingNexusOperationInfo'scheduleToCloseTimeout
(\ PendingNexusOperationInfo
x__ Maybe Duration
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'scheduleToCloseTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "maybe'scheduleToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "maybe'scheduleToCloseTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Duration)
-> (PendingNexusOperationInfo
-> Maybe Duration -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Duration
_PendingNexusOperationInfo'scheduleToCloseTimeout
(\ PendingNexusOperationInfo
x__ Maybe Duration
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'scheduleToCloseTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "scheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledTime"
-> (Timestamp -> f Timestamp)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "scheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Timestamp)
-> (PendingNexusOperationInfo
-> Maybe Timestamp -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'scheduledTime
(\ PendingNexusOperationInfo
x__ Maybe Timestamp
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'scheduledTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "maybe'scheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "maybe'scheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Timestamp)
-> (PendingNexusOperationInfo
-> Maybe Timestamp -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'scheduledTime
(\ PendingNexusOperationInfo
x__ Maybe Timestamp
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'scheduledTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "state" Proto.Temporal.Api.Enums.V1.Common.PendingNexusOperationState where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "state"
-> (PendingNexusOperationState -> f PendingNexusOperationState)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "state"
_
= ((PendingNexusOperationState -> f PendingNexusOperationState)
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((PendingNexusOperationState -> f PendingNexusOperationState)
-> PendingNexusOperationState -> f PendingNexusOperationState)
-> (PendingNexusOperationState -> f PendingNexusOperationState)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> PendingNexusOperationState)
-> (PendingNexusOperationInfo
-> PendingNexusOperationState -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
PendingNexusOperationState
PendingNexusOperationState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> PendingNexusOperationState
_PendingNexusOperationInfo'state
(\ PendingNexusOperationInfo
x__ PendingNexusOperationState
y__ -> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'state = y__}))
(PendingNexusOperationState -> f PendingNexusOperationState)
-> PendingNexusOperationState -> f PendingNexusOperationState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "attempt" Data.Int.Int32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "attempt"
_
= ((Int32 -> f Int32)
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Int32)
-> (PendingNexusOperationInfo
-> Int32 -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Int32
_PendingNexusOperationInfo'attempt
(\ PendingNexusOperationInfo
x__ Int32
y__ -> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'attempt = y__}))
(Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "lastAttemptCompleteTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastAttemptCompleteTime"
-> (Timestamp -> f Timestamp)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "lastAttemptCompleteTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Timestamp)
-> (PendingNexusOperationInfo
-> Maybe Timestamp -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'lastAttemptCompleteTime
(\ PendingNexusOperationInfo
x__ Maybe Timestamp
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'lastAttemptCompleteTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "maybe'lastAttemptCompleteTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastAttemptCompleteTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "maybe'lastAttemptCompleteTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Timestamp)
-> (PendingNexusOperationInfo
-> Maybe Timestamp -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'lastAttemptCompleteTime
(\ PendingNexusOperationInfo
x__ Maybe Timestamp
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'lastAttemptCompleteTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "lastAttemptFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastAttemptFailure"
-> (Failure -> f Failure)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "lastAttemptFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Failure)
-> (PendingNexusOperationInfo
-> Maybe Failure -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Failure)
(Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Failure
_PendingNexusOperationInfo'lastAttemptFailure
(\ PendingNexusOperationInfo
x__ Maybe Failure
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'lastAttemptFailure = y__}))
(Failure -> Lens' (Maybe Failure) Failure
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Failure
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "maybe'lastAttemptFailure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastAttemptFailure"
-> (Maybe Failure -> f (Maybe Failure))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "maybe'lastAttemptFailure"
_
= ((Maybe Failure -> f (Maybe Failure))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Failure)
-> (PendingNexusOperationInfo
-> Maybe Failure -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Failure)
(Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Failure
_PendingNexusOperationInfo'lastAttemptFailure
(\ PendingNexusOperationInfo
x__ Maybe Failure
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'lastAttemptFailure = y__}))
(Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "nextAttemptScheduleTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nextAttemptScheduleTime"
-> (Timestamp -> f Timestamp)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "nextAttemptScheduleTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Timestamp)
-> (PendingNexusOperationInfo
-> Maybe Timestamp -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'nextAttemptScheduleTime
(\ PendingNexusOperationInfo
x__ Maybe Timestamp
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'nextAttemptScheduleTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "maybe'nextAttemptScheduleTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nextAttemptScheduleTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "maybe'nextAttemptScheduleTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe Timestamp)
-> (PendingNexusOperationInfo
-> Maybe Timestamp -> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'nextAttemptScheduleTime
(\ PendingNexusOperationInfo
x__ Maybe Timestamp
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'nextAttemptScheduleTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "cancellationInfo" NexusOperationCancellationInfo where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cancellationInfo"
-> (NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "cancellationInfo"
_
= ((Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> (NexusOperationCancellationInfo
-> f NexusOperationCancellationInfo)
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe NexusOperationCancellationInfo)
-> (PendingNexusOperationInfo
-> Maybe NexusOperationCancellationInfo
-> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe NexusOperationCancellationInfo)
(Maybe NexusOperationCancellationInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe NexusOperationCancellationInfo
_PendingNexusOperationInfo'cancellationInfo
(\ PendingNexusOperationInfo
x__ Maybe NexusOperationCancellationInfo
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'cancellationInfo = y__}))
(NexusOperationCancellationInfo
-> Lens'
(Maybe NexusOperationCancellationInfo)
NexusOperationCancellationInfo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationCancellationInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingNexusOperationInfo "maybe'cancellationInfo" (Prelude.Maybe NexusOperationCancellationInfo) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'cancellationInfo"
-> (Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
fieldOf Proxy# "maybe'cancellationInfo"
_
= ((Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> PendingNexusOperationInfo -> f PendingNexusOperationInfo)
-> ((Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> (Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> PendingNexusOperationInfo
-> f PendingNexusOperationInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingNexusOperationInfo -> Maybe NexusOperationCancellationInfo)
-> (PendingNexusOperationInfo
-> Maybe NexusOperationCancellationInfo
-> PendingNexusOperationInfo)
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe NexusOperationCancellationInfo)
(Maybe NexusOperationCancellationInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> Maybe NexusOperationCancellationInfo
_PendingNexusOperationInfo'cancellationInfo
(\ PendingNexusOperationInfo
x__ Maybe NexusOperationCancellationInfo
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'cancellationInfo = y__}))
(Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo))
-> Maybe NexusOperationCancellationInfo
-> f (Maybe NexusOperationCancellationInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PendingNexusOperationInfo where
messageName :: Proxy PendingNexusOperationInfo -> Text
messageName Proxy PendingNexusOperationInfo
_
= String -> Text
Data.Text.pack
String
"temporal.api.workflow.v1.PendingNexusOperationInfo"
packedMessageDescriptor :: Proxy PendingNexusOperationInfo -> ByteString
packedMessageDescriptor Proxy PendingNexusOperationInfo
_
= ByteString
"\n\
\\EMPendingNexusOperationInfo\DC2\SUB\n\
\\bendpoint\CAN\SOH \SOH(\tR\bendpoint\DC2\CAN\n\
\\aservice\CAN\STX \SOH(\tR\aservice\DC2\FS\n\
\\toperation\CAN\ETX \SOH(\tR\toperation\DC2!\n\
\\foperation_id\CAN\EOT \SOH(\tR\voperationId\DC2T\n\
\\EMschedule_to_close_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2A\n\
\\SOscheduled_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2G\n\
\\ENQstate\CAN\a \SOH(\SO21.temporal.api.enums.v1.PendingNexusOperationStateR\ENQstate\DC2\CAN\n\
\\aattempt\CAN\b \SOH(\ENQR\aattempt\DC2W\n\
\\SUBlast_attempt_complete_time\CAN\t \SOH(\v2\SUB.google.protobuf.TimestampR\ETBlastAttemptCompleteTime\DC2R\n\
\\DC4last_attempt_failure\CAN\n\
\ \SOH(\v2 .temporal.api.failure.v1.FailureR\DC2lastAttemptFailure\DC2W\n\
\\SUBnext_attempt_schedule_time\CAN\v \SOH(\v2\SUB.google.protobuf.TimestampR\ETBnextAttemptScheduleTime\DC2e\n\
\\DC1cancellation_info\CAN\f \SOH(\v28.temporal.api.workflow.v1.NexusOperationCancellationInfoR\DLEcancellationInfo"
packedFileDescriptor :: Proxy PendingNexusOperationInfo -> ByteString
packedFileDescriptor Proxy PendingNexusOperationInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor PendingNexusOperationInfo)
fieldsByTag
= let
endpoint__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
endpoint__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingNexusOperationInfo Text
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"endpoint"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> FieldAccessor PendingNexusOperationInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"endpoint")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
service__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
service__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingNexusOperationInfo Text
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"service"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> FieldAccessor PendingNexusOperationInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"service")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
operation__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
operation__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingNexusOperationInfo Text
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"operation"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> FieldAccessor PendingNexusOperationInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operation")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
operationId__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
operationId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor PendingNexusOperationInfo Text
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"operation_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> FieldAccessor PendingNexusOperationInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operationId")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
scheduleToCloseTimeout__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
scheduleToCloseTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor PendingNexusOperationInfo Duration
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"schedule_to_close_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor PendingNexusOperationInfo Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToCloseTimeout")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
scheduledTime__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
scheduledTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingNexusOperationInfo Timestamp
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"scheduled_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingNexusOperationInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
state__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
state__field_descriptor
= String
-> FieldTypeDescriptor PendingNexusOperationState
-> FieldAccessor
PendingNexusOperationInfo PendingNexusOperationState
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"state"
(ScalarField PendingNexusOperationState
-> FieldTypeDescriptor PendingNexusOperationState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField PendingNexusOperationState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Common.PendingNexusOperationState)
(WireDefault PendingNexusOperationState
-> Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
PendingNexusOperationState
PendingNexusOperationState
-> FieldAccessor
PendingNexusOperationInfo PendingNexusOperationState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault PendingNexusOperationState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
attempt__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
attempt__field_descriptor
= String
-> FieldTypeDescriptor Int32
-> FieldAccessor PendingNexusOperationInfo Int32
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"attempt"
(ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(WireDefault Int32
-> Lens
PendingNexusOperationInfo PendingNexusOperationInfo Int32 Int32
-> FieldAccessor PendingNexusOperationInfo Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
lastAttemptCompleteTime__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
lastAttemptCompleteTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingNexusOperationInfo Timestamp
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_attempt_complete_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingNexusOperationInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptCompleteTime")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
lastAttemptFailure__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
lastAttemptFailure__field_descriptor
= String
-> FieldTypeDescriptor Failure
-> FieldAccessor PendingNexusOperationInfo Failure
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"last_attempt_failure"
(MessageOrGroup -> FieldTypeDescriptor Failure
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Failure.V1.Message.Failure)
(Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Failure)
(Maybe Failure)
-> FieldAccessor PendingNexusOperationInfo Failure
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'lastAttemptFailure")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
nextAttemptScheduleTime__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
nextAttemptScheduleTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingNexusOperationInfo Timestamp
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"next_attempt_schedule_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingNexusOperationInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'nextAttemptScheduleTime")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
cancellationInfo__field_descriptor :: FieldDescriptor PendingNexusOperationInfo
cancellationInfo__field_descriptor
= String
-> FieldTypeDescriptor NexusOperationCancellationInfo
-> FieldAccessor
PendingNexusOperationInfo NexusOperationCancellationInfo
-> FieldDescriptor PendingNexusOperationInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"cancellation_info"
(MessageOrGroup
-> FieldTypeDescriptor NexusOperationCancellationInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor NexusOperationCancellationInfo)
(Lens
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe NexusOperationCancellationInfo)
(Maybe NexusOperationCancellationInfo)
-> FieldAccessor
PendingNexusOperationInfo NexusOperationCancellationInfo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'cancellationInfo")) ::
Data.ProtoLens.FieldDescriptor PendingNexusOperationInfo
in
[(Tag, FieldDescriptor PendingNexusOperationInfo)]
-> Map Tag (FieldDescriptor PendingNexusOperationInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PendingNexusOperationInfo
endpoint__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PendingNexusOperationInfo
service__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PendingNexusOperationInfo
operation__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PendingNexusOperationInfo
operationId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PendingNexusOperationInfo
scheduleToCloseTimeout__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor PendingNexusOperationInfo
scheduledTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor PendingNexusOperationInfo
state__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor PendingNexusOperationInfo
attempt__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor PendingNexusOperationInfo
lastAttemptCompleteTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor PendingNexusOperationInfo
lastAttemptFailure__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor PendingNexusOperationInfo
nextAttemptScheduleTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor PendingNexusOperationInfo
cancellationInfo__field_descriptor)]
unknownFields :: Lens' PendingNexusOperationInfo FieldSet
unknownFields
= (PendingNexusOperationInfo -> FieldSet)
-> (PendingNexusOperationInfo
-> FieldSet -> PendingNexusOperationInfo)
-> Lens' PendingNexusOperationInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingNexusOperationInfo -> FieldSet
_PendingNexusOperationInfo'_unknownFields
(\ PendingNexusOperationInfo
x__ FieldSet
y__
-> PendingNexusOperationInfo
x__ {_PendingNexusOperationInfo'_unknownFields = y__})
defMessage :: PendingNexusOperationInfo
defMessage
= PendingNexusOperationInfo'_constructor
{_PendingNexusOperationInfo'endpoint :: Text
_PendingNexusOperationInfo'endpoint = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingNexusOperationInfo'service :: Text
_PendingNexusOperationInfo'service = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingNexusOperationInfo'operation :: Text
_PendingNexusOperationInfo'operation = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingNexusOperationInfo'operationId :: Text
_PendingNexusOperationInfo'operationId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingNexusOperationInfo'scheduleToCloseTimeout :: Maybe Duration
_PendingNexusOperationInfo'scheduleToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_PendingNexusOperationInfo'scheduledTime :: Maybe Timestamp
_PendingNexusOperationInfo'scheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingNexusOperationInfo'state :: PendingNexusOperationState
_PendingNexusOperationInfo'state = PendingNexusOperationState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingNexusOperationInfo'attempt :: Int32
_PendingNexusOperationInfo'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingNexusOperationInfo'lastAttemptCompleteTime :: Maybe Timestamp
_PendingNexusOperationInfo'lastAttemptCompleteTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingNexusOperationInfo'lastAttemptFailure :: Maybe Failure
_PendingNexusOperationInfo'lastAttemptFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
_PendingNexusOperationInfo'nextAttemptScheduleTime :: Maybe Timestamp
_PendingNexusOperationInfo'nextAttemptScheduleTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingNexusOperationInfo'cancellationInfo :: Maybe NexusOperationCancellationInfo
_PendingNexusOperationInfo'cancellationInfo = Maybe NexusOperationCancellationInfo
forall a. Maybe a
Prelude.Nothing,
_PendingNexusOperationInfo'_unknownFields :: FieldSet
_PendingNexusOperationInfo'_unknownFields = []}
parseMessage :: Parser PendingNexusOperationInfo
parseMessage
= let
loop ::
PendingNexusOperationInfo
-> Data.ProtoLens.Encoding.Bytes.Parser PendingNexusOperationInfo
loop :: PendingNexusOperationInfo -> Parser PendingNexusOperationInfo
loop PendingNexusOperationInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"endpoint"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"endpoint") y x)
Word64
18
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"service"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"service") y x)
Word64
26
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"operation"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"operation") y x)
Word64
34
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"operation_id"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"operationId") y x)
Word64
42
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"schedule_to_close_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"scheduleToCloseTimeout") y x)
Word64
50
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"scheduled_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"scheduledTime") y x)
Word64
56
-> do y <- Parser PendingNexusOperationState
-> String -> Parser PendingNexusOperationState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> PendingNexusOperationState)
-> Parser Int -> Parser PendingNexusOperationState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> PendingNexusOperationState
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"state"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x)
Word64
64
-> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"attempt"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
Word64
74
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_attempt_complete_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastAttemptCompleteTime") y x)
Word64
82
-> do y <- Parser Failure -> String -> Parser Failure
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"last_attempt_failure"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"lastAttemptFailure") y x)
Word64
90
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"next_attempt_schedule_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"nextAttemptScheduleTime") y x)
Word64
98
-> do y <- Parser NexusOperationCancellationInfo
-> String -> Parser NexusOperationCancellationInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"cancellation_info"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"cancellationInfo") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser PendingNexusOperationInfo
-> String -> Parser PendingNexusOperationInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do PendingNexusOperationInfo -> Parser PendingNexusOperationInfo
loop PendingNexusOperationInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PendingNexusOperationInfo"
buildMessage :: PendingNexusOperationInfo -> Builder
buildMessage
= \ PendingNexusOperationInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike
Text PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> PendingNexusOperationInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"endpoint") PendingNexusOperationInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike
Text PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> PendingNexusOperationInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"service") PendingNexusOperationInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike
Text PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> PendingNexusOperationInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operation") PendingNexusOperationInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike
Text PendingNexusOperationInfo PendingNexusOperationInfo Text Text
-> PendingNexusOperationInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"operationId") PendingNexusOperationInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Duration)
(Maybe Duration)
-> PendingNexusOperationInfo -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduleToCloseTimeout") PendingNexusOperationInfo
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingNexusOperationInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime") PendingNexusOperationInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: PendingNexusOperationState
_v = FoldLike
PendingNexusOperationState
PendingNexusOperationInfo
PendingNexusOperationInfo
PendingNexusOperationState
PendingNexusOperationState
-> PendingNexusOperationInfo -> PendingNexusOperationState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state") PendingNexusOperationInfo
_x
in
if PendingNexusOperationState -> PendingNexusOperationState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) PendingNexusOperationState
_v PendingNexusOperationState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
56)
((Int -> Builder)
-> (PendingNexusOperationState -> Int)
-> PendingNexusOperationState
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
PendingNexusOperationState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum PendingNexusOperationState
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int32
_v
= FoldLike
Int32
PendingNexusOperationInfo
PendingNexusOperationInfo
Int32
Int32
-> PendingNexusOperationInfo -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") PendingNexusOperationInfo
_x
in
if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
64)
((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int32
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingNexusOperationInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'lastAttemptCompleteTime")
PendingNexusOperationInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Failure)
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Failure)
(Maybe Failure)
-> PendingNexusOperationInfo -> Maybe Failure
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'lastAttemptFailure")
PendingNexusOperationInfo
_x
of
Maybe Failure
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Failure
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
((ByteString -> Builder)
-> (Failure -> ByteString) -> Failure -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Failure -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Failure
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingNexusOperationInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'nextAttemptScheduleTime")
PendingNexusOperationInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe NexusOperationCancellationInfo)
PendingNexusOperationInfo
PendingNexusOperationInfo
(Maybe NexusOperationCancellationInfo)
(Maybe NexusOperationCancellationInfo)
-> PendingNexusOperationInfo
-> Maybe NexusOperationCancellationInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'cancellationInfo")
PendingNexusOperationInfo
_x
of
Maybe NexusOperationCancellationInfo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just NexusOperationCancellationInfo
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
((ByteString -> Builder)
-> (NexusOperationCancellationInfo -> ByteString)
-> NexusOperationCancellationInfo
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
NexusOperationCancellationInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationCancellationInfo
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
PendingNexusOperationInfo
PendingNexusOperationInfo
FieldSet
FieldSet
-> PendingNexusOperationInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
FoldLike
FieldSet
PendingNexusOperationInfo
PendingNexusOperationInfo
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PendingNexusOperationInfo FieldSet
Data.ProtoLens.unknownFields PendingNexusOperationInfo
_x)))))))))))))
instance Control.DeepSeq.NFData PendingNexusOperationInfo where
rnf :: PendingNexusOperationInfo -> ()
rnf
= \ PendingNexusOperationInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> FieldSet
_PendingNexusOperationInfo'_unknownFields PendingNexusOperationInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'endpoint PendingNexusOperationInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'service PendingNexusOperationInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'operation PendingNexusOperationInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Text
_PendingNexusOperationInfo'operationId PendingNexusOperationInfo
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Maybe Duration
_PendingNexusOperationInfo'scheduleToCloseTimeout PendingNexusOperationInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'scheduledTime PendingNexusOperationInfo
x__)
(PendingNexusOperationState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> PendingNexusOperationState
_PendingNexusOperationInfo'state PendingNexusOperationInfo
x__)
(Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Int32
_PendingNexusOperationInfo'attempt PendingNexusOperationInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'lastAttemptCompleteTime PendingNexusOperationInfo
x__)
(Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Maybe Failure
_PendingNexusOperationInfo'lastAttemptFailure PendingNexusOperationInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Maybe Timestamp
_PendingNexusOperationInfo'nextAttemptScheduleTime
PendingNexusOperationInfo
x__)
(Maybe NexusOperationCancellationInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingNexusOperationInfo -> Maybe NexusOperationCancellationInfo
_PendingNexusOperationInfo'cancellationInfo PendingNexusOperationInfo
x__)
()))))))))))))
data PendingWorkflowTaskInfo
= PendingWorkflowTaskInfo'_constructor {PendingWorkflowTaskInfo -> PendingWorkflowTaskState
_PendingWorkflowTaskInfo'state :: !Proto.Temporal.Api.Enums.V1.Workflow.PendingWorkflowTaskState,
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'scheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'originalScheduledTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'startedTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
PendingWorkflowTaskInfo -> Int32
_PendingWorkflowTaskInfo'attempt :: !Data.Int.Int32,
PendingWorkflowTaskInfo -> FieldSet
_PendingWorkflowTaskInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
(PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool)
-> (PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool)
-> Eq PendingWorkflowTaskInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
== :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
$c/= :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
/= :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
Prelude.Eq, Eq PendingWorkflowTaskInfo
Eq PendingWorkflowTaskInfo =>
(PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Ordering)
-> (PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool)
-> (PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool)
-> (PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool)
-> (PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool)
-> (PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo)
-> (PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo)
-> Ord PendingWorkflowTaskInfo
PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Ordering
PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo
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 :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Ordering
compare :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Ordering
$c< :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
< :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
$c<= :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
<= :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
$c> :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
> :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
$c>= :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
>= :: PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo -> Bool
$cmax :: PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo
max :: PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo
$cmin :: PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo
min :: PendingWorkflowTaskInfo
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskInfo
Prelude.Ord)
instance Prelude.Show PendingWorkflowTaskInfo where
showsPrec :: Int -> PendingWorkflowTaskInfo -> ShowS
showsPrec Int
_ PendingWorkflowTaskInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(PendingWorkflowTaskInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort PendingWorkflowTaskInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "state" Proto.Temporal.Api.Enums.V1.Workflow.PendingWorkflowTaskState where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "state"
-> (PendingWorkflowTaskState -> f PendingWorkflowTaskState)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "state"
_
= ((PendingWorkflowTaskState -> f PendingWorkflowTaskState)
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((PendingWorkflowTaskState -> f PendingWorkflowTaskState)
-> PendingWorkflowTaskState -> f PendingWorkflowTaskState)
-> (PendingWorkflowTaskState -> f PendingWorkflowTaskState)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> PendingWorkflowTaskState)
-> (PendingWorkflowTaskInfo
-> PendingWorkflowTaskState -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
PendingWorkflowTaskState
PendingWorkflowTaskState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> PendingWorkflowTaskState
_PendingWorkflowTaskInfo'state
(\ PendingWorkflowTaskInfo
x__ PendingWorkflowTaskState
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'state = y__}))
(PendingWorkflowTaskState -> f PendingWorkflowTaskState)
-> PendingWorkflowTaskState -> f PendingWorkflowTaskState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "scheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledTime"
-> (Timestamp -> f Timestamp)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "scheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Maybe Timestamp)
-> (PendingWorkflowTaskInfo
-> Maybe Timestamp -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'scheduledTime
(\ PendingWorkflowTaskInfo
x__ Maybe Timestamp
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'scheduledTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "maybe'scheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "maybe'scheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Maybe Timestamp)
-> (PendingWorkflowTaskInfo
-> Maybe Timestamp -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'scheduledTime
(\ PendingWorkflowTaskInfo
x__ Maybe Timestamp
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'scheduledTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "originalScheduledTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "originalScheduledTime"
-> (Timestamp -> f Timestamp)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "originalScheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Maybe Timestamp)
-> (PendingWorkflowTaskInfo
-> Maybe Timestamp -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'originalScheduledTime
(\ PendingWorkflowTaskInfo
x__ Maybe Timestamp
y__
-> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'originalScheduledTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "maybe'originalScheduledTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'originalScheduledTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "maybe'originalScheduledTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Maybe Timestamp)
-> (PendingWorkflowTaskInfo
-> Maybe Timestamp -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'originalScheduledTime
(\ PendingWorkflowTaskInfo
x__ Maybe Timestamp
y__
-> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'originalScheduledTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "startedTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedTime"
-> (Timestamp -> f Timestamp)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "startedTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Maybe Timestamp)
-> (PendingWorkflowTaskInfo
-> Maybe Timestamp -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'startedTime
(\ PendingWorkflowTaskInfo
x__ Maybe Timestamp
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'startedTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "maybe'startedTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startedTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "maybe'startedTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Maybe Timestamp)
-> (PendingWorkflowTaskInfo
-> Maybe Timestamp -> PendingWorkflowTaskInfo)
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'startedTime
(\ PendingWorkflowTaskInfo
x__ Maybe Timestamp
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'startedTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField PendingWorkflowTaskInfo "attempt" Data.Int.Int32 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
fieldOf Proxy# "attempt"
_
= ((Int32 -> f Int32)
-> PendingWorkflowTaskInfo -> f PendingWorkflowTaskInfo)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> PendingWorkflowTaskInfo
-> f PendingWorkflowTaskInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((PendingWorkflowTaskInfo -> Int32)
-> (PendingWorkflowTaskInfo -> Int32 -> PendingWorkflowTaskInfo)
-> Lens PendingWorkflowTaskInfo PendingWorkflowTaskInfo Int32 Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> Int32
_PendingWorkflowTaskInfo'attempt
(\ PendingWorkflowTaskInfo
x__ Int32
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'attempt = y__}))
(Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message PendingWorkflowTaskInfo where
messageName :: Proxy PendingWorkflowTaskInfo -> Text
messageName Proxy PendingWorkflowTaskInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.PendingWorkflowTaskInfo"
packedMessageDescriptor :: Proxy PendingWorkflowTaskInfo -> ByteString
packedMessageDescriptor Proxy PendingWorkflowTaskInfo
_
= ByteString
"\n\
\\ETBPendingWorkflowTaskInfo\DC2E\n\
\\ENQstate\CAN\SOH \SOH(\SO2/.temporal.api.enums.v1.PendingWorkflowTaskStateR\ENQstate\DC2A\n\
\\SOscheduled_time\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2R\n\
\\ETBoriginal_scheduled_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\NAKoriginalScheduledTime\DC2=\n\
\\fstarted_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\vstartedTime\DC2\CAN\n\
\\aattempt\CAN\ENQ \SOH(\ENQR\aattempt"
packedFileDescriptor :: Proxy PendingWorkflowTaskInfo -> ByteString
packedFileDescriptor Proxy PendingWorkflowTaskInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor PendingWorkflowTaskInfo)
fieldsByTag
= let
state__field_descriptor :: FieldDescriptor PendingWorkflowTaskInfo
state__field_descriptor
= String
-> FieldTypeDescriptor PendingWorkflowTaskState
-> FieldAccessor PendingWorkflowTaskInfo PendingWorkflowTaskState
-> FieldDescriptor PendingWorkflowTaskInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"state"
(ScalarField PendingWorkflowTaskState
-> FieldTypeDescriptor PendingWorkflowTaskState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField PendingWorkflowTaskState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.PendingWorkflowTaskState)
(WireDefault PendingWorkflowTaskState
-> Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
PendingWorkflowTaskState
PendingWorkflowTaskState
-> FieldAccessor PendingWorkflowTaskInfo PendingWorkflowTaskState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault PendingWorkflowTaskState
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state")) ::
Data.ProtoLens.FieldDescriptor PendingWorkflowTaskInfo
scheduledTime__field_descriptor :: FieldDescriptor PendingWorkflowTaskInfo
scheduledTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingWorkflowTaskInfo Timestamp
-> FieldDescriptor PendingWorkflowTaskInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"scheduled_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingWorkflowTaskInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime")) ::
Data.ProtoLens.FieldDescriptor PendingWorkflowTaskInfo
originalScheduledTime__field_descriptor :: FieldDescriptor PendingWorkflowTaskInfo
originalScheduledTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingWorkflowTaskInfo Timestamp
-> FieldDescriptor PendingWorkflowTaskInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"original_scheduled_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingWorkflowTaskInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'originalScheduledTime")) ::
Data.ProtoLens.FieldDescriptor PendingWorkflowTaskInfo
startedTime__field_descriptor :: FieldDescriptor PendingWorkflowTaskInfo
startedTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor PendingWorkflowTaskInfo Timestamp
-> FieldDescriptor PendingWorkflowTaskInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"started_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor PendingWorkflowTaskInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startedTime")) ::
Data.ProtoLens.FieldDescriptor PendingWorkflowTaskInfo
attempt__field_descriptor :: FieldDescriptor PendingWorkflowTaskInfo
attempt__field_descriptor
= String
-> FieldTypeDescriptor Int32
-> FieldAccessor PendingWorkflowTaskInfo Int32
-> FieldDescriptor PendingWorkflowTaskInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"attempt"
(ScalarField Int32 -> FieldTypeDescriptor Int32
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int32
Data.ProtoLens.Int32Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int32)
(WireDefault Int32
-> Lens PendingWorkflowTaskInfo PendingWorkflowTaskInfo Int32 Int32
-> FieldAccessor PendingWorkflowTaskInfo Int32
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int32
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt")) ::
Data.ProtoLens.FieldDescriptor PendingWorkflowTaskInfo
in
[(Tag, FieldDescriptor PendingWorkflowTaskInfo)]
-> Map Tag (FieldDescriptor PendingWorkflowTaskInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor PendingWorkflowTaskInfo
state__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor PendingWorkflowTaskInfo
scheduledTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor PendingWorkflowTaskInfo
originalScheduledTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor PendingWorkflowTaskInfo
startedTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor PendingWorkflowTaskInfo
attempt__field_descriptor)]
unknownFields :: Lens' PendingWorkflowTaskInfo FieldSet
unknownFields
= (PendingWorkflowTaskInfo -> FieldSet)
-> (PendingWorkflowTaskInfo -> FieldSet -> PendingWorkflowTaskInfo)
-> Lens' PendingWorkflowTaskInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
PendingWorkflowTaskInfo -> FieldSet
_PendingWorkflowTaskInfo'_unknownFields
(\ PendingWorkflowTaskInfo
x__ FieldSet
y__ -> PendingWorkflowTaskInfo
x__ {_PendingWorkflowTaskInfo'_unknownFields = y__})
defMessage :: PendingWorkflowTaskInfo
defMessage
= PendingWorkflowTaskInfo'_constructor
{_PendingWorkflowTaskInfo'state :: PendingWorkflowTaskState
_PendingWorkflowTaskInfo'state = PendingWorkflowTaskState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingWorkflowTaskInfo'scheduledTime :: Maybe Timestamp
_PendingWorkflowTaskInfo'scheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingWorkflowTaskInfo'originalScheduledTime :: Maybe Timestamp
_PendingWorkflowTaskInfo'originalScheduledTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingWorkflowTaskInfo'startedTime :: Maybe Timestamp
_PendingWorkflowTaskInfo'startedTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_PendingWorkflowTaskInfo'attempt :: Int32
_PendingWorkflowTaskInfo'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_PendingWorkflowTaskInfo'_unknownFields :: FieldSet
_PendingWorkflowTaskInfo'_unknownFields = []}
parseMessage :: Parser PendingWorkflowTaskInfo
parseMessage
= let
loop ::
PendingWorkflowTaskInfo
-> Data.ProtoLens.Encoding.Bytes.Parser PendingWorkflowTaskInfo
loop :: PendingWorkflowTaskInfo -> Parser PendingWorkflowTaskInfo
loop PendingWorkflowTaskInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
8 -> do y <- Parser PendingWorkflowTaskState
-> String -> Parser PendingWorkflowTaskState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> PendingWorkflowTaskState)
-> Parser Int -> Parser PendingWorkflowTaskState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> PendingWorkflowTaskState
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"state"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"state") y x)
Word64
18
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"scheduled_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"scheduledTime") y x)
Word64
26
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"original_scheduled_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"originalScheduledTime") y x)
Word64
34
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"started_time"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"startedTime") y x)
Word64
40
-> do y <- Parser Int32 -> String -> Parser Int32
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int32) -> Parser Word64 -> Parser Int32
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int32
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"attempt"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"attempt") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser PendingWorkflowTaskInfo
-> String -> Parser PendingWorkflowTaskInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do PendingWorkflowTaskInfo -> Parser PendingWorkflowTaskInfo
loop PendingWorkflowTaskInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"PendingWorkflowTaskInfo"
buildMessage :: PendingWorkflowTaskInfo -> Builder
buildMessage
= \ PendingWorkflowTaskInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: PendingWorkflowTaskState
_v = FoldLike
PendingWorkflowTaskState
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
PendingWorkflowTaskState
PendingWorkflowTaskState
-> PendingWorkflowTaskInfo -> PendingWorkflowTaskState
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"state") PendingWorkflowTaskInfo
_x
in
if PendingWorkflowTaskState -> PendingWorkflowTaskState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) PendingWorkflowTaskState
_v PendingWorkflowTaskState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
8)
((Int -> Builder)
-> (PendingWorkflowTaskState -> Int)
-> PendingWorkflowTaskState
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
PendingWorkflowTaskState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum PendingWorkflowTaskState
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingWorkflowTaskInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'scheduledTime") PendingWorkflowTaskInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingWorkflowTaskInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'originalScheduledTime") PendingWorkflowTaskInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> PendingWorkflowTaskInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startedTime") PendingWorkflowTaskInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int32
_v = FoldLike
Int32 PendingWorkflowTaskInfo PendingWorkflowTaskInfo Int32 Int32
-> PendingWorkflowTaskInfo -> Int32
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"attempt") PendingWorkflowTaskInfo
_x
in
if Int32 -> Int32 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int32
_v Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
((Word64 -> Builder) -> (Int32 -> Word64) -> Int32 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int32 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Int32
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
FieldSet
FieldSet
-> PendingWorkflowTaskInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
PendingWorkflowTaskInfo
PendingWorkflowTaskInfo
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' PendingWorkflowTaskInfo FieldSet
Data.ProtoLens.unknownFields PendingWorkflowTaskInfo
_x))))))
instance Control.DeepSeq.NFData PendingWorkflowTaskInfo where
rnf :: PendingWorkflowTaskInfo -> ()
rnf
= \ PendingWorkflowTaskInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingWorkflowTaskInfo -> FieldSet
_PendingWorkflowTaskInfo'_unknownFields PendingWorkflowTaskInfo
x__)
(PendingWorkflowTaskState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingWorkflowTaskInfo -> PendingWorkflowTaskState
_PendingWorkflowTaskInfo'state PendingWorkflowTaskInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'scheduledTime PendingWorkflowTaskInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'originalScheduledTime PendingWorkflowTaskInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingWorkflowTaskInfo -> Maybe Timestamp
_PendingWorkflowTaskInfo'startedTime PendingWorkflowTaskInfo
x__)
(Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(PendingWorkflowTaskInfo -> Int32
_PendingWorkflowTaskInfo'attempt PendingWorkflowTaskInfo
x__) ())))))
data ResetPointInfo
= ResetPointInfo'_constructor {ResetPointInfo -> Text
_ResetPointInfo'buildId :: !Data.Text.Text,
ResetPointInfo -> Text
_ResetPointInfo'binaryChecksum :: !Data.Text.Text,
ResetPointInfo -> Text
_ResetPointInfo'runId :: !Data.Text.Text,
ResetPointInfo -> Int64
_ResetPointInfo'firstWorkflowTaskCompletedId :: !Data.Int.Int64,
ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'createTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'expireTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
ResetPointInfo -> Bool
_ResetPointInfo'resettable :: !Prelude.Bool,
ResetPointInfo -> FieldSet
_ResetPointInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (ResetPointInfo -> ResetPointInfo -> Bool
(ResetPointInfo -> ResetPointInfo -> Bool)
-> (ResetPointInfo -> ResetPointInfo -> Bool) -> Eq ResetPointInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResetPointInfo -> ResetPointInfo -> Bool
== :: ResetPointInfo -> ResetPointInfo -> Bool
$c/= :: ResetPointInfo -> ResetPointInfo -> Bool
/= :: ResetPointInfo -> ResetPointInfo -> Bool
Prelude.Eq, Eq ResetPointInfo
Eq ResetPointInfo =>
(ResetPointInfo -> ResetPointInfo -> Ordering)
-> (ResetPointInfo -> ResetPointInfo -> Bool)
-> (ResetPointInfo -> ResetPointInfo -> Bool)
-> (ResetPointInfo -> ResetPointInfo -> Bool)
-> (ResetPointInfo -> ResetPointInfo -> Bool)
-> (ResetPointInfo -> ResetPointInfo -> ResetPointInfo)
-> (ResetPointInfo -> ResetPointInfo -> ResetPointInfo)
-> Ord ResetPointInfo
ResetPointInfo -> ResetPointInfo -> Bool
ResetPointInfo -> ResetPointInfo -> Ordering
ResetPointInfo -> ResetPointInfo -> ResetPointInfo
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 :: ResetPointInfo -> ResetPointInfo -> Ordering
compare :: ResetPointInfo -> ResetPointInfo -> Ordering
$c< :: ResetPointInfo -> ResetPointInfo -> Bool
< :: ResetPointInfo -> ResetPointInfo -> Bool
$c<= :: ResetPointInfo -> ResetPointInfo -> Bool
<= :: ResetPointInfo -> ResetPointInfo -> Bool
$c> :: ResetPointInfo -> ResetPointInfo -> Bool
> :: ResetPointInfo -> ResetPointInfo -> Bool
$c>= :: ResetPointInfo -> ResetPointInfo -> Bool
>= :: ResetPointInfo -> ResetPointInfo -> Bool
$cmax :: ResetPointInfo -> ResetPointInfo -> ResetPointInfo
max :: ResetPointInfo -> ResetPointInfo -> ResetPointInfo
$cmin :: ResetPointInfo -> ResetPointInfo -> ResetPointInfo
min :: ResetPointInfo -> ResetPointInfo -> ResetPointInfo
Prelude.Ord)
instance Prelude.Show ResetPointInfo where
showsPrec :: Int -> ResetPointInfo -> ShowS
showsPrec Int
_ ResetPointInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(ResetPointInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResetPointInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResetPointInfo "buildId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildId"
-> (Text -> f Text) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "buildId"
_
= ((Text -> f Text) -> ResetPointInfo -> f ResetPointInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Text)
-> (ResetPointInfo -> Text -> ResetPointInfo)
-> Lens ResetPointInfo ResetPointInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Text
_ResetPointInfo'buildId
(\ ResetPointInfo
x__ Text
y__ -> ResetPointInfo
x__ {_ResetPointInfo'buildId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetPointInfo "binaryChecksum" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "binaryChecksum"
-> (Text -> f Text) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "binaryChecksum"
_
= ((Text -> f Text) -> ResetPointInfo -> f ResetPointInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Text)
-> (ResetPointInfo -> Text -> ResetPointInfo)
-> Lens ResetPointInfo ResetPointInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Text
_ResetPointInfo'binaryChecksum
(\ ResetPointInfo
x__ Text
y__ -> ResetPointInfo
x__ {_ResetPointInfo'binaryChecksum = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetPointInfo "runId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "runId"
-> (Text -> f Text) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "runId"
_
= ((Text -> f Text) -> ResetPointInfo -> f ResetPointInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Text)
-> (ResetPointInfo -> Text -> ResetPointInfo)
-> Lens ResetPointInfo ResetPointInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Text
_ResetPointInfo'runId
(\ ResetPointInfo
x__ Text
y__ -> ResetPointInfo
x__ {_ResetPointInfo'runId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetPointInfo "firstWorkflowTaskCompletedId" Data.Int.Int64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstWorkflowTaskCompletedId"
-> (Int64 -> f Int64) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "firstWorkflowTaskCompletedId"
_
= ((Int64 -> f Int64) -> ResetPointInfo -> f ResetPointInfo)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Int64)
-> (ResetPointInfo -> Int64 -> ResetPointInfo)
-> Lens ResetPointInfo ResetPointInfo Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Int64
_ResetPointInfo'firstWorkflowTaskCompletedId
(\ ResetPointInfo
x__ Int64
y__
-> ResetPointInfo
x__ {_ResetPointInfo'firstWorkflowTaskCompletedId = y__}))
(Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetPointInfo "createTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "createTime"
-> (Timestamp -> f Timestamp) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "createTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo -> f ResetPointInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Maybe Timestamp)
-> (ResetPointInfo -> Maybe Timestamp -> ResetPointInfo)
-> Lens
ResetPointInfo ResetPointInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'createTime
(\ ResetPointInfo
x__ Maybe Timestamp
y__ -> ResetPointInfo
x__ {_ResetPointInfo'createTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResetPointInfo "maybe'createTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'createTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo
-> f ResetPointInfo
fieldOf Proxy# "maybe'createTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo -> f ResetPointInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Maybe Timestamp)
-> (ResetPointInfo -> Maybe Timestamp -> ResetPointInfo)
-> Lens
ResetPointInfo ResetPointInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'createTime
(\ ResetPointInfo
x__ Maybe Timestamp
y__ -> ResetPointInfo
x__ {_ResetPointInfo'createTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetPointInfo "expireTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "expireTime"
-> (Timestamp -> f Timestamp) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "expireTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo -> f ResetPointInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Maybe Timestamp)
-> (ResetPointInfo -> Maybe Timestamp -> ResetPointInfo)
-> Lens
ResetPointInfo ResetPointInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'expireTime
(\ ResetPointInfo
x__ Maybe Timestamp
y__ -> ResetPointInfo
x__ {_ResetPointInfo'expireTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField ResetPointInfo "maybe'expireTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'expireTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo
-> f ResetPointInfo
fieldOf Proxy# "maybe'expireTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo -> f ResetPointInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Maybe Timestamp)
-> (ResetPointInfo -> Maybe Timestamp -> ResetPointInfo)
-> Lens
ResetPointInfo ResetPointInfo (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'expireTime
(\ ResetPointInfo
x__ Maybe Timestamp
y__ -> ResetPointInfo
x__ {_ResetPointInfo'expireTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ResetPointInfo "resettable" Prelude.Bool where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "resettable"
-> (Bool -> f Bool) -> ResetPointInfo -> f ResetPointInfo
fieldOf Proxy# "resettable"
_
= ((Bool -> f Bool) -> ResetPointInfo -> f ResetPointInfo)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ResetPointInfo
-> f ResetPointInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPointInfo -> Bool)
-> (ResetPointInfo -> Bool -> ResetPointInfo)
-> Lens ResetPointInfo ResetPointInfo Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> Bool
_ResetPointInfo'resettable
(\ ResetPointInfo
x__ Bool
y__ -> ResetPointInfo
x__ {_ResetPointInfo'resettable = y__}))
(Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResetPointInfo where
messageName :: Proxy ResetPointInfo -> Text
messageName Proxy ResetPointInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.ResetPointInfo"
packedMessageDescriptor :: Proxy ResetPointInfo -> ByteString
packedMessageDescriptor Proxy ResetPointInfo
_
= ByteString
"\n\
\\SOResetPointInfo\DC2\EM\n\
\\bbuild_id\CAN\a \SOH(\tR\abuildId\DC2'\n\
\\SIbinary_checksum\CAN\SOH \SOH(\tR\SObinaryChecksum\DC2\NAK\n\
\\ACKrun_id\CAN\STX \SOH(\tR\ENQrunId\DC2F\n\
\ first_workflow_task_completed_id\CAN\ETX \SOH(\ETXR\FSfirstWorkflowTaskCompletedId\DC2;\n\
\\vcreate_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\n\
\createTime\DC2;\n\
\\vexpire_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\n\
\expireTime\DC2\RS\n\
\\n\
\resettable\CAN\ACK \SOH(\bR\n\
\resettable"
packedFileDescriptor :: Proxy ResetPointInfo -> ByteString
packedFileDescriptor Proxy ResetPointInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor ResetPointInfo)
fieldsByTag
= let
buildId__field_descriptor :: FieldDescriptor ResetPointInfo
buildId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetPointInfo Text
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"build_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens ResetPointInfo ResetPointInfo Text Text
-> FieldAccessor ResetPointInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildId")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
binaryChecksum__field_descriptor :: FieldDescriptor ResetPointInfo
binaryChecksum__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetPointInfo Text
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"binary_checksum"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens ResetPointInfo ResetPointInfo Text Text
-> FieldAccessor ResetPointInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
runId__field_descriptor :: FieldDescriptor ResetPointInfo
runId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor ResetPointInfo Text
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"run_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens ResetPointInfo ResetPointInfo Text Text
-> FieldAccessor ResetPointInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
firstWorkflowTaskCompletedId__field_descriptor :: FieldDescriptor ResetPointInfo
firstWorkflowTaskCompletedId__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor ResetPointInfo Int64
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"first_workflow_task_completed_id"
(ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(WireDefault Int64
-> Lens ResetPointInfo ResetPointInfo Int64 Int64
-> FieldAccessor ResetPointInfo Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstWorkflowTaskCompletedId")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
createTime__field_descriptor :: FieldDescriptor ResetPointInfo
createTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ResetPointInfo Timestamp
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"create_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
ResetPointInfo ResetPointInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor ResetPointInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'createTime")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
expireTime__field_descriptor :: FieldDescriptor ResetPointInfo
expireTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor ResetPointInfo Timestamp
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"expire_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
ResetPointInfo ResetPointInfo (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor ResetPointInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'expireTime")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
resettable__field_descriptor :: FieldDescriptor ResetPointInfo
resettable__field_descriptor
= String
-> FieldTypeDescriptor Bool
-> FieldAccessor ResetPointInfo Bool
-> FieldDescriptor ResetPointInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"resettable"
(ScalarField Bool -> FieldTypeDescriptor Bool
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Bool
Data.ProtoLens.BoolField ::
Data.ProtoLens.FieldTypeDescriptor Prelude.Bool)
(WireDefault Bool
-> Lens ResetPointInfo ResetPointInfo Bool Bool
-> FieldAccessor ResetPointInfo Bool
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Bool
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resettable")) ::
Data.ProtoLens.FieldDescriptor ResetPointInfo
in
[(Tag, FieldDescriptor ResetPointInfo)]
-> Map Tag (FieldDescriptor ResetPointInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ResetPointInfo
buildId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResetPointInfo
binaryChecksum__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ResetPointInfo
runId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3,
FieldDescriptor ResetPointInfo
firstWorkflowTaskCompletedId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ResetPointInfo
createTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ResetPointInfo
expireTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ResetPointInfo
resettable__field_descriptor)]
unknownFields :: Lens' ResetPointInfo FieldSet
unknownFields
= (ResetPointInfo -> FieldSet)
-> (ResetPointInfo -> FieldSet -> ResetPointInfo)
-> Lens' ResetPointInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPointInfo -> FieldSet
_ResetPointInfo'_unknownFields
(\ ResetPointInfo
x__ FieldSet
y__ -> ResetPointInfo
x__ {_ResetPointInfo'_unknownFields = y__})
defMessage :: ResetPointInfo
defMessage
= ResetPointInfo'_constructor
{_ResetPointInfo'buildId :: Text
_ResetPointInfo'buildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ResetPointInfo'binaryChecksum :: Text
_ResetPointInfo'binaryChecksum = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ResetPointInfo'runId :: Text
_ResetPointInfo'runId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ResetPointInfo'firstWorkflowTaskCompletedId :: Int64
_ResetPointInfo'firstWorkflowTaskCompletedId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ResetPointInfo'createTime :: Maybe Timestamp
_ResetPointInfo'createTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_ResetPointInfo'expireTime :: Maybe Timestamp
_ResetPointInfo'expireTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_ResetPointInfo'resettable :: Bool
_ResetPointInfo'resettable = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_ResetPointInfo'_unknownFields :: FieldSet
_ResetPointInfo'_unknownFields = []}
parseMessage :: Parser ResetPointInfo
parseMessage
= let
loop ::
ResetPointInfo
-> Data.ProtoLens.Encoding.Bytes.Parser ResetPointInfo
loop :: ResetPointInfo -> Parser ResetPointInfo
loop ResetPointInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
58
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"build_id"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"buildId") y x)
Word64
10
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"binary_checksum"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"binaryChecksum") y x)
Word64
18
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"run_id"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"runId") y x)
Word64
24
-> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"first_workflow_task_completed_id"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"firstWorkflowTaskCompletedId") y
x)
Word64
34
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"create_time"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"createTime") y x)
Word64
42
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"expire_time"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"expireTime") y x)
Word64
48
-> do y <- Parser Bool -> String -> Parser Bool
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Bool) -> Parser Word64 -> Parser Bool
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
(Word64 -> Word64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude./=) Word64
0) Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"resettable"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"resettable") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser ResetPointInfo -> String -> Parser ResetPointInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do ResetPointInfo -> Parser ResetPointInfo
loop ResetPointInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"ResetPointInfo"
buildMessage :: ResetPointInfo -> Builder
buildMessage
= \ ResetPointInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text ResetPointInfo ResetPointInfo Text Text
-> ResetPointInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"buildId") ResetPointInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text ResetPointInfo ResetPointInfo Text Text
-> ResetPointInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"binaryChecksum") ResetPointInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v = FoldLike Text ResetPointInfo ResetPointInfo Text Text
-> ResetPointInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"runId") ResetPointInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int64
_v
= FoldLike Int64 ResetPointInfo ResetPointInfo Int64 Int64
-> ResetPointInfo -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"firstWorkflowTaskCompletedId") ResetPointInfo
_x
in
if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
24)
((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
ResetPointInfo
ResetPointInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> ResetPointInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'createTime") ResetPointInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
ResetPointInfo
ResetPointInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> ResetPointInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'expireTime") ResetPointInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
42)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Bool
_v
= FoldLike Bool ResetPointInfo ResetPointInfo Bool Bool
-> ResetPointInfo -> Bool
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"resettable") ResetPointInfo
_x
in
if Bool -> Bool -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Bool
_v Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
((Word64 -> Builder) -> (Bool -> Word64) -> Bool -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(\ Bool
b -> if Bool
b then Word64
1 else Word64
0) Bool
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet ResetPointInfo ResetPointInfo FieldSet FieldSet
-> ResetPointInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ResetPointInfo ResetPointInfo FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResetPointInfo FieldSet
Data.ProtoLens.unknownFields ResetPointInfo
_x))))))))
instance Control.DeepSeq.NFData ResetPointInfo where
rnf :: ResetPointInfo -> ()
rnf
= \ ResetPointInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> FieldSet
_ResetPointInfo'_unknownFields ResetPointInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> Text
_ResetPointInfo'buildId ResetPointInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> Text
_ResetPointInfo'binaryChecksum ResetPointInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> Text
_ResetPointInfo'runId ResetPointInfo
x__)
(Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> Int64
_ResetPointInfo'firstWorkflowTaskCompletedId ResetPointInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'createTime ResetPointInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPointInfo -> Maybe Timestamp
_ResetPointInfo'expireTime ResetPointInfo
x__)
(Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ResetPointInfo -> Bool
_ResetPointInfo'resettable ResetPointInfo
x__) ())))))))
data ResetPoints
= ResetPoints'_constructor {ResetPoints -> Vector ResetPointInfo
_ResetPoints'points :: !(Data.Vector.Vector ResetPointInfo),
ResetPoints -> FieldSet
_ResetPoints'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (ResetPoints -> ResetPoints -> Bool
(ResetPoints -> ResetPoints -> Bool)
-> (ResetPoints -> ResetPoints -> Bool) -> Eq ResetPoints
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ResetPoints -> ResetPoints -> Bool
== :: ResetPoints -> ResetPoints -> Bool
$c/= :: ResetPoints -> ResetPoints -> Bool
/= :: ResetPoints -> ResetPoints -> Bool
Prelude.Eq, Eq ResetPoints
Eq ResetPoints =>
(ResetPoints -> ResetPoints -> Ordering)
-> (ResetPoints -> ResetPoints -> Bool)
-> (ResetPoints -> ResetPoints -> Bool)
-> (ResetPoints -> ResetPoints -> Bool)
-> (ResetPoints -> ResetPoints -> Bool)
-> (ResetPoints -> ResetPoints -> ResetPoints)
-> (ResetPoints -> ResetPoints -> ResetPoints)
-> Ord ResetPoints
ResetPoints -> ResetPoints -> Bool
ResetPoints -> ResetPoints -> Ordering
ResetPoints -> ResetPoints -> ResetPoints
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 :: ResetPoints -> ResetPoints -> Ordering
compare :: ResetPoints -> ResetPoints -> Ordering
$c< :: ResetPoints -> ResetPoints -> Bool
< :: ResetPoints -> ResetPoints -> Bool
$c<= :: ResetPoints -> ResetPoints -> Bool
<= :: ResetPoints -> ResetPoints -> Bool
$c> :: ResetPoints -> ResetPoints -> Bool
> :: ResetPoints -> ResetPoints -> Bool
$c>= :: ResetPoints -> ResetPoints -> Bool
>= :: ResetPoints -> ResetPoints -> Bool
$cmax :: ResetPoints -> ResetPoints -> ResetPoints
max :: ResetPoints -> ResetPoints -> ResetPoints
$cmin :: ResetPoints -> ResetPoints -> ResetPoints
min :: ResetPoints -> ResetPoints -> ResetPoints
Prelude.Ord)
instance Prelude.Show ResetPoints where
showsPrec :: Int -> ResetPoints -> ShowS
showsPrec Int
_ ResetPoints
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(ResetPoints -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ResetPoints
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ResetPoints "points" [ResetPointInfo] where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "points"
-> ([ResetPointInfo] -> f [ResetPointInfo])
-> ResetPoints
-> f ResetPoints
fieldOf Proxy# "points"
_
= ((Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> ResetPoints -> f ResetPoints)
-> (([ResetPointInfo] -> f [ResetPointInfo])
-> Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> ([ResetPointInfo] -> f [ResetPointInfo])
-> ResetPoints
-> f ResetPoints
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPoints -> Vector ResetPointInfo)
-> (ResetPoints -> Vector ResetPointInfo -> ResetPoints)
-> Lens
ResetPoints
ResetPoints
(Vector ResetPointInfo)
(Vector ResetPointInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPoints -> Vector ResetPointInfo
_ResetPoints'points (\ ResetPoints
x__ Vector ResetPointInfo
y__ -> ResetPoints
x__ {_ResetPoints'points = y__}))
((Vector ResetPointInfo -> [ResetPointInfo])
-> (Vector ResetPointInfo
-> [ResetPointInfo] -> Vector ResetPointInfo)
-> Lens
(Vector ResetPointInfo)
(Vector ResetPointInfo)
[ResetPointInfo]
[ResetPointInfo]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
Vector ResetPointInfo -> [ResetPointInfo]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
(\ Vector ResetPointInfo
_ [ResetPointInfo]
y__ -> [ResetPointInfo] -> Vector ResetPointInfo
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [ResetPointInfo]
y__))
instance Data.ProtoLens.Field.HasField ResetPoints "vec'points" (Data.Vector.Vector ResetPointInfo) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'points"
-> (Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> ResetPoints
-> f ResetPoints
fieldOf Proxy# "vec'points"
_
= ((Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> ResetPoints -> f ResetPoints)
-> ((Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> (Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> ResetPoints
-> f ResetPoints
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((ResetPoints -> Vector ResetPointInfo)
-> (ResetPoints -> Vector ResetPointInfo -> ResetPoints)
-> Lens
ResetPoints
ResetPoints
(Vector ResetPointInfo)
(Vector ResetPointInfo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPoints -> Vector ResetPointInfo
_ResetPoints'points (\ ResetPoints
x__ Vector ResetPointInfo
y__ -> ResetPoints
x__ {_ResetPoints'points = y__}))
(Vector ResetPointInfo -> f (Vector ResetPointInfo))
-> Vector ResetPointInfo -> f (Vector ResetPointInfo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ResetPoints where
messageName :: Proxy ResetPoints -> Text
messageName Proxy ResetPoints
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.ResetPoints"
packedMessageDescriptor :: Proxy ResetPoints -> ByteString
packedMessageDescriptor Proxy ResetPoints
_
= ByteString
"\n\
\\vResetPoints\DC2@\n\
\\ACKpoints\CAN\SOH \ETX(\v2(.temporal.api.workflow.v1.ResetPointInfoR\ACKpoints"
packedFileDescriptor :: Proxy ResetPoints -> ByteString
packedFileDescriptor Proxy ResetPoints
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor ResetPoints)
fieldsByTag
= let
points__field_descriptor :: FieldDescriptor ResetPoints
points__field_descriptor
= String
-> FieldTypeDescriptor ResetPointInfo
-> FieldAccessor ResetPoints ResetPointInfo
-> FieldDescriptor ResetPoints
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"points"
(MessageOrGroup -> FieldTypeDescriptor ResetPointInfo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ResetPointInfo)
(Packing
-> Lens' ResetPoints [ResetPointInfo]
-> FieldAccessor ResetPoints ResetPointInfo
forall msg value.
Packing -> Lens' msg [value] -> FieldAccessor msg value
Data.ProtoLens.RepeatedField
Packing
Data.ProtoLens.Unpacked (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"points")) ::
Data.ProtoLens.FieldDescriptor ResetPoints
in
[(Tag, FieldDescriptor ResetPoints)]
-> Map Tag (FieldDescriptor ResetPoints)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ResetPoints
points__field_descriptor)]
unknownFields :: Lens' ResetPoints FieldSet
unknownFields
= (ResetPoints -> FieldSet)
-> (ResetPoints -> FieldSet -> ResetPoints)
-> Lens' ResetPoints FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
ResetPoints -> FieldSet
_ResetPoints'_unknownFields
(\ ResetPoints
x__ FieldSet
y__ -> ResetPoints
x__ {_ResetPoints'_unknownFields = y__})
defMessage :: ResetPoints
defMessage
= ResetPoints'_constructor
{_ResetPoints'points :: Vector ResetPointInfo
_ResetPoints'points = Vector ResetPointInfo
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
_ResetPoints'_unknownFields :: FieldSet
_ResetPoints'_unknownFields = []}
parseMessage :: Parser ResetPoints
parseMessage
= let
loop ::
ResetPoints
-> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld ResetPointInfo
-> Data.ProtoLens.Encoding.Bytes.Parser ResetPoints
loop :: ResetPoints
-> Growing Vector RealWorld ResetPointInfo -> Parser ResetPoints
loop ResetPoints
x Growing Vector RealWorld ResetPointInfo
mutable'points
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do frozen'points <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Data.ProtoLens.Encoding.Growing.unsafeFreeze
mutable'points)
(let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t)
(Lens.Family2.set
(Data.ProtoLens.Field.field @"vec'points") frozen'points x))
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do !y <- Parser ResetPointInfo -> String -> Parser ResetPointInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len)
Data.ProtoLens.parseMessage)
String
"points"
v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
(Data.ProtoLens.Encoding.Growing.append mutable'points y)
loop x v
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
mutable'points
in
Parser ResetPoints -> String -> Parser ResetPoints
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do mutable'points <- IO (Growing Vector RealWorld ResetPointInfo)
-> Parser (Growing Vector RealWorld ResetPointInfo)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
IO (Growing Vector RealWorld ResetPointInfo)
IO (Growing Vector (PrimState IO) ResetPointInfo)
forall (m :: * -> *) (v :: * -> *) a.
(PrimMonad m, Vector v a) =>
m (Growing v (PrimState m) a)
Data.ProtoLens.Encoding.Growing.new
loop Data.ProtoLens.defMessage mutable'points)
String
"ResetPoints"
buildMessage :: ResetPoints -> Builder
buildMessage
= \ ResetPoints
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
((ResetPointInfo -> Builder) -> Vector ResetPointInfo -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
(\ ResetPointInfo
_v
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (ResetPointInfo -> ByteString) -> ResetPointInfo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
ResetPointInfo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResetPointInfo
_v))
(FoldLike
(Vector ResetPointInfo)
ResetPoints
ResetPoints
(Vector ResetPointInfo)
(Vector ResetPointInfo)
-> ResetPoints -> Vector ResetPointInfo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"vec'points") ResetPoints
_x))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike FieldSet ResetPoints ResetPoints FieldSet FieldSet
-> ResetPoints -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet ResetPoints ResetPoints FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ResetPoints FieldSet
Data.ProtoLens.unknownFields ResetPoints
_x))
instance Control.DeepSeq.NFData ResetPoints where
rnf :: ResetPoints -> ()
rnf
= \ ResetPoints
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(ResetPoints -> FieldSet
_ResetPoints'_unknownFields ResetPoints
x__)
(Vector ResetPointInfo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (ResetPoints -> Vector ResetPointInfo
_ResetPoints'points ResetPoints
x__) ())
data WorkflowExecutionConfig
= WorkflowExecutionConfig'_constructor {WorkflowExecutionConfig -> Maybe TaskQueue
_WorkflowExecutionConfig'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'defaultWorkflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
WorkflowExecutionConfig -> FieldSet
_WorkflowExecutionConfig'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
(WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool)
-> (WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool)
-> Eq WorkflowExecutionConfig
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
== :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
$c/= :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
/= :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
Prelude.Eq, Eq WorkflowExecutionConfig
Eq WorkflowExecutionConfig =>
(WorkflowExecutionConfig -> WorkflowExecutionConfig -> Ordering)
-> (WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool)
-> (WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool)
-> (WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool)
-> (WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool)
-> (WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig)
-> (WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig)
-> Ord WorkflowExecutionConfig
WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
WorkflowExecutionConfig -> WorkflowExecutionConfig -> Ordering
WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig
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 :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Ordering
compare :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Ordering
$c< :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
< :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
$c<= :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
<= :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
$c> :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
> :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
$c>= :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
>= :: WorkflowExecutionConfig -> WorkflowExecutionConfig -> Bool
$cmax :: WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig
max :: WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig
$cmin :: WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig
min :: WorkflowExecutionConfig
-> WorkflowExecutionConfig -> WorkflowExecutionConfig
Prelude.Ord)
instance Prelude.Show WorkflowExecutionConfig where
showsPrec :: Int -> WorkflowExecutionConfig -> ShowS
showsPrec Int
_ WorkflowExecutionConfig
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(WorkflowExecutionConfig -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionConfig
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "taskQueue"
_
= ((Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((TaskQueue -> f TaskQueue)
-> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe TaskQueue)
-> (WorkflowExecutionConfig
-> Maybe TaskQueue -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe TaskQueue)
(Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe TaskQueue
_WorkflowExecutionConfig'taskQueue
(\ WorkflowExecutionConfig
x__ Maybe TaskQueue
y__ -> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'taskQueue = y__}))
(TaskQueue -> Lens' (Maybe TaskQueue) TaskQueue
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TaskQueue
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "maybe'taskQueue" (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'taskQueue"
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "maybe'taskQueue"
_
= ((Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe TaskQueue)
-> (WorkflowExecutionConfig
-> Maybe TaskQueue -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe TaskQueue)
(Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe TaskQueue
_WorkflowExecutionConfig'taskQueue
(\ WorkflowExecutionConfig
x__ Maybe TaskQueue
y__ -> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'taskQueue = y__}))
(Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "workflowExecutionTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe Duration)
-> (WorkflowExecutionConfig
-> Maybe Duration -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowExecutionTimeout
(\ WorkflowExecutionConfig
x__ Maybe Duration
y__
-> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'workflowExecutionTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe Duration)
-> (WorkflowExecutionConfig
-> Maybe Duration -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowExecutionTimeout
(\ WorkflowExecutionConfig
x__ Maybe Duration
y__
-> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'workflowExecutionTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "workflowRunTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe Duration)
-> (WorkflowExecutionConfig
-> Maybe Duration -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowRunTimeout
(\ WorkflowExecutionConfig
x__ Maybe Duration
y__
-> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'workflowRunTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "maybe'workflowRunTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe Duration)
-> (WorkflowExecutionConfig
-> Maybe Duration -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowRunTimeout
(\ WorkflowExecutionConfig
x__ Maybe Duration
y__
-> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'workflowRunTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "defaultWorkflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "defaultWorkflowTaskTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "defaultWorkflowTaskTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe Duration)
-> (WorkflowExecutionConfig
-> Maybe Duration -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'defaultWorkflowTaskTimeout
(\ WorkflowExecutionConfig
x__ Maybe Duration
y__
-> WorkflowExecutionConfig
x__
{_WorkflowExecutionConfig'defaultWorkflowTaskTimeout = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionConfig "maybe'defaultWorkflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'defaultWorkflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
fieldOf Proxy# "maybe'defaultWorkflowTaskTimeout"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig -> f WorkflowExecutionConfig)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionConfig
-> f WorkflowExecutionConfig
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionConfig -> Maybe Duration)
-> (WorkflowExecutionConfig
-> Maybe Duration -> WorkflowExecutionConfig)
-> Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'defaultWorkflowTaskTimeout
(\ WorkflowExecutionConfig
x__ Maybe Duration
y__
-> WorkflowExecutionConfig
x__
{_WorkflowExecutionConfig'defaultWorkflowTaskTimeout = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionConfig where
messageName :: Proxy WorkflowExecutionConfig -> Text
messageName Proxy WorkflowExecutionConfig
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.WorkflowExecutionConfig"
packedMessageDescriptor :: Proxy WorkflowExecutionConfig -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionConfig
_
= ByteString
"\n\
\\ETBWorkflowExecutionConfig\DC2C\n\
\\n\
\task_queue\CAN\SOH \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2W\n\
\\SUBworkflow_execution_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
\\DC4workflow_run_timeout\CAN\ETX \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2\\\n\
\\GSdefault_workflow_task_timeout\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR\SUBdefaultWorkflowTaskTimeout"
packedFileDescriptor :: Proxy WorkflowExecutionConfig -> ByteString
packedFileDescriptor Proxy WorkflowExecutionConfig
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionConfig)
fieldsByTag
= let
taskQueue__field_descriptor :: FieldDescriptor WorkflowExecutionConfig
taskQueue__field_descriptor
= String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor WorkflowExecutionConfig TaskQueue
-> FieldDescriptor WorkflowExecutionConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"task_queue"
(MessageOrGroup -> FieldTypeDescriptor TaskQueue
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)
(Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe TaskQueue)
(Maybe TaskQueue)
-> FieldAccessor WorkflowExecutionConfig TaskQueue
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionConfig
workflowExecutionTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionConfig
workflowExecutionTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionConfig Duration
-> FieldDescriptor WorkflowExecutionConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_execution_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor WorkflowExecutionConfig Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecutionTimeout")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionConfig
workflowRunTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionConfig
workflowRunTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionConfig Duration
-> FieldDescriptor WorkflowExecutionConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"workflow_run_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor WorkflowExecutionConfig Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowRunTimeout")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionConfig
defaultWorkflowTaskTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionConfig
defaultWorkflowTaskTimeout__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionConfig Duration
-> FieldDescriptor WorkflowExecutionConfig
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"default_workflow_task_timeout"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor WorkflowExecutionConfig Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'defaultWorkflowTaskTimeout")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionConfig
in
[(Tag, FieldDescriptor WorkflowExecutionConfig)]
-> Map Tag (FieldDescriptor WorkflowExecutionConfig)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionConfig
taskQueue__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionConfig
workflowExecutionTimeout__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionConfig
workflowRunTimeout__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4,
FieldDescriptor WorkflowExecutionConfig
defaultWorkflowTaskTimeout__field_descriptor)]
unknownFields :: Lens' WorkflowExecutionConfig FieldSet
unknownFields
= (WorkflowExecutionConfig -> FieldSet)
-> (WorkflowExecutionConfig -> FieldSet -> WorkflowExecutionConfig)
-> Lens' WorkflowExecutionConfig FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionConfig -> FieldSet
_WorkflowExecutionConfig'_unknownFields
(\ WorkflowExecutionConfig
x__ FieldSet
y__ -> WorkflowExecutionConfig
x__ {_WorkflowExecutionConfig'_unknownFields = y__})
defMessage :: WorkflowExecutionConfig
defMessage
= WorkflowExecutionConfig'_constructor
{_WorkflowExecutionConfig'taskQueue :: Maybe TaskQueue
_WorkflowExecutionConfig'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionConfig'workflowExecutionTimeout :: Maybe Duration
_WorkflowExecutionConfig'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionConfig'workflowRunTimeout :: Maybe Duration
_WorkflowExecutionConfig'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionConfig'defaultWorkflowTaskTimeout :: Maybe Duration
_WorkflowExecutionConfig'defaultWorkflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionConfig'_unknownFields :: FieldSet
_WorkflowExecutionConfig'_unknownFields = []}
parseMessage :: Parser WorkflowExecutionConfig
parseMessage
= let
loop ::
WorkflowExecutionConfig
-> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionConfig
loop :: WorkflowExecutionConfig -> Parser WorkflowExecutionConfig
loop WorkflowExecutionConfig
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser TaskQueue -> String -> Parser TaskQueue
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"task_queue"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
Word64
18
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_execution_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
Word64
26
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"workflow_run_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
Word64
34
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"default_workflow_task_timeout"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"defaultWorkflowTaskTimeout") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser WorkflowExecutionConfig
-> String -> Parser WorkflowExecutionConfig
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do WorkflowExecutionConfig -> Parser WorkflowExecutionConfig
loop WorkflowExecutionConfig
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"WorkflowExecutionConfig"
buildMessage :: WorkflowExecutionConfig -> Builder
buildMessage
= \ WorkflowExecutionConfig
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe TaskQueue)
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe TaskQueue)
(Maybe TaskQueue)
-> WorkflowExecutionConfig -> Maybe TaskQueue
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'taskQueue") WorkflowExecutionConfig
_x
of
Maybe TaskQueue
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just TaskQueue
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (TaskQueue -> ByteString) -> TaskQueue -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
TaskQueue -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TaskQueue
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
-> WorkflowExecutionConfig -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowExecutionTimeout") WorkflowExecutionConfig
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
-> WorkflowExecutionConfig -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'workflowRunTimeout") WorkflowExecutionConfig
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
WorkflowExecutionConfig
WorkflowExecutionConfig
(Maybe Duration)
(Maybe Duration)
-> WorkflowExecutionConfig -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'defaultWorkflowTaskTimeout") WorkflowExecutionConfig
_x
of
Maybe Duration
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Duration
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
WorkflowExecutionConfig
WorkflowExecutionConfig
FieldSet
FieldSet
-> WorkflowExecutionConfig -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
FieldSet
WorkflowExecutionConfig
WorkflowExecutionConfig
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionConfig FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionConfig
_x)))))
instance Control.DeepSeq.NFData WorkflowExecutionConfig where
rnf :: WorkflowExecutionConfig -> ()
rnf
= \ WorkflowExecutionConfig
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionConfig -> FieldSet
_WorkflowExecutionConfig'_unknownFields WorkflowExecutionConfig
x__)
(Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionConfig -> Maybe TaskQueue
_WorkflowExecutionConfig'taskQueue WorkflowExecutionConfig
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowExecutionTimeout WorkflowExecutionConfig
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'workflowRunTimeout WorkflowExecutionConfig
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionConfig -> Maybe Duration
_WorkflowExecutionConfig'defaultWorkflowTaskTimeout WorkflowExecutionConfig
x__) ()))))
data WorkflowExecutionInfo
= WorkflowExecutionInfo'_constructor {WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'execution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
WorkflowExecutionInfo -> Maybe WorkflowType
_WorkflowExecutionInfo'type' :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'startTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'closeTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
WorkflowExecutionInfo -> WorkflowExecutionStatus
_WorkflowExecutionInfo'status :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowExecutionStatus,
WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'historyLength :: !Data.Int.Int64,
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'parentNamespaceId :: !Data.Text.Text,
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'parentExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'executionTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
WorkflowExecutionInfo -> Maybe Memo
_WorkflowExecutionInfo'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
WorkflowExecutionInfo -> Maybe SearchAttributes
_WorkflowExecutionInfo'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
WorkflowExecutionInfo -> Maybe ResetPoints
_WorkflowExecutionInfo'autoResetPoints :: !(Prelude.Maybe ResetPoints),
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'taskQueue :: !Data.Text.Text,
WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'stateTransitionCount :: !Data.Int.Int64,
WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'historySizeBytes :: !Data.Int.Int64,
WorkflowExecutionInfo -> Maybe WorkerVersionStamp
_WorkflowExecutionInfo'mostRecentWorkerVersionStamp :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
WorkflowExecutionInfo -> Maybe Duration
_WorkflowExecutionInfo'executionDuration :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'rootExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'assignedBuildId :: !Data.Text.Text,
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'inheritedBuildId :: !Data.Text.Text,
WorkflowExecutionInfo -> FieldSet
_WorkflowExecutionInfo'_unknownFields :: !Data.ProtoLens.FieldSet}
deriving stock (WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
(WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool)
-> (WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool)
-> Eq WorkflowExecutionInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
== :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
$c/= :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
/= :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
Prelude.Eq, Eq WorkflowExecutionInfo
Eq WorkflowExecutionInfo =>
(WorkflowExecutionInfo -> WorkflowExecutionInfo -> Ordering)
-> (WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool)
-> (WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool)
-> (WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool)
-> (WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool)
-> (WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo)
-> (WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo)
-> Ord WorkflowExecutionInfo
WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
WorkflowExecutionInfo -> WorkflowExecutionInfo -> Ordering
WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo
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 :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Ordering
compare :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Ordering
$c< :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
< :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
$c<= :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
<= :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
$c> :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
> :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
$c>= :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
>= :: WorkflowExecutionInfo -> WorkflowExecutionInfo -> Bool
$cmax :: WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo
max :: WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo
$cmin :: WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo
min :: WorkflowExecutionInfo
-> WorkflowExecutionInfo -> WorkflowExecutionInfo
Prelude.Ord)
instance Prelude.Show WorkflowExecutionInfo where
showsPrec :: Int -> WorkflowExecutionInfo -> ShowS
showsPrec Int
_ WorkflowExecutionInfo
__x String
__s
= Char -> ShowS
Prelude.showChar
Char
'{'
(String -> ShowS
Prelude.showString
(WorkflowExecutionInfo -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionInfo
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "execution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "execution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "execution"
_
= ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((WorkflowExecution -> f WorkflowExecution)
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowExecution)
-> (WorkflowExecutionInfo
-> Maybe WorkflowExecution -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'execution
(\ WorkflowExecutionInfo
x__ Maybe WorkflowExecution
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'execution = y__}))
(WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'execution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'execution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'execution"
_
= ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowExecution)
-> (WorkflowExecutionInfo
-> Maybe WorkflowExecution -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'execution
(\ WorkflowExecutionInfo
x__ Maybe WorkflowExecution
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'execution = y__}))
(Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "type'" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "type'"
-> (WorkflowType -> f WorkflowType)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "type'"
_
= ((Maybe WorkflowType -> f (Maybe WorkflowType))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((WorkflowType -> f WorkflowType)
-> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowType)
-> (WorkflowExecutionInfo
-> Maybe WorkflowType -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowType
_WorkflowExecutionInfo'type'
(\ WorkflowExecutionInfo
x__ Maybe WorkflowType
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'type' = y__}))
(WorkflowType -> Lens' (Maybe WorkflowType) WorkflowType
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowType
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'type'" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'type'"
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'type'"
_
= ((Maybe WorkflowType -> f (Maybe WorkflowType))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowType)
-> (WorkflowExecutionInfo
-> Maybe WorkflowType -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowType
_WorkflowExecutionInfo'type'
(\ WorkflowExecutionInfo
x__ Maybe WorkflowType
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'type' = y__}))
(Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "startTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startTime"
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "startTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Timestamp)
-> (WorkflowExecutionInfo
-> Maybe Timestamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'startTime
(\ WorkflowExecutionInfo
x__ Maybe Timestamp
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'startTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'startTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'startTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Timestamp)
-> (WorkflowExecutionInfo
-> Maybe Timestamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'startTime
(\ WorkflowExecutionInfo
x__ Maybe Timestamp
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'startTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "closeTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "closeTime"
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "closeTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Timestamp)
-> (WorkflowExecutionInfo
-> Maybe Timestamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'closeTime
(\ WorkflowExecutionInfo
x__ Maybe Timestamp
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'closeTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'closeTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'closeTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'closeTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Timestamp)
-> (WorkflowExecutionInfo
-> Maybe Timestamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'closeTime
(\ WorkflowExecutionInfo
x__ Maybe Timestamp
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'closeTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "status" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowExecutionStatus where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "status"
-> (WorkflowExecutionStatus -> f WorkflowExecutionStatus)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "status"
_
= ((WorkflowExecutionStatus -> f WorkflowExecutionStatus)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((WorkflowExecutionStatus -> f WorkflowExecutionStatus)
-> WorkflowExecutionStatus -> f WorkflowExecutionStatus)
-> (WorkflowExecutionStatus -> f WorkflowExecutionStatus)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> WorkflowExecutionStatus)
-> (WorkflowExecutionInfo
-> WorkflowExecutionStatus -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
WorkflowExecutionStatus
WorkflowExecutionStatus
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> WorkflowExecutionStatus
_WorkflowExecutionInfo'status
(\ WorkflowExecutionInfo
x__ WorkflowExecutionStatus
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'status = y__}))
(WorkflowExecutionStatus -> f WorkflowExecutionStatus)
-> WorkflowExecutionStatus -> f WorkflowExecutionStatus
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "historyLength" Data.Int.Int64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historyLength"
-> (Int64 -> f Int64)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "historyLength"
_
= ((Int64 -> f Int64)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Int64)
-> (WorkflowExecutionInfo -> Int64 -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'historyLength
(\ WorkflowExecutionInfo
x__ Int64
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'historyLength = y__}))
(Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "parentNamespaceId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentNamespaceId"
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "parentNamespaceId"
_
= ((Text -> f Text)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Text)
-> (WorkflowExecutionInfo -> Text -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'parentNamespaceId
(\ WorkflowExecutionInfo
x__ Text
y__
-> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'parentNamespaceId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "parentExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "parentExecution"
_
= ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((WorkflowExecution -> f WorkflowExecution)
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowExecution)
-> (WorkflowExecutionInfo
-> Maybe WorkflowExecution -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'parentExecution
(\ WorkflowExecutionInfo
x__ Maybe WorkflowExecution
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'parentExecution = y__}))
(WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'parentExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'parentExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'parentExecution"
_
= ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowExecution)
-> (WorkflowExecutionInfo
-> Maybe WorkflowExecution -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'parentExecution
(\ WorkflowExecutionInfo
x__ Maybe WorkflowExecution
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'parentExecution = y__}))
(Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "executionTime" Proto.Google.Protobuf.Timestamp.Timestamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executionTime"
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "executionTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Timestamp -> f Timestamp)
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Timestamp)
-> (WorkflowExecutionInfo
-> Maybe Timestamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'executionTime
(\ WorkflowExecutionInfo
x__ Maybe Timestamp
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'executionTime = y__}))
(Timestamp -> Lens' (Maybe Timestamp) Timestamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Timestamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'executionTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'executionTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'executionTime"
_
= ((Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Timestamp)
-> (WorkflowExecutionInfo
-> Maybe Timestamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'executionTime
(\ WorkflowExecutionInfo
x__ Maybe Timestamp
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'executionTime = y__}))
(Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "memo"
_
= ((Maybe Memo -> f (Maybe Memo))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Memo)
-> (WorkflowExecutionInfo -> Maybe Memo -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Memo
_WorkflowExecutionInfo'memo
(\ WorkflowExecutionInfo
x__ Maybe Memo
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'memo = y__}))
(Memo -> Lens' (Maybe Memo) Memo
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Memo
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'memo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'memo"
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'memo"
_
= ((Maybe Memo -> f (Maybe Memo))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Memo)
-> (WorkflowExecutionInfo -> Maybe Memo -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Memo
_WorkflowExecutionInfo'memo
(\ WorkflowExecutionInfo
x__ Maybe Memo
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'memo = y__}))
(Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "searchAttributes"
_
= ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((SearchAttributes -> f SearchAttributes)
-> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe SearchAttributes)
-> (WorkflowExecutionInfo
-> Maybe SearchAttributes -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe SearchAttributes
_WorkflowExecutionInfo'searchAttributes
(\ WorkflowExecutionInfo
x__ Maybe SearchAttributes
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'searchAttributes = y__}))
(SearchAttributes -> Lens' (Maybe SearchAttributes) SearchAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SearchAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'searchAttributes" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'searchAttributes"
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'searchAttributes"
_
= ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe SearchAttributes)
-> (WorkflowExecutionInfo
-> Maybe SearchAttributes -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe SearchAttributes
_WorkflowExecutionInfo'searchAttributes
(\ WorkflowExecutionInfo
x__ Maybe SearchAttributes
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'searchAttributes = y__}))
(Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "autoResetPoints" ResetPoints where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "autoResetPoints"
-> (ResetPoints -> f ResetPoints)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "autoResetPoints"
_
= ((Maybe ResetPoints -> f (Maybe ResetPoints))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((ResetPoints -> f ResetPoints)
-> Maybe ResetPoints -> f (Maybe ResetPoints))
-> (ResetPoints -> f ResetPoints)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe ResetPoints)
-> (WorkflowExecutionInfo
-> Maybe ResetPoints -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe ResetPoints)
(Maybe ResetPoints)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe ResetPoints
_WorkflowExecutionInfo'autoResetPoints
(\ WorkflowExecutionInfo
x__ Maybe ResetPoints
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'autoResetPoints = y__}))
(ResetPoints -> Lens' (Maybe ResetPoints) ResetPoints
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ResetPoints
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'autoResetPoints" (Prelude.Maybe ResetPoints) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'autoResetPoints"
-> (Maybe ResetPoints -> f (Maybe ResetPoints))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'autoResetPoints"
_
= ((Maybe ResetPoints -> f (Maybe ResetPoints))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe ResetPoints -> f (Maybe ResetPoints))
-> Maybe ResetPoints -> f (Maybe ResetPoints))
-> (Maybe ResetPoints -> f (Maybe ResetPoints))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe ResetPoints)
-> (WorkflowExecutionInfo
-> Maybe ResetPoints -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe ResetPoints)
(Maybe ResetPoints)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe ResetPoints
_WorkflowExecutionInfo'autoResetPoints
(\ WorkflowExecutionInfo
x__ Maybe ResetPoints
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'autoResetPoints = y__}))
(Maybe ResetPoints -> f (Maybe ResetPoints))
-> Maybe ResetPoints -> f (Maybe ResetPoints)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "taskQueue" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "taskQueue"
_
= ((Text -> f Text)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Text)
-> (WorkflowExecutionInfo -> Text -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'taskQueue
(\ WorkflowExecutionInfo
x__ Text
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'taskQueue = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "stateTransitionCount" Data.Int.Int64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "stateTransitionCount"
-> (Int64 -> f Int64)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "stateTransitionCount"
_
= ((Int64 -> f Int64)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Int64)
-> (WorkflowExecutionInfo -> Int64 -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'stateTransitionCount
(\ WorkflowExecutionInfo
x__ Int64
y__
-> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'stateTransitionCount = y__}))
(Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "historySizeBytes" Data.Int.Int64 where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historySizeBytes"
-> (Int64 -> f Int64)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "historySizeBytes"
_
= ((Int64 -> f Int64)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Int64)
-> (WorkflowExecutionInfo -> Int64 -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'historySizeBytes
(\ WorkflowExecutionInfo
x__ Int64
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'historySizeBytes = y__}))
(Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "mostRecentWorkerVersionStamp" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "mostRecentWorkerVersionStamp"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "mostRecentWorkerVersionStamp"
_
= ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkerVersionStamp)
-> (WorkflowExecutionInfo
-> Maybe WorkerVersionStamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkerVersionStamp
_WorkflowExecutionInfo'mostRecentWorkerVersionStamp
(\ WorkflowExecutionInfo
x__ Maybe WorkerVersionStamp
y__
-> WorkflowExecutionInfo
x__
{_WorkflowExecutionInfo'mostRecentWorkerVersionStamp = y__}))
(WorkerVersionStamp
-> Lens' (Maybe WorkerVersionStamp) WorkerVersionStamp
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkerVersionStamp
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'mostRecentWorkerVersionStamp" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'mostRecentWorkerVersionStamp"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'mostRecentWorkerVersionStamp"
_
= ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkerVersionStamp)
-> (WorkflowExecutionInfo
-> Maybe WorkerVersionStamp -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkerVersionStamp
_WorkflowExecutionInfo'mostRecentWorkerVersionStamp
(\ WorkflowExecutionInfo
x__ Maybe WorkerVersionStamp
y__
-> WorkflowExecutionInfo
x__
{_WorkflowExecutionInfo'mostRecentWorkerVersionStamp = y__}))
(Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "executionDuration" Proto.Google.Protobuf.Duration.Duration where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "executionDuration"
-> (Duration -> f Duration)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "executionDuration"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Duration -> f Duration)
-> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Duration)
-> (WorkflowExecutionInfo
-> Maybe Duration -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Duration
_WorkflowExecutionInfo'executionDuration
(\ WorkflowExecutionInfo
x__ Maybe Duration
y__
-> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'executionDuration = y__}))
(Duration -> Lens' (Maybe Duration) Duration
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Duration
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'executionDuration" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'executionDuration"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'executionDuration"
_
= ((Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe Duration)
-> (WorkflowExecutionInfo
-> Maybe Duration -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe Duration
_WorkflowExecutionInfo'executionDuration
(\ WorkflowExecutionInfo
x__ Maybe Duration
y__
-> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'executionDuration = y__}))
(Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "rootExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rootExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "rootExecution"
_
= ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((WorkflowExecution -> f WorkflowExecution)
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowExecution)
-> (WorkflowExecutionInfo
-> Maybe WorkflowExecution -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'rootExecution
(\ WorkflowExecutionInfo
x__ Maybe WorkflowExecution
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'rootExecution = y__}))
(WorkflowExecution
-> Lens' (Maybe WorkflowExecution) WorkflowExecution
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecution
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "maybe'rootExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rootExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "maybe'rootExecution"
_
= ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Maybe WorkflowExecution)
-> (WorkflowExecutionInfo
-> Maybe WorkflowExecution -> WorkflowExecutionInfo)
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'rootExecution
(\ WorkflowExecutionInfo
x__ Maybe WorkflowExecution
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'rootExecution = y__}))
(Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "assignedBuildId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "assignedBuildId"
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "assignedBuildId"
_
= ((Text -> f Text)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Text)
-> (WorkflowExecutionInfo -> Text -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'assignedBuildId
(\ WorkflowExecutionInfo
x__ Text
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'assignedBuildId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionInfo "inheritedBuildId" Data.Text.Text where
fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "inheritedBuildId"
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
fieldOf Proxy# "inheritedBuildId"
_
= ((Text -> f Text)
-> WorkflowExecutionInfo -> f WorkflowExecutionInfo)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionInfo
-> f WorkflowExecutionInfo
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((WorkflowExecutionInfo -> Text)
-> (WorkflowExecutionInfo -> Text -> WorkflowExecutionInfo)
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'inheritedBuildId
(\ WorkflowExecutionInfo
x__ Text
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'inheritedBuildId = y__}))
(Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionInfo where
messageName :: Proxy WorkflowExecutionInfo -> Text
messageName Proxy WorkflowExecutionInfo
_
= String -> Text
Data.Text.pack String
"temporal.api.workflow.v1.WorkflowExecutionInfo"
packedMessageDescriptor :: Proxy WorkflowExecutionInfo -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionInfo
_
= ByteString
"\n\
\\NAKWorkflowExecutionInfo\DC2G\n\
\\texecution\CAN\SOH \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC28\n\
\\EOTtype\CAN\STX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\EOTtype\DC29\n\
\\n\
\start_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\DC29\n\
\\n\
\close_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\tcloseTime\DC2F\n\
\\ACKstatus\CAN\ENQ \SOH(\SO2..temporal.api.enums.v1.WorkflowExecutionStatusR\ACKstatus\DC2%\n\
\\SOhistory_length\CAN\ACK \SOH(\ETXR\rhistoryLength\DC2.\n\
\\DC3parent_namespace_id\CAN\a \SOH(\tR\DC1parentNamespaceId\DC2T\n\
\\DLEparent_execution\CAN\b \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\SIparentExecution\DC2A\n\
\\SOexecution_time\CAN\t \SOH(\v2\SUB.google.protobuf.TimestampR\rexecutionTime\DC20\n\
\\EOTmemo\CAN\n\
\ \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
\\DC1search_attributes\CAN\v \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2Q\n\
\\DC1auto_reset_points\CAN\f \SOH(\v2%.temporal.api.workflow.v1.ResetPointsR\SIautoResetPoints\DC2\GS\n\
\\n\
\task_queue\CAN\r \SOH(\tR\ttaskQueue\DC24\n\
\\SYNstate_transition_count\CAN\SO \SOH(\ETXR\DC4stateTransitionCount\DC2,\n\
\\DC2history_size_bytes\CAN\SI \SOH(\ETXR\DLEhistorySizeBytes\DC2r\n\
\ most_recent_worker_version_stamp\CAN\DLE \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\FSmostRecentWorkerVersionStamp\DC2H\n\
\\DC2execution_duration\CAN\DC1 \SOH(\v2\EM.google.protobuf.DurationR\DC1executionDuration\DC2P\n\
\\SOroot_execution\CAN\DC2 \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\rrootExecution\DC2*\n\
\\DC1assigned_build_id\CAN\DC3 \SOH(\tR\SIassignedBuildId\DC2,\n\
\\DC2inherited_build_id\CAN\DC4 \SOH(\tR\DLEinheritedBuildId"
packedFileDescriptor :: Proxy WorkflowExecutionInfo -> ByteString
packedFileDescriptor Proxy WorkflowExecutionInfo
_ = ByteString
packedFileDescriptor
fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionInfo)
fieldsByTag
= let
execution__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
execution__field_descriptor
= String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor WorkflowExecutionInfo WorkflowExecution
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"execution"
(MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
-> FieldAccessor WorkflowExecutionInfo WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
type'__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
type'__field_descriptor
= String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor WorkflowExecutionInfo WorkflowType
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"type"
(MessageOrGroup -> FieldTypeDescriptor WorkflowType
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowType)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
-> FieldAccessor WorkflowExecutionInfo WorkflowType
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'type'")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
startTime__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
startTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor WorkflowExecutionInfo Timestamp
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"start_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor WorkflowExecutionInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
closeTime__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
closeTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor WorkflowExecutionInfo Timestamp
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"close_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor WorkflowExecutionInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'closeTime")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
status__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
status__field_descriptor
= String
-> FieldTypeDescriptor WorkflowExecutionStatus
-> FieldAccessor WorkflowExecutionInfo WorkflowExecutionStatus
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"status"
(ScalarField WorkflowExecutionStatus
-> FieldTypeDescriptor WorkflowExecutionStatus
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowExecutionStatus
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.WorkflowExecutionStatus)
(WireDefault WorkflowExecutionStatus
-> Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
WorkflowExecutionStatus
WorkflowExecutionStatus
-> FieldAccessor WorkflowExecutionInfo WorkflowExecutionStatus
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault WorkflowExecutionStatus
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"status")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
historyLength__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
historyLength__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionInfo Int64
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"history_length"
(ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(WireDefault Int64
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
-> FieldAccessor WorkflowExecutionInfo Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyLength")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
parentNamespaceId__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
parentNamespaceId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionInfo Text
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"parent_namespace_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> FieldAccessor WorkflowExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"parentNamespaceId")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
parentExecution__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
parentExecution__field_descriptor
= String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor WorkflowExecutionInfo WorkflowExecution
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"parent_execution"
(MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
-> FieldAccessor WorkflowExecutionInfo WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'parentExecution")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
executionTime__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
executionTime__field_descriptor
= String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor WorkflowExecutionInfo Timestamp
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"execution_time"
(MessageOrGroup -> FieldTypeDescriptor Timestamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Timestamp.Timestamp)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> FieldAccessor WorkflowExecutionInfo Timestamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'executionTime")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
memo__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
memo__field_descriptor
= String
-> FieldTypeDescriptor Memo
-> FieldAccessor WorkflowExecutionInfo Memo
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"memo"
(MessageOrGroup -> FieldTypeDescriptor Memo
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Memo)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
-> FieldAccessor WorkflowExecutionInfo Memo
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
searchAttributes__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
searchAttributes__field_descriptor
= String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor WorkflowExecutionInfo SearchAttributes
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"search_attributes"
(MessageOrGroup -> FieldTypeDescriptor SearchAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.SearchAttributes)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
-> FieldAccessor WorkflowExecutionInfo SearchAttributes
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'searchAttributes")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
autoResetPoints__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
autoResetPoints__field_descriptor
= String
-> FieldTypeDescriptor ResetPoints
-> FieldAccessor WorkflowExecutionInfo ResetPoints
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"auto_reset_points"
(MessageOrGroup -> FieldTypeDescriptor ResetPoints
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor ResetPoints)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe ResetPoints)
(Maybe ResetPoints)
-> FieldAccessor WorkflowExecutionInfo ResetPoints
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'autoResetPoints")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
taskQueue__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
taskQueue__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionInfo Text
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"task_queue"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> FieldAccessor WorkflowExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
stateTransitionCount__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
stateTransitionCount__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionInfo Int64
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"state_transition_count"
(ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(WireDefault Int64
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
-> FieldAccessor WorkflowExecutionInfo Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"stateTransitionCount")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
historySizeBytes__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
historySizeBytes__field_descriptor
= String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionInfo Int64
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"history_size_bytes"
(ScalarField Int64 -> FieldTypeDescriptor Int64
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Int64
Data.ProtoLens.Int64Field ::
Data.ProtoLens.FieldTypeDescriptor Data.Int.Int64)
(WireDefault Int64
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
-> FieldAccessor WorkflowExecutionInfo Int64
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Int64
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historySizeBytes")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
mostRecentWorkerVersionStamp__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
mostRecentWorkerVersionStamp__field_descriptor
= String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor WorkflowExecutionInfo WorkerVersionStamp
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"most_recent_worker_version_stamp"
(MessageOrGroup -> FieldTypeDescriptor WorkerVersionStamp
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
-> FieldAccessor WorkflowExecutionInfo WorkerVersionStamp
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'mostRecentWorkerVersionStamp")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
executionDuration__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
executionDuration__field_descriptor
= String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionInfo Duration
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"execution_duration"
(MessageOrGroup -> FieldTypeDescriptor Duration
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Google.Protobuf.Duration.Duration)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> FieldAccessor WorkflowExecutionInfo Duration
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'executionDuration")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
rootExecution__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
rootExecution__field_descriptor
= String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor WorkflowExecutionInfo WorkflowExecution
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"root_execution"
(MessageOrGroup -> FieldTypeDescriptor WorkflowExecution
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)
(Lens
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
-> FieldAccessor WorkflowExecutionInfo WorkflowExecution
forall msg value.
Lens' msg (Maybe value) -> FieldAccessor msg value
Data.ProtoLens.OptionalField
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'rootExecution")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
assignedBuildId__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
assignedBuildId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionInfo Text
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"assigned_build_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> FieldAccessor WorkflowExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"assignedBuildId")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
inheritedBuildId__field_descriptor :: FieldDescriptor WorkflowExecutionInfo
inheritedBuildId__field_descriptor
= String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionInfo Text
-> FieldDescriptor WorkflowExecutionInfo
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
String
"inherited_build_id"
(ScalarField Text -> FieldTypeDescriptor Text
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField Text
Data.ProtoLens.StringField ::
Data.ProtoLens.FieldTypeDescriptor Data.Text.Text)
(WireDefault Text
-> Lens WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> FieldAccessor WorkflowExecutionInfo Text
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
WireDefault Text
forall value. (FieldDefault value, Eq value) => WireDefault value
Data.ProtoLens.Optional
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"inheritedBuildId")) ::
Data.ProtoLens.FieldDescriptor WorkflowExecutionInfo
in
[(Tag, FieldDescriptor WorkflowExecutionInfo)]
-> Map Tag (FieldDescriptor WorkflowExecutionInfo)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
[(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionInfo
execution__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionInfo
type'__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionInfo
startTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionInfo
closeTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowExecutionInfo
status__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowExecutionInfo
historyLength__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowExecutionInfo
parentNamespaceId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor WorkflowExecutionInfo
parentExecution__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowExecutionInfo
executionTime__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor WorkflowExecutionInfo
memo__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor WorkflowExecutionInfo
searchAttributes__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor WorkflowExecutionInfo
autoResetPoints__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor WorkflowExecutionInfo
taskQueue__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor WorkflowExecutionInfo
stateTransitionCount__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor WorkflowExecutionInfo
historySizeBytes__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
16,
FieldDescriptor WorkflowExecutionInfo
mostRecentWorkerVersionStamp__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor WorkflowExecutionInfo
executionDuration__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor WorkflowExecutionInfo
rootExecution__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
19, FieldDescriptor WorkflowExecutionInfo
assignedBuildId__field_descriptor),
(Int -> Tag
Data.ProtoLens.Tag Int
20, FieldDescriptor WorkflowExecutionInfo
inheritedBuildId__field_descriptor)]
unknownFields :: Lens' WorkflowExecutionInfo FieldSet
unknownFields
= (WorkflowExecutionInfo -> FieldSet)
-> (WorkflowExecutionInfo -> FieldSet -> WorkflowExecutionInfo)
-> Lens' WorkflowExecutionInfo FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
WorkflowExecutionInfo -> FieldSet
_WorkflowExecutionInfo'_unknownFields
(\ WorkflowExecutionInfo
x__ FieldSet
y__ -> WorkflowExecutionInfo
x__ {_WorkflowExecutionInfo'_unknownFields = y__})
defMessage :: WorkflowExecutionInfo
defMessage
= WorkflowExecutionInfo'_constructor
{_WorkflowExecutionInfo'execution :: Maybe WorkflowExecution
_WorkflowExecutionInfo'execution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'type' :: Maybe WorkflowType
_WorkflowExecutionInfo'type' = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'startTime :: Maybe Timestamp
_WorkflowExecutionInfo'startTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'closeTime :: Maybe Timestamp
_WorkflowExecutionInfo'closeTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'status :: WorkflowExecutionStatus
_WorkflowExecutionInfo'status = WorkflowExecutionStatus
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'historyLength :: Int64
_WorkflowExecutionInfo'historyLength = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'parentNamespaceId :: Text
_WorkflowExecutionInfo'parentNamespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'parentExecution :: Maybe WorkflowExecution
_WorkflowExecutionInfo'parentExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'executionTime :: Maybe Timestamp
_WorkflowExecutionInfo'executionTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'memo :: Maybe Memo
_WorkflowExecutionInfo'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'searchAttributes :: Maybe SearchAttributes
_WorkflowExecutionInfo'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'autoResetPoints :: Maybe ResetPoints
_WorkflowExecutionInfo'autoResetPoints = Maybe ResetPoints
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'taskQueue :: Text
_WorkflowExecutionInfo'taskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'stateTransitionCount :: Int64
_WorkflowExecutionInfo'stateTransitionCount = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'historySizeBytes :: Int64
_WorkflowExecutionInfo'historySizeBytes = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'mostRecentWorkerVersionStamp :: Maybe WorkerVersionStamp
_WorkflowExecutionInfo'mostRecentWorkerVersionStamp = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'executionDuration :: Maybe Duration
_WorkflowExecutionInfo'executionDuration = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'rootExecution :: Maybe WorkflowExecution
_WorkflowExecutionInfo'rootExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
_WorkflowExecutionInfo'assignedBuildId :: Text
_WorkflowExecutionInfo'assignedBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'inheritedBuildId :: Text
_WorkflowExecutionInfo'inheritedBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
_WorkflowExecutionInfo'_unknownFields :: FieldSet
_WorkflowExecutionInfo'_unknownFields = []}
parseMessage :: Parser WorkflowExecutionInfo
parseMessage
= let
loop ::
WorkflowExecutionInfo
-> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionInfo
loop :: WorkflowExecutionInfo -> Parser WorkflowExecutionInfo
loop WorkflowExecutionInfo
x
= do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
if end then
do (let missing = []
in
if Prelude.null missing then
Prelude.return ()
else
Prelude.fail
((Prelude.++)
"Missing required fields: "
(Prelude.show (missing :: [Prelude.String]))))
Prelude.return
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> FieldSet -> FieldSet
forall a. [a] -> [a]
Prelude.reverse FieldSet
t) x)
else
do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
case tag of
Word64
10
-> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"execution"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"execution") y x)
Word64
18
-> do y <- Parser WorkflowType -> String -> Parser WorkflowType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"type"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"type'") y x)
Word64
26
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"start_time"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"startTime") y x)
Word64
34
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"close_time"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"closeTime") y x)
Word64
40
-> do y <- Parser WorkflowExecutionStatus
-> String -> Parser WorkflowExecutionStatus
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Int -> WorkflowExecutionStatus)
-> Parser Int -> Parser WorkflowExecutionStatus
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Int -> WorkflowExecutionStatus
forall a. Enum a => Int -> a
Prelude.toEnum
((Word64 -> Int) -> Parser Word64 -> Parser Int
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt))
String
"status"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"status") y x)
Word64
48
-> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"history_length"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"historyLength") y x)
Word64
58
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"parent_namespace_id"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"parentNamespaceId") y x)
Word64
66
-> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"parent_execution"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"parentExecution") y x)
Word64
74
-> do y <- Parser Timestamp -> String -> Parser Timestamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"execution_time"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"executionTime") y x)
Word64
82
-> do y <- Parser Memo -> String -> Parser Memo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"memo"
loop (Lens.Family2.set (Data.ProtoLens.Field.field @"memo") y x)
Word64
90
-> do y <- Parser SearchAttributes -> String -> Parser SearchAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"search_attributes"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"searchAttributes") y x)
Word64
98
-> do y <- Parser ResetPoints -> String -> Parser ResetPoints
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"auto_reset_points"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"autoResetPoints") y x)
Word64
106
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"task_queue"
loop
(Lens.Family2.set (Data.ProtoLens.Field.field @"taskQueue") y x)
Word64
112
-> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"state_transition_count"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"stateTransitionCount") y x)
Word64
120
-> do y <- Parser Int64 -> String -> Parser Int64
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
((Word64 -> Int64) -> Parser Word64 -> Parser Int64
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
Word64 -> Int64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt)
String
"history_size_bytes"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"historySizeBytes") y x)
Word64
130
-> do y <- Parser WorkerVersionStamp -> String -> Parser WorkerVersionStamp
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"most_recent_worker_version_stamp"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"mostRecentWorkerVersionStamp") y
x)
Word64
138
-> do y <- Parser Duration -> String -> Parser Duration
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"execution_duration"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"executionDuration") y x)
Word64
146
-> do y <- Parser WorkflowExecution -> String -> Parser WorkflowExecution
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.isolate
(Prelude.fromIntegral len) Data.ProtoLens.parseMessage)
String
"root_execution"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"rootExecution") y x)
Word64
154
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"assigned_build_id"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"assignedBuildId") y x)
Word64
162
-> do y <- Parser Text -> String -> Parser Text
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do len <- Parser Word64
Data.ProtoLens.Encoding.Bytes.getVarInt
Data.ProtoLens.Encoding.Bytes.getText
(Prelude.fromIntegral len))
String
"inherited_build_id"
loop
(Lens.Family2.set
(Data.ProtoLens.Field.field @"inheritedBuildId") y x)
Word64
wire
-> do !y <- Word64 -> Parser TaggedValue
Data.ProtoLens.Encoding.Wire.parseTaggedValueFromWire
Word64
wire
loop
(Lens.Family2.over
Data.ProtoLens.unknownFields (\ !FieldSet
t -> (:) TaggedValue
y FieldSet
t) x)
in
Parser WorkflowExecutionInfo
-> String -> Parser WorkflowExecutionInfo
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
(do WorkflowExecutionInfo -> Parser WorkflowExecutionInfo
loop WorkflowExecutionInfo
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"WorkflowExecutionInfo"
buildMessage :: WorkflowExecutionInfo -> Builder
buildMessage
= \ WorkflowExecutionInfo
_x
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkflowExecution)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
-> WorkflowExecutionInfo -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'execution") WorkflowExecutionInfo
_x
of
Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkflowExecution
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkflowType)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowType)
(Maybe WorkflowType)
-> WorkflowExecutionInfo -> Maybe WorkflowType
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'type'") WorkflowExecutionInfo
_x
of
Maybe WorkflowType
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkflowType
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
((ByteString -> Builder)
-> (WorkflowType -> ByteString) -> WorkflowType -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
WorkflowType -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowType
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> WorkflowExecutionInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'startTime") WorkflowExecutionInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
26)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> WorkflowExecutionInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'closeTime") WorkflowExecutionInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral (ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: WorkflowExecutionStatus
_v = FoldLike
WorkflowExecutionStatus
WorkflowExecutionInfo
WorkflowExecutionInfo
WorkflowExecutionStatus
WorkflowExecutionStatus
-> WorkflowExecutionInfo -> WorkflowExecutionStatus
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"status") WorkflowExecutionInfo
_x
in
if WorkflowExecutionStatus -> WorkflowExecutionStatus -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowExecutionStatus
_v WorkflowExecutionStatus
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
40)
((Int -> Builder)
-> (WorkflowExecutionStatus -> Int)
-> WorkflowExecutionStatus
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
((Word64 -> Builder) -> (Int -> Word64) -> Int -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral)
WorkflowExecutionStatus -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowExecutionStatus
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int64
_v
= FoldLike
Int64 WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
-> WorkflowExecutionInfo -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"historyLength") WorkflowExecutionInfo
_x
in
if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
48)
((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
Int64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> WorkflowExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"parentNamespaceId") WorkflowExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkflowExecution)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
-> WorkflowExecutionInfo -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'parentExecution") WorkflowExecutionInfo
_x
of
Maybe WorkflowExecution
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkflowExecution
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes ByteString
bs))
WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecution
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Timestamp)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Timestamp)
(Maybe Timestamp)
-> WorkflowExecutionInfo -> Maybe Timestamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'executionTime") WorkflowExecutionInfo
_x
of
Maybe Timestamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Timestamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
((ByteString -> Builder)
-> (Timestamp -> ByteString) -> Timestamp -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Timestamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Timestamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Memo)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Memo)
(Maybe Memo)
-> WorkflowExecutionInfo -> Maybe Memo
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"maybe'memo") WorkflowExecutionInfo
_x
of
Maybe Memo
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Memo
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
((ByteString -> Builder) -> (Memo -> ByteString) -> Memo -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Memo -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Memo
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe SearchAttributes)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe SearchAttributes)
(Maybe SearchAttributes)
-> WorkflowExecutionInfo -> Maybe SearchAttributes
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'searchAttributes")
WorkflowExecutionInfo
_x
of
Maybe SearchAttributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just SearchAttributes
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
((ByteString -> Builder)
-> (SearchAttributes -> ByteString) -> SearchAttributes -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
SearchAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SearchAttributes
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe ResetPoints)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe ResetPoints)
(Maybe ResetPoints)
-> WorkflowExecutionInfo -> Maybe ResetPoints
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'autoResetPoints")
WorkflowExecutionInfo
_x
of
Maybe ResetPoints
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just ResetPoints
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
((ByteString -> Builder)
-> (ResetPoints -> ByteString) -> ResetPoints -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
ResetPoints -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ResetPoints
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> WorkflowExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"taskQueue")
WorkflowExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
Text
_v Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
106)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8 Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int64
_v
= FoldLike
Int64 WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
-> WorkflowExecutionInfo -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"stateTransitionCount")
WorkflowExecutionInfo
_x
in
if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
112)
((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Int64
_v
= FoldLike
Int64 WorkflowExecutionInfo WorkflowExecutionInfo Int64 Int64
-> WorkflowExecutionInfo -> Int64
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"historySizeBytes")
WorkflowExecutionInfo
_x
in
if Int64 -> Int64 -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
Int64
_v Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
120)
((Word64 -> Builder) -> (Int64 -> Word64) -> Int64 -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Int64 -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral Int64
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkerVersionStamp)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkerVersionStamp)
(Maybe WorkerVersionStamp)
-> WorkflowExecutionInfo -> Maybe WorkerVersionStamp
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'mostRecentWorkerVersionStamp")
WorkflowExecutionInfo
_x
of
Maybe WorkerVersionStamp
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkerVersionStamp
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
130)
((ByteString -> Builder)
-> (WorkerVersionStamp -> ByteString)
-> WorkerVersionStamp
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
WorkerVersionStamp -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
WorkerVersionStamp
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe Duration)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe Duration)
(Maybe Duration)
-> WorkflowExecutionInfo -> Maybe Duration
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'executionDuration")
WorkflowExecutionInfo
_x
of
Maybe Duration
Prelude.Nothing
-> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just Duration
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
138)
((ByteString -> Builder)
-> (Duration -> ByteString) -> Duration -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Duration -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
Duration
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(case
FoldLike
(Maybe WorkflowExecution)
WorkflowExecutionInfo
WorkflowExecutionInfo
(Maybe WorkflowExecution)
(Maybe WorkflowExecution)
-> WorkflowExecutionInfo -> Maybe WorkflowExecution
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"maybe'rootExecution")
WorkflowExecutionInfo
_x
of
Maybe WorkflowExecution
Prelude.Nothing
-> Builder
forall a. Monoid a => a
Data.Monoid.mempty
(Prelude.Just WorkflowExecution
_v)
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
146)
((ByteString -> Builder)
-> (WorkflowExecution -> ByteString)
-> WorkflowExecution
-> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
WorkflowExecution -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
WorkflowExecution
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> WorkflowExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"assignedBuildId")
WorkflowExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
Text
_v
Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
154)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8
Text
_v))
(Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(let
_v :: Text
_v
= FoldLike Text WorkflowExecutionInfo WorkflowExecutionInfo Text Text
-> WorkflowExecutionInfo -> Text
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
(forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field
@"inheritedBuildId")
WorkflowExecutionInfo
_x
in
if Text -> Text -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==)
Text
_v
Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault then
Builder
forall a. Monoid a => a
Data.Monoid.mempty
else
Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
Word64
162)
((ByteString -> Builder) -> (Text -> ByteString) -> Text -> Builder
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
(\ ByteString
bs
-> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
(Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
(Int -> Word64
forall a b. (Integral a, Num b) => a -> b
Prelude.fromIntegral
(ByteString -> Int
Data.ByteString.length
ByteString
bs)))
(ByteString -> Builder
Data.ProtoLens.Encoding.Bytes.putBytes
ByteString
bs))
Text -> ByteString
Data.Text.Encoding.encodeUtf8
Text
_v))
(FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
(FoldLike
FieldSet
WorkflowExecutionInfo
WorkflowExecutionInfo
FieldSet
FieldSet
-> WorkflowExecutionInfo -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
FoldLike
FieldSet
WorkflowExecutionInfo
WorkflowExecutionInfo
FieldSet
FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionInfo FieldSet
Data.ProtoLens.unknownFields
WorkflowExecutionInfo
_x)))))))))))))))))))))
instance Control.DeepSeq.NFData WorkflowExecutionInfo where
rnf :: WorkflowExecutionInfo -> ()
rnf
= \ WorkflowExecutionInfo
x__
-> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> FieldSet
_WorkflowExecutionInfo'_unknownFields WorkflowExecutionInfo
x__)
(Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'execution WorkflowExecutionInfo
x__)
(Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe WorkflowType
_WorkflowExecutionInfo'type' WorkflowExecutionInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'startTime WorkflowExecutionInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'closeTime WorkflowExecutionInfo
x__)
(WorkflowExecutionStatus -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> WorkflowExecutionStatus
_WorkflowExecutionInfo'status WorkflowExecutionInfo
x__)
(Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'historyLength WorkflowExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'parentNamespaceId WorkflowExecutionInfo
x__)
(Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'parentExecution WorkflowExecutionInfo
x__)
(Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe Timestamp
_WorkflowExecutionInfo'executionTime WorkflowExecutionInfo
x__)
(Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe Memo
_WorkflowExecutionInfo'memo WorkflowExecutionInfo
x__)
(Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe SearchAttributes
_WorkflowExecutionInfo'searchAttributes WorkflowExecutionInfo
x__)
(Maybe ResetPoints -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe ResetPoints
_WorkflowExecutionInfo'autoResetPoints WorkflowExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'taskQueue WorkflowExecutionInfo
x__)
(Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'stateTransitionCount
WorkflowExecutionInfo
x__)
(Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Int64
_WorkflowExecutionInfo'historySizeBytes
WorkflowExecutionInfo
x__)
(Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe WorkerVersionStamp
_WorkflowExecutionInfo'mostRecentWorkerVersionStamp
WorkflowExecutionInfo
x__)
(Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe Duration
_WorkflowExecutionInfo'executionDuration
WorkflowExecutionInfo
x__)
(Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Maybe WorkflowExecution
_WorkflowExecutionInfo'rootExecution
WorkflowExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'assignedBuildId
WorkflowExecutionInfo
x__)
(Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
(WorkflowExecutionInfo -> Text
_WorkflowExecutionInfo'inheritedBuildId
WorkflowExecutionInfo
x__)
()))))))))))))))))))))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
= ByteString
"\n\
\&temporal/api/workflow/v1/message.proto\DC2\CANtemporal.api.workflow.v1\SUB\RSgoogle/protobuf/duration.proto\SUB\ESCgoogle/protobuf/empty.proto\SUB\USgoogle/protobuf/timestamp.proto\SUB\"temporal/api/enums/v1/common.proto\SUB$temporal/api/enums/v1/workflow.proto\SUB$temporal/api/common/v1/message.proto\SUB%temporal/api/failure/v1/message.proto\SUB'temporal/api/taskqueue/v1/message.proto\"\145\n\
\\n\
\\NAKWorkflowExecutionInfo\DC2G\n\
\\texecution\CAN\SOH \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\texecution\DC28\n\
\\EOTtype\CAN\STX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\EOTtype\DC29\n\
\\n\
\start_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\tstartTime\DC29\n\
\\n\
\close_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\tcloseTime\DC2F\n\
\\ACKstatus\CAN\ENQ \SOH(\SO2..temporal.api.enums.v1.WorkflowExecutionStatusR\ACKstatus\DC2%\n\
\\SOhistory_length\CAN\ACK \SOH(\ETXR\rhistoryLength\DC2.\n\
\\DC3parent_namespace_id\CAN\a \SOH(\tR\DC1parentNamespaceId\DC2T\n\
\\DLEparent_execution\CAN\b \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\SIparentExecution\DC2A\n\
\\SOexecution_time\CAN\t \SOH(\v2\SUB.google.protobuf.TimestampR\rexecutionTime\DC20\n\
\\EOTmemo\CAN\n\
\ \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
\\DC1search_attributes\CAN\v \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2Q\n\
\\DC1auto_reset_points\CAN\f \SOH(\v2%.temporal.api.workflow.v1.ResetPointsR\SIautoResetPoints\DC2\GS\n\
\\n\
\task_queue\CAN\r \SOH(\tR\ttaskQueue\DC24\n\
\\SYNstate_transition_count\CAN\SO \SOH(\ETXR\DC4stateTransitionCount\DC2,\n\
\\DC2history_size_bytes\CAN\SI \SOH(\ETXR\DLEhistorySizeBytes\DC2r\n\
\ most_recent_worker_version_stamp\CAN\DLE \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\FSmostRecentWorkerVersionStamp\DC2H\n\
\\DC2execution_duration\CAN\DC1 \SOH(\v2\EM.google.protobuf.DurationR\DC1executionDuration\DC2P\n\
\\SOroot_execution\CAN\DC2 \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\rrootExecution\DC2*\n\
\\DC1assigned_build_id\CAN\DC3 \SOH(\tR\SIassignedBuildId\DC2,\n\
\\DC2inherited_build_id\CAN\DC4 \SOH(\tR\DLEinheritedBuildId\"\226\STX\n\
\\ETBWorkflowExecutionConfig\DC2C\n\
\\n\
\task_queue\CAN\SOH \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2W\n\
\\SUBworkflow_execution_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
\\DC4workflow_run_timeout\CAN\ETX \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2\\\n\
\\GSdefault_workflow_task_timeout\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR\SUBdefaultWorkflowTaskTimeout\"\134\b\n\
\\DC3PendingActivityInfo\DC2\US\n\
\\vactivity_id\CAN\SOH \SOH(\tR\n\
\activityId\DC2I\n\
\\ractivity_type\CAN\STX \SOH(\v2$.temporal.api.common.v1.ActivityTypeR\factivityType\DC2A\n\
\\ENQstate\CAN\ETX \SOH(\SO2+.temporal.api.enums.v1.PendingActivityStateR\ENQstate\DC2M\n\
\\DC1heartbeat_details\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\DLEheartbeatDetails\DC2J\n\
\\DC3last_heartbeat_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\DC1lastHeartbeatTime\DC2F\n\
\\DC1last_started_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\SIlastStartedTime\DC2\CAN\n\
\\aattempt\CAN\a \SOH(\ENQR\aattempt\DC2)\n\
\\DLEmaximum_attempts\CAN\b \SOH(\ENQR\SImaximumAttempts\DC2A\n\
\\SOscheduled_time\CAN\t \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2C\n\
\\SIexpiration_time\CAN\n\
\ \SOH(\v2\SUB.google.protobuf.TimestampR\SOexpirationTime\DC2C\n\
\\flast_failure\CAN\v \SOH(\v2 .temporal.api.failure.v1.FailureR\vlastFailure\DC20\n\
\\DC4last_worker_identity\CAN\f \SOH(\tR\DC2lastWorkerIdentity\DC2K\n\
\\NAKuse_workflow_build_id\CAN\r \SOH(\v2\SYN.google.protobuf.EmptyH\NULR\DC2useWorkflowBuildId\DC2P\n\
\$last_independently_assigned_build_id\CAN\SO \SOH(\tH\NULR lastIndependentlyAssignedBuildId\DC2e\n\
\\EMlast_worker_version_stamp\CAN\SI \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\SYNlastWorkerVersionStampB\DC3\n\
\\DC1assigned_build_id\"\254\SOH\n\
\\EMPendingChildExecutionInfo\DC2\US\n\
\\vworkflow_id\CAN\SOH \SOH(\tR\n\
\workflowId\DC2\NAK\n\
\\ACKrun_id\CAN\STX \SOH(\tR\ENQrunId\DC2,\n\
\\DC2workflow_type_name\CAN\ETX \SOH(\tR\DLEworkflowTypeName\DC2!\n\
\\finitiated_id\CAN\EOT \SOH(\ETXR\vinitiatedId\DC2X\n\
\\DC3parent_close_policy\CAN\ENQ \SOH(\SO2(.temporal.api.enums.v1.ParentClosePolicyR\DC1parentClosePolicy\"\208\STX\n\
\\ETBPendingWorkflowTaskInfo\DC2E\n\
\\ENQstate\CAN\SOH \SOH(\SO2/.temporal.api.enums.v1.PendingWorkflowTaskStateR\ENQstate\DC2A\n\
\\SOscheduled_time\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2R\n\
\\ETBoriginal_scheduled_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\NAKoriginalScheduledTime\DC2=\n\
\\fstarted_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\vstartedTime\DC2\CAN\n\
\\aattempt\CAN\ENQ \SOH(\ENQR\aattempt\"O\n\
\\vResetPoints\DC2@\n\
\\ACKpoints\CAN\SOH \ETX(\v2(.temporal.api.workflow.v1.ResetPointInfoR\ACKpoints\"\205\STX\n\
\\SOResetPointInfo\DC2\EM\n\
\\bbuild_id\CAN\a \SOH(\tR\abuildId\DC2'\n\
\\SIbinary_checksum\CAN\SOH \SOH(\tR\SObinaryChecksum\DC2\NAK\n\
\\ACKrun_id\CAN\STX \SOH(\tR\ENQrunId\DC2F\n\
\ first_workflow_task_completed_id\CAN\ETX \SOH(\ETXR\FSfirstWorkflowTaskCompletedId\DC2;\n\
\\vcreate_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\n\
\createTime\DC2;\n\
\\vexpire_time\CAN\ENQ \SOH(\v2\SUB.google.protobuf.TimestampR\n\
\expireTime\DC2\RS\n\
\\n\
\resettable\CAN\ACK \SOH(\bR\n\
\resettable\"\141\a\n\
\\CANNewWorkflowExecutionInfo\DC2\US\n\
\\vworkflow_id\CAN\SOH \SOH(\tR\n\
\workflowId\DC2I\n\
\\rworkflow_type\CAN\STX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
\\n\
\task_queue\CAN\ETX \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
\\ENQinput\CAN\EOT \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
\\SUBworkflow_execution_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
\\DC4workflow_run_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
\\NAKworkflow_task_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2e\n\
\\CANworkflow_id_reuse_policy\CAN\b \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2F\n\
\\fretry_policy\CAN\t \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
\\rcron_schedule\CAN\n\
\ \SOH(\tR\fcronSchedule\DC20\n\
\\EOTmemo\CAN\v \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
\\DC1search_attributes\CAN\f \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC26\n\
\\ACKheader\CAN\r \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\"\197\ENQ\n\
\\fCallbackInfo\DC2<\n\
\\bcallback\CAN\SOH \SOH(\v2 .temporal.api.common.v1.CallbackR\bcallback\DC2H\n\
\\atrigger\CAN\STX \SOH(\v2..temporal.api.workflow.v1.CallbackInfo.TriggerR\atrigger\DC2G\n\
\\DC1registration_time\CAN\ETX \SOH(\v2\SUB.google.protobuf.TimestampR\DLEregistrationTime\DC2:\n\
\\ENQstate\CAN\EOT \SOH(\SO2$.temporal.api.enums.v1.CallbackStateR\ENQstate\DC2\CAN\n\
\\aattempt\CAN\ENQ \SOH(\ENQR\aattempt\DC2W\n\
\\SUBlast_attempt_complete_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\ETBlastAttemptCompleteTime\DC2R\n\
\\DC4last_attempt_failure\CAN\a \SOH(\v2 .temporal.api.failure.v1.FailureR\DC2lastAttemptFailure\DC2W\n\
\\SUBnext_attempt_schedule_time\CAN\b \SOH(\v2\SUB.google.protobuf.TimestampR\ETBnextAttemptScheduleTime\SUB\DLE\n\
\\SOWorkflowClosed\SUBv\n\
\\aTrigger\DC2`\n\
\\SIworkflow_closed\CAN\SOH \SOH(\v25.temporal.api.workflow.v1.CallbackInfo.WorkflowClosedH\NULR\SOworkflowClosedB\t\n\
\\avariant\"\251\ENQ\n\
\\EMPendingNexusOperationInfo\DC2\SUB\n\
\\bendpoint\CAN\SOH \SOH(\tR\bendpoint\DC2\CAN\n\
\\aservice\CAN\STX \SOH(\tR\aservice\DC2\FS\n\
\\toperation\CAN\ETX \SOH(\tR\toperation\DC2!\n\
\\foperation_id\CAN\EOT \SOH(\tR\voperationId\DC2T\n\
\\EMschedule_to_close_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2A\n\
\\SOscheduled_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\rscheduledTime\DC2G\n\
\\ENQstate\CAN\a \SOH(\SO21.temporal.api.enums.v1.PendingNexusOperationStateR\ENQstate\DC2\CAN\n\
\\aattempt\CAN\b \SOH(\ENQR\aattempt\DC2W\n\
\\SUBlast_attempt_complete_time\CAN\t \SOH(\v2\SUB.google.protobuf.TimestampR\ETBlastAttemptCompleteTime\DC2R\n\
\\DC4last_attempt_failure\CAN\n\
\ \SOH(\v2 .temporal.api.failure.v1.FailureR\DC2lastAttemptFailure\DC2W\n\
\\SUBnext_attempt_schedule_time\CAN\v \SOH(\v2\SUB.google.protobuf.TimestampR\ETBnextAttemptScheduleTime\DC2e\n\
\\DC1cancellation_info\CAN\f \SOH(\v28.temporal.api.workflow.v1.NexusOperationCancellationInfoR\DLEcancellationInfo\"\209\ETX\n\
\\RSNexusOperationCancellationInfo\DC2A\n\
\\SOrequested_time\CAN\SOH \SOH(\v2\SUB.google.protobuf.TimestampR\rrequestedTime\DC2L\n\
\\ENQstate\CAN\STX \SOH(\SO26.temporal.api.enums.v1.NexusOperationCancellationStateR\ENQstate\DC2\CAN\n\
\\aattempt\CAN\ETX \SOH(\ENQR\aattempt\DC2W\n\
\\SUBlast_attempt_complete_time\CAN\EOT \SOH(\v2\SUB.google.protobuf.TimestampR\ETBlastAttemptCompleteTime\DC2R\n\
\\DC4last_attempt_failure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\DC2lastAttemptFailure\DC2W\n\
\\SUBnext_attempt_schedule_time\CAN\ACK \SOH(\v2\SUB.google.protobuf.TimestampR\ETBnextAttemptScheduleTimeB\147\SOH\n\
\\ESCio.temporal.api.workflow.v1B\fMessageProtoP\SOHZ'go.temporal.io/api/workflow/v1;workflow\170\STX\SUBTemporalio.Api.Workflow.V1\234\STX\GSTemporalio::Api::Workflow::V1J\144k\n\
\\a\DC2\ENQ\SYN\NUL\159\STX\SOH\n\
\\241\b\n\
\\SOH\f\DC2\ETX\SYN\NUL\DC22\230\b The MIT License\n\
\\n\
\ Copyright (c) 2020 Temporal Technologies Inc. All rights reserved.\n\
\\n\
\ Permission is hereby granted, free of charge, to any person obtaining a copy\n\
\ of this software and associated documentation files (the \"Software\"), to deal\n\
\ in the Software without restriction, including without limitation the rights\n\
\ to use, copy, modify, merge, publish, distribute, sublicense, and/or sell\n\
\ copies of the Software, and to permit persons to whom the Software is\n\
\ furnished to do so, subject to the following conditions:\n\
\\n\
\ The above copyright notice and this permission notice shall be included in\n\
\ all copies or substantial portions of the Software.\n\
\\n\
\ THE SOFTWARE IS PROVIDED \"AS IS\", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR\n\
\ IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\n\
\ FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE\n\
\ AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER\n\
\ LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,\n\
\ OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN\n\
\ THE SOFTWARE.\n\
\\n\
\\b\n\
\\SOH\STX\DC2\ETX\CAN\NUL!\n\
\\b\n\
\\SOH\b\DC2\ETX\SUB\NUL>\n\
\\t\n\
\\STX\b\v\DC2\ETX\SUB\NUL>\n\
\\b\n\
\\SOH\b\DC2\ETX\ESC\NUL4\n\
\\t\n\
\\STX\b\SOH\DC2\ETX\ESC\NUL4\n\
\\b\n\
\\SOH\b\DC2\ETX\FS\NUL\"\n\
\\t\n\
\\STX\b\n\
\\DC2\ETX\FS\NUL\"\n\
\\b\n\
\\SOH\b\DC2\ETX\GS\NUL-\n\
\\t\n\
\\STX\b\b\DC2\ETX\GS\NUL-\n\
\\b\n\
\\SOH\b\DC2\ETX\RS\NUL6\n\
\\t\n\
\\STX\b-\DC2\ETX\RS\NUL6\n\
\\b\n\
\\SOH\b\DC2\ETX\US\NUL7\n\
\\t\n\
\\STX\b%\DC2\ETX\US\NUL7\n\
\\t\n\
\\STX\ETX\NUL\DC2\ETX!\NUL(\n\
\\t\n\
\\STX\ETX\SOH\DC2\ETX\"\NUL%\n\
\\t\n\
\\STX\ETX\STX\DC2\ETX#\NUL)\n\
\\t\n\
\\STX\ETX\ETX\DC2\ETX%\NUL,\n\
\\t\n\
\\STX\ETX\EOT\DC2\ETX&\NUL.\n\
\\t\n\
\\STX\ETX\ENQ\DC2\ETX'\NUL.\n\
\\t\n\
\\STX\ETX\ACK\DC2\ETX(\NUL/\n\
\\t\n\
\\STX\ETX\a\DC2\ETX)\NUL1\n\
\\n\
\\n\
\\STX\EOT\NUL\DC2\EOT+\NUL\\\SOH\n\
\\n\
\\n\
\\ETX\EOT\NUL\SOH\DC2\ETX+\b\GS\n\
\\v\n\
\\EOT\EOT\NUL\STX\NUL\DC2\ETX,\EOT;\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX,\EOT,\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX,-6\n\
\\f\n\
\\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX,9:\n\
\\v\n\
\\EOT\EOT\NUL\STX\SOH\DC2\ETX-\EOT1\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ACK\DC2\ETX-\EOT'\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX-(,\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX-/0\n\
\\v\n\
\\EOT\EOT\NUL\STX\STX\DC2\ETX.\EOT-\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ACK\DC2\ETX.\EOT\GS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX.\RS(\n\
\\f\n\
\\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX.+,\n\
\\v\n\
\\EOT\EOT\NUL\STX\ETX\DC2\ETX/\EOT-\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX/\EOT\GS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX/\RS(\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX/+,\n\
\\v\n\
\\EOT\EOT\NUL\STX\EOT\DC2\ETX0\EOT=\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\ACK\DC2\ETX0\EOT1\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX028\n\
\\f\n\
\\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX0;<\n\
\\v\n\
\\EOT\EOT\NUL\STX\ENQ\DC2\ETX1\EOT\GS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\ENQ\DC2\ETX1\EOT\t\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX1\n\
\\CAN\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX1\ESC\FS\n\
\\v\n\
\\EOT\EOT\NUL\STX\ACK\DC2\ETX2\EOT#\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\ENQ\DC2\ETX2\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX2\v\RS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX2!\"\n\
\\v\n\
\\EOT\EOT\NUL\STX\a\DC2\ETX3\EOTB\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\ACK\DC2\ETX3\EOT,\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\SOH\DC2\ETX3-=\n\
\\f\n\
\\ENQ\EOT\NUL\STX\a\ETX\DC2\ETX3@A\n\
\\v\n\
\\EOT\EOT\NUL\STX\b\DC2\ETX4\EOT1\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\ACK\DC2\ETX4\EOT\GS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\SOH\DC2\ETX4\RS,\n\
\\f\n\
\\ENQ\EOT\NUL\STX\b\ETX\DC2\ETX4/0\n\
\\v\n\
\\EOT\EOT\NUL\STX\t\DC2\ETX5\EOT*\n\
\\f\n\
\\ENQ\EOT\NUL\STX\t\ACK\DC2\ETX5\EOT\US\n\
\\f\n\
\\ENQ\EOT\NUL\STX\t\SOH\DC2\ETX5 $\n\
\\f\n\
\\ENQ\EOT\NUL\STX\t\ETX\DC2\ETX5')\n\
\\v\n\
\\EOT\EOT\NUL\STX\n\
\\DC2\ETX6\EOTC\n\
\\f\n\
\\ENQ\EOT\NUL\STX\n\
\\ACK\DC2\ETX6\EOT+\n\
\\f\n\
\\ENQ\EOT\NUL\STX\n\
\\SOH\DC2\ETX6,=\n\
\\f\n\
\\ENQ\EOT\NUL\STX\n\
\\ETX\DC2\ETX6@B\n\
\\v\n\
\\EOT\EOT\NUL\STX\v\DC2\ETX7\EOT'\n\
\\f\n\
\\ENQ\EOT\NUL\STX\v\ACK\DC2\ETX7\EOT\SI\n\
\\f\n\
\\ENQ\EOT\NUL\STX\v\SOH\DC2\ETX7\DLE!\n\
\\f\n\
\\ENQ\EOT\NUL\STX\v\ETX\DC2\ETX7$&\n\
\\v\n\
\\EOT\EOT\NUL\STX\f\DC2\ETX8\EOT\ESC\n\
\\f\n\
\\ENQ\EOT\NUL\STX\f\ENQ\DC2\ETX8\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\f\SOH\DC2\ETX8\v\NAK\n\
\\f\n\
\\ENQ\EOT\NUL\STX\f\ETX\DC2\ETX8\CAN\SUB\n\
\\v\n\
\\EOT\EOT\NUL\STX\r\DC2\ETX9\EOT&\n\
\\f\n\
\\ENQ\EOT\NUL\STX\r\ENQ\DC2\ETX9\EOT\t\n\
\\f\n\
\\ENQ\EOT\NUL\STX\r\SOH\DC2\ETX9\n\
\ \n\
\\f\n\
\\ENQ\EOT\NUL\STX\r\ETX\DC2\ETX9#%\n\
\\v\n\
\\EOT\EOT\NUL\STX\SO\DC2\ETX:\EOT\"\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SO\ENQ\DC2\ETX:\EOT\t\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SO\SOH\DC2\ETX:\n\
\\FS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SO\ETX\DC2\ETX:\US!\n\
\g\n\
\\EOT\EOT\NUL\STX\SI\DC2\ETX<\EOTT\SUBZ If set, the most recent worker version stamp that appeared in a workflow task completion\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SI\ACK\DC2\ETX<\EOT-\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SI\SOH\DC2\ETX<.N\n\
\\f\n\
\\ENQ\EOT\NUL\STX\SI\ETX\DC2\ETX<QS\n\
\\164\SOH\n\
\\EOT\EOT\NUL\STX\DLE\DC2\ETX?\EOT5\SUB\150\SOH Workflow execution duration is defined as difference between close time and execution time.\n\
\ This field is only populated if the workflow is closed.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DLE\ACK\DC2\ETX?\EOT\FS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DLE\SOH\DC2\ETX?\GS/\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DLE\ETX\DC2\ETX?24\n\
\\153\b\n\
\\EOT\EOT\NUL\STX\DC1\DC2\ETXQ\EOTA\SUB\139\b Contains information about the root workflow execution.\n\
\ The root workflow execution is defined as follows:\n\
\ 1. A workflow without parent workflow is its own root workflow.\n\
\ 2. A workflow that has a parent workflow has the same root workflow as its parent workflow.\n\
\ Note: workflows continued as new or reseted may or may not have parents, check examples below.\n\
\\n\
\ Examples:\n\
\ Scenario 1: Workflow W1 starts child workflow W2, and W2 starts child workflow W3.\n\
\ - The root workflow of all three workflows is W1.\n\
\ Scenario 2: Workflow W1 starts child workflow W2, and W2 continued as new W3.\n\
\ - The root workflow of all three workflows is W1.\n\
\ Scenario 3: Workflow W1 continued as new W2.\n\
\ - The root workflow of W1 is W1 and the root workflow of W2 is W2.\n\
\ Scenario 4: Workflow W1 starts child workflow W2, and W2 is reseted, creating W3\n\
\ - The root workflow of all three workflows is W1.\n\
\ Scenario 5: Workflow W1 is reseted, creating W2.\n\
\ - The root workflow of W1 is W1 and the root workflow of W2 is W2.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC1\ACK\DC2\ETXQ\EOT,\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC1\SOH\DC2\ETXQ-;\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC1\ETX\DC2\ETXQ>@\n\
\\152\EOT\n\
\\EOT\EOT\NUL\STX\DC2\DC2\ETXX\EOT\"\SUB\138\EOT The currently assigned build ID for this execution. Presence of this value means worker versioning is used\n\
\ for this execution. Assigned build ID is selected based on Worker Versioning Assignment Rules\n\
\ when the first workflow task of the execution is scheduled. If the first workflow task fails and is scheduled\n\
\ again, the assigned build ID may change according to the latest versioning rules.\n\
\ Assigned build ID can also change in the middle of a execution if Compatible Redirect Rules are applied to\n\
\ this execution.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC2\ENQ\DC2\ETXX\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC2\SOH\DC2\ETXX\v\FS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC2\ETX\DC2\ETXX\US!\n\
\\159\SOH\n\
\\EOT\EOT\NUL\STX\DC3\DC2\ETX[\EOT#\SUB\145\SOH Build ID inherited from a previous/parent execution. If present, assigned_build_id will be set to this, instead\n\
\ of using the assignment rules.\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC3\ENQ\DC2\ETX[\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC3\SOH\DC2\ETX[\v\GS\n\
\\f\n\
\\ENQ\EOT\NUL\STX\DC3\ETX\DC2\ETX[ \"\n\
\\n\
\\n\
\\STX\EOT\SOH\DC2\EOT^\NULc\SOH\n\
\\n\
\\n\
\\ETX\EOT\SOH\SOH\DC2\ETX^\b\US\n\
\\v\n\
\\EOT\EOT\SOH\STX\NUL\DC2\ETX_\EOT7\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ACK\DC2\ETX_\EOT'\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\SOH\DC2\ETX_(2\n\
\\f\n\
\\ENQ\EOT\SOH\STX\NUL\ETX\DC2\ETX_56\n\
\\v\n\
\\EOT\EOT\SOH\STX\SOH\DC2\ETX`\EOT<\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ACK\DC2\ETX`\EOT\FS\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\SOH\DC2\ETX`\GS7\n\
\\f\n\
\\ENQ\EOT\SOH\STX\SOH\ETX\DC2\ETX`:;\n\
\\v\n\
\\EOT\EOT\SOH\STX\STX\DC2\ETXa\EOT6\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\ACK\DC2\ETXa\EOT\FS\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\SOH\DC2\ETXa\GS1\n\
\\f\n\
\\ENQ\EOT\SOH\STX\STX\ETX\DC2\ETXa45\n\
\\v\n\
\\EOT\EOT\SOH\STX\ETX\DC2\ETXb\EOT?\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\ACK\DC2\ETXb\EOT\FS\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\SOH\DC2\ETXb\GS:\n\
\\f\n\
\\ENQ\EOT\SOH\STX\ETX\ETX\DC2\ETXb=>\n\
\\v\n\
\\STX\EOT\STX\DC2\ENQe\NUL\128\SOH\SOH\n\
\\n\
\\n\
\\ETX\EOT\STX\SOH\DC2\ETXe\b\ESC\n\
\\v\n\
\\EOT\EOT\STX\STX\NUL\DC2\ETXf\EOT\ESC\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ENQ\DC2\ETXf\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\SOH\DC2\ETXf\v\SYN\n\
\\f\n\
\\ENQ\EOT\STX\STX\NUL\ETX\DC2\ETXf\EM\SUB\n\
\\v\n\
\\EOT\EOT\STX\STX\SOH\DC2\ETXg\EOT:\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ACK\DC2\ETXg\EOT'\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\SOH\DC2\ETXg(5\n\
\\f\n\
\\ENQ\EOT\STX\STX\SOH\ETX\DC2\ETXg89\n\
\\v\n\
\\EOT\EOT\STX\STX\STX\DC2\ETXh\EOT9\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ACK\DC2\ETXh\EOT.\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\SOH\DC2\ETXh/4\n\
\\f\n\
\\ENQ\EOT\STX\STX\STX\ETX\DC2\ETXh78\n\
\\v\n\
\\EOT\EOT\STX\STX\ETX\DC2\ETXi\EOT:\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\ACK\DC2\ETXi\EOT#\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\SOH\DC2\ETXi$5\n\
\\f\n\
\\ENQ\EOT\STX\STX\ETX\ETX\DC2\ETXi89\n\
\\v\n\
\\EOT\EOT\STX\STX\EOT\DC2\ETXj\EOT6\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\ACK\DC2\ETXj\EOT\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\SOH\DC2\ETXj\RS1\n\
\\f\n\
\\ENQ\EOT\STX\STX\EOT\ETX\DC2\ETXj45\n\
\\v\n\
\\EOT\EOT\STX\STX\ENQ\DC2\ETXk\EOT4\n\
\\f\n\
\\ENQ\EOT\STX\STX\ENQ\ACK\DC2\ETXk\EOT\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\ENQ\SOH\DC2\ETXk\RS/\n\
\\f\n\
\\ENQ\EOT\STX\STX\ENQ\ETX\DC2\ETXk23\n\
\\v\n\
\\EOT\EOT\STX\STX\ACK\DC2\ETXl\EOT\SYN\n\
\\f\n\
\\ENQ\EOT\STX\STX\ACK\ENQ\DC2\ETXl\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\ACK\SOH\DC2\ETXl\n\
\\DC1\n\
\\f\n\
\\ENQ\EOT\STX\STX\ACK\ETX\DC2\ETXl\DC4\NAK\n\
\\v\n\
\\EOT\EOT\STX\STX\a\DC2\ETXm\EOT\US\n\
\\f\n\
\\ENQ\EOT\STX\STX\a\ENQ\DC2\ETXm\EOT\t\n\
\\f\n\
\\ENQ\EOT\STX\STX\a\SOH\DC2\ETXm\n\
\\SUB\n\
\\f\n\
\\ENQ\EOT\STX\STX\a\ETX\DC2\ETXm\GS\RS\n\
\\v\n\
\\EOT\EOT\STX\STX\b\DC2\ETXn\EOT1\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\ACK\DC2\ETXn\EOT\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\SOH\DC2\ETXn\RS,\n\
\\f\n\
\\ENQ\EOT\STX\STX\b\ETX\DC2\ETXn/0\n\
\\v\n\
\\EOT\EOT\STX\STX\t\DC2\ETXo\EOT3\n\
\\f\n\
\\ENQ\EOT\STX\STX\t\ACK\DC2\ETXo\EOT\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\t\SOH\DC2\ETXo\RS-\n\
\\f\n\
\\ENQ\EOT\STX\STX\t\ETX\DC2\ETXo02\n\
\\v\n\
\\EOT\EOT\STX\STX\n\
\\DC2\ETXp\EOT6\n\
\\f\n\
\\ENQ\EOT\STX\STX\n\
\\ACK\DC2\ETXp\EOT#\n\
\\f\n\
\\ENQ\EOT\STX\STX\n\
\\SOH\DC2\ETXp$0\n\
\\f\n\
\\ENQ\EOT\STX\STX\n\
\\ETX\DC2\ETXp35\n\
\\v\n\
\\EOT\EOT\STX\STX\v\DC2\ETXq\EOT%\n\
\\f\n\
\\ENQ\EOT\STX\STX\v\ENQ\DC2\ETXq\EOT\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\v\SOH\DC2\ETXq\v\US\n\
\\f\n\
\\ENQ\EOT\STX\STX\v\ETX\DC2\ETXq\"$\n\
\\189\STX\n\
\\EOT\EOT\STX\b\NUL\DC2\EOTu\EOT}\ENQ\SUB\174\STX Absence of `assigned_build_id` generally means this task is on an \"unversioned\" task queue.\n\
\ In rare cases, it can also mean that the task queue is versioned but we failed to write activity's\n\
\ independently-assigned build ID to the database. This case heals automatically once the task is dispatched.\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\b\NUL\SOH\DC2\ETXu\n\
\\ESC\n\
\`\n\
\\EOT\EOT\STX\STX\f\DC2\ETXw\b9\SUBS When present, it means this activity is assigned to the build ID of its workflow.\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\f\ACK\DC2\ETXw\b\GS\n\
\\f\n\
\\ENQ\EOT\STX\STX\f\SOH\DC2\ETXw\RS3\n\
\\f\n\
\\ENQ\EOT\STX\STX\f\ETX\DC2\ETXw68\n\
\\163\STX\n\
\\EOT\EOT\STX\STX\r\DC2\ETX|\b9\SUB\149\STX This means the activity is independently versioned and not bound to the build ID of its workflow.\n\
\ The activity will use the build id in this field instead.\n\
\ If the task fails and is scheduled again, the assigned build ID may change according to the latest versioning\n\
\ rules.\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\r\ENQ\DC2\ETX|\b\SO\n\
\\f\n\
\\ENQ\EOT\STX\STX\r\SOH\DC2\ETX|\SI3\n\
\\f\n\
\\ENQ\EOT\STX\STX\r\ETX\DC2\ETX|68\n\
\a\n\
\\EOT\EOT\STX\STX\SO\DC2\ETX\DEL\EOTM\SUBT The version stamp of the worker to whom this activity was most recently dispatched\n\
\\n\
\\f\n\
\\ENQ\EOT\STX\STX\SO\ACK\DC2\ETX\DEL\EOT-\n\
\\f\n\
\\ENQ\EOT\STX\STX\SO\SOH\DC2\ETX\DEL.G\n\
\\f\n\
\\ENQ\EOT\STX\STX\SO\ETX\DC2\ETX\DELJL\n\
\\f\n\
\\STX\EOT\ETX\DC2\ACK\130\SOH\NUL\137\SOH\SOH\n\
\\v\n\
\\ETX\EOT\ETX\SOH\DC2\EOT\130\SOH\b!\n\
\\f\n\
\\EOT\EOT\ETX\STX\NUL\DC2\EOT\131\SOH\EOT\ESC\n\
\\r\n\
\\ENQ\EOT\ETX\STX\NUL\ENQ\DC2\EOT\131\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\131\SOH\v\SYN\n\
\\r\n\
\\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\131\SOH\EM\SUB\n\
\\f\n\
\\EOT\EOT\ETX\STX\SOH\DC2\EOT\132\SOH\EOT\SYN\n\
\\r\n\
\\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\EOT\132\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\132\SOH\v\DC1\n\
\\r\n\
\\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\132\SOH\DC4\NAK\n\
\\f\n\
\\EOT\EOT\ETX\STX\STX\DC2\EOT\133\SOH\EOT\"\n\
\\r\n\
\\ENQ\EOT\ETX\STX\STX\ENQ\DC2\EOT\133\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\STX\SOH\DC2\EOT\133\SOH\v\GS\n\
\\r\n\
\\ENQ\EOT\ETX\STX\STX\ETX\DC2\EOT\133\SOH !\n\
\\f\n\
\\EOT\EOT\ETX\STX\ETX\DC2\EOT\134\SOH\EOT\ESC\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ETX\ENQ\DC2\EOT\134\SOH\EOT\t\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ETX\SOH\DC2\EOT\134\SOH\n\
\\SYN\n\
\\r\n\
\\ENQ\EOT\ETX\STX\ETX\ETX\DC2\EOT\134\SOH\EM\SUB\n\
\7\n\
\\EOT\EOT\ETX\STX\EOT\DC2\EOT\136\SOH\EOTD\SUB) Default: PARENT_CLOSE_POLICY_TERMINATE.\n\
\\n\
\\r\n\
\\ENQ\EOT\ETX\STX\EOT\ACK\DC2\EOT\136\SOH\EOT+\n\
\\r\n\
\\ENQ\EOT\ETX\STX\EOT\SOH\DC2\EOT\136\SOH,?\n\
\\r\n\
\\ENQ\EOT\ETX\STX\EOT\ETX\DC2\EOT\136\SOHBC\n\
\\f\n\
\\STX\EOT\EOT\DC2\ACK\139\SOH\NUL\149\SOH\SOH\n\
\\v\n\
\\ETX\EOT\EOT\SOH\DC2\EOT\139\SOH\b\US\n\
\\f\n\
\\EOT\EOT\EOT\STX\NUL\DC2\EOT\140\SOH\EOT=\n\
\\r\n\
\\ENQ\EOT\EOT\STX\NUL\ACK\DC2\EOT\140\SOH\EOT2\n\
\\r\n\
\\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\140\SOH38\n\
\\r\n\
\\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\140\SOH;<\n\
\\f\n\
\\EOT\EOT\EOT\STX\SOH\DC2\EOT\141\SOH\EOT1\n\
\\r\n\
\\ENQ\EOT\EOT\STX\SOH\ACK\DC2\EOT\141\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\141\SOH\RS,\n\
\\r\n\
\\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\141\SOH/0\n\
\\151\ETX\n\
\\EOT\EOT\EOT\STX\STX\DC2\EOT\146\SOH\EOT:\SUB\136\ETX original_scheduled_time is the scheduled time of the first workflow task during workflow task heartbeat.\n\
\ Heartbeat workflow task is done by RespondWorkflowTaskComplete with ForceCreateNewWorkflowTask == true and no command\n\
\ In this case, OriginalScheduledTime won't change. Then when current time - original_scheduled_time exceeds\n\
\ some threshold, the workflow task will be forced timeout.\n\
\\n\
\\r\n\
\\ENQ\EOT\EOT\STX\STX\ACK\DC2\EOT\146\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\EOT\STX\STX\SOH\DC2\EOT\146\SOH\RS5\n\
\\r\n\
\\ENQ\EOT\EOT\STX\STX\ETX\DC2\EOT\146\SOH89\n\
\\f\n\
\\EOT\EOT\EOT\STX\ETX\DC2\EOT\147\SOH\EOT/\n\
\\r\n\
\\ENQ\EOT\EOT\STX\ETX\ACK\DC2\EOT\147\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\EOT\STX\ETX\SOH\DC2\EOT\147\SOH\RS*\n\
\\r\n\
\\ENQ\EOT\EOT\STX\ETX\ETX\DC2\EOT\147\SOH-.\n\
\\f\n\
\\EOT\EOT\EOT\STX\EOT\DC2\EOT\148\SOH\EOT\SYN\n\
\\r\n\
\\ENQ\EOT\EOT\STX\EOT\ENQ\DC2\EOT\148\SOH\EOT\t\n\
\\r\n\
\\ENQ\EOT\EOT\STX\EOT\SOH\DC2\EOT\148\SOH\n\
\\DC1\n\
\\r\n\
\\ENQ\EOT\EOT\STX\EOT\ETX\DC2\EOT\148\SOH\DC4\NAK\n\
\\f\n\
\\STX\EOT\ENQ\DC2\ACK\151\SOH\NUL\153\SOH\SOH\n\
\\v\n\
\\ETX\EOT\ENQ\SOH\DC2\EOT\151\SOH\b\DC3\n\
\\f\n\
\\EOT\EOT\ENQ\STX\NUL\DC2\EOT\152\SOH\EOT'\n\
\\r\n\
\\ENQ\EOT\ENQ\STX\NUL\EOT\DC2\EOT\152\SOH\EOT\f\n\
\\r\n\
\\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\EOT\152\SOH\r\ESC\n\
\\r\n\
\\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\152\SOH\FS\"\n\
\\r\n\
\\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\152\SOH%&\n\
\\155\STX\n\
\\STX\EOT\ACK\DC2\ACK\158\SOH\NUL\174\SOH\SOH\SUB\140\STX ResetPointInfo records the workflow event id that is the first one processed by a given\n\
\ build id or binary checksum. A new reset point will be created if either build id or binary\n\
\ checksum changes (although in general only one or the other will be used at a time).\n\
\\n\
\\v\n\
\\ETX\EOT\ACK\SOH\DC2\EOT\158\SOH\b\SYN\n\
\ \n\
\\EOT\EOT\ACK\STX\NUL\DC2\EOT\160\SOH\EOT\CAN\SUB\DC2 Worker build id.\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\160\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\160\SOH\v\DC3\n\
\\r\n\
\\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\160\SOH\SYN\ETB\n\
\@\n\
\\EOT\EOT\ACK\STX\SOH\DC2\EOT\162\SOH\EOT\US\SUB2 A worker binary version identifier (deprecated).\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\EOT\162\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\162\SOH\v\SUB\n\
\\r\n\
\\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\162\SOH\GS\RS\n\
\^\n\
\\EOT\EOT\ACK\STX\STX\DC2\EOT\164\SOH\EOT\SYN\SUBP The first run ID in the execution chain that was touched by this worker build.\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\STX\ENQ\DC2\EOT\164\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\STX\SOH\DC2\EOT\164\SOH\v\DC1\n\
\\r\n\
\\ENQ\EOT\ACK\STX\STX\ETX\DC2\EOT\164\SOH\DC4\NAK\n\
\a\n\
\\EOT\EOT\ACK\STX\ETX\DC2\EOT\166\SOH\EOT/\SUBS Event ID of the first WorkflowTaskCompleted event processed by this worker build.\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ETX\ENQ\DC2\EOT\166\SOH\EOT\t\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ETX\SOH\DC2\EOT\166\SOH\n\
\*\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ETX\ETX\DC2\EOT\166\SOH-.\n\
\\f\n\
\\EOT\EOT\ACK\STX\EOT\DC2\EOT\167\SOH\EOT.\n\
\\r\n\
\\ENQ\EOT\ACK\STX\EOT\ACK\DC2\EOT\167\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\ACK\STX\EOT\SOH\DC2\EOT\167\SOH\RS)\n\
\\r\n\
\\ENQ\EOT\ACK\STX\EOT\ETX\DC2\EOT\167\SOH,-\n\
\\192\SOH\n\
\\EOT\EOT\ACK\STX\ENQ\DC2\EOT\171\SOH\EOT.\SUB\177\SOH (-- api-linter: core::0214::resource-expiry=disabled\n\
\ aip.dev/not-precedent: TTL is not defined for ResetPointInfo. --)\n\
\ The time that the run is deleted due to retention.\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ENQ\ACK\DC2\EOT\171\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ENQ\SOH\DC2\EOT\171\SOH\RS)\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ENQ\ETX\DC2\EOT\171\SOH,-\n\
\Y\n\
\\EOT\EOT\ACK\STX\ACK\DC2\EOT\173\SOH\EOT\CAN\SUBK false if the reset point has pending childWFs/reqCancels/signalExternals.\n\
\\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ACK\ENQ\DC2\EOT\173\SOH\EOT\b\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ACK\SOH\DC2\EOT\173\SOH\t\DC3\n\
\\r\n\
\\ENQ\EOT\ACK\STX\ACK\ETX\DC2\EOT\173\SOH\SYN\ETB\n\
\\153\SOH\n\
\\STX\EOT\a\DC2\ACK\178\SOH\NUL\199\SOH\SOH\SUB\138\SOH NewWorkflowExecutionInfo is a shared message that encapsulates all the\n\
\ required arguments to starting a workflow in different contexts.\n\
\\n\
\\v\n\
\\ETX\EOT\a\SOH\DC2\EOT\178\SOH\b \n\
\\f\n\
\\EOT\EOT\a\STX\NUL\DC2\EOT\179\SOH\EOT\ESC\n\
\\r\n\
\\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\179\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\179\SOH\v\SYN\n\
\\r\n\
\\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\179\SOH\EM\SUB\n\
\\f\n\
\\EOT\EOT\a\STX\SOH\DC2\EOT\180\SOH\EOT:\n\
\\r\n\
\\ENQ\EOT\a\STX\SOH\ACK\DC2\EOT\180\SOH\EOT'\n\
\\r\n\
\\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\180\SOH(5\n\
\\r\n\
\\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\180\SOH89\n\
\\f\n\
\\EOT\EOT\a\STX\STX\DC2\EOT\181\SOH\EOT7\n\
\\r\n\
\\ENQ\EOT\a\STX\STX\ACK\DC2\EOT\181\SOH\EOT'\n\
\\r\n\
\\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\181\SOH(2\n\
\\r\n\
\\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\181\SOH56\n\
\5\n\
\\EOT\EOT\a\STX\ETX\DC2\EOT\183\SOH\EOT.\SUB' Serialized arguments to the workflow.\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\ETX\ACK\DC2\EOT\183\SOH\EOT#\n\
\\r\n\
\\ENQ\EOT\a\STX\ETX\SOH\DC2\EOT\183\SOH$)\n\
\\r\n\
\\ENQ\EOT\a\STX\ETX\ETX\DC2\EOT\183\SOH,-\n\
\W\n\
\\EOT\EOT\a\STX\EOT\DC2\EOT\185\SOH\EOT<\SUBI Total workflow execution timeout including retries and continue as new.\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\EOT\ACK\DC2\EOT\185\SOH\EOT\FS\n\
\\r\n\
\\ENQ\EOT\a\STX\EOT\SOH\DC2\EOT\185\SOH\GS7\n\
\\r\n\
\\ENQ\EOT\a\STX\EOT\ETX\DC2\EOT\185\SOH:;\n\
\1\n\
\\EOT\EOT\a\STX\ENQ\DC2\EOT\187\SOH\EOT6\SUB# Timeout of a single workflow run.\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\ENQ\ACK\DC2\EOT\187\SOH\EOT\FS\n\
\\r\n\
\\ENQ\EOT\a\STX\ENQ\SOH\DC2\EOT\187\SOH\GS1\n\
\\r\n\
\\ENQ\EOT\a\STX\ENQ\ETX\DC2\EOT\187\SOH45\n\
\2\n\
\\EOT\EOT\a\STX\ACK\DC2\EOT\189\SOH\EOT7\SUB$ Timeout of a single workflow task.\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\ACK\ACK\DC2\EOT\189\SOH\EOT\FS\n\
\\r\n\
\\ENQ\EOT\a\STX\ACK\SOH\DC2\EOT\189\SOH\GS2\n\
\\r\n\
\\ENQ\EOT\a\STX\ACK\ETX\DC2\EOT\189\SOH56\n\
\B\n\
\\EOT\EOT\a\STX\a\DC2\EOT\191\SOH\EOTM\SUB4 Default: WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE.\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\a\ACK\DC2\EOT\191\SOH\EOT/\n\
\\r\n\
\\ENQ\EOT\a\STX\a\SOH\DC2\EOT\191\SOH0H\n\
\\r\n\
\\ENQ\EOT\a\STX\a\ETX\DC2\EOT\191\SOHKL\n\
\b\n\
\\EOT\EOT\a\STX\b\DC2\EOT\193\SOH\EOT8\SUBT The retry policy for the workflow. Will never exceed `workflow_execution_timeout`.\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\b\ACK\DC2\EOT\193\SOH\EOT&\n\
\\r\n\
\\ENQ\EOT\a\STX\b\SOH\DC2\EOT\193\SOH'3\n\
\\r\n\
\\ENQ\EOT\a\STX\b\ETX\DC2\EOT\193\SOH67\n\
\V\n\
\\EOT\EOT\a\STX\t\DC2\EOT\195\SOH\EOT\RS\SUBH See https://docs.temporal.io/docs/content/what-is-a-temporal-cron-job/\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\t\ENQ\DC2\EOT\195\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\a\STX\t\SOH\DC2\EOT\195\SOH\v\CAN\n\
\\r\n\
\\ENQ\EOT\a\STX\t\ETX\DC2\EOT\195\SOH\ESC\GS\n\
\\f\n\
\\EOT\EOT\a\STX\n\
\\DC2\EOT\196\SOH\EOT*\n\
\\r\n\
\\ENQ\EOT\a\STX\n\
\\ACK\DC2\EOT\196\SOH\EOT\US\n\
\\r\n\
\\ENQ\EOT\a\STX\n\
\\SOH\DC2\EOT\196\SOH $\n\
\\r\n\
\\ENQ\EOT\a\STX\n\
\\ETX\DC2\EOT\196\SOH')\n\
\\f\n\
\\EOT\EOT\a\STX\v\DC2\EOT\197\SOH\EOTC\n\
\\r\n\
\\ENQ\EOT\a\STX\v\ACK\DC2\EOT\197\SOH\EOT+\n\
\\r\n\
\\ENQ\EOT\a\STX\v\SOH\DC2\EOT\197\SOH,=\n\
\\r\n\
\\ENQ\EOT\a\STX\v\ETX\DC2\EOT\197\SOH@B\n\
\\f\n\
\\EOT\EOT\a\STX\f\DC2\EOT\198\SOH\EOT.\n\
\\r\n\
\\ENQ\EOT\a\STX\f\ACK\DC2\EOT\198\SOH\EOT!\n\
\\r\n\
\\ENQ\EOT\a\STX\f\SOH\DC2\EOT\198\SOH\"(\n\
\\r\n\
\\ENQ\EOT\a\STX\f\ETX\DC2\EOT\198\SOH+-\n\
\Q\n\
\\STX\EOT\b\DC2\ACK\202\SOH\NUL\230\SOH\SOH\SUBC CallbackInfo contains the state of an attached workflow callback.\n\
\\n\
\\v\n\
\\ETX\EOT\b\SOH\DC2\EOT\202\SOH\b\DC4\n\
\8\n\
\\EOT\EOT\b\ETX\NUL\DC2\EOT\204\SOH\EOT\GS\SUB* Trigger for when the workflow is closed.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\ETX\NUL\SOH\DC2\EOT\204\SOH\f\SUB\n\
\\SO\n\
\\EOT\EOT\b\ETX\SOH\DC2\ACK\206\SOH\EOT\210\SOH\ENQ\n\
\\r\n\
\\ENQ\EOT\b\ETX\SOH\SOH\DC2\EOT\206\SOH\f\DC3\n\
\\DLE\n\
\\ACK\EOT\b\ETX\SOH\b\NUL\DC2\ACK\207\SOH\b\209\SOH\t\n\
\\SI\n\
\\a\EOT\b\ETX\SOH\b\NUL\SOH\DC2\EOT\207\SOH\SO\NAK\n\
\\SO\n\
\\ACK\EOT\b\ETX\SOH\STX\NUL\DC2\EOT\208\SOH\f/\n\
\\SI\n\
\\a\EOT\b\ETX\SOH\STX\NUL\ACK\DC2\EOT\208\SOH\f\SUB\n\
\\SI\n\
\\a\EOT\b\ETX\SOH\STX\NUL\SOH\DC2\EOT\208\SOH\ESC*\n\
\\SI\n\
\\a\EOT\b\ETX\SOH\STX\NUL\ETX\DC2\EOT\208\SOH-.\n\
\[\n\
\\EOT\EOT\b\STX\NUL\DC2\EOT\213\SOH\EOT1\SUBM Information on how this callback should be invoked (e.g. its URL and type).\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\NUL\ACK\DC2\EOT\213\SOH\EOT#\n\
\\r\n\
\\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\213\SOH$,\n\
\\r\n\
\\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\213\SOH/0\n\
\*\n\
\\EOT\EOT\b\STX\SOH\DC2\EOT\215\SOH\EOT\CAN\SUB\FS Trigger for this callback.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\SOH\ACK\DC2\EOT\215\SOH\EOT\v\n\
\\r\n\
\\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\215\SOH\f\DC3\n\
\\r\n\
\\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\215\SOH\SYN\ETB\n\
\:\n\
\\EOT\EOT\b\STX\STX\DC2\EOT\217\SOH\EOT4\SUB, The time when the callback was registered.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\STX\ACK\DC2\EOT\217\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\b\STX\STX\SOH\DC2\EOT\217\SOH\RS/\n\
\\r\n\
\\ENQ\EOT\b\STX\STX\ETX\DC2\EOT\217\SOH23\n\
\\f\n\
\\EOT\EOT\b\STX\ETX\DC2\EOT\219\SOH\EOT2\n\
\\r\n\
\\ENQ\EOT\b\STX\ETX\ACK\DC2\EOT\219\SOH\EOT'\n\
\\r\n\
\\ENQ\EOT\b\STX\ETX\SOH\DC2\EOT\219\SOH(-\n\
\\r\n\
\\ENQ\EOT\b\STX\ETX\ETX\DC2\EOT\219\SOH01\n\
\\180\SOH\n\
\\EOT\EOT\b\STX\EOT\DC2\EOT\222\SOH\EOT\SYN\SUB\165\SOH The number of attempts made to deliver the callback.\n\
\ This number represents a minimum bound since the attempt is incremented after the callback request completes.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\EOT\ENQ\DC2\EOT\222\SOH\EOT\t\n\
\\r\n\
\\ENQ\EOT\b\STX\EOT\SOH\DC2\EOT\222\SOH\n\
\\DC1\n\
\\r\n\
\\ENQ\EOT\b\STX\EOT\ETX\DC2\EOT\222\SOH\DC4\NAK\n\
\9\n\
\\EOT\EOT\b\STX\ENQ\DC2\EOT\225\SOH\EOT=\SUB+ The time when the last attempt completed.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\ENQ\ACK\DC2\EOT\225\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\b\STX\ENQ\SOH\DC2\EOT\225\SOH\RS8\n\
\\r\n\
\\ENQ\EOT\b\STX\ENQ\ETX\DC2\EOT\225\SOH;<\n\
\3\n\
\\EOT\EOT\b\STX\ACK\DC2\EOT\227\SOH\EOT=\SUB% The last attempt's failure, if any.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\ACK\ACK\DC2\EOT\227\SOH\EOT#\n\
\\r\n\
\\ENQ\EOT\b\STX\ACK\SOH\DC2\EOT\227\SOH$8\n\
\\r\n\
\\ENQ\EOT\b\STX\ACK\ETX\DC2\EOT\227\SOH;<\n\
\<\n\
\\EOT\EOT\b\STX\a\DC2\EOT\229\SOH\EOT=\SUB. The time when the next attempt is scheduled.\n\
\\n\
\\r\n\
\\ENQ\EOT\b\STX\a\ACK\DC2\EOT\229\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\b\STX\a\SOH\DC2\EOT\229\SOH\RS8\n\
\\r\n\
\\ENQ\EOT\b\STX\a\ETX\DC2\EOT\229\SOH;<\n\
\Z\n\
\\STX\EOT\t\DC2\ACK\233\SOH\NUL\140\STX\SOH\SUBL PendingNexusOperationInfo contains the state of a pending Nexus operation.\n\
\\n\
\\v\n\
\\ETX\EOT\t\SOH\DC2\EOT\233\SOH\b!\n\
\V\n\
\\EOT\EOT\t\STX\NUL\DC2\EOT\236\SOH\EOT\CAN\SUBH Endpoint name.\n\
\ Resolved to a URL via the cluster's endpoint registry.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\236\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\236\SOH\v\DC3\n\
\\r\n\
\\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\236\SOH\SYN\ETB\n\
\\GS\n\
\\EOT\EOT\t\STX\SOH\DC2\EOT\238\SOH\EOT\ETB\SUB\SI Service name.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\238\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\238\SOH\v\DC2\n\
\\r\n\
\\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\238\SOH\NAK\SYN\n\
\\US\n\
\\EOT\EOT\t\STX\STX\DC2\EOT\240\SOH\EOT\EM\SUB\DC1 Operation name.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\STX\ENQ\DC2\EOT\240\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\STX\SOH\DC2\EOT\240\SOH\v\DC4\n\
\\r\n\
\\ENQ\EOT\t\STX\STX\ETX\DC2\EOT\240\SOH\ETB\CAN\n\
\j\n\
\\EOT\EOT\t\STX\ETX\DC2\EOT\243\SOH\EOT\FS\SUB\\ Operation ID. Only set for asynchronous operations after a successful StartOperation call.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\ETX\ENQ\DC2\EOT\243\SOH\EOT\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\ETX\SOH\DC2\EOT\243\SOH\v\ETB\n\
\\r\n\
\\ENQ\EOT\t\STX\ETX\ETX\DC2\EOT\243\SOH\SUB\ESC\n\
\\230\SOH\n\
\\EOT\EOT\t\STX\EOT\DC2\EOT\249\SOH\EOT;\SUB\215\SOH Schedule-to-close timeout for this operation.\n\
\ This is the only timeout settable by a workflow.\n\
\ (-- api-linter: core::0140::prepositions=disabled\n\
\ aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\EOT\ACK\DC2\EOT\249\SOH\EOT\FS\n\
\\r\n\
\\ENQ\EOT\t\STX\EOT\SOH\DC2\EOT\249\SOH\GS6\n\
\\r\n\
\\ENQ\EOT\t\STX\EOT\ETX\DC2\EOT\249\SOH9:\n\
\:\n\
\\EOT\EOT\t\STX\ENQ\DC2\EOT\252\SOH\EOT1\SUB, The time when the operation was scheduled.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\ENQ\ACK\DC2\EOT\252\SOH\EOT\GS\n\
\\r\n\
\\ENQ\EOT\t\STX\ENQ\SOH\DC2\EOT\252\SOH\RS,\n\
\\r\n\
\\ENQ\EOT\t\STX\ENQ\ETX\DC2\EOT\252\SOH/0\n\
\\f\n\
\\EOT\EOT\t\STX\ACK\DC2\EOT\254\SOH\EOT?\n\
\\r\n\
\\ENQ\EOT\t\STX\ACK\ACK\DC2\EOT\254\SOH\EOT4\n\
\\r\n\
\\ENQ\EOT\t\STX\ACK\SOH\DC2\EOT\254\SOH5:\n\
\\r\n\
\\ENQ\EOT\t\STX\ACK\ETX\DC2\EOT\254\SOH=>\n\
\\186\SOH\n\
\\EOT\EOT\t\STX\a\DC2\EOT\130\STX\EOT\SYN\SUB\171\SOH The number of attempts made to deliver the start operation request.\n\
\ This number represents a minimum bound since the attempt is incremented after the request completes.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\a\ENQ\DC2\EOT\130\STX\EOT\t\n\
\\r\n\
\\ENQ\EOT\t\STX\a\SOH\DC2\EOT\130\STX\n\
\\DC1\n\
\\r\n\
\\ENQ\EOT\t\STX\a\ETX\DC2\EOT\130\STX\DC4\NAK\n\
\9\n\
\\EOT\EOT\t\STX\b\DC2\EOT\133\STX\EOT=\SUB+ The time when the last attempt completed.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\b\ACK\DC2\EOT\133\STX\EOT\GS\n\
\\r\n\
\\ENQ\EOT\t\STX\b\SOH\DC2\EOT\133\STX\RS8\n\
\\r\n\
\\ENQ\EOT\t\STX\b\ETX\DC2\EOT\133\STX;<\n\
\3\n\
\\EOT\EOT\t\STX\t\DC2\EOT\135\STX\EOT>\SUB% The last attempt's failure, if any.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\t\ACK\DC2\EOT\135\STX\EOT#\n\
\\r\n\
\\ENQ\EOT\t\STX\t\SOH\DC2\EOT\135\STX$8\n\
\\r\n\
\\ENQ\EOT\t\STX\t\ETX\DC2\EOT\135\STX;=\n\
\<\n\
\\EOT\EOT\t\STX\n\
\\DC2\EOT\137\STX\EOT>\SUB. The time when the next attempt is scheduled.\n\
\\n\
\\r\n\
\\ENQ\EOT\t\STX\n\
\\ACK\DC2\EOT\137\STX\EOT\GS\n\
\\r\n\
\\ENQ\EOT\t\STX\n\
\\SOH\DC2\EOT\137\STX\RS8\n\
\\r\n\
\\ENQ\EOT\t\STX\n\
\\ETX\DC2\EOT\137\STX;=\n\
\\f\n\
\\EOT\EOT\t\STX\v\DC2\EOT\139\STX\EOT:\n\
\\r\n\
\\ENQ\EOT\t\STX\v\ACK\DC2\EOT\139\STX\EOT\"\n\
\\r\n\
\\ENQ\EOT\t\STX\v\SOH\DC2\EOT\139\STX#4\n\
\\r\n\
\\ENQ\EOT\t\STX\v\ETX\DC2\EOT\139\STX79\n\
\d\n\
\\STX\EOT\n\
\\DC2\ACK\143\STX\NUL\159\STX\SOH\SUBV NexusOperationCancellationInfo contains the state of a nexus operation cancellation.\n\
\\n\
\\v\n\
\\ETX\EOT\n\
\\SOH\DC2\EOT\143\STX\b&\n\
\9\n\
\\EOT\EOT\n\
\\STX\NUL\DC2\EOT\145\STX\EOT1\SUB+ The time when cancellation was requested.\n\
\\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\NUL\ACK\DC2\EOT\145\STX\EOT\GS\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\NUL\SOH\DC2\EOT\145\STX\RS,\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\NUL\ETX\DC2\EOT\145\STX/0\n\
\\f\n\
\\EOT\EOT\n\
\\STX\SOH\DC2\EOT\147\STX\EOTD\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\SOH\ACK\DC2\EOT\147\STX\EOT9\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\SOH\SOH\DC2\EOT\147\STX:?\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\SOH\ETX\DC2\EOT\147\STXBC\n\
\\187\SOH\n\
\\EOT\EOT\n\
\\STX\STX\DC2\EOT\151\STX\EOT\SYN\SUB\172\SOH The number of attempts made to deliver the cancel operation request.\n\
\ This number represents a minimum bound since the attempt is incremented after the request completes.\n\
\\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\STX\ENQ\DC2\EOT\151\STX\EOT\t\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\STX\SOH\DC2\EOT\151\STX\n\
\\DC1\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\STX\ETX\DC2\EOT\151\STX\DC4\NAK\n\
\9\n\
\\EOT\EOT\n\
\\STX\ETX\DC2\EOT\154\STX\EOT=\SUB+ The time when the last attempt completed.\n\
\\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\ETX\ACK\DC2\EOT\154\STX\EOT\GS\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\ETX\SOH\DC2\EOT\154\STX\RS8\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\ETX\ETX\DC2\EOT\154\STX;<\n\
\3\n\
\\EOT\EOT\n\
\\STX\EOT\DC2\EOT\156\STX\EOT=\SUB% The last attempt's failure, if any.\n\
\\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\EOT\ACK\DC2\EOT\156\STX\EOT#\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\EOT\SOH\DC2\EOT\156\STX$8\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\EOT\ETX\DC2\EOT\156\STX;<\n\
\<\n\
\\EOT\EOT\n\
\\STX\ENQ\DC2\EOT\158\STX\EOT=\SUB. The time when the next attempt is scheduled.\n\
\\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\ENQ\ACK\DC2\EOT\158\STX\EOT\GS\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\ENQ\SOH\DC2\EOT\158\STX\RS8\n\
\\r\n\
\\ENQ\EOT\n\
\\STX\ENQ\ETX\DC2\EOT\158\STX;<b\ACKproto3"