{- This file was auto-generated from temporal/api/history/v1/message.proto by the proto-lens-protoc program. -}
{-# LANGUAGE ScopedTypeVariables, DataKinds, TypeFamilies, UndecidableInstances, GeneralizedNewtypeDeriving, MultiParamTypeClasses, FlexibleContexts, FlexibleInstances, PatternSynonyms, MagicHash, NoImplicitPrelude, DataKinds, BangPatterns, TypeApplications, OverloadedStrings, DerivingStrategies#-}
{-# OPTIONS_GHC -Wno-unused-imports#-}
{-# OPTIONS_GHC -Wno-duplicate-exports#-}
{-# OPTIONS_GHC -Wno-dodgy-exports#-}
module Proto.Temporal.Api.History.V1.Message (
        ActivityPropertiesModifiedExternallyEventAttributes(),
        ActivityTaskCancelRequestedEventAttributes(),
        ActivityTaskCanceledEventAttributes(),
        ActivityTaskCompletedEventAttributes(),
        ActivityTaskFailedEventAttributes(),
        ActivityTaskScheduledEventAttributes(),
        ActivityTaskStartedEventAttributes(),
        ActivityTaskTimedOutEventAttributes(),
        ChildWorkflowExecutionCanceledEventAttributes(),
        ChildWorkflowExecutionCompletedEventAttributes(),
        ChildWorkflowExecutionFailedEventAttributes(),
        ChildWorkflowExecutionStartedEventAttributes(),
        ChildWorkflowExecutionTerminatedEventAttributes(),
        ChildWorkflowExecutionTimedOutEventAttributes(),
        ExternalWorkflowExecutionCancelRequestedEventAttributes(),
        ExternalWorkflowExecutionSignaledEventAttributes(), History(),
        HistoryEvent(), HistoryEvent'Attributes(..),
        _HistoryEvent'WorkflowExecutionStartedEventAttributes,
        _HistoryEvent'WorkflowExecutionCompletedEventAttributes,
        _HistoryEvent'WorkflowExecutionFailedEventAttributes,
        _HistoryEvent'WorkflowExecutionTimedOutEventAttributes,
        _HistoryEvent'WorkflowTaskScheduledEventAttributes,
        _HistoryEvent'WorkflowTaskStartedEventAttributes,
        _HistoryEvent'WorkflowTaskCompletedEventAttributes,
        _HistoryEvent'WorkflowTaskTimedOutEventAttributes,
        _HistoryEvent'WorkflowTaskFailedEventAttributes,
        _HistoryEvent'ActivityTaskScheduledEventAttributes,
        _HistoryEvent'ActivityTaskStartedEventAttributes,
        _HistoryEvent'ActivityTaskCompletedEventAttributes,
        _HistoryEvent'ActivityTaskFailedEventAttributes,
        _HistoryEvent'ActivityTaskTimedOutEventAttributes,
        _HistoryEvent'TimerStartedEventAttributes,
        _HistoryEvent'TimerFiredEventAttributes,
        _HistoryEvent'ActivityTaskCancelRequestedEventAttributes,
        _HistoryEvent'ActivityTaskCanceledEventAttributes,
        _HistoryEvent'TimerCanceledEventAttributes,
        _HistoryEvent'MarkerRecordedEventAttributes,
        _HistoryEvent'WorkflowExecutionSignaledEventAttributes,
        _HistoryEvent'WorkflowExecutionTerminatedEventAttributes,
        _HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes,
        _HistoryEvent'WorkflowExecutionCanceledEventAttributes,
        _HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes,
        _HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes,
        _HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes,
        _HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes,
        _HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes,
        _HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes,
        _HistoryEvent'ChildWorkflowExecutionStartedEventAttributes,
        _HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes,
        _HistoryEvent'ChildWorkflowExecutionFailedEventAttributes,
        _HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes,
        _HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes,
        _HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes,
        _HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes,
        _HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes,
        _HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes,
        _HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes,
        _HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes,
        _HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes,
        _HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes,
        _HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes,
        _HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes,
        _HistoryEvent'WorkflowPropertiesModifiedEventAttributes,
        _HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes,
        _HistoryEvent'NexusOperationScheduledEventAttributes,
        _HistoryEvent'NexusOperationStartedEventAttributes,
        _HistoryEvent'NexusOperationCompletedEventAttributes,
        _HistoryEvent'NexusOperationFailedEventAttributes,
        _HistoryEvent'NexusOperationCanceledEventAttributes,
        _HistoryEvent'NexusOperationTimedOutEventAttributes,
        _HistoryEvent'NexusOperationCancelRequestedEventAttributes,
        MarkerRecordedEventAttributes(),
        MarkerRecordedEventAttributes'DetailsEntry(),
        NexusOperationCancelRequestedEventAttributes(),
        NexusOperationCanceledEventAttributes(),
        NexusOperationCompletedEventAttributes(),
        NexusOperationFailedEventAttributes(),
        NexusOperationScheduledEventAttributes(),
        NexusOperationScheduledEventAttributes'NexusHeaderEntry(),
        NexusOperationStartedEventAttributes(),
        NexusOperationTimedOutEventAttributes(),
        RequestCancelExternalWorkflowExecutionFailedEventAttributes(),
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes(),
        SignalExternalWorkflowExecutionFailedEventAttributes(),
        SignalExternalWorkflowExecutionInitiatedEventAttributes(),
        StartChildWorkflowExecutionFailedEventAttributes(),
        StartChildWorkflowExecutionInitiatedEventAttributes(),
        TimerCanceledEventAttributes(), TimerFiredEventAttributes(),
        TimerStartedEventAttributes(),
        UpsertWorkflowSearchAttributesEventAttributes(),
        WorkflowExecutionCancelRequestedEventAttributes(),
        WorkflowExecutionCanceledEventAttributes(),
        WorkflowExecutionCompletedEventAttributes(),
        WorkflowExecutionContinuedAsNewEventAttributes(),
        WorkflowExecutionFailedEventAttributes(),
        WorkflowExecutionSignaledEventAttributes(),
        WorkflowExecutionStartedEventAttributes(),
        WorkflowExecutionTerminatedEventAttributes(),
        WorkflowExecutionTimedOutEventAttributes(),
        WorkflowExecutionUpdateAcceptedEventAttributes(),
        WorkflowExecutionUpdateAdmittedEventAttributes(),
        WorkflowExecutionUpdateCompletedEventAttributes(),
        WorkflowExecutionUpdateRejectedEventAttributes(),
        WorkflowPropertiesModifiedEventAttributes(),
        WorkflowPropertiesModifiedExternallyEventAttributes(),
        WorkflowTaskCompletedEventAttributes(),
        WorkflowTaskFailedEventAttributes(),
        WorkflowTaskScheduledEventAttributes(),
        WorkflowTaskStartedEventAttributes(),
        WorkflowTaskTimedOutEventAttributes()
    ) 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.Timestamp
import qualified Proto.Temporal.Api.Common.V1.Message
import qualified Proto.Temporal.Api.Enums.V1.EventType
import qualified Proto.Temporal.Api.Enums.V1.FailedCause
import qualified Proto.Temporal.Api.Enums.V1.Update
import qualified Proto.Temporal.Api.Enums.V1.Workflow
import qualified Proto.Temporal.Api.Failure.V1.Message
import qualified Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata
import qualified Proto.Temporal.Api.Taskqueue.V1.Message
import qualified Proto.Temporal.Api.Update.V1.Message
import qualified Proto.Temporal.Api.Workflow.V1.Message
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityPropertiesModifiedExternallyEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newRetryPolicy' @:: Lens' ActivityPropertiesModifiedExternallyEventAttributes Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'newRetryPolicy' @:: Lens' ActivityPropertiesModifiedExternallyEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@ -}
data ActivityPropertiesModifiedExternallyEventAttributes
  = ActivityPropertiesModifiedExternallyEventAttributes'_constructor {ActivityPropertiesModifiedExternallyEventAttributes -> Int64
_ActivityPropertiesModifiedExternallyEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                                      ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe RetryPolicy
_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                                      ActivityPropertiesModifiedExternallyEventAttributes -> FieldSet
_ActivityPropertiesModifiedExternallyEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
(ActivityPropertiesModifiedExternallyEventAttributes
 -> ActivityPropertiesModifiedExternallyEventAttributes -> Bool)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes -> Bool)
-> Eq ActivityPropertiesModifiedExternallyEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
== :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
$c/= :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
/= :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
Prelude.Eq, Eq ActivityPropertiesModifiedExternallyEventAttributes
Eq ActivityPropertiesModifiedExternallyEventAttributes =>
(ActivityPropertiesModifiedExternallyEventAttributes
 -> ActivityPropertiesModifiedExternallyEventAttributes -> Ordering)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes -> Bool)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes -> Bool)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes -> Bool)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes -> Bool)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes
    -> ActivityPropertiesModifiedExternallyEventAttributes)
-> Ord ActivityPropertiesModifiedExternallyEventAttributes
ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Ordering
ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
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 :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Ordering
compare :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Ordering
$c< :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
< :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
$c<= :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
<= :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
$c> :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
> :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
$c>= :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
>= :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes -> Bool
$cmax :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
max :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
$cmin :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
min :: ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
-> ActivityPropertiesModifiedExternallyEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityPropertiesModifiedExternallyEventAttributes where
  showsPrec :: Int -> ActivityPropertiesModifiedExternallyEventAttributes -> ShowS
showsPrec Int
_ ActivityPropertiesModifiedExternallyEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityPropertiesModifiedExternallyEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityPropertiesModifiedExternallyEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityPropertiesModifiedExternallyEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityPropertiesModifiedExternallyEventAttributes
-> f ActivityPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityPropertiesModifiedExternallyEventAttributes
 -> f ActivityPropertiesModifiedExternallyEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityPropertiesModifiedExternallyEventAttributes
-> f ActivityPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityPropertiesModifiedExternallyEventAttributes -> Int64)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> Int64 -> ActivityPropertiesModifiedExternallyEventAttributes)
-> Lens
     ActivityPropertiesModifiedExternallyEventAttributes
     ActivityPropertiesModifiedExternallyEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityPropertiesModifiedExternallyEventAttributes -> Int64
_ActivityPropertiesModifiedExternallyEventAttributes'scheduledEventId
           (\ ActivityPropertiesModifiedExternallyEventAttributes
x__ Int64
y__
              -> ActivityPropertiesModifiedExternallyEventAttributes
x__
                   {_ActivityPropertiesModifiedExternallyEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityPropertiesModifiedExternallyEventAttributes "newRetryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newRetryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> ActivityPropertiesModifiedExternallyEventAttributes
-> f ActivityPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "newRetryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ActivityPropertiesModifiedExternallyEventAttributes
 -> f ActivityPropertiesModifiedExternallyEventAttributes)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> ActivityPropertiesModifiedExternallyEventAttributes
-> f ActivityPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityPropertiesModifiedExternallyEventAttributes
 -> Maybe RetryPolicy)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> Maybe RetryPolicy
    -> ActivityPropertiesModifiedExternallyEventAttributes)
-> Lens
     ActivityPropertiesModifiedExternallyEventAttributes
     ActivityPropertiesModifiedExternallyEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe RetryPolicy
_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy
           (\ ActivityPropertiesModifiedExternallyEventAttributes
x__ Maybe RetryPolicy
y__
              -> ActivityPropertiesModifiedExternallyEventAttributes
x__
                   {_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy = 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 ActivityPropertiesModifiedExternallyEventAttributes "maybe'newRetryPolicy" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'newRetryPolicy"
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> ActivityPropertiesModifiedExternallyEventAttributes
-> f ActivityPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "maybe'newRetryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ActivityPropertiesModifiedExternallyEventAttributes
 -> f ActivityPropertiesModifiedExternallyEventAttributes)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> ActivityPropertiesModifiedExternallyEventAttributes
-> f ActivityPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityPropertiesModifiedExternallyEventAttributes
 -> Maybe RetryPolicy)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> Maybe RetryPolicy
    -> ActivityPropertiesModifiedExternallyEventAttributes)
-> Lens
     ActivityPropertiesModifiedExternallyEventAttributes
     ActivityPropertiesModifiedExternallyEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe RetryPolicy
_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy
           (\ ActivityPropertiesModifiedExternallyEventAttributes
x__ Maybe RetryPolicy
y__
              -> ActivityPropertiesModifiedExternallyEventAttributes
x__
                   {_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityPropertiesModifiedExternallyEventAttributes where
  messageName :: Proxy ActivityPropertiesModifiedExternallyEventAttributes -> Text
messageName Proxy ActivityPropertiesModifiedExternallyEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityPropertiesModifiedExternallyEventAttributes"
  packedMessageDescriptor :: Proxy ActivityPropertiesModifiedExternallyEventAttributes
-> ByteString
packedMessageDescriptor Proxy ActivityPropertiesModifiedExternallyEventAttributes
_
    = ByteString
"\n\
      \3ActivityPropertiesModifiedExternallyEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2M\n\
      \\DLEnew_retry_policy\CAN\STX \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\SOnewRetryPolicy"
  packedFileDescriptor :: Proxy ActivityPropertiesModifiedExternallyEventAttributes
-> ByteString
packedFileDescriptor Proxy ActivityPropertiesModifiedExternallyEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     ActivityPropertiesModifiedExternallyEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityPropertiesModifiedExternallyEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ActivityPropertiesModifiedExternallyEventAttributes Int64
-> FieldDescriptor
     ActivityPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityPropertiesModifiedExternallyEventAttributes
     ActivityPropertiesModifiedExternallyEventAttributes
     Int64
     Int64
-> FieldAccessor
     ActivityPropertiesModifiedExternallyEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityPropertiesModifiedExternallyEventAttributes
        newRetryPolicy__field_descriptor :: FieldDescriptor ActivityPropertiesModifiedExternallyEventAttributes
newRetryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor
     ActivityPropertiesModifiedExternallyEventAttributes RetryPolicy
-> FieldDescriptor
     ActivityPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_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
  ActivityPropertiesModifiedExternallyEventAttributes
  ActivityPropertiesModifiedExternallyEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor
     ActivityPropertiesModifiedExternallyEventAttributes 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'newRetryPolicy")) ::
              Data.ProtoLens.FieldDescriptor ActivityPropertiesModifiedExternallyEventAttributes
      in
        [(Tag,
  FieldDescriptor
    ActivityPropertiesModifiedExternallyEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        ActivityPropertiesModifiedExternallyEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityPropertiesModifiedExternallyEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ActivityPropertiesModifiedExternallyEventAttributes
newRetryPolicy__field_descriptor)]
  unknownFields :: Lens' ActivityPropertiesModifiedExternallyEventAttributes FieldSet
unknownFields
    = (ActivityPropertiesModifiedExternallyEventAttributes -> FieldSet)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> FieldSet -> ActivityPropertiesModifiedExternallyEventAttributes)
-> Lens'
     ActivityPropertiesModifiedExternallyEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityPropertiesModifiedExternallyEventAttributes -> FieldSet
_ActivityPropertiesModifiedExternallyEventAttributes'_unknownFields
        (\ ActivityPropertiesModifiedExternallyEventAttributes
x__ FieldSet
y__
           -> ActivityPropertiesModifiedExternallyEventAttributes
x__
                {_ActivityPropertiesModifiedExternallyEventAttributes'_unknownFields = y__})
  defMessage :: ActivityPropertiesModifiedExternallyEventAttributes
defMessage
    = ActivityPropertiesModifiedExternallyEventAttributes'_constructor
        {_ActivityPropertiesModifiedExternallyEventAttributes'scheduledEventId :: Int64
_ActivityPropertiesModifiedExternallyEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy :: Maybe RetryPolicy
_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _ActivityPropertiesModifiedExternallyEventAttributes'_unknownFields :: FieldSet
_ActivityPropertiesModifiedExternallyEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityPropertiesModifiedExternallyEventAttributes
parseMessage
    = let
        loop ::
          ActivityPropertiesModifiedExternallyEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityPropertiesModifiedExternallyEventAttributes
        loop :: ActivityPropertiesModifiedExternallyEventAttributes
-> Parser ActivityPropertiesModifiedExternallyEventAttributes
loop ActivityPropertiesModifiedExternallyEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
18
                          -> 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
"new_retry_policy"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newRetryPolicy") 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 ActivityPropertiesModifiedExternallyEventAttributes
-> String
-> Parser ActivityPropertiesModifiedExternallyEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityPropertiesModifiedExternallyEventAttributes
-> Parser ActivityPropertiesModifiedExternallyEventAttributes
loop ActivityPropertiesModifiedExternallyEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityPropertiesModifiedExternallyEventAttributes"
  buildMessage :: ActivityPropertiesModifiedExternallyEventAttributes -> Builder
buildMessage
    = \ ActivityPropertiesModifiedExternallyEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  ActivityPropertiesModifiedExternallyEventAttributes
  ActivityPropertiesModifiedExternallyEventAttributes
  Int64
  Int64
-> ActivityPropertiesModifiedExternallyEventAttributes -> 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 @"scheduledEventId") ActivityPropertiesModifiedExternallyEventAttributes
_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
8)
                      ((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 RetryPolicy)
  ActivityPropertiesModifiedExternallyEventAttributes
  ActivityPropertiesModifiedExternallyEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> ActivityPropertiesModifiedExternallyEventAttributes
-> 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'newRetryPolicy") ActivityPropertiesModifiedExternallyEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ActivityPropertiesModifiedExternallyEventAttributes
  ActivityPropertiesModifiedExternallyEventAttributes
  FieldSet
  FieldSet
-> ActivityPropertiesModifiedExternallyEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityPropertiesModifiedExternallyEventAttributes
  ActivityPropertiesModifiedExternallyEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityPropertiesModifiedExternallyEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityPropertiesModifiedExternallyEventAttributes
_x)))
instance Control.DeepSeq.NFData ActivityPropertiesModifiedExternallyEventAttributes where
  rnf :: ActivityPropertiesModifiedExternallyEventAttributes -> ()
rnf
    = \ ActivityPropertiesModifiedExternallyEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityPropertiesModifiedExternallyEventAttributes -> FieldSet
_ActivityPropertiesModifiedExternallyEventAttributes'_unknownFields
                ActivityPropertiesModifiedExternallyEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityPropertiesModifiedExternallyEventAttributes -> Int64
_ActivityPropertiesModifiedExternallyEventAttributes'scheduledEventId
                   ActivityPropertiesModifiedExternallyEventAttributes
x__)
                (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe RetryPolicy
_ActivityPropertiesModifiedExternallyEventAttributes'newRetryPolicy
                      ActivityPropertiesModifiedExternallyEventAttributes
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityTaskCancelRequestedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' ActivityTaskCancelRequestedEventAttributes Data.Int.Int64@ -}
data ActivityTaskCancelRequestedEventAttributes
  = ActivityTaskCancelRequestedEventAttributes'_constructor {ActivityTaskCancelRequestedEventAttributes -> Int64
_ActivityTaskCancelRequestedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                             ActivityTaskCancelRequestedEventAttributes -> Int64
_ActivityTaskCancelRequestedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                             ActivityTaskCancelRequestedEventAttributes -> FieldSet
_ActivityTaskCancelRequestedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
(ActivityTaskCancelRequestedEventAttributes
 -> ActivityTaskCancelRequestedEventAttributes -> Bool)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes -> Bool)
-> Eq ActivityTaskCancelRequestedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
== :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
$c/= :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
/= :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskCancelRequestedEventAttributes
Eq ActivityTaskCancelRequestedEventAttributes =>
(ActivityTaskCancelRequestedEventAttributes
 -> ActivityTaskCancelRequestedEventAttributes -> Ordering)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes -> Bool)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes -> Bool)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes -> Bool)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes -> Bool)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes)
-> (ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes
    -> ActivityTaskCancelRequestedEventAttributes)
-> Ord ActivityTaskCancelRequestedEventAttributes
ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Ordering
ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
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 :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Ordering
compare :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Ordering
$c< :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
< :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
$c<= :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
<= :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
$c> :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
> :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
$c>= :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
>= :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes -> Bool
$cmax :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
max :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
$cmin :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
min :: ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
-> ActivityTaskCancelRequestedEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskCancelRequestedEventAttributes where
  showsPrec :: Int -> ActivityTaskCancelRequestedEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskCancelRequestedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskCancelRequestedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskCancelRequestedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskCancelRequestedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCancelRequestedEventAttributes
-> f ActivityTaskCancelRequestedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCancelRequestedEventAttributes
 -> f ActivityTaskCancelRequestedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCancelRequestedEventAttributes
-> f ActivityTaskCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCancelRequestedEventAttributes -> Int64)
-> (ActivityTaskCancelRequestedEventAttributes
    -> Int64 -> ActivityTaskCancelRequestedEventAttributes)
-> Lens
     ActivityTaskCancelRequestedEventAttributes
     ActivityTaskCancelRequestedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCancelRequestedEventAttributes -> Int64
_ActivityTaskCancelRequestedEventAttributes'scheduledEventId
           (\ ActivityTaskCancelRequestedEventAttributes
x__ Int64
y__
              -> ActivityTaskCancelRequestedEventAttributes
x__
                   {_ActivityTaskCancelRequestedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCancelRequestedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCancelRequestedEventAttributes
-> f ActivityTaskCancelRequestedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCancelRequestedEventAttributes
 -> f ActivityTaskCancelRequestedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCancelRequestedEventAttributes
-> f ActivityTaskCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCancelRequestedEventAttributes -> Int64)
-> (ActivityTaskCancelRequestedEventAttributes
    -> Int64 -> ActivityTaskCancelRequestedEventAttributes)
-> Lens
     ActivityTaskCancelRequestedEventAttributes
     ActivityTaskCancelRequestedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCancelRequestedEventAttributes -> Int64
_ActivityTaskCancelRequestedEventAttributes'workflowTaskCompletedEventId
           (\ ActivityTaskCancelRequestedEventAttributes
x__ Int64
y__
              -> ActivityTaskCancelRequestedEventAttributes
x__
                   {_ActivityTaskCancelRequestedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskCancelRequestedEventAttributes where
  messageName :: Proxy ActivityTaskCancelRequestedEventAttributes -> Text
messageName Proxy ActivityTaskCancelRequestedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskCancelRequestedEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskCancelRequestedEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskCancelRequestedEventAttributes
_
    = ByteString
"\n\
      \*ActivityTaskCancelRequestedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2F\n\
      \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId"
  packedFileDescriptor :: Proxy ActivityTaskCancelRequestedEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskCancelRequestedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ActivityTaskCancelRequestedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityTaskCancelRequestedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCancelRequestedEventAttributes Int64
-> FieldDescriptor ActivityTaskCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityTaskCancelRequestedEventAttributes
     ActivityTaskCancelRequestedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCancelRequestedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCancelRequestedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor ActivityTaskCancelRequestedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCancelRequestedEventAttributes Int64
-> FieldDescriptor ActivityTaskCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     ActivityTaskCancelRequestedEventAttributes
     ActivityTaskCancelRequestedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCancelRequestedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCancelRequestedEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskCancelRequestedEventAttributes)]
-> Map
     Tag (FieldDescriptor ActivityTaskCancelRequestedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskCancelRequestedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor ActivityTaskCancelRequestedEventAttributes
workflowTaskCompletedEventId__field_descriptor)]
  unknownFields :: Lens' ActivityTaskCancelRequestedEventAttributes FieldSet
unknownFields
    = (ActivityTaskCancelRequestedEventAttributes -> FieldSet)
-> (ActivityTaskCancelRequestedEventAttributes
    -> FieldSet -> ActivityTaskCancelRequestedEventAttributes)
-> Lens' ActivityTaskCancelRequestedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskCancelRequestedEventAttributes -> FieldSet
_ActivityTaskCancelRequestedEventAttributes'_unknownFields
        (\ ActivityTaskCancelRequestedEventAttributes
x__ FieldSet
y__
           -> ActivityTaskCancelRequestedEventAttributes
x__
                {_ActivityTaskCancelRequestedEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskCancelRequestedEventAttributes
defMessage
    = ActivityTaskCancelRequestedEventAttributes'_constructor
        {_ActivityTaskCancelRequestedEventAttributes'scheduledEventId :: Int64
_ActivityTaskCancelRequestedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCancelRequestedEventAttributes'workflowTaskCompletedEventId :: Int64
_ActivityTaskCancelRequestedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCancelRequestedEventAttributes'_unknownFields :: FieldSet
_ActivityTaskCancelRequestedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskCancelRequestedEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskCancelRequestedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskCancelRequestedEventAttributes
        loop :: ActivityTaskCancelRequestedEventAttributes
-> Parser ActivityTaskCancelRequestedEventAttributes
loop ActivityTaskCancelRequestedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
16
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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 ActivityTaskCancelRequestedEventAttributes
-> String -> Parser ActivityTaskCancelRequestedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskCancelRequestedEventAttributes
-> Parser ActivityTaskCancelRequestedEventAttributes
loop ActivityTaskCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskCancelRequestedEventAttributes"
  buildMessage :: ActivityTaskCancelRequestedEventAttributes -> Builder
buildMessage
    = \ ActivityTaskCancelRequestedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  ActivityTaskCancelRequestedEventAttributes
  ActivityTaskCancelRequestedEventAttributes
  Int64
  Int64
-> ActivityTaskCancelRequestedEventAttributes -> 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 @"scheduledEventId") ActivityTaskCancelRequestedEventAttributes
_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
8)
                      ((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
  ActivityTaskCancelRequestedEventAttributes
  ActivityTaskCancelRequestedEventAttributes
  Int64
  Int64
-> ActivityTaskCancelRequestedEventAttributes -> 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 @"workflowTaskCompletedEventId") ActivityTaskCancelRequestedEventAttributes
_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
16)
                         ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  ActivityTaskCancelRequestedEventAttributes
  ActivityTaskCancelRequestedEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskCancelRequestedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityTaskCancelRequestedEventAttributes
  ActivityTaskCancelRequestedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskCancelRequestedEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskCancelRequestedEventAttributes
_x)))
instance Control.DeepSeq.NFData ActivityTaskCancelRequestedEventAttributes where
  rnf :: ActivityTaskCancelRequestedEventAttributes -> ()
rnf
    = \ ActivityTaskCancelRequestedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskCancelRequestedEventAttributes -> FieldSet
_ActivityTaskCancelRequestedEventAttributes'_unknownFields ActivityTaskCancelRequestedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskCancelRequestedEventAttributes -> Int64
_ActivityTaskCancelRequestedEventAttributes'scheduledEventId ActivityTaskCancelRequestedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskCancelRequestedEventAttributes -> Int64
_ActivityTaskCancelRequestedEventAttributes'workflowTaskCompletedEventId
                      ActivityTaskCancelRequestedEventAttributes
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.details' @:: Lens' ActivityTaskCanceledEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'details' @:: Lens' ActivityTaskCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.latestCancelRequestedEventId' @:: Lens' ActivityTaskCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityTaskCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ActivityTaskCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' ActivityTaskCanceledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' ActivityTaskCanceledEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' ActivityTaskCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data ActivityTaskCanceledEventAttributes
  = ActivityTaskCanceledEventAttributes'_constructor {ActivityTaskCanceledEventAttributes -> Maybe Payloads
_ActivityTaskCanceledEventAttributes'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                      ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'latestCancelRequestedEventId :: !Data.Int.Int64,
                                                      ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                      ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'startedEventId :: !Data.Int.Int64,
                                                      ActivityTaskCanceledEventAttributes -> Text
_ActivityTaskCanceledEventAttributes'identity :: !Data.Text.Text,
                                                      ActivityTaskCanceledEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCanceledEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                      ActivityTaskCanceledEventAttributes -> FieldSet
_ActivityTaskCanceledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
(ActivityTaskCanceledEventAttributes
 -> ActivityTaskCanceledEventAttributes -> Bool)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes -> Bool)
-> Eq ActivityTaskCanceledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
== :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
$c/= :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
/= :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskCanceledEventAttributes
Eq ActivityTaskCanceledEventAttributes =>
(ActivityTaskCanceledEventAttributes
 -> ActivityTaskCanceledEventAttributes -> Ordering)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes -> Bool)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes -> Bool)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes -> Bool)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes -> Bool)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes)
-> (ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes
    -> ActivityTaskCanceledEventAttributes)
-> Ord ActivityTaskCanceledEventAttributes
ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Ordering
ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
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 :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Ordering
compare :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Ordering
$c< :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
< :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
$c<= :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
<= :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
$c> :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
> :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
$c>= :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
>= :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes -> Bool
$cmax :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
max :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
$cmin :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
min :: ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
-> ActivityTaskCanceledEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskCanceledEventAttributes where
  showsPrec :: Int -> ActivityTaskCanceledEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskCanceledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskCanceledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskCanceledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskCanceledEventAttributes "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Maybe Payloads)
-> (ActivityTaskCanceledEventAttributes
    -> Maybe Payloads -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Maybe Payloads
_ActivityTaskCanceledEventAttributes'details
           (\ ActivityTaskCanceledEventAttributes
x__ Maybe Payloads
y__
              -> ActivityTaskCanceledEventAttributes
x__ {_ActivityTaskCanceledEventAttributes'details = 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 ActivityTaskCanceledEventAttributes "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Maybe Payloads)
-> (ActivityTaskCanceledEventAttributes
    -> Maybe Payloads -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Maybe Payloads
_ActivityTaskCanceledEventAttributes'details
           (\ ActivityTaskCanceledEventAttributes
x__ Maybe Payloads
y__
              -> ActivityTaskCanceledEventAttributes
x__ {_ActivityTaskCanceledEventAttributes'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCanceledEventAttributes "latestCancelRequestedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "latestCancelRequestedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "latestCancelRequestedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Int64)
-> (ActivityTaskCanceledEventAttributes
    -> Int64 -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'latestCancelRequestedEventId
           (\ ActivityTaskCanceledEventAttributes
x__ Int64
y__
              -> ActivityTaskCanceledEventAttributes
x__
                   {_ActivityTaskCanceledEventAttributes'latestCancelRequestedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCanceledEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Int64)
-> (ActivityTaskCanceledEventAttributes
    -> Int64 -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'scheduledEventId
           (\ ActivityTaskCanceledEventAttributes
x__ Int64
y__
              -> ActivityTaskCanceledEventAttributes
x__
                   {_ActivityTaskCanceledEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCanceledEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Int64)
-> (ActivityTaskCanceledEventAttributes
    -> Int64 -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'startedEventId
           (\ ActivityTaskCanceledEventAttributes
x__ Int64
y__
              -> ActivityTaskCanceledEventAttributes
x__
                   {_ActivityTaskCanceledEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCanceledEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Text)
-> (ActivityTaskCanceledEventAttributes
    -> Text -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Text
_ActivityTaskCanceledEventAttributes'identity
           (\ ActivityTaskCanceledEventAttributes
x__ Text
y__
              -> ActivityTaskCanceledEventAttributes
x__ {_ActivityTaskCanceledEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCanceledEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskCanceledEventAttributes
    -> Maybe WorkerVersionStamp -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCanceledEventAttributes'workerVersion
           (\ ActivityTaskCanceledEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskCanceledEventAttributes
x__ {_ActivityTaskCanceledEventAttributes'workerVersion = 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 ActivityTaskCanceledEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskCanceledEventAttributes
 -> f ActivityTaskCanceledEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskCanceledEventAttributes
-> f ActivityTaskCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCanceledEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskCanceledEventAttributes
    -> Maybe WorkerVersionStamp -> ActivityTaskCanceledEventAttributes)
-> Lens
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCanceledEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCanceledEventAttributes'workerVersion
           (\ ActivityTaskCanceledEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskCanceledEventAttributes
x__ {_ActivityTaskCanceledEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskCanceledEventAttributes where
  messageName :: Proxy ActivityTaskCanceledEventAttributes -> Text
messageName Proxy ActivityTaskCanceledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskCanceledEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskCanceledEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskCanceledEventAttributes
_
    = ByteString
"\n\
      \#ActivityTaskCanceledEventAttributes\DC2:\n\
      \\adetails\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2F\n\
      \ latest_cancel_requested_event_id\CAN\STX \SOH(\ETXR\FSlatestCancelRequestedEventId\DC2,\n\
      \\DC2scheduled_event_id\CAN\ETX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\EOT \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
      \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2Q\n\
      \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy ActivityTaskCanceledEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskCanceledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ActivityTaskCanceledEventAttributes)
fieldsByTag
    = let
        details__field_descriptor :: FieldDescriptor ActivityTaskCanceledEventAttributes
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor ActivityTaskCanceledEventAttributes Payloads
-> FieldDescriptor ActivityTaskCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor ActivityTaskCanceledEventAttributes 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'details")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCanceledEventAttributes
        latestCancelRequestedEventId__field_descriptor :: FieldDescriptor ActivityTaskCanceledEventAttributes
latestCancelRequestedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCanceledEventAttributes Int64
-> FieldDescriptor ActivityTaskCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"latest_cancel_requested_event_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
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCanceledEventAttributes 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 @"latestCancelRequestedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCanceledEventAttributes
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityTaskCanceledEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCanceledEventAttributes Int64
-> FieldDescriptor ActivityTaskCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCanceledEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCanceledEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ActivityTaskCanceledEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCanceledEventAttributes Int64
-> FieldDescriptor ActivityTaskCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCanceledEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCanceledEventAttributes
        identity__field_descriptor :: FieldDescriptor ActivityTaskCanceledEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ActivityTaskCanceledEventAttributes Text
-> FieldDescriptor ActivityTaskCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ActivityTaskCanceledEventAttributes
     ActivityTaskCanceledEventAttributes
     Text
     Text
-> FieldAccessor ActivityTaskCanceledEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCanceledEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor ActivityTaskCanceledEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     ActivityTaskCanceledEventAttributes WorkerVersionStamp
-> FieldDescriptor ActivityTaskCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     ActivityTaskCanceledEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCanceledEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskCanceledEventAttributes)]
-> Map Tag (FieldDescriptor ActivityTaskCanceledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskCanceledEventAttributes
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor ActivityTaskCanceledEventAttributes
latestCancelRequestedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ActivityTaskCanceledEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ActivityTaskCanceledEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ActivityTaskCanceledEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ActivityTaskCanceledEventAttributes
workerVersion__field_descriptor)]
  unknownFields :: Lens' ActivityTaskCanceledEventAttributes FieldSet
unknownFields
    = (ActivityTaskCanceledEventAttributes -> FieldSet)
-> (ActivityTaskCanceledEventAttributes
    -> FieldSet -> ActivityTaskCanceledEventAttributes)
-> Lens' ActivityTaskCanceledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskCanceledEventAttributes -> FieldSet
_ActivityTaskCanceledEventAttributes'_unknownFields
        (\ ActivityTaskCanceledEventAttributes
x__ FieldSet
y__
           -> ActivityTaskCanceledEventAttributes
x__ {_ActivityTaskCanceledEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskCanceledEventAttributes
defMessage
    = ActivityTaskCanceledEventAttributes'_constructor
        {_ActivityTaskCanceledEventAttributes'details :: Maybe Payloads
_ActivityTaskCanceledEventAttributes'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskCanceledEventAttributes'latestCancelRequestedEventId :: Int64
_ActivityTaskCanceledEventAttributes'latestCancelRequestedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCanceledEventAttributes'scheduledEventId :: Int64
_ActivityTaskCanceledEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCanceledEventAttributes'startedEventId :: Int64
_ActivityTaskCanceledEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCanceledEventAttributes'identity :: Text
_ActivityTaskCanceledEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCanceledEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_ActivityTaskCanceledEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskCanceledEventAttributes'_unknownFields :: FieldSet
_ActivityTaskCanceledEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskCanceledEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskCanceledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskCanceledEventAttributes
        loop :: ActivityTaskCanceledEventAttributes
-> Parser ActivityTaskCanceledEventAttributes
loop ActivityTaskCanceledEventAttributes
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 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
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") y x)
                        Word64
16
                          -> 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
"latest_cancel_requested_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"latestCancelRequestedEventId") 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                        Word64
42
                          -> 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
50
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") 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 ActivityTaskCanceledEventAttributes
-> String -> Parser ActivityTaskCanceledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskCanceledEventAttributes
-> Parser ActivityTaskCanceledEventAttributes
loop ActivityTaskCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskCanceledEventAttributes"
  buildMessage :: ActivityTaskCanceledEventAttributes -> Builder
buildMessage
    = \ ActivityTaskCanceledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payloads)
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> ActivityTaskCanceledEventAttributes -> 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'details") ActivityTaskCanceledEventAttributes
_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
10)
                       ((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.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike
  Int64
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  Int64
  Int64
-> ActivityTaskCanceledEventAttributes -> 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 @"latestCancelRequestedEventId") ActivityTaskCanceledEventAttributes
_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
16)
                         ((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
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  Int64
  Int64
-> ActivityTaskCanceledEventAttributes -> 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 @"scheduledEventId") ActivityTaskCanceledEventAttributes
_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.<>)
                      (let
                         _v :: Int64
_v
                           = FoldLike
  Int64
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  Int64
  Int64
-> ActivityTaskCanceledEventAttributes -> 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 @"startedEventId") ActivityTaskCanceledEventAttributes
_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 :: Text
_v = FoldLike
  Text
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  Text
  Text
-> ActivityTaskCanceledEventAttributes -> 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 @"identity") ActivityTaskCanceledEventAttributes
_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
42)
                                  ((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)
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> ActivityTaskCanceledEventAttributes -> 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'workerVersion") ActivityTaskCanceledEventAttributes
_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
50)
                                      ((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))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskCanceledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityTaskCanceledEventAttributes
  ActivityTaskCanceledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskCanceledEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskCanceledEventAttributes
_x)))))))
instance Control.DeepSeq.NFData ActivityTaskCanceledEventAttributes where
  rnf :: ActivityTaskCanceledEventAttributes -> ()
rnf
    = \ ActivityTaskCanceledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskCanceledEventAttributes -> FieldSet
_ActivityTaskCanceledEventAttributes'_unknownFields ActivityTaskCanceledEventAttributes
x__)
             (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskCanceledEventAttributes -> Maybe Payloads
_ActivityTaskCanceledEventAttributes'details ActivityTaskCanceledEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'latestCancelRequestedEventId
                      ActivityTaskCanceledEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'scheduledEventId ActivityTaskCanceledEventAttributes
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ActivityTaskCanceledEventAttributes -> Int64
_ActivityTaskCanceledEventAttributes'startedEventId ActivityTaskCanceledEventAttributes
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ActivityTaskCanceledEventAttributes -> Text
_ActivityTaskCanceledEventAttributes'identity ActivityTaskCanceledEventAttributes
x__)
                            (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ActivityTaskCanceledEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCanceledEventAttributes'workerVersion ActivityTaskCanceledEventAttributes
x__) ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.result' @:: Lens' ActivityTaskCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'result' @:: Lens' ActivityTaskCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityTaskCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ActivityTaskCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' ActivityTaskCompletedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' ActivityTaskCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' ActivityTaskCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data ActivityTaskCompletedEventAttributes
  = ActivityTaskCompletedEventAttributes'_constructor {ActivityTaskCompletedEventAttributes -> Maybe Payloads
_ActivityTaskCompletedEventAttributes'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                       ActivityTaskCompletedEventAttributes -> Int64
_ActivityTaskCompletedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                       ActivityTaskCompletedEventAttributes -> Int64
_ActivityTaskCompletedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                       ActivityTaskCompletedEventAttributes -> Text
_ActivityTaskCompletedEventAttributes'identity :: !Data.Text.Text,
                                                       ActivityTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCompletedEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                       ActivityTaskCompletedEventAttributes -> FieldSet
_ActivityTaskCompletedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
(ActivityTaskCompletedEventAttributes
 -> ActivityTaskCompletedEventAttributes -> Bool)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes -> Bool)
-> Eq ActivityTaskCompletedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
== :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
$c/= :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
/= :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskCompletedEventAttributes
Eq ActivityTaskCompletedEventAttributes =>
(ActivityTaskCompletedEventAttributes
 -> ActivityTaskCompletedEventAttributes -> Ordering)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes -> Bool)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes -> Bool)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes -> Bool)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes -> Bool)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes)
-> (ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes
    -> ActivityTaskCompletedEventAttributes)
-> Ord ActivityTaskCompletedEventAttributes
ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Ordering
ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
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 :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Ordering
compare :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Ordering
$c< :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
< :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
$c<= :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
<= :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
$c> :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
> :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
$c>= :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
>= :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes -> Bool
$cmax :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
max :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
$cmin :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
min :: ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
-> ActivityTaskCompletedEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskCompletedEventAttributes where
  showsPrec :: Int -> ActivityTaskCompletedEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskCompletedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskCompletedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskCompletedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskCompletedEventAttributes "result" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payloads -> f Payloads)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Maybe Payloads)
-> (ActivityTaskCompletedEventAttributes
    -> Maybe Payloads -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Maybe Payloads
_ActivityTaskCompletedEventAttributes'result
           (\ ActivityTaskCompletedEventAttributes
x__ Maybe Payloads
y__
              -> ActivityTaskCompletedEventAttributes
x__ {_ActivityTaskCompletedEventAttributes'result = 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 ActivityTaskCompletedEventAttributes "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payloads -> f (Maybe Payloads))
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Maybe Payloads)
-> (ActivityTaskCompletedEventAttributes
    -> Maybe Payloads -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Maybe Payloads
_ActivityTaskCompletedEventAttributes'result
           (\ ActivityTaskCompletedEventAttributes
x__ Maybe Payloads
y__
              -> ActivityTaskCompletedEventAttributes
x__ {_ActivityTaskCompletedEventAttributes'result = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCompletedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Int64)
-> (ActivityTaskCompletedEventAttributes
    -> Int64 -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Int64
_ActivityTaskCompletedEventAttributes'scheduledEventId
           (\ ActivityTaskCompletedEventAttributes
x__ Int64
y__
              -> ActivityTaskCompletedEventAttributes
x__
                   {_ActivityTaskCompletedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCompletedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Int64)
-> (ActivityTaskCompletedEventAttributes
    -> Int64 -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Int64
_ActivityTaskCompletedEventAttributes'startedEventId
           (\ ActivityTaskCompletedEventAttributes
x__ Int64
y__
              -> ActivityTaskCompletedEventAttributes
x__
                   {_ActivityTaskCompletedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCompletedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Text)
-> (ActivityTaskCompletedEventAttributes
    -> Text -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Text
_ActivityTaskCompletedEventAttributes'identity
           (\ ActivityTaskCompletedEventAttributes
x__ Text
y__
              -> ActivityTaskCompletedEventAttributes
x__ {_ActivityTaskCompletedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskCompletedEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskCompletedEventAttributes
    -> Maybe WorkerVersionStamp
    -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCompletedEventAttributes'workerVersion
           (\ ActivityTaskCompletedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskCompletedEventAttributes
x__
                   {_ActivityTaskCompletedEventAttributes'workerVersion = 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 ActivityTaskCompletedEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskCompletedEventAttributes
 -> f ActivityTaskCompletedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskCompletedEventAttributes
-> f ActivityTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskCompletedEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskCompletedEventAttributes
    -> Maybe WorkerVersionStamp
    -> ActivityTaskCompletedEventAttributes)
-> Lens
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCompletedEventAttributes'workerVersion
           (\ ActivityTaskCompletedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskCompletedEventAttributes
x__
                   {_ActivityTaskCompletedEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskCompletedEventAttributes where
  messageName :: Proxy ActivityTaskCompletedEventAttributes -> Text
messageName Proxy ActivityTaskCompletedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskCompletedEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskCompletedEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskCompletedEventAttributes
_
    = ByteString
"\n\
      \$ActivityTaskCompletedEventAttributes\DC28\n\
      \\ACKresult\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2,\n\
      \\DC2scheduled_event_id\CAN\STX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ETX \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2Q\n\
      \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy ActivityTaskCompletedEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskCompletedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ActivityTaskCompletedEventAttributes)
fieldsByTag
    = let
        result__field_descriptor :: FieldDescriptor ActivityTaskCompletedEventAttributes
result__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor ActivityTaskCompletedEventAttributes Payloads
-> FieldDescriptor ActivityTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (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
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor ActivityTaskCompletedEventAttributes 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'result")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCompletedEventAttributes
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityTaskCompletedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCompletedEventAttributes Int64
-> FieldDescriptor ActivityTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCompletedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCompletedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ActivityTaskCompletedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskCompletedEventAttributes Int64
-> FieldDescriptor ActivityTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskCompletedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCompletedEventAttributes
        identity__field_descriptor :: FieldDescriptor ActivityTaskCompletedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ActivityTaskCompletedEventAttributes Text
-> FieldDescriptor ActivityTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ActivityTaskCompletedEventAttributes
     ActivityTaskCompletedEventAttributes
     Text
     Text
-> FieldAccessor ActivityTaskCompletedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCompletedEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor ActivityTaskCompletedEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     ActivityTaskCompletedEventAttributes WorkerVersionStamp
-> FieldDescriptor ActivityTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     ActivityTaskCompletedEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskCompletedEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskCompletedEventAttributes)]
-> Map Tag (FieldDescriptor ActivityTaskCompletedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskCompletedEventAttributes
result__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ActivityTaskCompletedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ActivityTaskCompletedEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ActivityTaskCompletedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ActivityTaskCompletedEventAttributes
workerVersion__field_descriptor)]
  unknownFields :: Lens' ActivityTaskCompletedEventAttributes FieldSet
unknownFields
    = (ActivityTaskCompletedEventAttributes -> FieldSet)
-> (ActivityTaskCompletedEventAttributes
    -> FieldSet -> ActivityTaskCompletedEventAttributes)
-> Lens' ActivityTaskCompletedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskCompletedEventAttributes -> FieldSet
_ActivityTaskCompletedEventAttributes'_unknownFields
        (\ ActivityTaskCompletedEventAttributes
x__ FieldSet
y__
           -> ActivityTaskCompletedEventAttributes
x__
                {_ActivityTaskCompletedEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskCompletedEventAttributes
defMessage
    = ActivityTaskCompletedEventAttributes'_constructor
        {_ActivityTaskCompletedEventAttributes'result :: Maybe Payloads
_ActivityTaskCompletedEventAttributes'result = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskCompletedEventAttributes'scheduledEventId :: Int64
_ActivityTaskCompletedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCompletedEventAttributes'startedEventId :: Int64
_ActivityTaskCompletedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCompletedEventAttributes'identity :: Text
_ActivityTaskCompletedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskCompletedEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_ActivityTaskCompletedEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskCompletedEventAttributes'_unknownFields :: FieldSet
_ActivityTaskCompletedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskCompletedEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskCompletedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskCompletedEventAttributes
        loop :: ActivityTaskCompletedEventAttributes
-> Parser ActivityTaskCompletedEventAttributes
loop ActivityTaskCompletedEventAttributes
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 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
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") y x)
                        Word64
16
                          -> 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
42
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") 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 ActivityTaskCompletedEventAttributes
-> String -> Parser ActivityTaskCompletedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskCompletedEventAttributes
-> Parser ActivityTaskCompletedEventAttributes
loop ActivityTaskCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskCompletedEventAttributes"
  buildMessage :: ActivityTaskCompletedEventAttributes -> Builder
buildMessage
    = \ ActivityTaskCompletedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payloads)
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> ActivityTaskCompletedEventAttributes -> 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'result") ActivityTaskCompletedEventAttributes
_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
10)
                       ((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.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike
  Int64
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  Int64
  Int64
-> ActivityTaskCompletedEventAttributes -> 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 @"scheduledEventId") ActivityTaskCompletedEventAttributes
_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
16)
                         ((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
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  Int64
  Int64
-> ActivityTaskCompletedEventAttributes -> 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 @"startedEventId") ActivityTaskCompletedEventAttributes
_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.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  Text
  Text
-> ActivityTaskCompletedEventAttributes -> 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 @"identity") ActivityTaskCompletedEventAttributes
_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 WorkerVersionStamp)
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> ActivityTaskCompletedEventAttributes -> 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'workerVersion") ActivityTaskCompletedEventAttributes
_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
42)
                                   ((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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskCompletedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityTaskCompletedEventAttributes
  ActivityTaskCompletedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskCompletedEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskCompletedEventAttributes
_x))))))
instance Control.DeepSeq.NFData ActivityTaskCompletedEventAttributes where
  rnf :: ActivityTaskCompletedEventAttributes -> ()
rnf
    = \ ActivityTaskCompletedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskCompletedEventAttributes -> FieldSet
_ActivityTaskCompletedEventAttributes'_unknownFields ActivityTaskCompletedEventAttributes
x__)
             (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskCompletedEventAttributes -> Maybe Payloads
_ActivityTaskCompletedEventAttributes'result ActivityTaskCompletedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskCompletedEventAttributes -> Int64
_ActivityTaskCompletedEventAttributes'scheduledEventId ActivityTaskCompletedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ActivityTaskCompletedEventAttributes -> Int64
_ActivityTaskCompletedEventAttributes'startedEventId ActivityTaskCompletedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ActivityTaskCompletedEventAttributes -> Text
_ActivityTaskCompletedEventAttributes'identity ActivityTaskCompletedEventAttributes
x__)
                         (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ActivityTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskCompletedEventAttributes'workerVersion ActivityTaskCompletedEventAttributes
x__) ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' ActivityTaskFailedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' ActivityTaskFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityTaskFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ActivityTaskFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' ActivityTaskFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryState' @:: Lens' ActivityTaskFailedEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.RetryState@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' ActivityTaskFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' ActivityTaskFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data ActivityTaskFailedEventAttributes
  = ActivityTaskFailedEventAttributes'_constructor {ActivityTaskFailedEventAttributes -> Maybe Failure
_ActivityTaskFailedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                    ActivityTaskFailedEventAttributes -> Int64
_ActivityTaskFailedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                    ActivityTaskFailedEventAttributes -> Int64
_ActivityTaskFailedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                    ActivityTaskFailedEventAttributes -> Text
_ActivityTaskFailedEventAttributes'identity :: !Data.Text.Text,
                                                    ActivityTaskFailedEventAttributes -> RetryState
_ActivityTaskFailedEventAttributes'retryState :: !Proto.Temporal.Api.Enums.V1.Workflow.RetryState,
                                                    ActivityTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskFailedEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                    ActivityTaskFailedEventAttributes -> FieldSet
_ActivityTaskFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
(ActivityTaskFailedEventAttributes
 -> ActivityTaskFailedEventAttributes -> Bool)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes -> Bool)
-> Eq ActivityTaskFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
== :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
$c/= :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
/= :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskFailedEventAttributes
Eq ActivityTaskFailedEventAttributes =>
(ActivityTaskFailedEventAttributes
 -> ActivityTaskFailedEventAttributes -> Ordering)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes -> Bool)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes -> Bool)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes -> Bool)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes -> Bool)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes)
-> (ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes
    -> ActivityTaskFailedEventAttributes)
-> Ord ActivityTaskFailedEventAttributes
ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Ordering
ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
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 :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Ordering
compare :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Ordering
$c< :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
< :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
$c<= :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
<= :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
$c> :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
> :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
$c>= :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
>= :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes -> Bool
$cmax :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
max :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
$cmin :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
min :: ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
-> ActivityTaskFailedEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskFailedEventAttributes where
  showsPrec :: Int -> ActivityTaskFailedEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskFailedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Maybe Failure)
-> (ActivityTaskFailedEventAttributes
    -> Maybe Failure -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Maybe Failure
_ActivityTaskFailedEventAttributes'failure
           (\ ActivityTaskFailedEventAttributes
x__ Maybe Failure
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'failure = 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 ActivityTaskFailedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Maybe Failure)
-> (ActivityTaskFailedEventAttributes
    -> Maybe Failure -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Maybe Failure
_ActivityTaskFailedEventAttributes'failure
           (\ ActivityTaskFailedEventAttributes
x__ Maybe Failure
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskFailedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Int64)
-> (ActivityTaskFailedEventAttributes
    -> Int64 -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Int64
_ActivityTaskFailedEventAttributes'scheduledEventId
           (\ ActivityTaskFailedEventAttributes
x__ Int64
y__
              -> ActivityTaskFailedEventAttributes
x__
                   {_ActivityTaskFailedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskFailedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Int64)
-> (ActivityTaskFailedEventAttributes
    -> Int64 -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Int64
_ActivityTaskFailedEventAttributes'startedEventId
           (\ ActivityTaskFailedEventAttributes
x__ Int64
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskFailedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Text)
-> (ActivityTaskFailedEventAttributes
    -> Text -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Text
_ActivityTaskFailedEventAttributes'identity
           (\ ActivityTaskFailedEventAttributes
x__ Text
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskFailedEventAttributes "retryState" Proto.Temporal.Api.Enums.V1.Workflow.RetryState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryState"
-> (RetryState -> f RetryState)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "retryState"
_
    = ((RetryState -> f RetryState)
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((RetryState -> f RetryState) -> RetryState -> f RetryState)
-> (RetryState -> f RetryState)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> RetryState)
-> (ActivityTaskFailedEventAttributes
    -> RetryState -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     RetryState
     RetryState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> RetryState
_ActivityTaskFailedEventAttributes'retryState
           (\ ActivityTaskFailedEventAttributes
x__ RetryState
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'retryState = y__}))
        (RetryState -> f RetryState) -> RetryState -> f RetryState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskFailedEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskFailedEventAttributes
    -> Maybe WorkerVersionStamp -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskFailedEventAttributes'workerVersion
           (\ ActivityTaskFailedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'workerVersion = 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 ActivityTaskFailedEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskFailedEventAttributes
 -> f ActivityTaskFailedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskFailedEventAttributes
-> f ActivityTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskFailedEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskFailedEventAttributes
    -> Maybe WorkerVersionStamp -> ActivityTaskFailedEventAttributes)
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskFailedEventAttributes'workerVersion
           (\ ActivityTaskFailedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskFailedEventAttributes where
  messageName :: Proxy ActivityTaskFailedEventAttributes -> Text
messageName Proxy ActivityTaskFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskFailedEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskFailedEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskFailedEventAttributes
_
    = ByteString
"\n\
      \!ActivityTaskFailedEventAttributes\DC2:\n\
      \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2,\n\
      \\DC2scheduled_event_id\CAN\STX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ETX \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2B\n\
      \\vretry_state\CAN\ENQ \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
      \retryState\DC2Q\n\
      \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy ActivityTaskFailedEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ActivityTaskFailedEventAttributes)
fieldsByTag
    = let
        failure__field_descriptor :: FieldDescriptor ActivityTaskFailedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor ActivityTaskFailedEventAttributes Failure
-> FieldDescriptor ActivityTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor ActivityTaskFailedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskFailedEventAttributes
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityTaskFailedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskFailedEventAttributes Int64
-> FieldDescriptor ActivityTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskFailedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskFailedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ActivityTaskFailedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskFailedEventAttributes Int64
-> FieldDescriptor ActivityTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskFailedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskFailedEventAttributes
        identity__field_descriptor :: FieldDescriptor ActivityTaskFailedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ActivityTaskFailedEventAttributes Text
-> FieldDescriptor ActivityTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     Text
     Text
-> FieldAccessor ActivityTaskFailedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskFailedEventAttributes
        retryState__field_descriptor :: FieldDescriptor ActivityTaskFailedEventAttributes
retryState__field_descriptor
          = String
-> FieldTypeDescriptor RetryState
-> FieldAccessor ActivityTaskFailedEventAttributes RetryState
-> FieldDescriptor ActivityTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"retry_state"
              (ScalarField RetryState -> FieldTypeDescriptor RetryState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RetryState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.RetryState)
              (WireDefault RetryState
-> Lens
     ActivityTaskFailedEventAttributes
     ActivityTaskFailedEventAttributes
     RetryState
     RetryState
-> FieldAccessor ActivityTaskFailedEventAttributes RetryState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RetryState
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 @"retryState")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskFailedEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor ActivityTaskFailedEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     ActivityTaskFailedEventAttributes WorkerVersionStamp
-> FieldDescriptor ActivityTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     ActivityTaskFailedEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskFailedEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskFailedEventAttributes)]
-> Map Tag (FieldDescriptor ActivityTaskFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskFailedEventAttributes
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ActivityTaskFailedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ActivityTaskFailedEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ActivityTaskFailedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ActivityTaskFailedEventAttributes
retryState__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ActivityTaskFailedEventAttributes
workerVersion__field_descriptor)]
  unknownFields :: Lens' ActivityTaskFailedEventAttributes FieldSet
unknownFields
    = (ActivityTaskFailedEventAttributes -> FieldSet)
-> (ActivityTaskFailedEventAttributes
    -> FieldSet -> ActivityTaskFailedEventAttributes)
-> Lens' ActivityTaskFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskFailedEventAttributes -> FieldSet
_ActivityTaskFailedEventAttributes'_unknownFields
        (\ ActivityTaskFailedEventAttributes
x__ FieldSet
y__
           -> ActivityTaskFailedEventAttributes
x__ {_ActivityTaskFailedEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskFailedEventAttributes
defMessage
    = ActivityTaskFailedEventAttributes'_constructor
        {_ActivityTaskFailedEventAttributes'failure :: Maybe Failure
_ActivityTaskFailedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskFailedEventAttributes'scheduledEventId :: Int64
_ActivityTaskFailedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskFailedEventAttributes'startedEventId :: Int64
_ActivityTaskFailedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskFailedEventAttributes'identity :: Text
_ActivityTaskFailedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskFailedEventAttributes'retryState :: RetryState
_ActivityTaskFailedEventAttributes'retryState = RetryState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskFailedEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_ActivityTaskFailedEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskFailedEventAttributes'_unknownFields :: FieldSet
_ActivityTaskFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskFailedEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskFailedEventAttributes
        loop :: ActivityTaskFailedEventAttributes
-> Parser ActivityTaskFailedEventAttributes
loop ActivityTaskFailedEventAttributes
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 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
16
                          -> 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
40
                          -> do y <- Parser RetryState -> String -> Parser RetryState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RetryState) -> Parser Int -> Parser RetryState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RetryState
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
"retry_state"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryState") y x)
                        Word64
50
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") 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 ActivityTaskFailedEventAttributes
-> String -> Parser ActivityTaskFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskFailedEventAttributes
-> Parser ActivityTaskFailedEventAttributes
loop ActivityTaskFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskFailedEventAttributes"
  buildMessage :: ActivityTaskFailedEventAttributes -> Builder
buildMessage
    = \ ActivityTaskFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Failure)
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> ActivityTaskFailedEventAttributes -> 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'failure") ActivityTaskFailedEventAttributes
_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
10)
                       ((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 :: Int64
_v
                     = FoldLike
  Int64
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  Int64
  Int64
-> ActivityTaskFailedEventAttributes -> 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 @"scheduledEventId") ActivityTaskFailedEventAttributes
_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
16)
                         ((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
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  Int64
  Int64
-> ActivityTaskFailedEventAttributes -> 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 @"startedEventId") ActivityTaskFailedEventAttributes
_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.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  Text
  Text
-> ActivityTaskFailedEventAttributes -> 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 @"identity") ActivityTaskFailedEventAttributes
_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.<>)
                         (let
                            _v :: RetryState
_v
                              = FoldLike
  RetryState
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  RetryState
  RetryState
-> ActivityTaskFailedEventAttributes -> RetryState
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 @"retryState") ActivityTaskFailedEventAttributes
_x
                          in
                            if RetryState -> RetryState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RetryState
_v RetryState
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) -> (RetryState -> Int) -> RetryState -> 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)
                                     RetryState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RetryState
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe WorkerVersionStamp)
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> ActivityTaskFailedEventAttributes -> 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'workerVersion") ActivityTaskFailedEventAttributes
_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
50)
                                      ((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))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityTaskFailedEventAttributes
  ActivityTaskFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskFailedEventAttributes
_x)))))))
instance Control.DeepSeq.NFData ActivityTaskFailedEventAttributes where
  rnf :: ActivityTaskFailedEventAttributes -> ()
rnf
    = \ ActivityTaskFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskFailedEventAttributes -> FieldSet
_ActivityTaskFailedEventAttributes'_unknownFields ActivityTaskFailedEventAttributes
x__)
             (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskFailedEventAttributes -> Maybe Failure
_ActivityTaskFailedEventAttributes'failure ActivityTaskFailedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskFailedEventAttributes -> Int64
_ActivityTaskFailedEventAttributes'scheduledEventId ActivityTaskFailedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ActivityTaskFailedEventAttributes -> Int64
_ActivityTaskFailedEventAttributes'startedEventId ActivityTaskFailedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ActivityTaskFailedEventAttributes -> Text
_ActivityTaskFailedEventAttributes'identity ActivityTaskFailedEventAttributes
x__)
                         (RetryState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ActivityTaskFailedEventAttributes -> RetryState
_ActivityTaskFailedEventAttributes'retryState ActivityTaskFailedEventAttributes
x__)
                            (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ActivityTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskFailedEventAttributes'workerVersion ActivityTaskFailedEventAttributes
x__) ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityId' @:: Lens' ActivityTaskScheduledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityType' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Temporal.Api.Common.V1.Message.ActivityType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityType' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.taskQueue' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'taskQueue' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduleToCloseTimeout' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'scheduleToCloseTimeout' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduleToStartTimeout' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'scheduleToStartTimeout' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startToCloseTimeout' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'startToCloseTimeout' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.heartbeatTimeout' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'heartbeatTimeout' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' ActivityTaskScheduledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryPolicy' @:: Lens' ActivityTaskScheduledEventAttributes Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'retryPolicy' @:: Lens' ActivityTaskScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.useWorkflowBuildId' @:: Lens' ActivityTaskScheduledEventAttributes Prelude.Bool@ -}
data ActivityTaskScheduledEventAttributes
  = ActivityTaskScheduledEventAttributes'_constructor {ActivityTaskScheduledEventAttributes -> Text
_ActivityTaskScheduledEventAttributes'activityId :: !Data.Text.Text,
                                                       ActivityTaskScheduledEventAttributes -> Maybe ActivityType
_ActivityTaskScheduledEventAttributes'activityType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.ActivityType),
                                                       ActivityTaskScheduledEventAttributes -> Maybe TaskQueue
_ActivityTaskScheduledEventAttributes'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                       ActivityTaskScheduledEventAttributes -> Maybe Header
_ActivityTaskScheduledEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                       ActivityTaskScheduledEventAttributes -> Maybe Payloads
_ActivityTaskScheduledEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                       ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                       ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                       ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'startToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                       ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'heartbeatTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                       ActivityTaskScheduledEventAttributes -> Int64
_ActivityTaskScheduledEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                       ActivityTaskScheduledEventAttributes -> Maybe RetryPolicy
_ActivityTaskScheduledEventAttributes'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                       ActivityTaskScheduledEventAttributes -> Bool
_ActivityTaskScheduledEventAttributes'useWorkflowBuildId :: !Prelude.Bool,
                                                       ActivityTaskScheduledEventAttributes -> FieldSet
_ActivityTaskScheduledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
(ActivityTaskScheduledEventAttributes
 -> ActivityTaskScheduledEventAttributes -> Bool)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes -> Bool)
-> Eq ActivityTaskScheduledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
== :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
$c/= :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
/= :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskScheduledEventAttributes
Eq ActivityTaskScheduledEventAttributes =>
(ActivityTaskScheduledEventAttributes
 -> ActivityTaskScheduledEventAttributes -> Ordering)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes -> Bool)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes -> Bool)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes -> Bool)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes -> Bool)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes)
-> (ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes
    -> ActivityTaskScheduledEventAttributes)
-> Ord ActivityTaskScheduledEventAttributes
ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Ordering
ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
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 :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Ordering
compare :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Ordering
$c< :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
< :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
$c<= :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
<= :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
$c> :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
> :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
$c>= :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
>= :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes -> Bool
$cmax :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
max :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
$cmin :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
min :: ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
-> ActivityTaskScheduledEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskScheduledEventAttributes where
  showsPrec :: Int -> ActivityTaskScheduledEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskScheduledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskScheduledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskScheduledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "activityId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityId"
-> (Text -> f Text)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "activityId"
_
    = ((Text -> f Text)
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Text)
-> (ActivityTaskScheduledEventAttributes
    -> Text -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Text
_ActivityTaskScheduledEventAttributes'activityId
           (\ ActivityTaskScheduledEventAttributes
x__ Text
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'activityId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "activityType" Proto.Temporal.Api.Common.V1.Message.ActivityType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityType"
-> (ActivityType -> f ActivityType)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "activityType"
_
    = ((Maybe ActivityType -> f (Maybe ActivityType))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((ActivityType -> f ActivityType)
    -> Maybe ActivityType -> f (Maybe ActivityType))
-> (ActivityType -> f ActivityType)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe ActivityType)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe ActivityType -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe ActivityType)
     (Maybe ActivityType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe ActivityType
_ActivityTaskScheduledEventAttributes'activityType
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe ActivityType
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'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 ActivityTaskScheduledEventAttributes "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))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'activityType"
_
    = ((Maybe ActivityType -> f (Maybe ActivityType))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe ActivityType -> f (Maybe ActivityType))
    -> Maybe ActivityType -> f (Maybe ActivityType))
-> (Maybe ActivityType -> f (Maybe ActivityType))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe ActivityType)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe ActivityType -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe ActivityType)
     (Maybe ActivityType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe ActivityType
_ActivityTaskScheduledEventAttributes'activityType
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe ActivityType
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'activityType = y__}))
        (Maybe ActivityType -> f (Maybe ActivityType))
-> Maybe ActivityType -> f (Maybe ActivityType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe TaskQueue)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe TaskQueue -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe TaskQueue
_ActivityTaskScheduledEventAttributes'taskQueue
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe TaskQueue
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'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 ActivityTaskScheduledEventAttributes "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))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe TaskQueue)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe TaskQueue -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe TaskQueue
_ActivityTaskScheduledEventAttributes'taskQueue
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe TaskQueue
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Header)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Header -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Header
_ActivityTaskScheduledEventAttributes'header
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Header
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'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 ActivityTaskScheduledEventAttributes "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))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Header)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Header -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Header
_ActivityTaskScheduledEventAttributes'header
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Header
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Payloads)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Payloads -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Payloads
_ActivityTaskScheduledEventAttributes'input
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Payloads
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'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 ActivityTaskScheduledEventAttributes "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))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Payloads)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Payloads -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Payloads
_ActivityTaskScheduledEventAttributes'input
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Payloads
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "scheduleToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToCloseTimeout"
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'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 ActivityTaskScheduledEventAttributes "maybe'scheduleToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "scheduleToStartTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToStartTimeout"
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "scheduleToStartTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout = 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 ActivityTaskScheduledEventAttributes "maybe'scheduleToStartTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToStartTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'scheduleToStartTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "startToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToCloseTimeout"
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'startToCloseTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'startToCloseTimeout = 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 ActivityTaskScheduledEventAttributes "maybe'startToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'startToCloseTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'startToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "heartbeatTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "heartbeatTimeout"
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "heartbeatTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'heartbeatTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'heartbeatTimeout = 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 ActivityTaskScheduledEventAttributes "maybe'heartbeatTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'heartbeatTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'heartbeatTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe Duration)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe Duration -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'heartbeatTimeout
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'heartbeatTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Int64)
-> (ActivityTaskScheduledEventAttributes
    -> Int64 -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Int64
_ActivityTaskScheduledEventAttributes'workflowTaskCompletedEventId
           (\ ActivityTaskScheduledEventAttributes
x__ Int64
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe RetryPolicy)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe RetryPolicy -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe RetryPolicy
_ActivityTaskScheduledEventAttributes'retryPolicy
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe RetryPolicy
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'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 ActivityTaskScheduledEventAttributes "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))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Maybe RetryPolicy)
-> (ActivityTaskScheduledEventAttributes
    -> Maybe RetryPolicy -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Maybe RetryPolicy
_ActivityTaskScheduledEventAttributes'retryPolicy
           (\ ActivityTaskScheduledEventAttributes
x__ Maybe RetryPolicy
y__
              -> ActivityTaskScheduledEventAttributes
x__ {_ActivityTaskScheduledEventAttributes'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskScheduledEventAttributes "useWorkflowBuildId" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "useWorkflowBuildId"
-> (Bool -> f Bool)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
fieldOf Proxy# "useWorkflowBuildId"
_
    = ((Bool -> f Bool)
 -> ActivityTaskScheduledEventAttributes
 -> f ActivityTaskScheduledEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> ActivityTaskScheduledEventAttributes
-> f ActivityTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskScheduledEventAttributes -> Bool)
-> (ActivityTaskScheduledEventAttributes
    -> Bool -> ActivityTaskScheduledEventAttributes)
-> Lens
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskScheduledEventAttributes -> Bool
_ActivityTaskScheduledEventAttributes'useWorkflowBuildId
           (\ ActivityTaskScheduledEventAttributes
x__ Bool
y__
              -> ActivityTaskScheduledEventAttributes
x__
                   {_ActivityTaskScheduledEventAttributes'useWorkflowBuildId = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskScheduledEventAttributes where
  messageName :: Proxy ActivityTaskScheduledEventAttributes -> Text
messageName Proxy ActivityTaskScheduledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskScheduledEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskScheduledEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskScheduledEventAttributes
_
    = ByteString
"\n\
      \$ActivityTaskScheduledEventAttributes\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\DC2C\n\
      \\n\
      \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
      \\ACKheader\CAN\ENQ \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC26\n\
      \\ENQinput\CAN\ACK \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2T\n\
      \\EMschedule_to_close_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2T\n\
      \\EMschedule_to_start_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToStartTimeout\DC2N\n\
      \\SYNstart_to_close_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
      \\DC1heartbeat_timeout\CAN\n\
      \ \SOH(\v2\EM.google.protobuf.DurationR\DLEheartbeatTimeout\DC2F\n\
      \ workflow_task_completed_event_id\CAN\v \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2F\n\
      \\fretry_policy\CAN\f \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC21\n\
      \\NAKuse_workflow_build_id\CAN\r \SOH(\bR\DC2useWorkflowBuildIdJ\EOT\b\ETX\DLE\EOT"
  packedFileDescriptor :: Proxy ActivityTaskScheduledEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskScheduledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ActivityTaskScheduledEventAttributes)
fieldsByTag
    = let
        activityId__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
activityId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ActivityTaskScheduledEventAttributes Text
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     Text
     Text
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        activityType__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
activityType__field_descriptor
          = String
-> FieldTypeDescriptor ActivityType
-> FieldAccessor ActivityTaskScheduledEventAttributes ActivityType
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe ActivityType)
  (Maybe ActivityType)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        taskQueue__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor ActivityTaskScheduledEventAttributes TaskQueue
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        header__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor ActivityTaskScheduledEventAttributes Header
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        input__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor ActivityTaskScheduledEventAttributes Payloads
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        scheduleToCloseTimeout__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
scheduleToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ActivityTaskScheduledEventAttributes Duration
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        scheduleToStartTimeout__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
scheduleToStartTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ActivityTaskScheduledEventAttributes Duration
-> FieldDescriptor ActivityTaskScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"schedule_to_start_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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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'scheduleToStartTimeout")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskScheduledEventAttributes
        startToCloseTimeout__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
startToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ActivityTaskScheduledEventAttributes Duration
-> FieldDescriptor ActivityTaskScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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'startToCloseTimeout")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskScheduledEventAttributes
        heartbeatTimeout__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
heartbeatTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor ActivityTaskScheduledEventAttributes Duration
-> FieldDescriptor ActivityTaskScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"heartbeat_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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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'heartbeatTimeout")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskScheduledEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskScheduledEventAttributes Int64
-> FieldDescriptor ActivityTaskScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskScheduledEventAttributes
        retryPolicy__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor ActivityTaskScheduledEventAttributes RetryPolicy
-> FieldDescriptor ActivityTaskScheduledEventAttributes
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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 ActivityTaskScheduledEventAttributes
        useWorkflowBuildId__field_descriptor :: FieldDescriptor ActivityTaskScheduledEventAttributes
useWorkflowBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor ActivityTaskScheduledEventAttributes Bool
-> FieldDescriptor ActivityTaskScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"use_workflow_build_id"
              (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
     ActivityTaskScheduledEventAttributes
     ActivityTaskScheduledEventAttributes
     Bool
     Bool
-> FieldAccessor ActivityTaskScheduledEventAttributes 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 @"useWorkflowBuildId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskScheduledEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskScheduledEventAttributes)]
-> Map Tag (FieldDescriptor ActivityTaskScheduledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskScheduledEventAttributes
activityId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ActivityTaskScheduledEventAttributes
activityType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ActivityTaskScheduledEventAttributes
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ActivityTaskScheduledEventAttributes
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ActivityTaskScheduledEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ActivityTaskScheduledEventAttributes
scheduleToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor ActivityTaskScheduledEventAttributes
scheduleToStartTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor ActivityTaskScheduledEventAttributes
startToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor ActivityTaskScheduledEventAttributes
heartbeatTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor ActivityTaskScheduledEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor ActivityTaskScheduledEventAttributes
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor ActivityTaskScheduledEventAttributes
useWorkflowBuildId__field_descriptor)]
  unknownFields :: Lens' ActivityTaskScheduledEventAttributes FieldSet
unknownFields
    = (ActivityTaskScheduledEventAttributes -> FieldSet)
-> (ActivityTaskScheduledEventAttributes
    -> FieldSet -> ActivityTaskScheduledEventAttributes)
-> Lens' ActivityTaskScheduledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskScheduledEventAttributes -> FieldSet
_ActivityTaskScheduledEventAttributes'_unknownFields
        (\ ActivityTaskScheduledEventAttributes
x__ FieldSet
y__
           -> ActivityTaskScheduledEventAttributes
x__
                {_ActivityTaskScheduledEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskScheduledEventAttributes
defMessage
    = ActivityTaskScheduledEventAttributes'_constructor
        {_ActivityTaskScheduledEventAttributes'activityId :: Text
_ActivityTaskScheduledEventAttributes'activityId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskScheduledEventAttributes'activityType :: Maybe ActivityType
_ActivityTaskScheduledEventAttributes'activityType = Maybe ActivityType
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'taskQueue :: Maybe TaskQueue
_ActivityTaskScheduledEventAttributes'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'header :: Maybe Header
_ActivityTaskScheduledEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'input :: Maybe Payloads
_ActivityTaskScheduledEventAttributes'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout :: Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'scheduleToStartTimeout :: Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'startToCloseTimeout :: Maybe Duration
_ActivityTaskScheduledEventAttributes'startToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'heartbeatTimeout :: Maybe Duration
_ActivityTaskScheduledEventAttributes'heartbeatTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'workflowTaskCompletedEventId :: Int64
_ActivityTaskScheduledEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskScheduledEventAttributes'retryPolicy :: Maybe RetryPolicy
_ActivityTaskScheduledEventAttributes'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskScheduledEventAttributes'useWorkflowBuildId :: Bool
_ActivityTaskScheduledEventAttributes'useWorkflowBuildId = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskScheduledEventAttributes'_unknownFields :: FieldSet
_ActivityTaskScheduledEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskScheduledEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskScheduledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskScheduledEventAttributes
        loop :: ActivityTaskScheduledEventAttributes
-> Parser ActivityTaskScheduledEventAttributes
loop ActivityTaskScheduledEventAttributes
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
34
                          -> 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
42
                          -> 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
50
                          -> 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
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
"schedule_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToCloseTimeout") y x)
                        Word64
66
                          -> 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_start_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToStartTimeout") y x)
                        Word64
74
                          -> 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
"start_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToCloseTimeout") y x)
                        Word64
82
                          -> 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
"heartbeat_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"heartbeatTimeout") y x)
                        Word64
88
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
98
                          -> 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
104
                          -> 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
"use_workflow_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"useWorkflowBuildId") 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 ActivityTaskScheduledEventAttributes
-> String -> Parser ActivityTaskScheduledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskScheduledEventAttributes
-> Parser ActivityTaskScheduledEventAttributes
loop ActivityTaskScheduledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskScheduledEventAttributes"
  buildMessage :: ActivityTaskScheduledEventAttributes -> Builder
buildMessage
    = \ ActivityTaskScheduledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  Text
  Text
-> ActivityTaskScheduledEventAttributes -> 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") ActivityTaskScheduledEventAttributes
_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)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe ActivityType)
  (Maybe ActivityType)
-> ActivityTaskScheduledEventAttributes -> 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") ActivityTaskScheduledEventAttributes
_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.<>)
                   (case
                        FoldLike
  (Maybe TaskQueue)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> ActivityTaskScheduledEventAttributes -> 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") ActivityTaskScheduledEventAttributes
_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
34)
                             ((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 Header)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Header)
  (Maybe Header)
-> ActivityTaskScheduledEventAttributes -> 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") ActivityTaskScheduledEventAttributes
_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
42)
                                ((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))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Payloads)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> ActivityTaskScheduledEventAttributes -> 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") ActivityTaskScheduledEventAttributes
_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
50)
                                   ((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)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> ActivityTaskScheduledEventAttributes -> 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") ActivityTaskScheduledEventAttributes
_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.<>)
                               (case
                                    FoldLike
  (Maybe Duration)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> ActivityTaskScheduledEventAttributes -> 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'scheduleToStartTimeout")
                                      ActivityTaskScheduledEventAttributes
_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
66)
                                         ((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)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> ActivityTaskScheduledEventAttributes -> 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'startToCloseTimeout")
                                         ActivityTaskScheduledEventAttributes
_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
74)
                                            ((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)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> ActivityTaskScheduledEventAttributes -> 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'heartbeatTimeout")
                                            ActivityTaskScheduledEventAttributes
_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
82)
                                               ((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 :: Int64
_v
                                             = FoldLike
  Int64
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  Int64
  Int64
-> ActivityTaskScheduledEventAttributes -> 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
                                                    @"workflowTaskCompletedEventId")
                                                 ActivityTaskScheduledEventAttributes
_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
88)
                                                 ((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 RetryPolicy)
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> ActivityTaskScheduledEventAttributes -> 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")
                                                  ActivityTaskScheduledEventAttributes
_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
98)
                                                     ((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 :: Bool
_v
                                                   = FoldLike
  Bool
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  Bool
  Bool
-> ActivityTaskScheduledEventAttributes -> 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
                                                          @"useWorkflowBuildId")
                                                       ActivityTaskScheduledEventAttributes
_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
104)
                                                       ((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
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskScheduledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                    FoldLike
  FieldSet
  ActivityTaskScheduledEventAttributes
  ActivityTaskScheduledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskScheduledEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskScheduledEventAttributes
_x)))))))))))))
instance Control.DeepSeq.NFData ActivityTaskScheduledEventAttributes where
  rnf :: ActivityTaskScheduledEventAttributes -> ()
rnf
    = \ ActivityTaskScheduledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskScheduledEventAttributes -> FieldSet
_ActivityTaskScheduledEventAttributes'_unknownFields ActivityTaskScheduledEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskScheduledEventAttributes -> Text
_ActivityTaskScheduledEventAttributes'activityId ActivityTaskScheduledEventAttributes
x__)
                (Maybe ActivityType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskScheduledEventAttributes -> Maybe ActivityType
_ActivityTaskScheduledEventAttributes'activityType ActivityTaskScheduledEventAttributes
x__)
                   (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ActivityTaskScheduledEventAttributes -> Maybe TaskQueue
_ActivityTaskScheduledEventAttributes'taskQueue ActivityTaskScheduledEventAttributes
x__)
                      (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ActivityTaskScheduledEventAttributes -> Maybe Header
_ActivityTaskScheduledEventAttributes'header ActivityTaskScheduledEventAttributes
x__)
                         (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ActivityTaskScheduledEventAttributes -> Maybe Payloads
_ActivityTaskScheduledEventAttributes'input ActivityTaskScheduledEventAttributes
x__)
                            (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToCloseTimeout ActivityTaskScheduledEventAttributes
x__)
                               (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'scheduleToStartTimeout ActivityTaskScheduledEventAttributes
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'startToCloseTimeout ActivityTaskScheduledEventAttributes
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (ActivityTaskScheduledEventAttributes -> Maybe Duration
_ActivityTaskScheduledEventAttributes'heartbeatTimeout ActivityTaskScheduledEventAttributes
x__)
                                        (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (ActivityTaskScheduledEventAttributes -> Int64
_ActivityTaskScheduledEventAttributes'workflowTaskCompletedEventId
                                              ActivityTaskScheduledEventAttributes
x__)
                                           (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (ActivityTaskScheduledEventAttributes -> Maybe RetryPolicy
_ActivityTaskScheduledEventAttributes'retryPolicy
                                                 ActivityTaskScheduledEventAttributes
x__)
                                              (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (ActivityTaskScheduledEventAttributes -> Bool
_ActivityTaskScheduledEventAttributes'useWorkflowBuildId
                                                    ActivityTaskScheduledEventAttributes
x__)
                                                 ()))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityTaskStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' ActivityTaskStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.requestId' @:: Lens' ActivityTaskStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.attempt' @:: Lens' ActivityTaskStartedEventAttributes Data.Int.Int32@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.lastFailure' @:: Lens' ActivityTaskStartedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'lastFailure' @:: Lens' ActivityTaskStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' ActivityTaskStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' ActivityTaskStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.buildIdRedirectCounter' @:: Lens' ActivityTaskStartedEventAttributes Data.Int.Int64@ -}
data ActivityTaskStartedEventAttributes
  = ActivityTaskStartedEventAttributes'_constructor {ActivityTaskStartedEventAttributes -> Int64
_ActivityTaskStartedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                     ActivityTaskStartedEventAttributes -> Text
_ActivityTaskStartedEventAttributes'identity :: !Data.Text.Text,
                                                     ActivityTaskStartedEventAttributes -> Text
_ActivityTaskStartedEventAttributes'requestId :: !Data.Text.Text,
                                                     ActivityTaskStartedEventAttributes -> Int32
_ActivityTaskStartedEventAttributes'attempt :: !Data.Int.Int32,
                                                     ActivityTaskStartedEventAttributes -> Maybe Failure
_ActivityTaskStartedEventAttributes'lastFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                     ActivityTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskStartedEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                     ActivityTaskStartedEventAttributes -> Int64
_ActivityTaskStartedEventAttributes'buildIdRedirectCounter :: !Data.Int.Int64,
                                                     ActivityTaskStartedEventAttributes -> FieldSet
_ActivityTaskStartedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
(ActivityTaskStartedEventAttributes
 -> ActivityTaskStartedEventAttributes -> Bool)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes -> Bool)
-> Eq ActivityTaskStartedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
== :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
$c/= :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
/= :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskStartedEventAttributes
Eq ActivityTaskStartedEventAttributes =>
(ActivityTaskStartedEventAttributes
 -> ActivityTaskStartedEventAttributes -> Ordering)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes -> Bool)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes -> Bool)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes -> Bool)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes -> Bool)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes)
-> (ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes
    -> ActivityTaskStartedEventAttributes)
-> Ord ActivityTaskStartedEventAttributes
ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Ordering
ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
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 :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Ordering
compare :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Ordering
$c< :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
< :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
$c<= :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
<= :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
$c> :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
> :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
$c>= :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
>= :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes -> Bool
$cmax :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
max :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
$cmin :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
min :: ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
-> ActivityTaskStartedEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskStartedEventAttributes where
  showsPrec :: Int -> ActivityTaskStartedEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskStartedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskStartedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskStartedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Int64)
-> (ActivityTaskStartedEventAttributes
    -> Int64 -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Int64
_ActivityTaskStartedEventAttributes'scheduledEventId
           (\ ActivityTaskStartedEventAttributes
x__ Int64
y__
              -> ActivityTaskStartedEventAttributes
x__
                   {_ActivityTaskStartedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Text)
-> (ActivityTaskStartedEventAttributes
    -> Text -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Text
_ActivityTaskStartedEventAttributes'identity
           (\ ActivityTaskStartedEventAttributes
x__ Text
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Text)
-> (ActivityTaskStartedEventAttributes
    -> Text -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Text
_ActivityTaskStartedEventAttributes'requestId
           (\ ActivityTaskStartedEventAttributes
x__ Text
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "attempt" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "attempt"
_
    = ((Int32 -> f Int32)
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Int32)
-> (ActivityTaskStartedEventAttributes
    -> Int32 -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Int32
_ActivityTaskStartedEventAttributes'attempt
           (\ ActivityTaskStartedEventAttributes
x__ Int32
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'attempt = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "lastFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastFailure"
-> (Failure -> f Failure)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "lastFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Maybe Failure)
-> (ActivityTaskStartedEventAttributes
    -> Maybe Failure -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Maybe Failure
_ActivityTaskStartedEventAttributes'lastFailure
           (\ ActivityTaskStartedEventAttributes
x__ Maybe Failure
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'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 ActivityTaskStartedEventAttributes "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))
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "maybe'lastFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Maybe Failure)
-> (ActivityTaskStartedEventAttributes
    -> Maybe Failure -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Maybe Failure
_ActivityTaskStartedEventAttributes'lastFailure
           (\ ActivityTaskStartedEventAttributes
x__ Maybe Failure
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'lastFailure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskStartedEventAttributes
    -> Maybe WorkerVersionStamp -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskStartedEventAttributes'workerVersion
           (\ ActivityTaskStartedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'workerVersion = 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 ActivityTaskStartedEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Maybe WorkerVersionStamp)
-> (ActivityTaskStartedEventAttributes
    -> Maybe WorkerVersionStamp -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskStartedEventAttributes'workerVersion
           (\ ActivityTaskStartedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskStartedEventAttributes "buildIdRedirectCounter" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildIdRedirectCounter"
-> (Int64 -> f Int64)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
fieldOf Proxy# "buildIdRedirectCounter"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskStartedEventAttributes
 -> f ActivityTaskStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskStartedEventAttributes
-> f ActivityTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskStartedEventAttributes -> Int64)
-> (ActivityTaskStartedEventAttributes
    -> Int64 -> ActivityTaskStartedEventAttributes)
-> Lens
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskStartedEventAttributes -> Int64
_ActivityTaskStartedEventAttributes'buildIdRedirectCounter
           (\ ActivityTaskStartedEventAttributes
x__ Int64
y__
              -> ActivityTaskStartedEventAttributes
x__
                   {_ActivityTaskStartedEventAttributes'buildIdRedirectCounter = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskStartedEventAttributes where
  messageName :: Proxy ActivityTaskStartedEventAttributes -> Text
messageName Proxy ActivityTaskStartedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskStartedEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskStartedEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskStartedEventAttributes
_
    = ByteString
"\n\
      \\"ActivityTaskStartedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2\SUB\n\
      \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\ETX \SOH(\tR\trequestId\DC2\CAN\n\
      \\aattempt\CAN\EOT \SOH(\ENQR\aattempt\DC2C\n\
      \\flast_failure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\vlastFailure\DC2Q\n\
      \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\DC29\n\
      \\EMbuild_id_redirect_counter\CAN\a \SOH(\ETXR\SYNbuildIdRedirectCounter"
  packedFileDescriptor :: Proxy ActivityTaskStartedEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskStartedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ActivityTaskStartedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskStartedEventAttributes Int64
-> FieldDescriptor ActivityTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskStartedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskStartedEventAttributes
        identity__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ActivityTaskStartedEventAttributes Text
-> FieldDescriptor ActivityTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Text
     Text
-> FieldAccessor ActivityTaskStartedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskStartedEventAttributes
        requestId__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ActivityTaskStartedEventAttributes Text
-> FieldDescriptor ActivityTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_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
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Text
     Text
-> FieldAccessor ActivityTaskStartedEventAttributes 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 @"requestId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskStartedEventAttributes
        attempt__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor ActivityTaskStartedEventAttributes Int32
-> FieldDescriptor ActivityTaskStartedEventAttributes
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
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Int32
     Int32
-> FieldAccessor ActivityTaskStartedEventAttributes 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 ActivityTaskStartedEventAttributes
        lastFailure__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
lastFailure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor ActivityTaskStartedEventAttributes Failure
-> FieldDescriptor ActivityTaskStartedEventAttributes
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
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor ActivityTaskStartedEventAttributes 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 ActivityTaskStartedEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     ActivityTaskStartedEventAttributes WorkerVersionStamp
-> FieldDescriptor ActivityTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     ActivityTaskStartedEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskStartedEventAttributes
        buildIdRedirectCounter__field_descriptor :: FieldDescriptor ActivityTaskStartedEventAttributes
buildIdRedirectCounter__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskStartedEventAttributes Int64
-> FieldDescriptor ActivityTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"build_id_redirect_counter"
              (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
     ActivityTaskStartedEventAttributes
     ActivityTaskStartedEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskStartedEventAttributes 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 @"buildIdRedirectCounter")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskStartedEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskStartedEventAttributes)]
-> Map Tag (FieldDescriptor ActivityTaskStartedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskStartedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ActivityTaskStartedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ActivityTaskStartedEventAttributes
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ActivityTaskStartedEventAttributes
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ActivityTaskStartedEventAttributes
lastFailure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ActivityTaskStartedEventAttributes
workerVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ActivityTaskStartedEventAttributes
buildIdRedirectCounter__field_descriptor)]
  unknownFields :: Lens' ActivityTaskStartedEventAttributes FieldSet
unknownFields
    = (ActivityTaskStartedEventAttributes -> FieldSet)
-> (ActivityTaskStartedEventAttributes
    -> FieldSet -> ActivityTaskStartedEventAttributes)
-> Lens' ActivityTaskStartedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskStartedEventAttributes -> FieldSet
_ActivityTaskStartedEventAttributes'_unknownFields
        (\ ActivityTaskStartedEventAttributes
x__ FieldSet
y__
           -> ActivityTaskStartedEventAttributes
x__ {_ActivityTaskStartedEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskStartedEventAttributes
defMessage
    = ActivityTaskStartedEventAttributes'_constructor
        {_ActivityTaskStartedEventAttributes'scheduledEventId :: Int64
_ActivityTaskStartedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskStartedEventAttributes'identity :: Text
_ActivityTaskStartedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskStartedEventAttributes'requestId :: Text
_ActivityTaskStartedEventAttributes'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskStartedEventAttributes'attempt :: Int32
_ActivityTaskStartedEventAttributes'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskStartedEventAttributes'lastFailure :: Maybe Failure
_ActivityTaskStartedEventAttributes'lastFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskStartedEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_ActivityTaskStartedEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskStartedEventAttributes'buildIdRedirectCounter :: Int64
_ActivityTaskStartedEventAttributes'buildIdRedirectCounter = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskStartedEventAttributes'_unknownFields :: FieldSet
_ActivityTaskStartedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskStartedEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskStartedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskStartedEventAttributes
        loop :: ActivityTaskStartedEventAttributes
-> Parser ActivityTaskStartedEventAttributes
loop ActivityTaskStartedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") 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
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
32
                          -> 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
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_failure"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"lastFailure") y x)
                        Word64
50
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                        Word64
56
                          -> 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
"build_id_redirect_counter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"buildIdRedirectCounter") 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 ActivityTaskStartedEventAttributes
-> String -> Parser ActivityTaskStartedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskStartedEventAttributes
-> Parser ActivityTaskStartedEventAttributes
loop ActivityTaskStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskStartedEventAttributes"
  buildMessage :: ActivityTaskStartedEventAttributes -> Builder
buildMessage
    = \ ActivityTaskStartedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  Int64
  Int64
-> ActivityTaskStartedEventAttributes -> 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 @"scheduledEventId") ActivityTaskStartedEventAttributes
_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
8)
                      ((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
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  Text
  Text
-> ActivityTaskStartedEventAttributes -> 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 @"identity") ActivityTaskStartedEventAttributes
_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
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  Text
  Text
-> ActivityTaskStartedEventAttributes -> 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 @"requestId") ActivityTaskStartedEventAttributes
_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 :: Int32
_v = FoldLike
  Int32
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  Int32
  Int32
-> ActivityTaskStartedEventAttributes -> 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") ActivityTaskStartedEventAttributes
_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
32)
                               ((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 Failure)
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> ActivityTaskStartedEventAttributes -> 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") ActivityTaskStartedEventAttributes
_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 WorkerVersionStamp)
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> ActivityTaskStartedEventAttributes -> 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'workerVersion") ActivityTaskStartedEventAttributes
_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
50)
                                      ((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.<>)
                               (let
                                  _v :: Int64
_v
                                    = FoldLike
  Int64
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  Int64
  Int64
-> ActivityTaskStartedEventAttributes -> 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 @"buildIdRedirectCounter") ActivityTaskStartedEventAttributes
_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
56)
                                        ((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))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskStartedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityTaskStartedEventAttributes
  ActivityTaskStartedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskStartedEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskStartedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData ActivityTaskStartedEventAttributes where
  rnf :: ActivityTaskStartedEventAttributes -> ()
rnf
    = \ ActivityTaskStartedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskStartedEventAttributes -> FieldSet
_ActivityTaskStartedEventAttributes'_unknownFields ActivityTaskStartedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskStartedEventAttributes -> Int64
_ActivityTaskStartedEventAttributes'scheduledEventId ActivityTaskStartedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskStartedEventAttributes -> Text
_ActivityTaskStartedEventAttributes'identity ActivityTaskStartedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ActivityTaskStartedEventAttributes -> Text
_ActivityTaskStartedEventAttributes'requestId ActivityTaskStartedEventAttributes
x__)
                      (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ActivityTaskStartedEventAttributes -> Int32
_ActivityTaskStartedEventAttributes'attempt ActivityTaskStartedEventAttributes
x__)
                         (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ActivityTaskStartedEventAttributes -> Maybe Failure
_ActivityTaskStartedEventAttributes'lastFailure ActivityTaskStartedEventAttributes
x__)
                            (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ActivityTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_ActivityTaskStartedEventAttributes'workerVersion ActivityTaskStartedEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ActivityTaskStartedEventAttributes -> Int64
_ActivityTaskStartedEventAttributes'buildIdRedirectCounter ActivityTaskStartedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' ActivityTaskTimedOutEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' ActivityTaskTimedOutEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' ActivityTaskTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ActivityTaskTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryState' @:: Lens' ActivityTaskTimedOutEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.RetryState@ -}
data ActivityTaskTimedOutEventAttributes
  = ActivityTaskTimedOutEventAttributes'_constructor {ActivityTaskTimedOutEventAttributes -> Maybe Failure
_ActivityTaskTimedOutEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                      ActivityTaskTimedOutEventAttributes -> Int64
_ActivityTaskTimedOutEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                      ActivityTaskTimedOutEventAttributes -> Int64
_ActivityTaskTimedOutEventAttributes'startedEventId :: !Data.Int.Int64,
                                                      ActivityTaskTimedOutEventAttributes -> RetryState
_ActivityTaskTimedOutEventAttributes'retryState :: !Proto.Temporal.Api.Enums.V1.Workflow.RetryState,
                                                      ActivityTaskTimedOutEventAttributes -> FieldSet
_ActivityTaskTimedOutEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
(ActivityTaskTimedOutEventAttributes
 -> ActivityTaskTimedOutEventAttributes -> Bool)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes -> Bool)
-> Eq ActivityTaskTimedOutEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
== :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
$c/= :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
/= :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
Prelude.Eq, Eq ActivityTaskTimedOutEventAttributes
Eq ActivityTaskTimedOutEventAttributes =>
(ActivityTaskTimedOutEventAttributes
 -> ActivityTaskTimedOutEventAttributes -> Ordering)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes -> Bool)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes -> Bool)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes -> Bool)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes -> Bool)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes)
-> (ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes
    -> ActivityTaskTimedOutEventAttributes)
-> Ord ActivityTaskTimedOutEventAttributes
ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Ordering
ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
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 :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Ordering
compare :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Ordering
$c< :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
< :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
$c<= :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
<= :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
$c> :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
> :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
$c>= :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
>= :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes -> Bool
$cmax :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
max :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
$cmin :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
min :: ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
-> ActivityTaskTimedOutEventAttributes
Prelude.Ord)
instance Prelude.Show ActivityTaskTimedOutEventAttributes where
  showsPrec :: Int -> ActivityTaskTimedOutEventAttributes -> ShowS
showsPrec Int
_ ActivityTaskTimedOutEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ActivityTaskTimedOutEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ActivityTaskTimedOutEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ActivityTaskTimedOutEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ActivityTaskTimedOutEventAttributes
 -> f ActivityTaskTimedOutEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskTimedOutEventAttributes -> Maybe Failure)
-> (ActivityTaskTimedOutEventAttributes
    -> Maybe Failure -> ActivityTaskTimedOutEventAttributes)
-> Lens
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskTimedOutEventAttributes -> Maybe Failure
_ActivityTaskTimedOutEventAttributes'failure
           (\ ActivityTaskTimedOutEventAttributes
x__ Maybe Failure
y__
              -> ActivityTaskTimedOutEventAttributes
x__ {_ActivityTaskTimedOutEventAttributes'failure = 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 ActivityTaskTimedOutEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ActivityTaskTimedOutEventAttributes
 -> f ActivityTaskTimedOutEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskTimedOutEventAttributes -> Maybe Failure)
-> (ActivityTaskTimedOutEventAttributes
    -> Maybe Failure -> ActivityTaskTimedOutEventAttributes)
-> Lens
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskTimedOutEventAttributes -> Maybe Failure
_ActivityTaskTimedOutEventAttributes'failure
           (\ ActivityTaskTimedOutEventAttributes
x__ Maybe Failure
y__
              -> ActivityTaskTimedOutEventAttributes
x__ {_ActivityTaskTimedOutEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskTimedOutEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskTimedOutEventAttributes
 -> f ActivityTaskTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskTimedOutEventAttributes -> Int64)
-> (ActivityTaskTimedOutEventAttributes
    -> Int64 -> ActivityTaskTimedOutEventAttributes)
-> Lens
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskTimedOutEventAttributes -> Int64
_ActivityTaskTimedOutEventAttributes'scheduledEventId
           (\ ActivityTaskTimedOutEventAttributes
x__ Int64
y__
              -> ActivityTaskTimedOutEventAttributes
x__
                   {_ActivityTaskTimedOutEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskTimedOutEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ActivityTaskTimedOutEventAttributes
 -> f ActivityTaskTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskTimedOutEventAttributes -> Int64)
-> (ActivityTaskTimedOutEventAttributes
    -> Int64 -> ActivityTaskTimedOutEventAttributes)
-> Lens
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskTimedOutEventAttributes -> Int64
_ActivityTaskTimedOutEventAttributes'startedEventId
           (\ ActivityTaskTimedOutEventAttributes
x__ Int64
y__
              -> ActivityTaskTimedOutEventAttributes
x__
                   {_ActivityTaskTimedOutEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ActivityTaskTimedOutEventAttributes "retryState" Proto.Temporal.Api.Enums.V1.Workflow.RetryState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryState"
-> (RetryState -> f RetryState)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
fieldOf Proxy# "retryState"
_
    = ((RetryState -> f RetryState)
 -> ActivityTaskTimedOutEventAttributes
 -> f ActivityTaskTimedOutEventAttributes)
-> ((RetryState -> f RetryState) -> RetryState -> f RetryState)
-> (RetryState -> f RetryState)
-> ActivityTaskTimedOutEventAttributes
-> f ActivityTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ActivityTaskTimedOutEventAttributes -> RetryState)
-> (ActivityTaskTimedOutEventAttributes
    -> RetryState -> ActivityTaskTimedOutEventAttributes)
-> Lens
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     RetryState
     RetryState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ActivityTaskTimedOutEventAttributes -> RetryState
_ActivityTaskTimedOutEventAttributes'retryState
           (\ ActivityTaskTimedOutEventAttributes
x__ RetryState
y__
              -> ActivityTaskTimedOutEventAttributes
x__ {_ActivityTaskTimedOutEventAttributes'retryState = y__}))
        (RetryState -> f RetryState) -> RetryState -> f RetryState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ActivityTaskTimedOutEventAttributes where
  messageName :: Proxy ActivityTaskTimedOutEventAttributes -> Text
messageName Proxy ActivityTaskTimedOutEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ActivityTaskTimedOutEventAttributes"
  packedMessageDescriptor :: Proxy ActivityTaskTimedOutEventAttributes -> ByteString
packedMessageDescriptor Proxy ActivityTaskTimedOutEventAttributes
_
    = ByteString
"\n\
      \#ActivityTaskTimedOutEventAttributes\DC2:\n\
      \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2,\n\
      \\DC2scheduled_event_id\CAN\STX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ETX \SOH(\ETXR\SOstartedEventId\DC2B\n\
      \\vretry_state\CAN\EOT \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
      \retryState"
  packedFileDescriptor :: Proxy ActivityTaskTimedOutEventAttributes -> ByteString
packedFileDescriptor Proxy ActivityTaskTimedOutEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor ActivityTaskTimedOutEventAttributes)
fieldsByTag
    = let
        failure__field_descriptor :: FieldDescriptor ActivityTaskTimedOutEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor ActivityTaskTimedOutEventAttributes Failure
-> FieldDescriptor ActivityTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor ActivityTaskTimedOutEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskTimedOutEventAttributes
        scheduledEventId__field_descriptor :: FieldDescriptor ActivityTaskTimedOutEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskTimedOutEventAttributes Int64
-> FieldDescriptor ActivityTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskTimedOutEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskTimedOutEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ActivityTaskTimedOutEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ActivityTaskTimedOutEventAttributes Int64
-> FieldDescriptor ActivityTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor ActivityTaskTimedOutEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskTimedOutEventAttributes
        retryState__field_descriptor :: FieldDescriptor ActivityTaskTimedOutEventAttributes
retryState__field_descriptor
          = String
-> FieldTypeDescriptor RetryState
-> FieldAccessor ActivityTaskTimedOutEventAttributes RetryState
-> FieldDescriptor ActivityTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"retry_state"
              (ScalarField RetryState -> FieldTypeDescriptor RetryState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RetryState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.RetryState)
              (WireDefault RetryState
-> Lens
     ActivityTaskTimedOutEventAttributes
     ActivityTaskTimedOutEventAttributes
     RetryState
     RetryState
-> FieldAccessor ActivityTaskTimedOutEventAttributes RetryState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RetryState
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 @"retryState")) ::
              Data.ProtoLens.FieldDescriptor ActivityTaskTimedOutEventAttributes
      in
        [(Tag, FieldDescriptor ActivityTaskTimedOutEventAttributes)]
-> Map Tag (FieldDescriptor ActivityTaskTimedOutEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ActivityTaskTimedOutEventAttributes
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ActivityTaskTimedOutEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ActivityTaskTimedOutEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ActivityTaskTimedOutEventAttributes
retryState__field_descriptor)]
  unknownFields :: Lens' ActivityTaskTimedOutEventAttributes FieldSet
unknownFields
    = (ActivityTaskTimedOutEventAttributes -> FieldSet)
-> (ActivityTaskTimedOutEventAttributes
    -> FieldSet -> ActivityTaskTimedOutEventAttributes)
-> Lens' ActivityTaskTimedOutEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ActivityTaskTimedOutEventAttributes -> FieldSet
_ActivityTaskTimedOutEventAttributes'_unknownFields
        (\ ActivityTaskTimedOutEventAttributes
x__ FieldSet
y__
           -> ActivityTaskTimedOutEventAttributes
x__ {_ActivityTaskTimedOutEventAttributes'_unknownFields = y__})
  defMessage :: ActivityTaskTimedOutEventAttributes
defMessage
    = ActivityTaskTimedOutEventAttributes'_constructor
        {_ActivityTaskTimedOutEventAttributes'failure :: Maybe Failure
_ActivityTaskTimedOutEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ActivityTaskTimedOutEventAttributes'scheduledEventId :: Int64
_ActivityTaskTimedOutEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskTimedOutEventAttributes'startedEventId :: Int64
_ActivityTaskTimedOutEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskTimedOutEventAttributes'retryState :: RetryState
_ActivityTaskTimedOutEventAttributes'retryState = RetryState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ActivityTaskTimedOutEventAttributes'_unknownFields :: FieldSet
_ActivityTaskTimedOutEventAttributes'_unknownFields = []}
  parseMessage :: Parser ActivityTaskTimedOutEventAttributes
parseMessage
    = let
        loop ::
          ActivityTaskTimedOutEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ActivityTaskTimedOutEventAttributes
        loop :: ActivityTaskTimedOutEventAttributes
-> Parser ActivityTaskTimedOutEventAttributes
loop ActivityTaskTimedOutEventAttributes
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 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
16
                          -> 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                        Word64
32
                          -> do y <- Parser RetryState -> String -> Parser RetryState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RetryState) -> Parser Int -> Parser RetryState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RetryState
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
"retry_state"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryState") 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 ActivityTaskTimedOutEventAttributes
-> String -> Parser ActivityTaskTimedOutEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ActivityTaskTimedOutEventAttributes
-> Parser ActivityTaskTimedOutEventAttributes
loop ActivityTaskTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ActivityTaskTimedOutEventAttributes"
  buildMessage :: ActivityTaskTimedOutEventAttributes -> Builder
buildMessage
    = \ ActivityTaskTimedOutEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Failure)
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> ActivityTaskTimedOutEventAttributes -> 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'failure") ActivityTaskTimedOutEventAttributes
_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
10)
                       ((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 :: Int64
_v
                     = FoldLike
  Int64
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  Int64
  Int64
-> ActivityTaskTimedOutEventAttributes -> 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 @"scheduledEventId") ActivityTaskTimedOutEventAttributes
_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
16)
                         ((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
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  Int64
  Int64
-> ActivityTaskTimedOutEventAttributes -> 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 @"startedEventId") ActivityTaskTimedOutEventAttributes
_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.<>)
                      (let
                         _v :: RetryState
_v
                           = FoldLike
  RetryState
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  RetryState
  RetryState
-> ActivityTaskTimedOutEventAttributes -> RetryState
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 @"retryState") ActivityTaskTimedOutEventAttributes
_x
                       in
                         if RetryState -> RetryState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RetryState
_v RetryState
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) -> (RetryState -> Int) -> RetryState -> 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)
                                  RetryState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RetryState
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  FieldSet
  FieldSet
-> ActivityTaskTimedOutEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ActivityTaskTimedOutEventAttributes
  ActivityTaskTimedOutEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ActivityTaskTimedOutEventAttributes FieldSet
Data.ProtoLens.unknownFields ActivityTaskTimedOutEventAttributes
_x)))))
instance Control.DeepSeq.NFData ActivityTaskTimedOutEventAttributes where
  rnf :: ActivityTaskTimedOutEventAttributes -> ()
rnf
    = \ ActivityTaskTimedOutEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ActivityTaskTimedOutEventAttributes -> FieldSet
_ActivityTaskTimedOutEventAttributes'_unknownFields ActivityTaskTimedOutEventAttributes
x__)
             (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ActivityTaskTimedOutEventAttributes -> Maybe Failure
_ActivityTaskTimedOutEventAttributes'failure ActivityTaskTimedOutEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ActivityTaskTimedOutEventAttributes -> Int64
_ActivityTaskTimedOutEventAttributes'scheduledEventId ActivityTaskTimedOutEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ActivityTaskTimedOutEventAttributes -> Int64
_ActivityTaskTimedOutEventAttributes'startedEventId ActivityTaskTimedOutEventAttributes
x__)
                      (RetryState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ActivityTaskTimedOutEventAttributes -> RetryState
_ActivityTaskTimedOutEventAttributes'retryState ActivityTaskTimedOutEventAttributes
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.details' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'details' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ChildWorkflowExecutionCanceledEventAttributes Data.Int.Int64@ -}
data ChildWorkflowExecutionCanceledEventAttributes
  = ChildWorkflowExecutionCanceledEventAttributes'_constructor {ChildWorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCanceledEventAttributes'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                                ChildWorkflowExecutionCanceledEventAttributes -> Text
_ChildWorkflowExecutionCanceledEventAttributes'namespace :: !Data.Text.Text,
                                                                ChildWorkflowExecutionCanceledEventAttributes -> Text
_ChildWorkflowExecutionCanceledEventAttributes'namespaceId :: !Data.Text.Text,
                                                                ChildWorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                ChildWorkflowExecutionCanceledEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionCanceledEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                ChildWorkflowExecutionCanceledEventAttributes -> Int64
_ChildWorkflowExecutionCanceledEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                ChildWorkflowExecutionCanceledEventAttributes -> Int64
_ChildWorkflowExecutionCanceledEventAttributes'startedEventId :: !Data.Int.Int64,
                                                                ChildWorkflowExecutionCanceledEventAttributes -> FieldSet
_ChildWorkflowExecutionCanceledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
(ChildWorkflowExecutionCanceledEventAttributes
 -> ChildWorkflowExecutionCanceledEventAttributes -> Bool)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes -> Bool)
-> Eq ChildWorkflowExecutionCanceledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
== :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
$c/= :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
/= :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
Prelude.Eq, Eq ChildWorkflowExecutionCanceledEventAttributes
Eq ChildWorkflowExecutionCanceledEventAttributes =>
(ChildWorkflowExecutionCanceledEventAttributes
 -> ChildWorkflowExecutionCanceledEventAttributes -> Ordering)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes -> Bool)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes -> Bool)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes -> Bool)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes -> Bool)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes
    -> ChildWorkflowExecutionCanceledEventAttributes)
-> Ord ChildWorkflowExecutionCanceledEventAttributes
ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Ordering
ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
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 :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Ordering
compare :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Ordering
$c< :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
< :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
$c<= :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
<= :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
$c> :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
> :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
$c>= :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
>= :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes -> Bool
$cmax :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
max :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
$cmin :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
min :: ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
-> ChildWorkflowExecutionCanceledEventAttributes
Prelude.Ord)
instance Prelude.Show ChildWorkflowExecutionCanceledEventAttributes where
  showsPrec :: Int -> ChildWorkflowExecutionCanceledEventAttributes -> ShowS
showsPrec Int
_ ChildWorkflowExecutionCanceledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ChildWorkflowExecutionCanceledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ChildWorkflowExecutionCanceledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes -> Maybe Payloads)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe Payloads -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCanceledEventAttributes'details
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Maybe Payloads
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'details = 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 ChildWorkflowExecutionCanceledEventAttributes "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes -> Maybe Payloads)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe Payloads -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCanceledEventAttributes'details
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Maybe Payloads
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes -> Text)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Text -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Text
_ChildWorkflowExecutionCanceledEventAttributes'namespace
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes -> Text)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Text -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Text
_ChildWorkflowExecutionCanceledEventAttributes'namespaceId
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution = 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 ChildWorkflowExecutionCanceledEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionCanceledEventAttributes'workflowType
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'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 ChildWorkflowExecutionCanceledEventAttributes "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))
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionCanceledEventAttributes'workflowType
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes -> Int64)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Int64 -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Int64
_ChildWorkflowExecutionCanceledEventAttributes'initiatedEventId
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCanceledEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionCanceledEventAttributes
 -> f ChildWorkflowExecutionCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCanceledEventAttributes
-> f ChildWorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCanceledEventAttributes -> Int64)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> Int64 -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCanceledEventAttributes -> Int64
_ChildWorkflowExecutionCanceledEventAttributes'startedEventId
           (\ ChildWorkflowExecutionCanceledEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionCanceledEventAttributes
x__
                   {_ChildWorkflowExecutionCanceledEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ChildWorkflowExecutionCanceledEventAttributes where
  messageName :: Proxy ChildWorkflowExecutionCanceledEventAttributes -> Text
messageName Proxy ChildWorkflowExecutionCanceledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ChildWorkflowExecutionCanceledEventAttributes"
  packedMessageDescriptor :: Proxy ChildWorkflowExecutionCanceledEventAttributes -> ByteString
packedMessageDescriptor Proxy ChildWorkflowExecutionCanceledEventAttributes
_
    = ByteString
"\n\
      \-ChildWorkflowExecutionCanceledEventAttributes\DC2:\n\
      \\adetails\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
      \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ACK \SOH(\ETXR\SOstartedEventId"
  packedFileDescriptor :: Proxy ChildWorkflowExecutionCanceledEventAttributes -> ByteString
packedFileDescriptor Proxy ChildWorkflowExecutionCanceledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes)
fieldsByTag
    = let
        details__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes Payloads
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes 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'details")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
        namespace__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionCanceledEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionCanceledEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionCanceledEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionCanceledEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes WorkflowExecution
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
        workflowType__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes WorkflowType
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
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
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes 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 ChildWorkflowExecutionCanceledEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ChildWorkflowExecutionCanceledEventAttributes
     ChildWorkflowExecutionCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionCanceledEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
      in
        [(Tag,
  FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes)]
-> Map
     Tag (FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ChildWorkflowExecutionCanceledEventAttributes
startedEventId__field_descriptor)]
  unknownFields :: Lens' ChildWorkflowExecutionCanceledEventAttributes FieldSet
unknownFields
    = (ChildWorkflowExecutionCanceledEventAttributes -> FieldSet)
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> FieldSet -> ChildWorkflowExecutionCanceledEventAttributes)
-> Lens' ChildWorkflowExecutionCanceledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ChildWorkflowExecutionCanceledEventAttributes -> FieldSet
_ChildWorkflowExecutionCanceledEventAttributes'_unknownFields
        (\ ChildWorkflowExecutionCanceledEventAttributes
x__ FieldSet
y__
           -> ChildWorkflowExecutionCanceledEventAttributes
x__
                {_ChildWorkflowExecutionCanceledEventAttributes'_unknownFields = y__})
  defMessage :: ChildWorkflowExecutionCanceledEventAttributes
defMessage
    = ChildWorkflowExecutionCanceledEventAttributes'_constructor
        {_ChildWorkflowExecutionCanceledEventAttributes'details :: Maybe Payloads
_ChildWorkflowExecutionCanceledEventAttributes'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionCanceledEventAttributes'namespace :: Text
_ChildWorkflowExecutionCanceledEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCanceledEventAttributes'namespaceId :: Text
_ChildWorkflowExecutionCanceledEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCanceledEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionCanceledEventAttributes'workflowType :: Maybe WorkflowType
_ChildWorkflowExecutionCanceledEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionCanceledEventAttributes'initiatedEventId :: Int64
_ChildWorkflowExecutionCanceledEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCanceledEventAttributes'startedEventId :: Int64
_ChildWorkflowExecutionCanceledEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCanceledEventAttributes'_unknownFields :: FieldSet
_ChildWorkflowExecutionCanceledEventAttributes'_unknownFields = []}
  parseMessage :: Parser ChildWorkflowExecutionCanceledEventAttributes
parseMessage
    = let
        loop ::
          ChildWorkflowExecutionCanceledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ChildWorkflowExecutionCanceledEventAttributes
        loop :: ChildWorkflowExecutionCanceledEventAttributes
-> Parser ChildWorkflowExecutionCanceledEventAttributes
loop ChildWorkflowExecutionCanceledEventAttributes
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 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
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
34
                          -> 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
40
                          -> 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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 ChildWorkflowExecutionCanceledEventAttributes
-> String -> Parser ChildWorkflowExecutionCanceledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ChildWorkflowExecutionCanceledEventAttributes
-> Parser ChildWorkflowExecutionCanceledEventAttributes
loop ChildWorkflowExecutionCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ChildWorkflowExecutionCanceledEventAttributes"
  buildMessage :: ChildWorkflowExecutionCanceledEventAttributes -> Builder
buildMessage
    = \ ChildWorkflowExecutionCanceledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payloads)
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> ChildWorkflowExecutionCanceledEventAttributes -> 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'details") ChildWorkflowExecutionCanceledEventAttributes
_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
10)
                       ((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.<>)
                (let
                   _v :: Text
_v = FoldLike
  Text
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  Text
  Text
-> ChildWorkflowExecutionCanceledEventAttributes -> 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 @"namespace") ChildWorkflowExecutionCanceledEventAttributes
_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
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  Text
  Text
-> ChildWorkflowExecutionCanceledEventAttributes -> 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 @"namespaceId") ChildWorkflowExecutionCanceledEventAttributes
_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)
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ChildWorkflowExecutionCanceledEventAttributes
-> 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'workflowExecution") ChildWorkflowExecutionCanceledEventAttributes
_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
26)
                                ((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)
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> ChildWorkflowExecutionCanceledEventAttributes
-> 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") ChildWorkflowExecutionCanceledEventAttributes
_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
34)
                                   ((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.<>)
                            (let
                               _v :: Int64
_v
                                 = FoldLike
  Int64
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionCanceledEventAttributes -> 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 @"initiatedEventId") ChildWorkflowExecutionCanceledEventAttributes
_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
40)
                                     ((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
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionCanceledEventAttributes -> 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 @"startedEventId") ChildWorkflowExecutionCanceledEventAttributes
_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))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  FieldSet
  FieldSet
-> ChildWorkflowExecutionCanceledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ChildWorkflowExecutionCanceledEventAttributes
  ChildWorkflowExecutionCanceledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ChildWorkflowExecutionCanceledEventAttributes FieldSet
Data.ProtoLens.unknownFields ChildWorkflowExecutionCanceledEventAttributes
_x))))))))
instance Control.DeepSeq.NFData ChildWorkflowExecutionCanceledEventAttributes where
  rnf :: ChildWorkflowExecutionCanceledEventAttributes -> ()
rnf
    = \ ChildWorkflowExecutionCanceledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ChildWorkflowExecutionCanceledEventAttributes -> FieldSet
_ChildWorkflowExecutionCanceledEventAttributes'_unknownFields ChildWorkflowExecutionCanceledEventAttributes
x__)
             (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ChildWorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCanceledEventAttributes'details ChildWorkflowExecutionCanceledEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ChildWorkflowExecutionCanceledEventAttributes -> Text
_ChildWorkflowExecutionCanceledEventAttributes'namespace ChildWorkflowExecutionCanceledEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ChildWorkflowExecutionCanceledEventAttributes -> Text
_ChildWorkflowExecutionCanceledEventAttributes'namespaceId ChildWorkflowExecutionCanceledEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ChildWorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCanceledEventAttributes'workflowExecution
                            ChildWorkflowExecutionCanceledEventAttributes
x__)
                         (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ChildWorkflowExecutionCanceledEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionCanceledEventAttributes'workflowType ChildWorkflowExecutionCanceledEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ChildWorkflowExecutionCanceledEventAttributes -> Int64
_ChildWorkflowExecutionCanceledEventAttributes'initiatedEventId
                                  ChildWorkflowExecutionCanceledEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ChildWorkflowExecutionCanceledEventAttributes -> Int64
_ChildWorkflowExecutionCanceledEventAttributes'startedEventId
                                     ChildWorkflowExecutionCanceledEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.result' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'result' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ChildWorkflowExecutionCompletedEventAttributes Data.Int.Int64@ -}
data ChildWorkflowExecutionCompletedEventAttributes
  = ChildWorkflowExecutionCompletedEventAttributes'_constructor {ChildWorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCompletedEventAttributes'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                                 ChildWorkflowExecutionCompletedEventAttributes -> Text
_ChildWorkflowExecutionCompletedEventAttributes'namespace :: !Data.Text.Text,
                                                                 ChildWorkflowExecutionCompletedEventAttributes -> Text
_ChildWorkflowExecutionCompletedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                 ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                 ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionCompletedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                 ChildWorkflowExecutionCompletedEventAttributes -> Int64
_ChildWorkflowExecutionCompletedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                 ChildWorkflowExecutionCompletedEventAttributes -> Int64
_ChildWorkflowExecutionCompletedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                                 ChildWorkflowExecutionCompletedEventAttributes -> FieldSet
_ChildWorkflowExecutionCompletedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
(ChildWorkflowExecutionCompletedEventAttributes
 -> ChildWorkflowExecutionCompletedEventAttributes -> Bool)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes -> Bool)
-> Eq ChildWorkflowExecutionCompletedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
== :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
$c/= :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
/= :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
Prelude.Eq, Eq ChildWorkflowExecutionCompletedEventAttributes
Eq ChildWorkflowExecutionCompletedEventAttributes =>
(ChildWorkflowExecutionCompletedEventAttributes
 -> ChildWorkflowExecutionCompletedEventAttributes -> Ordering)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes -> Bool)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes -> Bool)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes -> Bool)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes -> Bool)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Ord ChildWorkflowExecutionCompletedEventAttributes
ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Ordering
ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
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 :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Ordering
compare :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Ordering
$c< :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
< :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
$c<= :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
<= :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
$c> :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
> :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
$c>= :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
>= :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes -> Bool
$cmax :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
max :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
$cmin :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
min :: ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
-> ChildWorkflowExecutionCompletedEventAttributes
Prelude.Ord)
instance Prelude.Show ChildWorkflowExecutionCompletedEventAttributes where
  showsPrec :: Int -> ChildWorkflowExecutionCompletedEventAttributes -> ShowS
showsPrec Int
_ ChildWorkflowExecutionCompletedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ChildWorkflowExecutionCompletedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ChildWorkflowExecutionCompletedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "result" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payloads -> f Payloads)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes -> Maybe Payloads)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe Payloads
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCompletedEventAttributes'result
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Maybe Payloads
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'result = 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 ChildWorkflowExecutionCompletedEventAttributes "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payloads -> f (Maybe Payloads))
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes -> Maybe Payloads)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe Payloads
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCompletedEventAttributes'result
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Maybe Payloads
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'result = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes -> Text)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Text -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes -> Text
_ChildWorkflowExecutionCompletedEventAttributes'namespace
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes -> Text)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Text -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes -> Text
_ChildWorkflowExecutionCompletedEventAttributes'namespaceId
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution = 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 ChildWorkflowExecutionCompletedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionCompletedEventAttributes'workflowType
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'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 ChildWorkflowExecutionCompletedEventAttributes "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))
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionCompletedEventAttributes'workflowType
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes -> Int64)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Int64 -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes -> Int64
_ChildWorkflowExecutionCompletedEventAttributes'initiatedEventId
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionCompletedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionCompletedEventAttributes
 -> f ChildWorkflowExecutionCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionCompletedEventAttributes
-> f ChildWorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionCompletedEventAttributes -> Int64)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> Int64 -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionCompletedEventAttributes -> Int64
_ChildWorkflowExecutionCompletedEventAttributes'startedEventId
           (\ ChildWorkflowExecutionCompletedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionCompletedEventAttributes
x__
                   {_ChildWorkflowExecutionCompletedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ChildWorkflowExecutionCompletedEventAttributes where
  messageName :: Proxy ChildWorkflowExecutionCompletedEventAttributes -> Text
messageName Proxy ChildWorkflowExecutionCompletedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ChildWorkflowExecutionCompletedEventAttributes"
  packedMessageDescriptor :: Proxy ChildWorkflowExecutionCompletedEventAttributes -> ByteString
packedMessageDescriptor Proxy ChildWorkflowExecutionCompletedEventAttributes
_
    = ByteString
"\n\
      \.ChildWorkflowExecutionCompletedEventAttributes\DC28\n\
      \\ACKresult\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
      \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ACK \SOH(\ETXR\SOstartedEventId"
  packedFileDescriptor :: Proxy ChildWorkflowExecutionCompletedEventAttributes -> ByteString
packedFileDescriptor Proxy ChildWorkflowExecutionCompletedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes)
fieldsByTag
    = let
        result__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
result__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes Payloads
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (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
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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'result")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
        namespace__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Text
     Text
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Text
     Text
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes WorkflowExecution
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
        workflowType__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes WorkflowType
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
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
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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 ChildWorkflowExecutionCompletedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ChildWorkflowExecutionCompletedEventAttributes
     ChildWorkflowExecutionCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionCompletedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
      in
        [(Tag,
  FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
result__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ChildWorkflowExecutionCompletedEventAttributes
startedEventId__field_descriptor)]
  unknownFields :: Lens' ChildWorkflowExecutionCompletedEventAttributes FieldSet
unknownFields
    = (ChildWorkflowExecutionCompletedEventAttributes -> FieldSet)
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> FieldSet -> ChildWorkflowExecutionCompletedEventAttributes)
-> Lens' ChildWorkflowExecutionCompletedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ChildWorkflowExecutionCompletedEventAttributes -> FieldSet
_ChildWorkflowExecutionCompletedEventAttributes'_unknownFields
        (\ ChildWorkflowExecutionCompletedEventAttributes
x__ FieldSet
y__
           -> ChildWorkflowExecutionCompletedEventAttributes
x__
                {_ChildWorkflowExecutionCompletedEventAttributes'_unknownFields = y__})
  defMessage :: ChildWorkflowExecutionCompletedEventAttributes
defMessage
    = ChildWorkflowExecutionCompletedEventAttributes'_constructor
        {_ChildWorkflowExecutionCompletedEventAttributes'result :: Maybe Payloads
_ChildWorkflowExecutionCompletedEventAttributes'result = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionCompletedEventAttributes'namespace :: Text
_ChildWorkflowExecutionCompletedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCompletedEventAttributes'namespaceId :: Text
_ChildWorkflowExecutionCompletedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCompletedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionCompletedEventAttributes'workflowType :: Maybe WorkflowType
_ChildWorkflowExecutionCompletedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionCompletedEventAttributes'initiatedEventId :: Int64
_ChildWorkflowExecutionCompletedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCompletedEventAttributes'startedEventId :: Int64
_ChildWorkflowExecutionCompletedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionCompletedEventAttributes'_unknownFields :: FieldSet
_ChildWorkflowExecutionCompletedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ChildWorkflowExecutionCompletedEventAttributes
parseMessage
    = let
        loop ::
          ChildWorkflowExecutionCompletedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ChildWorkflowExecutionCompletedEventAttributes
        loop :: ChildWorkflowExecutionCompletedEventAttributes
-> Parser ChildWorkflowExecutionCompletedEventAttributes
loop ChildWorkflowExecutionCompletedEventAttributes
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 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
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
34
                          -> 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
40
                          -> 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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 ChildWorkflowExecutionCompletedEventAttributes
-> String -> Parser ChildWorkflowExecutionCompletedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ChildWorkflowExecutionCompletedEventAttributes
-> Parser ChildWorkflowExecutionCompletedEventAttributes
loop ChildWorkflowExecutionCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ChildWorkflowExecutionCompletedEventAttributes"
  buildMessage :: ChildWorkflowExecutionCompletedEventAttributes -> Builder
buildMessage
    = \ ChildWorkflowExecutionCompletedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payloads)
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> ChildWorkflowExecutionCompletedEventAttributes -> 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'result") ChildWorkflowExecutionCompletedEventAttributes
_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
10)
                       ((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.<>)
                (let
                   _v :: Text
_v = FoldLike
  Text
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionCompletedEventAttributes -> 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 @"namespace") ChildWorkflowExecutionCompletedEventAttributes
_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
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionCompletedEventAttributes -> 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 @"namespaceId") ChildWorkflowExecutionCompletedEventAttributes
_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)
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ChildWorkflowExecutionCompletedEventAttributes
-> 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'workflowExecution") ChildWorkflowExecutionCompletedEventAttributes
_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
26)
                                ((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)
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> ChildWorkflowExecutionCompletedEventAttributes
-> 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") ChildWorkflowExecutionCompletedEventAttributes
_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
34)
                                   ((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.<>)
                            (let
                               _v :: Int64
_v
                                 = FoldLike
  Int64
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionCompletedEventAttributes -> 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 @"initiatedEventId") ChildWorkflowExecutionCompletedEventAttributes
_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
40)
                                     ((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
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionCompletedEventAttributes -> 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 @"startedEventId") ChildWorkflowExecutionCompletedEventAttributes
_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))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  FieldSet
  FieldSet
-> ChildWorkflowExecutionCompletedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ChildWorkflowExecutionCompletedEventAttributes
  ChildWorkflowExecutionCompletedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ChildWorkflowExecutionCompletedEventAttributes FieldSet
Data.ProtoLens.unknownFields ChildWorkflowExecutionCompletedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData ChildWorkflowExecutionCompletedEventAttributes where
  rnf :: ChildWorkflowExecutionCompletedEventAttributes -> ()
rnf
    = \ ChildWorkflowExecutionCompletedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ChildWorkflowExecutionCompletedEventAttributes -> FieldSet
_ChildWorkflowExecutionCompletedEventAttributes'_unknownFields
                ChildWorkflowExecutionCompletedEventAttributes
x__)
             (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ChildWorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_ChildWorkflowExecutionCompletedEventAttributes'result ChildWorkflowExecutionCompletedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ChildWorkflowExecutionCompletedEventAttributes -> Text
_ChildWorkflowExecutionCompletedEventAttributes'namespace ChildWorkflowExecutionCompletedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ChildWorkflowExecutionCompletedEventAttributes -> Text
_ChildWorkflowExecutionCompletedEventAttributes'namespaceId ChildWorkflowExecutionCompletedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionCompletedEventAttributes'workflowExecution
                            ChildWorkflowExecutionCompletedEventAttributes
x__)
                         (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ChildWorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionCompletedEventAttributes'workflowType ChildWorkflowExecutionCompletedEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ChildWorkflowExecutionCompletedEventAttributes -> Int64
_ChildWorkflowExecutionCompletedEventAttributes'initiatedEventId
                                  ChildWorkflowExecutionCompletedEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ChildWorkflowExecutionCompletedEventAttributes -> Int64
_ChildWorkflowExecutionCompletedEventAttributes'startedEventId
                                     ChildWorkflowExecutionCompletedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' ChildWorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ChildWorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' ChildWorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryState' @:: Lens' ChildWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.RetryState@ -}
data ChildWorkflowExecutionFailedEventAttributes
  = ChildWorkflowExecutionFailedEventAttributes'_constructor {ChildWorkflowExecutionFailedEventAttributes -> Maybe Failure
_ChildWorkflowExecutionFailedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                              ChildWorkflowExecutionFailedEventAttributes -> Text
_ChildWorkflowExecutionFailedEventAttributes'namespace :: !Data.Text.Text,
                                                              ChildWorkflowExecutionFailedEventAttributes -> Text
_ChildWorkflowExecutionFailedEventAttributes'namespaceId :: !Data.Text.Text,
                                                              ChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionFailedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                              ChildWorkflowExecutionFailedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionFailedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                              ChildWorkflowExecutionFailedEventAttributes -> Int64
_ChildWorkflowExecutionFailedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                              ChildWorkflowExecutionFailedEventAttributes -> Int64
_ChildWorkflowExecutionFailedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                              ChildWorkflowExecutionFailedEventAttributes -> RetryState
_ChildWorkflowExecutionFailedEventAttributes'retryState :: !Proto.Temporal.Api.Enums.V1.Workflow.RetryState,
                                                              ChildWorkflowExecutionFailedEventAttributes -> FieldSet
_ChildWorkflowExecutionFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
(ChildWorkflowExecutionFailedEventAttributes
 -> ChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes -> Bool)
-> Eq ChildWorkflowExecutionFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
== :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
$c/= :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
/= :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
Prelude.Eq, Eq ChildWorkflowExecutionFailedEventAttributes
Eq ChildWorkflowExecutionFailedEventAttributes =>
(ChildWorkflowExecutionFailedEventAttributes
 -> ChildWorkflowExecutionFailedEventAttributes -> Ordering)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes
    -> ChildWorkflowExecutionFailedEventAttributes)
-> Ord ChildWorkflowExecutionFailedEventAttributes
ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Ordering
ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
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 :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Ordering
compare :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Ordering
$c< :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
< :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
$c<= :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
<= :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
$c> :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
> :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
$c>= :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
>= :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes -> Bool
$cmax :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
max :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
$cmin :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
min :: ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
-> ChildWorkflowExecutionFailedEventAttributes
Prelude.Ord)
instance Prelude.Show ChildWorkflowExecutionFailedEventAttributes where
  showsPrec :: Int -> ChildWorkflowExecutionFailedEventAttributes -> ShowS
showsPrec Int
_ ChildWorkflowExecutionFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ChildWorkflowExecutionFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ChildWorkflowExecutionFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Maybe Failure)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Maybe Failure -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Maybe Failure
_ChildWorkflowExecutionFailedEventAttributes'failure
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Maybe Failure
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'failure = 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 ChildWorkflowExecutionFailedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Maybe Failure)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Maybe Failure -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Maybe Failure
_ChildWorkflowExecutionFailedEventAttributes'failure
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Maybe Failure
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Text)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Text -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Text
_ChildWorkflowExecutionFailedEventAttributes'namespace
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Text)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Text -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Text
_ChildWorkflowExecutionFailedEventAttributes'namespaceId
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionFailedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'workflowExecution = 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 ChildWorkflowExecutionFailedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionFailedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Maybe WorkflowType)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionFailedEventAttributes'workflowType
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'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 ChildWorkflowExecutionFailedEventAttributes "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))
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Maybe WorkflowType)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionFailedEventAttributes'workflowType
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Int64)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Int64 -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Int64
_ChildWorkflowExecutionFailedEventAttributes'initiatedEventId
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> Int64)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> Int64 -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> Int64
_ChildWorkflowExecutionFailedEventAttributes'startedEventId
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionFailedEventAttributes "retryState" Proto.Temporal.Api.Enums.V1.Workflow.RetryState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryState"
-> (RetryState -> f RetryState)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "retryState"
_
    = ((RetryState -> f RetryState)
 -> ChildWorkflowExecutionFailedEventAttributes
 -> f ChildWorkflowExecutionFailedEventAttributes)
-> ((RetryState -> f RetryState) -> RetryState -> f RetryState)
-> (RetryState -> f RetryState)
-> ChildWorkflowExecutionFailedEventAttributes
-> f ChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionFailedEventAttributes -> RetryState)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> RetryState -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     RetryState
     RetryState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionFailedEventAttributes -> RetryState
_ChildWorkflowExecutionFailedEventAttributes'retryState
           (\ ChildWorkflowExecutionFailedEventAttributes
x__ RetryState
y__
              -> ChildWorkflowExecutionFailedEventAttributes
x__
                   {_ChildWorkflowExecutionFailedEventAttributes'retryState = y__}))
        (RetryState -> f RetryState) -> RetryState -> f RetryState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ChildWorkflowExecutionFailedEventAttributes where
  messageName :: Proxy ChildWorkflowExecutionFailedEventAttributes -> Text
messageName Proxy ChildWorkflowExecutionFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ChildWorkflowExecutionFailedEventAttributes"
  packedMessageDescriptor :: Proxy ChildWorkflowExecutionFailedEventAttributes -> ByteString
packedMessageDescriptor Proxy ChildWorkflowExecutionFailedEventAttributes
_
    = ByteString
"\n\
      \+ChildWorkflowExecutionFailedEventAttributes\DC2:\n\
      \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\b \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
      \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ACK \SOH(\ETXR\SOstartedEventId\DC2B\n\
      \\vretry_state\CAN\a \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
      \retryState"
  packedFileDescriptor :: Proxy ChildWorkflowExecutionFailedEventAttributes -> ByteString
packedFileDescriptor Proxy ChildWorkflowExecutionFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ChildWorkflowExecutionFailedEventAttributes)
fieldsByTag
    = let
        failure__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes Failure
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
        namespace__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes WorkflowExecution
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
        workflowType__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes WorkflowType
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
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
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes 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 ChildWorkflowExecutionFailedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor ChildWorkflowExecutionFailedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
        retryState__field_descriptor :: FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
retryState__field_descriptor
          = String
-> FieldTypeDescriptor RetryState
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes RetryState
-> FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"retry_state"
              (ScalarField RetryState -> FieldTypeDescriptor RetryState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RetryState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.RetryState)
              (WireDefault RetryState
-> Lens
     ChildWorkflowExecutionFailedEventAttributes
     ChildWorkflowExecutionFailedEventAttributes
     RetryState
     RetryState
-> FieldAccessor
     ChildWorkflowExecutionFailedEventAttributes RetryState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RetryState
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 @"retryState")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
      in
        [(Tag,
  FieldDescriptor ChildWorkflowExecutionFailedEventAttributes)]
-> Map
     Tag (FieldDescriptor ChildWorkflowExecutionFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ChildWorkflowExecutionFailedEventAttributes
retryState__field_descriptor)]
  unknownFields :: Lens' ChildWorkflowExecutionFailedEventAttributes FieldSet
unknownFields
    = (ChildWorkflowExecutionFailedEventAttributes -> FieldSet)
-> (ChildWorkflowExecutionFailedEventAttributes
    -> FieldSet -> ChildWorkflowExecutionFailedEventAttributes)
-> Lens' ChildWorkflowExecutionFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ChildWorkflowExecutionFailedEventAttributes -> FieldSet
_ChildWorkflowExecutionFailedEventAttributes'_unknownFields
        (\ ChildWorkflowExecutionFailedEventAttributes
x__ FieldSet
y__
           -> ChildWorkflowExecutionFailedEventAttributes
x__
                {_ChildWorkflowExecutionFailedEventAttributes'_unknownFields = y__})
  defMessage :: ChildWorkflowExecutionFailedEventAttributes
defMessage
    = ChildWorkflowExecutionFailedEventAttributes'_constructor
        {_ChildWorkflowExecutionFailedEventAttributes'failure :: Maybe Failure
_ChildWorkflowExecutionFailedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionFailedEventAttributes'namespace :: Text
_ChildWorkflowExecutionFailedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionFailedEventAttributes'namespaceId :: Text
_ChildWorkflowExecutionFailedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionFailedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ChildWorkflowExecutionFailedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionFailedEventAttributes'workflowType :: Maybe WorkflowType
_ChildWorkflowExecutionFailedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionFailedEventAttributes'initiatedEventId :: Int64
_ChildWorkflowExecutionFailedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionFailedEventAttributes'startedEventId :: Int64
_ChildWorkflowExecutionFailedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionFailedEventAttributes'retryState :: RetryState
_ChildWorkflowExecutionFailedEventAttributes'retryState = RetryState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionFailedEventAttributes'_unknownFields :: FieldSet
_ChildWorkflowExecutionFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ChildWorkflowExecutionFailedEventAttributes
parseMessage
    = let
        loop ::
          ChildWorkflowExecutionFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ChildWorkflowExecutionFailedEventAttributes
        loop :: ChildWorkflowExecutionFailedEventAttributes
-> Parser ChildWorkflowExecutionFailedEventAttributes
loop ChildWorkflowExecutionFailedEventAttributes
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 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
66
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
34
                          -> 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
40
                          -> 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                        Word64
56
                          -> do y <- Parser RetryState -> String -> Parser RetryState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RetryState) -> Parser Int -> Parser RetryState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RetryState
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
"retry_state"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryState") 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 ChildWorkflowExecutionFailedEventAttributes
-> String -> Parser ChildWorkflowExecutionFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ChildWorkflowExecutionFailedEventAttributes
-> Parser ChildWorkflowExecutionFailedEventAttributes
loop ChildWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ChildWorkflowExecutionFailedEventAttributes"
  buildMessage :: ChildWorkflowExecutionFailedEventAttributes -> Builder
buildMessage
    = \ ChildWorkflowExecutionFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Failure)
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> ChildWorkflowExecutionFailedEventAttributes -> 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'failure") ChildWorkflowExecutionFailedEventAttributes
_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
10)
                       ((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
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionFailedEventAttributes -> 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 @"namespace") ChildWorkflowExecutionFailedEventAttributes
_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
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionFailedEventAttributes -> 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 @"namespaceId") ChildWorkflowExecutionFailedEventAttributes
_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
66)
                            ((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)
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ChildWorkflowExecutionFailedEventAttributes
-> 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'workflowExecution") ChildWorkflowExecutionFailedEventAttributes
_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
26)
                                ((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)
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> ChildWorkflowExecutionFailedEventAttributes
-> 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") ChildWorkflowExecutionFailedEventAttributes
_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
34)
                                   ((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.<>)
                            (let
                               _v :: Int64
_v
                                 = FoldLike
  Int64
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionFailedEventAttributes -> 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 @"initiatedEventId") ChildWorkflowExecutionFailedEventAttributes
_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
40)
                                     ((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
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionFailedEventAttributes -> 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 @"startedEventId") ChildWorkflowExecutionFailedEventAttributes
_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 :: RetryState
_v
                                       = FoldLike
  RetryState
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  RetryState
  RetryState
-> ChildWorkflowExecutionFailedEventAttributes -> RetryState
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 @"retryState") ChildWorkflowExecutionFailedEventAttributes
_x
                                   in
                                     if RetryState -> RetryState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RetryState
_v RetryState
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) -> (RetryState -> Int) -> RetryState -> 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)
                                              RetryState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RetryState
_v))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
-> ChildWorkflowExecutionFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ChildWorkflowExecutionFailedEventAttributes
  ChildWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ChildWorkflowExecutionFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields ChildWorkflowExecutionFailedEventAttributes
_x)))))))))
instance Control.DeepSeq.NFData ChildWorkflowExecutionFailedEventAttributes where
  rnf :: ChildWorkflowExecutionFailedEventAttributes -> ()
rnf
    = \ ChildWorkflowExecutionFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ChildWorkflowExecutionFailedEventAttributes -> FieldSet
_ChildWorkflowExecutionFailedEventAttributes'_unknownFields ChildWorkflowExecutionFailedEventAttributes
x__)
             (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ChildWorkflowExecutionFailedEventAttributes -> Maybe Failure
_ChildWorkflowExecutionFailedEventAttributes'failure ChildWorkflowExecutionFailedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ChildWorkflowExecutionFailedEventAttributes -> Text
_ChildWorkflowExecutionFailedEventAttributes'namespace ChildWorkflowExecutionFailedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ChildWorkflowExecutionFailedEventAttributes -> Text
_ChildWorkflowExecutionFailedEventAttributes'namespaceId ChildWorkflowExecutionFailedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionFailedEventAttributes'workflowExecution
                            ChildWorkflowExecutionFailedEventAttributes
x__)
                         (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ChildWorkflowExecutionFailedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionFailedEventAttributes'workflowType ChildWorkflowExecutionFailedEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ChildWorkflowExecutionFailedEventAttributes -> Int64
_ChildWorkflowExecutionFailedEventAttributes'initiatedEventId ChildWorkflowExecutionFailedEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ChildWorkflowExecutionFailedEventAttributes -> Int64
_ChildWorkflowExecutionFailedEventAttributes'startedEventId ChildWorkflowExecutionFailedEventAttributes
x__)
                                  (RetryState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (ChildWorkflowExecutionFailedEventAttributes -> RetryState
_ChildWorkflowExecutionFailedEventAttributes'retryState ChildWorkflowExecutionFailedEventAttributes
x__)
                                     ()))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ChildWorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ChildWorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ChildWorkflowExecutionStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ChildWorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ChildWorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' ChildWorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' ChildWorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' ChildWorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' ChildWorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@ -}
data ChildWorkflowExecutionStartedEventAttributes
  = ChildWorkflowExecutionStartedEventAttributes'_constructor {ChildWorkflowExecutionStartedEventAttributes -> Text
_ChildWorkflowExecutionStartedEventAttributes'namespace :: !Data.Text.Text,
                                                               ChildWorkflowExecutionStartedEventAttributes -> Text
_ChildWorkflowExecutionStartedEventAttributes'namespaceId :: !Data.Text.Text,
                                                               ChildWorkflowExecutionStartedEventAttributes -> Int64
_ChildWorkflowExecutionStartedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                               ChildWorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionStartedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                               ChildWorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionStartedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                               ChildWorkflowExecutionStartedEventAttributes -> Maybe Header
_ChildWorkflowExecutionStartedEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                               ChildWorkflowExecutionStartedEventAttributes -> FieldSet
_ChildWorkflowExecutionStartedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
(ChildWorkflowExecutionStartedEventAttributes
 -> ChildWorkflowExecutionStartedEventAttributes -> Bool)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes -> Bool)
-> Eq ChildWorkflowExecutionStartedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
== :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
$c/= :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
/= :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
Prelude.Eq, Eq ChildWorkflowExecutionStartedEventAttributes
Eq ChildWorkflowExecutionStartedEventAttributes =>
(ChildWorkflowExecutionStartedEventAttributes
 -> ChildWorkflowExecutionStartedEventAttributes -> Ordering)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes -> Bool)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes -> Bool)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes -> Bool)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes -> Bool)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes
    -> ChildWorkflowExecutionStartedEventAttributes)
-> Ord ChildWorkflowExecutionStartedEventAttributes
ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Ordering
ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
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 :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Ordering
compare :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Ordering
$c< :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
< :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
$c<= :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
<= :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
$c> :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
> :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
$c>= :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
>= :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes -> Bool
$cmax :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
max :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
$cmin :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
min :: ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
-> ChildWorkflowExecutionStartedEventAttributes
Prelude.Ord)
instance Prelude.Show ChildWorkflowExecutionStartedEventAttributes where
  showsPrec :: Int -> ChildWorkflowExecutionStartedEventAttributes -> ShowS
showsPrec Int
_ ChildWorkflowExecutionStartedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ChildWorkflowExecutionStartedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ChildWorkflowExecutionStartedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionStartedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes -> Text)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Text -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Text
_ChildWorkflowExecutionStartedEventAttributes'namespace
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionStartedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes -> Text)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Text -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Text
_ChildWorkflowExecutionStartedEventAttributes'namespaceId
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionStartedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes -> Int64)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Int64 -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Int64
_ChildWorkflowExecutionStartedEventAttributes'initiatedEventId
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionStartedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionStartedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'workflowExecution = 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 ChildWorkflowExecutionStartedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionStartedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionStartedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionStartedEventAttributes'workflowType
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'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 ChildWorkflowExecutionStartedEventAttributes "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))
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionStartedEventAttributes'workflowType
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionStartedEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes -> Maybe Header)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Maybe Header -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Maybe Header
_ChildWorkflowExecutionStartedEventAttributes'header
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Maybe Header
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'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 ChildWorkflowExecutionStartedEventAttributes "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))
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> ChildWorkflowExecutionStartedEventAttributes
 -> f ChildWorkflowExecutionStartedEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> ChildWorkflowExecutionStartedEventAttributes
-> f ChildWorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionStartedEventAttributes -> Maybe Header)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> Maybe Header -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionStartedEventAttributes -> Maybe Header
_ChildWorkflowExecutionStartedEventAttributes'header
           (\ ChildWorkflowExecutionStartedEventAttributes
x__ Maybe Header
y__
              -> ChildWorkflowExecutionStartedEventAttributes
x__
                   {_ChildWorkflowExecutionStartedEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ChildWorkflowExecutionStartedEventAttributes where
  messageName :: Proxy ChildWorkflowExecutionStartedEventAttributes -> Text
messageName Proxy ChildWorkflowExecutionStartedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ChildWorkflowExecutionStartedEventAttributes"
  packedMessageDescriptor :: Proxy ChildWorkflowExecutionStartedEventAttributes -> ByteString
packedMessageDescriptor Proxy ChildWorkflowExecutionStartedEventAttributes
_
    = ByteString
"\n\
      \,ChildWorkflowExecutionStartedEventAttributes\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\ACK \SOH(\tR\vnamespaceId\DC2,\n\
      \\DC2initiated_event_id\CAN\STX \SOH(\ETXR\DLEinitiatedEventId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC26\n\
      \\ACKheader\CAN\ENQ \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader"
  packedFileDescriptor :: Proxy ChildWorkflowExecutionStartedEventAttributes -> ByteString
packedFileDescriptor Proxy ChildWorkflowExecutionStartedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ChildWorkflowExecutionStartedEventAttributes)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionStartedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionStartedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor ChildWorkflowExecutionStartedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ChildWorkflowExecutionStartedEventAttributes
     ChildWorkflowExecutionStartedEventAttributes
     Int64
     Int64
-> FieldAccessor ChildWorkflowExecutionStartedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ChildWorkflowExecutionStartedEventAttributes WorkflowExecution
-> FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ChildWorkflowExecutionStartedEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
        workflowType__field_descriptor :: FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     ChildWorkflowExecutionStartedEventAttributes WorkflowType
-> FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
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
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     ChildWorkflowExecutionStartedEventAttributes 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 ChildWorkflowExecutionStartedEventAttributes
        header__field_descriptor :: FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor
     ChildWorkflowExecutionStartedEventAttributes Header
-> FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
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
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor
     ChildWorkflowExecutionStartedEventAttributes 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 ChildWorkflowExecutionStartedEventAttributes
      in
        [(Tag,
  FieldDescriptor ChildWorkflowExecutionStartedEventAttributes)]
-> Map
     Tag (FieldDescriptor ChildWorkflowExecutionStartedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ChildWorkflowExecutionStartedEventAttributes
header__field_descriptor)]
  unknownFields :: Lens' ChildWorkflowExecutionStartedEventAttributes FieldSet
unknownFields
    = (ChildWorkflowExecutionStartedEventAttributes -> FieldSet)
-> (ChildWorkflowExecutionStartedEventAttributes
    -> FieldSet -> ChildWorkflowExecutionStartedEventAttributes)
-> Lens' ChildWorkflowExecutionStartedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ChildWorkflowExecutionStartedEventAttributes -> FieldSet
_ChildWorkflowExecutionStartedEventAttributes'_unknownFields
        (\ ChildWorkflowExecutionStartedEventAttributes
x__ FieldSet
y__
           -> ChildWorkflowExecutionStartedEventAttributes
x__
                {_ChildWorkflowExecutionStartedEventAttributes'_unknownFields = y__})
  defMessage :: ChildWorkflowExecutionStartedEventAttributes
defMessage
    = ChildWorkflowExecutionStartedEventAttributes'_constructor
        {_ChildWorkflowExecutionStartedEventAttributes'namespace :: Text
_ChildWorkflowExecutionStartedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionStartedEventAttributes'namespaceId :: Text
_ChildWorkflowExecutionStartedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionStartedEventAttributes'initiatedEventId :: Int64
_ChildWorkflowExecutionStartedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionStartedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ChildWorkflowExecutionStartedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionStartedEventAttributes'workflowType :: Maybe WorkflowType
_ChildWorkflowExecutionStartedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionStartedEventAttributes'header :: Maybe Header
_ChildWorkflowExecutionStartedEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionStartedEventAttributes'_unknownFields :: FieldSet
_ChildWorkflowExecutionStartedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ChildWorkflowExecutionStartedEventAttributes
parseMessage
    = let
        loop ::
          ChildWorkflowExecutionStartedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ChildWorkflowExecutionStartedEventAttributes
        loop :: ChildWorkflowExecutionStartedEventAttributes
-> Parser ChildWorkflowExecutionStartedEventAttributes
loop ChildWorkflowExecutionStartedEventAttributes
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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
50
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
16
                          -> 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
34
                          -> 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
42
                          -> 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 ChildWorkflowExecutionStartedEventAttributes
-> String -> Parser ChildWorkflowExecutionStartedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ChildWorkflowExecutionStartedEventAttributes
-> Parser ChildWorkflowExecutionStartedEventAttributes
loop ChildWorkflowExecutionStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ChildWorkflowExecutionStartedEventAttributes"
  buildMessage :: ChildWorkflowExecutionStartedEventAttributes -> Builder
buildMessage
    = \ ChildWorkflowExecutionStartedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionStartedEventAttributes -> 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 @"namespace") ChildWorkflowExecutionStartedEventAttributes
_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
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionStartedEventAttributes -> 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 @"namespaceId") ChildWorkflowExecutionStartedEventAttributes
_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
50)
                         ((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
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionStartedEventAttributes -> 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 @"initiatedEventId") ChildWorkflowExecutionStartedEventAttributes
_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
16)
                            ((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 WorkflowExecution)
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ChildWorkflowExecutionStartedEventAttributes
-> 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'workflowExecution") ChildWorkflowExecutionStartedEventAttributes
_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
26)
                                ((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)
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> ChildWorkflowExecutionStartedEventAttributes
-> 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") ChildWorkflowExecutionStartedEventAttributes
_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
34)
                                   ((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 Header)
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> ChildWorkflowExecutionStartedEventAttributes -> 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") ChildWorkflowExecutionStartedEventAttributes
_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
42)
                                      ((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
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  FieldSet
  FieldSet
-> ChildWorkflowExecutionStartedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ChildWorkflowExecutionStartedEventAttributes
  ChildWorkflowExecutionStartedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ChildWorkflowExecutionStartedEventAttributes FieldSet
Data.ProtoLens.unknownFields ChildWorkflowExecutionStartedEventAttributes
_x)))))))
instance Control.DeepSeq.NFData ChildWorkflowExecutionStartedEventAttributes where
  rnf :: ChildWorkflowExecutionStartedEventAttributes -> ()
rnf
    = \ ChildWorkflowExecutionStartedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ChildWorkflowExecutionStartedEventAttributes -> FieldSet
_ChildWorkflowExecutionStartedEventAttributes'_unknownFields ChildWorkflowExecutionStartedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ChildWorkflowExecutionStartedEventAttributes -> Text
_ChildWorkflowExecutionStartedEventAttributes'namespace ChildWorkflowExecutionStartedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ChildWorkflowExecutionStartedEventAttributes -> Text
_ChildWorkflowExecutionStartedEventAttributes'namespaceId ChildWorkflowExecutionStartedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ChildWorkflowExecutionStartedEventAttributes -> Int64
_ChildWorkflowExecutionStartedEventAttributes'initiatedEventId
                         ChildWorkflowExecutionStartedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ChildWorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionStartedEventAttributes'workflowExecution
                            ChildWorkflowExecutionStartedEventAttributes
x__)
                         (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ChildWorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionStartedEventAttributes'workflowType ChildWorkflowExecutionStartedEventAttributes
x__)
                            (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ChildWorkflowExecutionStartedEventAttributes -> Maybe Header
_ChildWorkflowExecutionStartedEventAttributes'header ChildWorkflowExecutionStartedEventAttributes
x__) ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ChildWorkflowExecutionTerminatedEventAttributes Data.Int.Int64@ -}
data ChildWorkflowExecutionTerminatedEventAttributes
  = ChildWorkflowExecutionTerminatedEventAttributes'_constructor {ChildWorkflowExecutionTerminatedEventAttributes -> Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespace :: !Data.Text.Text,
                                                                  ChildWorkflowExecutionTerminatedEventAttributes -> Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                  ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                  ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionTerminatedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                  ChildWorkflowExecutionTerminatedEventAttributes -> Int64
_ChildWorkflowExecutionTerminatedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                  ChildWorkflowExecutionTerminatedEventAttributes -> Int64
_ChildWorkflowExecutionTerminatedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                                  ChildWorkflowExecutionTerminatedEventAttributes -> FieldSet
_ChildWorkflowExecutionTerminatedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
(ChildWorkflowExecutionTerminatedEventAttributes
 -> ChildWorkflowExecutionTerminatedEventAttributes -> Bool)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes -> Bool)
-> Eq ChildWorkflowExecutionTerminatedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
== :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
$c/= :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
/= :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
Prelude.Eq, Eq ChildWorkflowExecutionTerminatedEventAttributes
Eq ChildWorkflowExecutionTerminatedEventAttributes =>
(ChildWorkflowExecutionTerminatedEventAttributes
 -> ChildWorkflowExecutionTerminatedEventAttributes -> Ordering)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes -> Bool)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes -> Bool)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes -> Bool)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes -> Bool)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes
    -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Ord ChildWorkflowExecutionTerminatedEventAttributes
ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Ordering
ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
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 :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Ordering
compare :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Ordering
$c< :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
< :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
$c<= :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
<= :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
$c> :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
> :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
$c>= :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
>= :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes -> Bool
$cmax :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
max :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
$cmin :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
min :: ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
-> ChildWorkflowExecutionTerminatedEventAttributes
Prelude.Ord)
instance Prelude.Show ChildWorkflowExecutionTerminatedEventAttributes where
  showsPrec :: Int -> ChildWorkflowExecutionTerminatedEventAttributes -> ShowS
showsPrec Int
_ ChildWorkflowExecutionTerminatedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ChildWorkflowExecutionTerminatedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ChildWorkflowExecutionTerminatedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTerminatedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes -> Text)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Text -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes -> Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespace
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTerminatedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes -> Text)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Text -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes -> Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespaceId
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTerminatedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution = 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 ChildWorkflowExecutionTerminatedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTerminatedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionTerminatedEventAttributes'workflowType
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'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 ChildWorkflowExecutionTerminatedEventAttributes "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))
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionTerminatedEventAttributes'workflowType
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTerminatedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes -> Int64)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Int64 -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes -> Int64
_ChildWorkflowExecutionTerminatedEventAttributes'initiatedEventId
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTerminatedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionTerminatedEventAttributes
 -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> f ChildWorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTerminatedEventAttributes -> Int64)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> Int64 -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTerminatedEventAttributes -> Int64
_ChildWorkflowExecutionTerminatedEventAttributes'startedEventId
           (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                   {_ChildWorkflowExecutionTerminatedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ChildWorkflowExecutionTerminatedEventAttributes where
  messageName :: Proxy ChildWorkflowExecutionTerminatedEventAttributes -> Text
messageName Proxy ChildWorkflowExecutionTerminatedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ChildWorkflowExecutionTerminatedEventAttributes"
  packedMessageDescriptor :: Proxy ChildWorkflowExecutionTerminatedEventAttributes -> ByteString
packedMessageDescriptor Proxy ChildWorkflowExecutionTerminatedEventAttributes
_
    = ByteString
"\n\
      \/ChildWorkflowExecutionTerminatedEventAttributes\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\ACK \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
      \\DC2initiated_event_id\CAN\EOT \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ENQ \SOH(\ETXR\SOstartedEventId"
  packedFileDescriptor :: Proxy ChildWorkflowExecutionTerminatedEventAttributes -> ByteString
packedFileDescriptor Proxy ChildWorkflowExecutionTerminatedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Text
     Text
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Text
     Text
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes WorkflowExecution
-> FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
        workflowType__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes WorkflowType
-> FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
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
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes 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 ChildWorkflowExecutionTerminatedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ChildWorkflowExecutionTerminatedEventAttributes
     ChildWorkflowExecutionTerminatedEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionTerminatedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
      in
        [(Tag,
  FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ChildWorkflowExecutionTerminatedEventAttributes
startedEventId__field_descriptor)]
  unknownFields :: Lens' ChildWorkflowExecutionTerminatedEventAttributes FieldSet
unknownFields
    = (ChildWorkflowExecutionTerminatedEventAttributes -> FieldSet)
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> FieldSet -> ChildWorkflowExecutionTerminatedEventAttributes)
-> Lens' ChildWorkflowExecutionTerminatedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ChildWorkflowExecutionTerminatedEventAttributes -> FieldSet
_ChildWorkflowExecutionTerminatedEventAttributes'_unknownFields
        (\ ChildWorkflowExecutionTerminatedEventAttributes
x__ FieldSet
y__
           -> ChildWorkflowExecutionTerminatedEventAttributes
x__
                {_ChildWorkflowExecutionTerminatedEventAttributes'_unknownFields = y__})
  defMessage :: ChildWorkflowExecutionTerminatedEventAttributes
defMessage
    = ChildWorkflowExecutionTerminatedEventAttributes'_constructor
        {_ChildWorkflowExecutionTerminatedEventAttributes'namespace :: Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTerminatedEventAttributes'namespaceId :: Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionTerminatedEventAttributes'workflowType :: Maybe WorkflowType
_ChildWorkflowExecutionTerminatedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionTerminatedEventAttributes'initiatedEventId :: Int64
_ChildWorkflowExecutionTerminatedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTerminatedEventAttributes'startedEventId :: Int64
_ChildWorkflowExecutionTerminatedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTerminatedEventAttributes'_unknownFields :: FieldSet
_ChildWorkflowExecutionTerminatedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ChildWorkflowExecutionTerminatedEventAttributes
parseMessage
    = let
        loop ::
          ChildWorkflowExecutionTerminatedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ChildWorkflowExecutionTerminatedEventAttributes
        loop :: ChildWorkflowExecutionTerminatedEventAttributes
-> Parser ChildWorkflowExecutionTerminatedEventAttributes
loop ChildWorkflowExecutionTerminatedEventAttributes
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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
50
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
18
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> 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
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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") y x)
                        Word64
40
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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 ChildWorkflowExecutionTerminatedEventAttributes
-> String -> Parser ChildWorkflowExecutionTerminatedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ChildWorkflowExecutionTerminatedEventAttributes
-> Parser ChildWorkflowExecutionTerminatedEventAttributes
loop ChildWorkflowExecutionTerminatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ChildWorkflowExecutionTerminatedEventAttributes"
  buildMessage :: ChildWorkflowExecutionTerminatedEventAttributes -> Builder
buildMessage
    = \ ChildWorkflowExecutionTerminatedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionTerminatedEventAttributes -> 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 @"namespace") ChildWorkflowExecutionTerminatedEventAttributes
_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
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  Text
  Text
-> ChildWorkflowExecutionTerminatedEventAttributes -> 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 @"namespaceId") ChildWorkflowExecutionTerminatedEventAttributes
_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
50)
                         ((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)
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> 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'workflowExecution") ChildWorkflowExecutionTerminatedEventAttributes
_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
18)
                             ((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)
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> 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") ChildWorkflowExecutionTerminatedEventAttributes
_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
26)
                                ((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.<>)
                         (let
                            _v :: Int64
_v
                              = FoldLike
  Int64
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionTerminatedEventAttributes -> 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 @"initiatedEventId") ChildWorkflowExecutionTerminatedEventAttributes
_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 :: Int64
_v
                                 = FoldLike
  Int64
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionTerminatedEventAttributes -> 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 @"startedEventId") ChildWorkflowExecutionTerminatedEventAttributes
_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
40)
                                     ((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))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  FieldSet
  FieldSet
-> ChildWorkflowExecutionTerminatedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ChildWorkflowExecutionTerminatedEventAttributes
  ChildWorkflowExecutionTerminatedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ChildWorkflowExecutionTerminatedEventAttributes FieldSet
Data.ProtoLens.unknownFields ChildWorkflowExecutionTerminatedEventAttributes
_x)))))))
instance Control.DeepSeq.NFData ChildWorkflowExecutionTerminatedEventAttributes where
  rnf :: ChildWorkflowExecutionTerminatedEventAttributes -> ()
rnf
    = \ ChildWorkflowExecutionTerminatedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ChildWorkflowExecutionTerminatedEventAttributes -> FieldSet
_ChildWorkflowExecutionTerminatedEventAttributes'_unknownFields
                ChildWorkflowExecutionTerminatedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ChildWorkflowExecutionTerminatedEventAttributes -> Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespace ChildWorkflowExecutionTerminatedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ChildWorkflowExecutionTerminatedEventAttributes -> Text
_ChildWorkflowExecutionTerminatedEventAttributes'namespaceId ChildWorkflowExecutionTerminatedEventAttributes
x__)
                   (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTerminatedEventAttributes'workflowExecution
                         ChildWorkflowExecutionTerminatedEventAttributes
x__)
                      (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowType
_ChildWorkflowExecutionTerminatedEventAttributes'workflowType ChildWorkflowExecutionTerminatedEventAttributes
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ChildWorkflowExecutionTerminatedEventAttributes -> Int64
_ChildWorkflowExecutionTerminatedEventAttributes'initiatedEventId
                               ChildWorkflowExecutionTerminatedEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ChildWorkflowExecutionTerminatedEventAttributes -> Int64
_ChildWorkflowExecutionTerminatedEventAttributes'startedEventId
                                  ChildWorkflowExecutionTerminatedEventAttributes
x__)
                               ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryState' @:: Lens' ChildWorkflowExecutionTimedOutEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.RetryState@ -}
data ChildWorkflowExecutionTimedOutEventAttributes
  = ChildWorkflowExecutionTimedOutEventAttributes'_constructor {ChildWorkflowExecutionTimedOutEventAttributes -> Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespace :: !Data.Text.Text,
                                                                ChildWorkflowExecutionTimedOutEventAttributes -> Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespaceId :: !Data.Text.Text,
                                                                ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                ChildWorkflowExecutionTimedOutEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionTimedOutEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                ChildWorkflowExecutionTimedOutEventAttributes -> Int64
_ChildWorkflowExecutionTimedOutEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                ChildWorkflowExecutionTimedOutEventAttributes -> Int64
_ChildWorkflowExecutionTimedOutEventAttributes'startedEventId :: !Data.Int.Int64,
                                                                ChildWorkflowExecutionTimedOutEventAttributes -> RetryState
_ChildWorkflowExecutionTimedOutEventAttributes'retryState :: !Proto.Temporal.Api.Enums.V1.Workflow.RetryState,
                                                                ChildWorkflowExecutionTimedOutEventAttributes -> FieldSet
_ChildWorkflowExecutionTimedOutEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
(ChildWorkflowExecutionTimedOutEventAttributes
 -> ChildWorkflowExecutionTimedOutEventAttributes -> Bool)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes -> Bool)
-> Eq ChildWorkflowExecutionTimedOutEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
== :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
$c/= :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
/= :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
Prelude.Eq, Eq ChildWorkflowExecutionTimedOutEventAttributes
Eq ChildWorkflowExecutionTimedOutEventAttributes =>
(ChildWorkflowExecutionTimedOutEventAttributes
 -> ChildWorkflowExecutionTimedOutEventAttributes -> Ordering)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes -> Bool)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes -> Bool)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes -> Bool)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes -> Bool)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes
    -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Ord ChildWorkflowExecutionTimedOutEventAttributes
ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Ordering
ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
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 :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Ordering
compare :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Ordering
$c< :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
< :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
$c<= :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
<= :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
$c> :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
> :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
$c>= :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
>= :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes -> Bool
$cmax :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
max :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
$cmin :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
min :: ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
-> ChildWorkflowExecutionTimedOutEventAttributes
Prelude.Ord)
instance Prelude.Show ChildWorkflowExecutionTimedOutEventAttributes where
  showsPrec :: Int -> ChildWorkflowExecutionTimedOutEventAttributes -> ShowS
showsPrec Int
_ ChildWorkflowExecutionTimedOutEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ChildWorkflowExecutionTimedOutEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ChildWorkflowExecutionTimedOutEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes -> Text)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Text -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespace
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes -> Text)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Text -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespaceId
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Text
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution = 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 ChildWorkflowExecutionTimedOutEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes
 -> Maybe WorkflowExecution)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Maybe WorkflowExecution
    -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionTimedOutEventAttributes'workflowType
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'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 ChildWorkflowExecutionTimedOutEventAttributes "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))
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes
 -> Maybe WorkflowType)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Maybe WorkflowType
    -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionTimedOutEventAttributes'workflowType
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Maybe WorkflowType
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes -> Int64)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Int64 -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> Int64
_ChildWorkflowExecutionTimedOutEventAttributes'initiatedEventId
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes -> Int64)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> Int64 -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> Int64
_ChildWorkflowExecutionTimedOutEventAttributes'startedEventId
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ Int64
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ChildWorkflowExecutionTimedOutEventAttributes "retryState" Proto.Temporal.Api.Enums.V1.Workflow.RetryState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryState"
-> (RetryState -> f RetryState)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "retryState"
_
    = ((RetryState -> f RetryState)
 -> ChildWorkflowExecutionTimedOutEventAttributes
 -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> ((RetryState -> f RetryState) -> RetryState -> f RetryState)
-> (RetryState -> f RetryState)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> f ChildWorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ChildWorkflowExecutionTimedOutEventAttributes -> RetryState)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> RetryState -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     RetryState
     RetryState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ChildWorkflowExecutionTimedOutEventAttributes -> RetryState
_ChildWorkflowExecutionTimedOutEventAttributes'retryState
           (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ RetryState
y__
              -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                   {_ChildWorkflowExecutionTimedOutEventAttributes'retryState = y__}))
        (RetryState -> f RetryState) -> RetryState -> f RetryState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ChildWorkflowExecutionTimedOutEventAttributes where
  messageName :: Proxy ChildWorkflowExecutionTimedOutEventAttributes -> Text
messageName Proxy ChildWorkflowExecutionTimedOutEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ChildWorkflowExecutionTimedOutEventAttributes"
  packedMessageDescriptor :: Proxy ChildWorkflowExecutionTimedOutEventAttributes -> ByteString
packedMessageDescriptor Proxy ChildWorkflowExecutionTimedOutEventAttributes
_
    = ByteString
"\n\
      \-ChildWorkflowExecutionTimedOutEventAttributes\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
      \\DC2initiated_event_id\CAN\EOT \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\ENQ \SOH(\ETXR\SOstartedEventId\DC2B\n\
      \\vretry_state\CAN\ACK \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
      \retryState"
  packedFileDescriptor :: Proxy ChildWorkflowExecutionTimedOutEventAttributes -> ByteString
packedFileDescriptor Proxy ChildWorkflowExecutionTimedOutEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionTimedOutEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionTimedOutEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor ChildWorkflowExecutionTimedOutEventAttributes Text
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Text
     Text
-> FieldAccessor ChildWorkflowExecutionTimedOutEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes WorkflowExecution
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
        workflowType__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes WorkflowType
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
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
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes 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 ChildWorkflowExecutionTimedOutEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes Int64
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
        retryState__field_descriptor :: FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
retryState__field_descriptor
          = String
-> FieldTypeDescriptor RetryState
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes RetryState
-> FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"retry_state"
              (ScalarField RetryState -> FieldTypeDescriptor RetryState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RetryState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.RetryState)
              (WireDefault RetryState
-> Lens
     ChildWorkflowExecutionTimedOutEventAttributes
     ChildWorkflowExecutionTimedOutEventAttributes
     RetryState
     RetryState
-> FieldAccessor
     ChildWorkflowExecutionTimedOutEventAttributes RetryState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RetryState
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 @"retryState")) ::
              Data.ProtoLens.FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
      in
        [(Tag,
  FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes)]
-> Map
     Tag (FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor ChildWorkflowExecutionTimedOutEventAttributes
retryState__field_descriptor)]
  unknownFields :: Lens' ChildWorkflowExecutionTimedOutEventAttributes FieldSet
unknownFields
    = (ChildWorkflowExecutionTimedOutEventAttributes -> FieldSet)
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> FieldSet -> ChildWorkflowExecutionTimedOutEventAttributes)
-> Lens' ChildWorkflowExecutionTimedOutEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ChildWorkflowExecutionTimedOutEventAttributes -> FieldSet
_ChildWorkflowExecutionTimedOutEventAttributes'_unknownFields
        (\ ChildWorkflowExecutionTimedOutEventAttributes
x__ FieldSet
y__
           -> ChildWorkflowExecutionTimedOutEventAttributes
x__
                {_ChildWorkflowExecutionTimedOutEventAttributes'_unknownFields = y__})
  defMessage :: ChildWorkflowExecutionTimedOutEventAttributes
defMessage
    = ChildWorkflowExecutionTimedOutEventAttributes'_constructor
        {_ChildWorkflowExecutionTimedOutEventAttributes'namespace :: Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTimedOutEventAttributes'namespaceId :: Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionTimedOutEventAttributes'workflowType :: Maybe WorkflowType
_ChildWorkflowExecutionTimedOutEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _ChildWorkflowExecutionTimedOutEventAttributes'initiatedEventId :: Int64
_ChildWorkflowExecutionTimedOutEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTimedOutEventAttributes'startedEventId :: Int64
_ChildWorkflowExecutionTimedOutEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTimedOutEventAttributes'retryState :: RetryState
_ChildWorkflowExecutionTimedOutEventAttributes'retryState = RetryState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ChildWorkflowExecutionTimedOutEventAttributes'_unknownFields :: FieldSet
_ChildWorkflowExecutionTimedOutEventAttributes'_unknownFields = []}
  parseMessage :: Parser ChildWorkflowExecutionTimedOutEventAttributes
parseMessage
    = let
        loop ::
          ChildWorkflowExecutionTimedOutEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ChildWorkflowExecutionTimedOutEventAttributes
        loop :: ChildWorkflowExecutionTimedOutEventAttributes
-> Parser ChildWorkflowExecutionTimedOutEventAttributes
loop ChildWorkflowExecutionTimedOutEventAttributes
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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
18
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
26
                          -> 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
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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") y x)
                        Word64
40
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                        Word64
48
                          -> do y <- Parser RetryState -> String -> Parser RetryState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RetryState) -> Parser Int -> Parser RetryState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RetryState
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
"retry_state"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryState") 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 ChildWorkflowExecutionTimedOutEventAttributes
-> String -> Parser ChildWorkflowExecutionTimedOutEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ChildWorkflowExecutionTimedOutEventAttributes
-> Parser ChildWorkflowExecutionTimedOutEventAttributes
loop ChildWorkflowExecutionTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ChildWorkflowExecutionTimedOutEventAttributes"
  buildMessage :: ChildWorkflowExecutionTimedOutEventAttributes -> Builder
buildMessage
    = \ ChildWorkflowExecutionTimedOutEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  Text
  Text
-> ChildWorkflowExecutionTimedOutEventAttributes -> 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 @"namespace") ChildWorkflowExecutionTimedOutEventAttributes
_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
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  Text
  Text
-> ChildWorkflowExecutionTimedOutEventAttributes -> 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 @"namespaceId") ChildWorkflowExecutionTimedOutEventAttributes
_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)
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> 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'workflowExecution") ChildWorkflowExecutionTimedOutEventAttributes
_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
18)
                             ((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)
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> 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") ChildWorkflowExecutionTimedOutEventAttributes
_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
26)
                                ((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.<>)
                         (let
                            _v :: Int64
_v
                              = FoldLike
  Int64
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionTimedOutEventAttributes -> 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 @"initiatedEventId") ChildWorkflowExecutionTimedOutEventAttributes
_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 :: Int64
_v
                                 = FoldLike
  Int64
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  Int64
  Int64
-> ChildWorkflowExecutionTimedOutEventAttributes -> 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 @"startedEventId") ChildWorkflowExecutionTimedOutEventAttributes
_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
40)
                                     ((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 :: RetryState
_v
                                    = FoldLike
  RetryState
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  RetryState
  RetryState
-> ChildWorkflowExecutionTimedOutEventAttributes -> RetryState
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 @"retryState") ChildWorkflowExecutionTimedOutEventAttributes
_x
                                in
                                  if RetryState -> RetryState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RetryState
_v RetryState
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)
                                        ((Int -> Builder) -> (RetryState -> Int) -> RetryState -> 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)
                                           RetryState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RetryState
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  FieldSet
  FieldSet
-> ChildWorkflowExecutionTimedOutEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ChildWorkflowExecutionTimedOutEventAttributes
  ChildWorkflowExecutionTimedOutEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ChildWorkflowExecutionTimedOutEventAttributes FieldSet
Data.ProtoLens.unknownFields ChildWorkflowExecutionTimedOutEventAttributes
_x))))))))
instance Control.DeepSeq.NFData ChildWorkflowExecutionTimedOutEventAttributes where
  rnf :: ChildWorkflowExecutionTimedOutEventAttributes -> ()
rnf
    = \ ChildWorkflowExecutionTimedOutEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ChildWorkflowExecutionTimedOutEventAttributes -> FieldSet
_ChildWorkflowExecutionTimedOutEventAttributes'_unknownFields ChildWorkflowExecutionTimedOutEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ChildWorkflowExecutionTimedOutEventAttributes -> Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespace ChildWorkflowExecutionTimedOutEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ChildWorkflowExecutionTimedOutEventAttributes -> Text
_ChildWorkflowExecutionTimedOutEventAttributes'namespaceId ChildWorkflowExecutionTimedOutEventAttributes
x__)
                   (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecution
_ChildWorkflowExecutionTimedOutEventAttributes'workflowExecution
                         ChildWorkflowExecutionTimedOutEventAttributes
x__)
                      (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ChildWorkflowExecutionTimedOutEventAttributes -> Maybe WorkflowType
_ChildWorkflowExecutionTimedOutEventAttributes'workflowType ChildWorkflowExecutionTimedOutEventAttributes
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ChildWorkflowExecutionTimedOutEventAttributes -> Int64
_ChildWorkflowExecutionTimedOutEventAttributes'initiatedEventId
                               ChildWorkflowExecutionTimedOutEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (ChildWorkflowExecutionTimedOutEventAttributes -> Int64
_ChildWorkflowExecutionTimedOutEventAttributes'startedEventId ChildWorkflowExecutionTimedOutEventAttributes
x__)
                               (RetryState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (ChildWorkflowExecutionTimedOutEventAttributes -> RetryState
_ChildWorkflowExecutionTimedOutEventAttributes'retryState ChildWorkflowExecutionTimedOutEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ExternalWorkflowExecutionCancelRequestedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ExternalWorkflowExecutionCancelRequestedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ExternalWorkflowExecutionCancelRequestedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ExternalWorkflowExecutionCancelRequestedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ExternalWorkflowExecutionCancelRequestedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@ -}
data ExternalWorkflowExecutionCancelRequestedEventAttributes
  = ExternalWorkflowExecutionCancelRequestedEventAttributes'_constructor {ExternalWorkflowExecutionCancelRequestedEventAttributes -> Int64
_ExternalWorkflowExecutionCancelRequestedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                          ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespace :: !Data.Text.Text,
                                                                          ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                          ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                          ExternalWorkflowExecutionCancelRequestedEventAttributes -> FieldSet
_ExternalWorkflowExecutionCancelRequestedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
(ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> Eq ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
== :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
$c/= :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
/= :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
Prelude.Eq, Eq ExternalWorkflowExecutionCancelRequestedEventAttributes
Eq ExternalWorkflowExecutionCancelRequestedEventAttributes =>
(ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> Ordering)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Ord ExternalWorkflowExecutionCancelRequestedEventAttributes
ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Ordering
ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
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 :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Ordering
compare :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Ordering
$c< :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
< :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
$c<= :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
<= :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
$c> :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
> :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
$c>= :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
>= :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> Bool
$cmax :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
max :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
$cmin :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
min :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
Prelude.Ord)
instance Prelude.Show ExternalWorkflowExecutionCancelRequestedEventAttributes where
  showsPrec :: Int
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> ShowS
showsPrec Int
_ ExternalWorkflowExecutionCancelRequestedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExternalWorkflowExecutionCancelRequestedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExternalWorkflowExecutionCancelRequestedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionCancelRequestedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionCancelRequestedEventAttributes -> Int64)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Int64
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionCancelRequestedEventAttributes -> Int64
_ExternalWorkflowExecutionCancelRequestedEventAttributes'initiatedEventId
           (\ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__ Int64
y__
              -> ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
                   {_ExternalWorkflowExecutionCancelRequestedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionCancelRequestedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Text -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespace
           (\ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__ Text
y__
              -> ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
                   {_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionCancelRequestedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Text -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespaceId
           (\ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__ Text
y__
              -> ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
                   {_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionCancelRequestedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> Maybe WorkflowExecution)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Maybe WorkflowExecution
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution
           (\ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
                   {_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution = 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 ExternalWorkflowExecutionCancelRequestedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> f ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> Maybe WorkflowExecution)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Maybe WorkflowExecution
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution
           (\ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
                   {_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExternalWorkflowExecutionCancelRequestedEventAttributes where
  messageName :: Proxy ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Text
messageName Proxy ExternalWorkflowExecutionCancelRequestedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ExternalWorkflowExecutionCancelRequestedEventAttributes"
  packedMessageDescriptor :: Proxy ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ByteString
packedMessageDescriptor Proxy ExternalWorkflowExecutionCancelRequestedEventAttributes
_
    = ByteString
"\n\
      \7ExternalWorkflowExecutionCancelRequestedEventAttributes\DC2,\n\
      \\DC2initiated_event_id\CAN\SOH \SOH(\ETXR\DLEinitiatedEventId\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\EOT \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution"
  packedFileDescriptor :: Proxy ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ByteString
packedFileDescriptor Proxy ExternalWorkflowExecutionCancelRequestedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes)
fieldsByTag
    = let
        initiatedEventId__field_descriptor :: FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes Int64
-> FieldDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     Int64
     Int64
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionCancelRequestedEventAttributes
        namespace__field_descriptor :: FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes Text
-> FieldDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionCancelRequestedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes Text
-> FieldDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionCancelRequestedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecution
-> FieldDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
     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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionCancelRequestedEventAttributes
      in
        [(Tag,
  FieldDescriptor
    ExternalWorkflowExecutionCancelRequestedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        ExternalWorkflowExecutionCancelRequestedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  ExternalWorkflowExecutionCancelRequestedEventAttributes
workflowExecution__field_descriptor)]
  unknownFields :: Lens'
  ExternalWorkflowExecutionCancelRequestedEventAttributes FieldSet
unknownFields
    = (ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> FieldSet)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> FieldSet
    -> ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Lens'
     ExternalWorkflowExecutionCancelRequestedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExternalWorkflowExecutionCancelRequestedEventAttributes -> FieldSet
_ExternalWorkflowExecutionCancelRequestedEventAttributes'_unknownFields
        (\ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__ FieldSet
y__
           -> ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
                {_ExternalWorkflowExecutionCancelRequestedEventAttributes'_unknownFields = y__})
  defMessage :: ExternalWorkflowExecutionCancelRequestedEventAttributes
defMessage
    = ExternalWorkflowExecutionCancelRequestedEventAttributes'_constructor
        {_ExternalWorkflowExecutionCancelRequestedEventAttributes'initiatedEventId :: Int64
_ExternalWorkflowExecutionCancelRequestedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionCancelRequestedEventAttributes'namespace :: Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionCancelRequestedEventAttributes'namespaceId :: Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ExternalWorkflowExecutionCancelRequestedEventAttributes'_unknownFields :: FieldSet
_ExternalWorkflowExecutionCancelRequestedEventAttributes'_unknownFields = []}
  parseMessage :: Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
parseMessage
    = let
        loop ::
          ExternalWorkflowExecutionCancelRequestedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
        loop :: ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
loop ExternalWorkflowExecutionCancelRequestedEventAttributes
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 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") 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 ExternalWorkflowExecutionCancelRequestedEventAttributes
-> String
-> Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
loop ExternalWorkflowExecutionCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ExternalWorkflowExecutionCancelRequestedEventAttributes"
  buildMessage :: ExternalWorkflowExecutionCancelRequestedEventAttributes -> Builder
buildMessage
    = \ ExternalWorkflowExecutionCancelRequestedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  Int64
  Int64
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> 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 @"initiatedEventId") ExternalWorkflowExecutionCancelRequestedEventAttributes
_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
8)
                      ((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
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  Text
  Text
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> 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 @"namespace") ExternalWorkflowExecutionCancelRequestedEventAttributes
_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
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  Text
  Text
-> ExternalWorkflowExecutionCancelRequestedEventAttributes -> 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 @"namespaceId") ExternalWorkflowExecutionCancelRequestedEventAttributes
_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 WorkflowExecution)
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> 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'workflowExecution") ExternalWorkflowExecutionCancelRequestedEventAttributes
_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
26)
                                ((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))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  FieldSet
  FieldSet
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  ExternalWorkflowExecutionCancelRequestedEventAttributes FieldSet
Data.ProtoLens.unknownFields ExternalWorkflowExecutionCancelRequestedEventAttributes
_x)))))
instance Control.DeepSeq.NFData ExternalWorkflowExecutionCancelRequestedEventAttributes where
  rnf :: ExternalWorkflowExecutionCancelRequestedEventAttributes -> ()
rnf
    = \ ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExternalWorkflowExecutionCancelRequestedEventAttributes -> FieldSet
_ExternalWorkflowExecutionCancelRequestedEventAttributes'_unknownFields
                ExternalWorkflowExecutionCancelRequestedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExternalWorkflowExecutionCancelRequestedEventAttributes -> Int64
_ExternalWorkflowExecutionCancelRequestedEventAttributes'initiatedEventId
                   ExternalWorkflowExecutionCancelRequestedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespace
                      ExternalWorkflowExecutionCancelRequestedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ExternalWorkflowExecutionCancelRequestedEventAttributes -> Text
_ExternalWorkflowExecutionCancelRequestedEventAttributes'namespaceId
                         ExternalWorkflowExecutionCancelRequestedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionCancelRequestedEventAttributes'workflowExecution
                            ExternalWorkflowExecutionCancelRequestedEventAttributes
x__)
                         ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' ExternalWorkflowExecutionSignaledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' ExternalWorkflowExecutionSignaledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' ExternalWorkflowExecutionSignaledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' ExternalWorkflowExecutionSignaledEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' ExternalWorkflowExecutionSignaledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' ExternalWorkflowExecutionSignaledEventAttributes Data.Text.Text@ -}
data ExternalWorkflowExecutionSignaledEventAttributes
  = ExternalWorkflowExecutionSignaledEventAttributes'_constructor {ExternalWorkflowExecutionSignaledEventAttributes -> Int64
_ExternalWorkflowExecutionSignaledEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                   ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespace :: !Data.Text.Text,
                                                                   ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespaceId :: !Data.Text.Text,
                                                                   ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                   ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'control :: !Data.Text.Text,
                                                                   ExternalWorkflowExecutionSignaledEventAttributes -> FieldSet
_ExternalWorkflowExecutionSignaledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
(ExternalWorkflowExecutionSignaledEventAttributes
 -> ExternalWorkflowExecutionSignaledEventAttributes -> Bool)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes -> Bool)
-> Eq ExternalWorkflowExecutionSignaledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
== :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
$c/= :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
/= :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
Prelude.Eq, Eq ExternalWorkflowExecutionSignaledEventAttributes
Eq ExternalWorkflowExecutionSignaledEventAttributes =>
(ExternalWorkflowExecutionSignaledEventAttributes
 -> ExternalWorkflowExecutionSignaledEventAttributes -> Ordering)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes -> Bool)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes -> Bool)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes -> Bool)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes -> Bool)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes
    -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Ord ExternalWorkflowExecutionSignaledEventAttributes
ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Ordering
ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
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 :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Ordering
compare :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Ordering
$c< :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
< :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
$c<= :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
<= :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
$c> :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
> :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
$c>= :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
>= :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes -> Bool
$cmax :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
max :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
$cmin :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
min :: ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
-> ExternalWorkflowExecutionSignaledEventAttributes
Prelude.Ord)
instance Prelude.Show ExternalWorkflowExecutionSignaledEventAttributes where
  showsPrec :: Int -> ExternalWorkflowExecutionSignaledEventAttributes -> ShowS
showsPrec Int
_ ExternalWorkflowExecutionSignaledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (ExternalWorkflowExecutionSignaledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort ExternalWorkflowExecutionSignaledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionSignaledEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> ExternalWorkflowExecutionSignaledEventAttributes
 -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionSignaledEventAttributes -> Int64)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> Int64 -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionSignaledEventAttributes -> Int64
_ExternalWorkflowExecutionSignaledEventAttributes'initiatedEventId
           (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ Int64
y__
              -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                   {_ExternalWorkflowExecutionSignaledEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionSignaledEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> ExternalWorkflowExecutionSignaledEventAttributes
 -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionSignaledEventAttributes -> Text)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> Text -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespace
           (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ Text
y__
              -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                   {_ExternalWorkflowExecutionSignaledEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionSignaledEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> ExternalWorkflowExecutionSignaledEventAttributes
 -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionSignaledEventAttributes -> Text)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> Text -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespaceId
           (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ Text
y__
              -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                   {_ExternalWorkflowExecutionSignaledEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionSignaledEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ExternalWorkflowExecutionSignaledEventAttributes
 -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionSignaledEventAttributes
 -> Maybe WorkflowExecution)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> Maybe WorkflowExecution
    -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution
           (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                   {_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution = 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 ExternalWorkflowExecutionSignaledEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> ExternalWorkflowExecutionSignaledEventAttributes
 -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionSignaledEventAttributes
 -> Maybe WorkflowExecution)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> Maybe WorkflowExecution
    -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution
           (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ Maybe WorkflowExecution
y__
              -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                   {_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField ExternalWorkflowExecutionSignaledEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> ExternalWorkflowExecutionSignaledEventAttributes
 -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> f ExternalWorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((ExternalWorkflowExecutionSignaledEventAttributes -> Text)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> Text -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'control
           (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ Text
y__
              -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                   {_ExternalWorkflowExecutionSignaledEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message ExternalWorkflowExecutionSignaledEventAttributes where
  messageName :: Proxy ExternalWorkflowExecutionSignaledEventAttributes -> Text
messageName Proxy ExternalWorkflowExecutionSignaledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.ExternalWorkflowExecutionSignaledEventAttributes"
  packedMessageDescriptor :: Proxy ExternalWorkflowExecutionSignaledEventAttributes
-> ByteString
packedMessageDescriptor Proxy ExternalWorkflowExecutionSignaledEventAttributes
_
    = ByteString
"\n\
      \0ExternalWorkflowExecutionSignaledEventAttributes\DC2,\n\
      \\DC2initiated_event_id\CAN\SOH \SOH(\ETXR\DLEinitiatedEventId\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\ENQ \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\CAN\n\
      \\acontrol\CAN\EOT \SOH(\tR\acontrol"
  packedFileDescriptor :: Proxy ExternalWorkflowExecutionSignaledEventAttributes
-> ByteString
packedFileDescriptor Proxy ExternalWorkflowExecutionSignaledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes)
fieldsByTag
    = let
        initiatedEventId__field_descriptor :: FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes Int64
-> FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Int64
     Int64
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
        namespace__field_descriptor :: FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes Text
-> FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Text
     Text
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes Text
-> FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Text
     Text
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes WorkflowExecution
-> FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes 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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
        control__field_descriptor :: FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes Text
-> FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     ExternalWorkflowExecutionSignaledEventAttributes
     ExternalWorkflowExecutionSignaledEventAttributes
     Text
     Text
-> FieldAccessor
     ExternalWorkflowExecutionSignaledEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
      in
        [(Tag,
  FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes)]
-> Map
     Tag
     (FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor ExternalWorkflowExecutionSignaledEventAttributes
control__field_descriptor)]
  unknownFields :: Lens' ExternalWorkflowExecutionSignaledEventAttributes FieldSet
unknownFields
    = (ExternalWorkflowExecutionSignaledEventAttributes -> FieldSet)
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> FieldSet -> ExternalWorkflowExecutionSignaledEventAttributes)
-> Lens' ExternalWorkflowExecutionSignaledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        ExternalWorkflowExecutionSignaledEventAttributes -> FieldSet
_ExternalWorkflowExecutionSignaledEventAttributes'_unknownFields
        (\ ExternalWorkflowExecutionSignaledEventAttributes
x__ FieldSet
y__
           -> ExternalWorkflowExecutionSignaledEventAttributes
x__
                {_ExternalWorkflowExecutionSignaledEventAttributes'_unknownFields = y__})
  defMessage :: ExternalWorkflowExecutionSignaledEventAttributes
defMessage
    = ExternalWorkflowExecutionSignaledEventAttributes'_constructor
        {_ExternalWorkflowExecutionSignaledEventAttributes'initiatedEventId :: Int64
_ExternalWorkflowExecutionSignaledEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionSignaledEventAttributes'namespace :: Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionSignaledEventAttributes'namespaceId :: Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution :: Maybe WorkflowExecution
_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _ExternalWorkflowExecutionSignaledEventAttributes'control :: Text
_ExternalWorkflowExecutionSignaledEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _ExternalWorkflowExecutionSignaledEventAttributes'_unknownFields :: FieldSet
_ExternalWorkflowExecutionSignaledEventAttributes'_unknownFields = []}
  parseMessage :: Parser ExternalWorkflowExecutionSignaledEventAttributes
parseMessage
    = let
        loop ::
          ExternalWorkflowExecutionSignaledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser ExternalWorkflowExecutionSignaledEventAttributes
        loop :: ExternalWorkflowExecutionSignaledEventAttributes
-> Parser ExternalWorkflowExecutionSignaledEventAttributes
loop ExternalWorkflowExecutionSignaledEventAttributes
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 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
42
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") 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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") 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 ExternalWorkflowExecutionSignaledEventAttributes
-> String
-> Parser ExternalWorkflowExecutionSignaledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do ExternalWorkflowExecutionSignaledEventAttributes
-> Parser ExternalWorkflowExecutionSignaledEventAttributes
loop ExternalWorkflowExecutionSignaledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"ExternalWorkflowExecutionSignaledEventAttributes"
  buildMessage :: ExternalWorkflowExecutionSignaledEventAttributes -> Builder
buildMessage
    = \ ExternalWorkflowExecutionSignaledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  Int64
  Int64
-> ExternalWorkflowExecutionSignaledEventAttributes -> 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 @"initiatedEventId") ExternalWorkflowExecutionSignaledEventAttributes
_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
8)
                      ((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
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  Text
  Text
-> ExternalWorkflowExecutionSignaledEventAttributes -> 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 @"namespace") ExternalWorkflowExecutionSignaledEventAttributes
_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
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  Text
  Text
-> ExternalWorkflowExecutionSignaledEventAttributes -> 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 @"namespaceId") ExternalWorkflowExecutionSignaledEventAttributes
_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
42)
                            ((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)
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> 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'workflowExecution") ExternalWorkflowExecutionSignaledEventAttributes
_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
26)
                                ((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
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  Text
  Text
-> ExternalWorkflowExecutionSignaledEventAttributes -> 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 @"control") ExternalWorkflowExecutionSignaledEventAttributes
_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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  FieldSet
  FieldSet
-> ExternalWorkflowExecutionSignaledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  ExternalWorkflowExecutionSignaledEventAttributes
  ExternalWorkflowExecutionSignaledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' ExternalWorkflowExecutionSignaledEventAttributes FieldSet
Data.ProtoLens.unknownFields ExternalWorkflowExecutionSignaledEventAttributes
_x))))))
instance Control.DeepSeq.NFData ExternalWorkflowExecutionSignaledEventAttributes where
  rnf :: ExternalWorkflowExecutionSignaledEventAttributes -> ()
rnf
    = \ ExternalWorkflowExecutionSignaledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (ExternalWorkflowExecutionSignaledEventAttributes -> FieldSet
_ExternalWorkflowExecutionSignaledEventAttributes'_unknownFields
                ExternalWorkflowExecutionSignaledEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (ExternalWorkflowExecutionSignaledEventAttributes -> Int64
_ExternalWorkflowExecutionSignaledEventAttributes'initiatedEventId
                   ExternalWorkflowExecutionSignaledEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespace ExternalWorkflowExecutionSignaledEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'namespaceId ExternalWorkflowExecutionSignaledEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecution
_ExternalWorkflowExecutionSignaledEventAttributes'workflowExecution
                            ExternalWorkflowExecutionSignaledEventAttributes
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (ExternalWorkflowExecutionSignaledEventAttributes -> Text
_ExternalWorkflowExecutionSignaledEventAttributes'control ExternalWorkflowExecutionSignaledEventAttributes
x__)
                            ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.events' @:: Lens' History [HistoryEvent]@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.vec'events' @:: Lens' History (Data.Vector.Vector HistoryEvent)@ -}
data History
  = History'_constructor {History -> Vector HistoryEvent
_History'events :: !(Data.Vector.Vector HistoryEvent),
                          History -> FieldSet
_History'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (History -> History -> Bool
(History -> History -> Bool)
-> (History -> History -> Bool) -> Eq History
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: History -> History -> Bool
== :: History -> History -> Bool
$c/= :: History -> History -> Bool
/= :: History -> History -> Bool
Prelude.Eq, Eq History
Eq History =>
(History -> History -> Ordering)
-> (History -> History -> Bool)
-> (History -> History -> Bool)
-> (History -> History -> Bool)
-> (History -> History -> Bool)
-> (History -> History -> History)
-> (History -> History -> History)
-> Ord History
History -> History -> Bool
History -> History -> Ordering
History -> History -> History
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 :: History -> History -> Ordering
compare :: History -> History -> Ordering
$c< :: History -> History -> Bool
< :: History -> History -> Bool
$c<= :: History -> History -> Bool
<= :: History -> History -> Bool
$c> :: History -> History -> Bool
> :: History -> History -> Bool
$c>= :: History -> History -> Bool
>= :: History -> History -> Bool
$cmax :: History -> History -> History
max :: History -> History -> History
$cmin :: History -> History -> History
min :: History -> History -> History
Prelude.Ord)
instance Prelude.Show History where
  showsPrec :: Int -> History -> ShowS
showsPrec Int
_ History
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (History -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort History
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField History "events" [HistoryEvent] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "events"
-> ([HistoryEvent] -> f [HistoryEvent]) -> History -> f History
fieldOf Proxy# "events"
_
    = ((Vector HistoryEvent -> f (Vector HistoryEvent))
 -> History -> f History)
-> (([HistoryEvent] -> f [HistoryEvent])
    -> Vector HistoryEvent -> f (Vector HistoryEvent))
-> ([HistoryEvent] -> f [HistoryEvent])
-> History
-> f History
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((History -> Vector HistoryEvent)
-> (History -> Vector HistoryEvent -> History)
-> Lens History History (Vector HistoryEvent) (Vector HistoryEvent)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           History -> Vector HistoryEvent
_History'events (\ History
x__ Vector HistoryEvent
y__ -> History
x__ {_History'events = y__}))
        ((Vector HistoryEvent -> [HistoryEvent])
-> (Vector HistoryEvent -> [HistoryEvent] -> Vector HistoryEvent)
-> Lens
     (Vector HistoryEvent)
     (Vector HistoryEvent)
     [HistoryEvent]
     [HistoryEvent]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector HistoryEvent -> [HistoryEvent]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector HistoryEvent
_ [HistoryEvent]
y__ -> [HistoryEvent] -> Vector HistoryEvent
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [HistoryEvent]
y__))
instance Data.ProtoLens.Field.HasField History "vec'events" (Data.Vector.Vector HistoryEvent) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'events"
-> (Vector HistoryEvent -> f (Vector HistoryEvent))
-> History
-> f History
fieldOf Proxy# "vec'events"
_
    = ((Vector HistoryEvent -> f (Vector HistoryEvent))
 -> History -> f History)
-> ((Vector HistoryEvent -> f (Vector HistoryEvent))
    -> Vector HistoryEvent -> f (Vector HistoryEvent))
-> (Vector HistoryEvent -> f (Vector HistoryEvent))
-> History
-> f History
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((History -> Vector HistoryEvent)
-> (History -> Vector HistoryEvent -> History)
-> Lens History History (Vector HistoryEvent) (Vector HistoryEvent)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           History -> Vector HistoryEvent
_History'events (\ History
x__ Vector HistoryEvent
y__ -> History
x__ {_History'events = y__}))
        (Vector HistoryEvent -> f (Vector HistoryEvent))
-> Vector HistoryEvent -> f (Vector HistoryEvent)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message History where
  messageName :: Proxy History -> Text
messageName Proxy History
_ = String -> Text
Data.Text.pack String
"temporal.api.history.v1.History"
  packedMessageDescriptor :: Proxy History -> ByteString
packedMessageDescriptor Proxy History
_
    = ByteString
"\n\
      \\aHistory\DC2=\n\
      \\ACKevents\CAN\SOH \ETX(\v2%.temporal.api.history.v1.HistoryEventR\ACKevents"
  packedFileDescriptor :: Proxy History -> ByteString
packedFileDescriptor Proxy History
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor History)
fieldsByTag
    = let
        events__field_descriptor :: FieldDescriptor History
events__field_descriptor
          = String
-> FieldTypeDescriptor HistoryEvent
-> FieldAccessor History HistoryEvent
-> FieldDescriptor History
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"events"
              (MessageOrGroup -> FieldTypeDescriptor HistoryEvent
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor HistoryEvent)
              (Packing
-> Lens' History [HistoryEvent]
-> FieldAccessor History HistoryEvent
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 @"events")) ::
              Data.ProtoLens.FieldDescriptor History
      in
        [(Tag, FieldDescriptor History)]
-> Map Tag (FieldDescriptor History)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor History
events__field_descriptor)]
  unknownFields :: Lens' History FieldSet
unknownFields
    = (History -> FieldSet)
-> (History -> FieldSet -> History) -> Lens' History FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        History -> FieldSet
_History'_unknownFields
        (\ History
x__ FieldSet
y__ -> History
x__ {_History'_unknownFields = y__})
  defMessage :: History
defMessage
    = History'_constructor
        {_History'events :: Vector HistoryEvent
_History'events = Vector HistoryEvent
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _History'_unknownFields :: FieldSet
_History'_unknownFields = []}
  parseMessage :: Parser History
parseMessage
    = let
        loop ::
          History
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld HistoryEvent
             -> Data.ProtoLens.Encoding.Bytes.Parser History
        loop :: History -> Growing Vector RealWorld HistoryEvent -> Parser History
loop History
x Growing Vector RealWorld HistoryEvent
mutable'events
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'events <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                         (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                            mutable'events)
                      (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'events") frozen'events x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> do !y <- Parser HistoryEvent -> String -> Parser HistoryEvent
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
"events"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append mutable'events 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'events
      in
        Parser History -> String -> Parser History
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'events <- IO (Growing Vector RealWorld HistoryEvent)
-> Parser (Growing Vector RealWorld HistoryEvent)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                  IO (Growing Vector RealWorld HistoryEvent)
IO (Growing Vector (PrimState IO) HistoryEvent)
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'events)
          String
"History"
  buildMessage :: History -> Builder
buildMessage
    = \ History
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             ((HistoryEvent -> Builder) -> Vector HistoryEvent -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                (\ HistoryEvent
_v
                   -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                        (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                        ((ByteString -> Builder)
-> (HistoryEvent -> ByteString) -> HistoryEvent -> 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))
                           HistoryEvent -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage HistoryEvent
_v))
                (FoldLike
  (Vector HistoryEvent)
  History
  History
  (Vector HistoryEvent)
  (Vector HistoryEvent)
-> History -> Vector HistoryEvent
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'events") History
_x))
             (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                (FoldLike FieldSet History History FieldSet FieldSet
-> History -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet History History FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' History FieldSet
Data.ProtoLens.unknownFields History
_x))
instance Control.DeepSeq.NFData History where
  rnf :: History -> ()
rnf
    = \ History
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (History -> FieldSet
_History'_unknownFields History
x__)
             (Vector HistoryEvent -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (History -> Vector HistoryEvent
_History'events History
x__) ())
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.eventId' @:: Lens' HistoryEvent Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.eventTime' @:: Lens' HistoryEvent Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'eventTime' @:: Lens' HistoryEvent (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.eventType' @:: Lens' HistoryEvent Proto.Temporal.Api.Enums.V1.EventType.EventType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.version' @:: Lens' HistoryEvent Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.taskId' @:: Lens' HistoryEvent Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerMayIgnore' @:: Lens' HistoryEvent Prelude.Bool@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'attributes' @:: Lens' HistoryEvent (Prelude.Maybe HistoryEvent'Attributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionStartedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionStartedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionStartedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionStartedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionCompletedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionCompletedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionCompletedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionCompletedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionTimedOutEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionTimedOutEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionTimedOutEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionTimedOutEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskScheduledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowTaskScheduledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskScheduledEventAttributes' @:: Lens' HistoryEvent WorkflowTaskScheduledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskStartedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowTaskStartedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskStartedEventAttributes' @:: Lens' HistoryEvent WorkflowTaskStartedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskCompletedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowTaskCompletedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventAttributes' @:: Lens' HistoryEvent WorkflowTaskCompletedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskTimedOutEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowTaskTimedOutEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskTimedOutEventAttributes' @:: Lens' HistoryEvent WorkflowTaskTimedOutEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowTaskFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskFailedEventAttributes' @:: Lens' HistoryEvent WorkflowTaskFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskScheduledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskScheduledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskScheduledEventAttributes' @:: Lens' HistoryEvent ActivityTaskScheduledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskStartedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskStartedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskStartedEventAttributes' @:: Lens' HistoryEvent ActivityTaskStartedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskCompletedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskCompletedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskCompletedEventAttributes' @:: Lens' HistoryEvent ActivityTaskCompletedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskFailedEventAttributes' @:: Lens' HistoryEvent ActivityTaskFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskTimedOutEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskTimedOutEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskTimedOutEventAttributes' @:: Lens' HistoryEvent ActivityTaskTimedOutEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'timerStartedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe TimerStartedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timerStartedEventAttributes' @:: Lens' HistoryEvent TimerStartedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'timerFiredEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe TimerFiredEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timerFiredEventAttributes' @:: Lens' HistoryEvent TimerFiredEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskCancelRequestedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskCancelRequestedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskCancelRequestedEventAttributes' @:: Lens' HistoryEvent ActivityTaskCancelRequestedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityTaskCanceledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityTaskCanceledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityTaskCanceledEventAttributes' @:: Lens' HistoryEvent ActivityTaskCanceledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'timerCanceledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe TimerCanceledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timerCanceledEventAttributes' @:: Lens' HistoryEvent TimerCanceledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'markerRecordedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe MarkerRecordedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.markerRecordedEventAttributes' @:: Lens' HistoryEvent MarkerRecordedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionSignaledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionSignaledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionSignaledEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionSignaledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionTerminatedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionTerminatedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionTerminatedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionTerminatedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionCancelRequestedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionCancelRequestedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionCancelRequestedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionCancelRequestedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionCanceledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionCanceledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionCanceledEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionCanceledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'requestCancelExternalWorkflowExecutionInitiatedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.requestCancelExternalWorkflowExecutionInitiatedEventAttributes' @:: Lens' HistoryEvent RequestCancelExternalWorkflowExecutionInitiatedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'requestCancelExternalWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.requestCancelExternalWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent RequestCancelExternalWorkflowExecutionFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'externalWorkflowExecutionCancelRequestedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.externalWorkflowExecutionCancelRequestedEventAttributes' @:: Lens' HistoryEvent ExternalWorkflowExecutionCancelRequestedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionContinuedAsNewEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionContinuedAsNewEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionContinuedAsNewEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionContinuedAsNewEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'startChildWorkflowExecutionInitiatedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe StartChildWorkflowExecutionInitiatedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startChildWorkflowExecutionInitiatedEventAttributes' @:: Lens' HistoryEvent StartChildWorkflowExecutionInitiatedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'startChildWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe StartChildWorkflowExecutionFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startChildWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent StartChildWorkflowExecutionFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'childWorkflowExecutionStartedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ChildWorkflowExecutionStartedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowExecutionStartedEventAttributes' @:: Lens' HistoryEvent ChildWorkflowExecutionStartedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'childWorkflowExecutionCompletedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ChildWorkflowExecutionCompletedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowExecutionCompletedEventAttributes' @:: Lens' HistoryEvent ChildWorkflowExecutionCompletedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'childWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ChildWorkflowExecutionFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent ChildWorkflowExecutionFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'childWorkflowExecutionCanceledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ChildWorkflowExecutionCanceledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowExecutionCanceledEventAttributes' @:: Lens' HistoryEvent ChildWorkflowExecutionCanceledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'childWorkflowExecutionTimedOutEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ChildWorkflowExecutionTimedOutEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowExecutionTimedOutEventAttributes' @:: Lens' HistoryEvent ChildWorkflowExecutionTimedOutEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'childWorkflowExecutionTerminatedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ChildWorkflowExecutionTerminatedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowExecutionTerminatedEventAttributes' @:: Lens' HistoryEvent ChildWorkflowExecutionTerminatedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'signalExternalWorkflowExecutionInitiatedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.signalExternalWorkflowExecutionInitiatedEventAttributes' @:: Lens' HistoryEvent SignalExternalWorkflowExecutionInitiatedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'signalExternalWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe SignalExternalWorkflowExecutionFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.signalExternalWorkflowExecutionFailedEventAttributes' @:: Lens' HistoryEvent SignalExternalWorkflowExecutionFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'externalWorkflowExecutionSignaledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ExternalWorkflowExecutionSignaledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.externalWorkflowExecutionSignaledEventAttributes' @:: Lens' HistoryEvent ExternalWorkflowExecutionSignaledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'upsertWorkflowSearchAttributesEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe UpsertWorkflowSearchAttributesEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.upsertWorkflowSearchAttributesEventAttributes' @:: Lens' HistoryEvent UpsertWorkflowSearchAttributesEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionUpdateAcceptedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionUpdateAcceptedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionUpdateAcceptedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionUpdateAcceptedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionUpdateRejectedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionUpdateRejectedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionUpdateRejectedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionUpdateRejectedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionUpdateCompletedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionUpdateCompletedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionUpdateCompletedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionUpdateCompletedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowPropertiesModifiedExternallyEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowPropertiesModifiedExternallyEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowPropertiesModifiedExternallyEventAttributes' @:: Lens' HistoryEvent WorkflowPropertiesModifiedExternallyEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'activityPropertiesModifiedExternallyEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe ActivityPropertiesModifiedExternallyEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.activityPropertiesModifiedExternallyEventAttributes' @:: Lens' HistoryEvent ActivityPropertiesModifiedExternallyEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowPropertiesModifiedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowPropertiesModifiedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowPropertiesModifiedEventAttributes' @:: Lens' HistoryEvent WorkflowPropertiesModifiedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionUpdateAdmittedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe WorkflowExecutionUpdateAdmittedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionUpdateAdmittedEventAttributes' @:: Lens' HistoryEvent WorkflowExecutionUpdateAdmittedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationScheduledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationScheduledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationScheduledEventAttributes' @:: Lens' HistoryEvent NexusOperationScheduledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationStartedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationStartedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationStartedEventAttributes' @:: Lens' HistoryEvent NexusOperationStartedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationCompletedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationCompletedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationCompletedEventAttributes' @:: Lens' HistoryEvent NexusOperationCompletedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationFailedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationFailedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationFailedEventAttributes' @:: Lens' HistoryEvent NexusOperationFailedEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationCanceledEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationCanceledEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationCanceledEventAttributes' @:: Lens' HistoryEvent NexusOperationCanceledEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationTimedOutEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationTimedOutEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationTimedOutEventAttributes' @:: Lens' HistoryEvent NexusOperationTimedOutEventAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'nexusOperationCancelRequestedEventAttributes' @:: Lens' HistoryEvent (Prelude.Maybe NexusOperationCancelRequestedEventAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusOperationCancelRequestedEventAttributes' @:: Lens' HistoryEvent NexusOperationCancelRequestedEventAttributes@ -}
data HistoryEvent
  = HistoryEvent'_constructor {HistoryEvent -> Int64
_HistoryEvent'eventId :: !Data.Int.Int64,
                               HistoryEvent -> Maybe Timestamp
_HistoryEvent'eventTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                               HistoryEvent -> EventType
_HistoryEvent'eventType :: !Proto.Temporal.Api.Enums.V1.EventType.EventType,
                               HistoryEvent -> Int64
_HistoryEvent'version :: !Data.Int.Int64,
                               HistoryEvent -> Int64
_HistoryEvent'taskId :: !Data.Int.Int64,
                               HistoryEvent -> Bool
_HistoryEvent'workerMayIgnore :: !Prelude.Bool,
                               HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes :: !(Prelude.Maybe HistoryEvent'Attributes),
                               HistoryEvent -> FieldSet
_HistoryEvent'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (HistoryEvent -> HistoryEvent -> Bool
(HistoryEvent -> HistoryEvent -> Bool)
-> (HistoryEvent -> HistoryEvent -> Bool) -> Eq HistoryEvent
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: HistoryEvent -> HistoryEvent -> Bool
== :: HistoryEvent -> HistoryEvent -> Bool
$c/= :: HistoryEvent -> HistoryEvent -> Bool
/= :: HistoryEvent -> HistoryEvent -> Bool
Prelude.Eq, Eq HistoryEvent
Eq HistoryEvent =>
(HistoryEvent -> HistoryEvent -> Ordering)
-> (HistoryEvent -> HistoryEvent -> Bool)
-> (HistoryEvent -> HistoryEvent -> Bool)
-> (HistoryEvent -> HistoryEvent -> Bool)
-> (HistoryEvent -> HistoryEvent -> Bool)
-> (HistoryEvent -> HistoryEvent -> HistoryEvent)
-> (HistoryEvent -> HistoryEvent -> HistoryEvent)
-> Ord HistoryEvent
HistoryEvent -> HistoryEvent -> Bool
HistoryEvent -> HistoryEvent -> Ordering
HistoryEvent -> HistoryEvent -> HistoryEvent
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 :: HistoryEvent -> HistoryEvent -> Ordering
compare :: HistoryEvent -> HistoryEvent -> Ordering
$c< :: HistoryEvent -> HistoryEvent -> Bool
< :: HistoryEvent -> HistoryEvent -> Bool
$c<= :: HistoryEvent -> HistoryEvent -> Bool
<= :: HistoryEvent -> HistoryEvent -> Bool
$c> :: HistoryEvent -> HistoryEvent -> Bool
> :: HistoryEvent -> HistoryEvent -> Bool
$c>= :: HistoryEvent -> HistoryEvent -> Bool
>= :: HistoryEvent -> HistoryEvent -> Bool
$cmax :: HistoryEvent -> HistoryEvent -> HistoryEvent
max :: HistoryEvent -> HistoryEvent -> HistoryEvent
$cmin :: HistoryEvent -> HistoryEvent -> HistoryEvent
min :: HistoryEvent -> HistoryEvent -> HistoryEvent
Prelude.Ord)
instance Prelude.Show HistoryEvent where
  showsPrec :: Int -> HistoryEvent -> ShowS
showsPrec Int
_ HistoryEvent
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (HistoryEvent -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort HistoryEvent
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
data HistoryEvent'Attributes
  = HistoryEvent'WorkflowExecutionStartedEventAttributes !WorkflowExecutionStartedEventAttributes |
    HistoryEvent'WorkflowExecutionCompletedEventAttributes !WorkflowExecutionCompletedEventAttributes |
    HistoryEvent'WorkflowExecutionFailedEventAttributes !WorkflowExecutionFailedEventAttributes |
    HistoryEvent'WorkflowExecutionTimedOutEventAttributes !WorkflowExecutionTimedOutEventAttributes |
    HistoryEvent'WorkflowTaskScheduledEventAttributes !WorkflowTaskScheduledEventAttributes |
    HistoryEvent'WorkflowTaskStartedEventAttributes !WorkflowTaskStartedEventAttributes |
    HistoryEvent'WorkflowTaskCompletedEventAttributes !WorkflowTaskCompletedEventAttributes |
    HistoryEvent'WorkflowTaskTimedOutEventAttributes !WorkflowTaskTimedOutEventAttributes |
    HistoryEvent'WorkflowTaskFailedEventAttributes !WorkflowTaskFailedEventAttributes |
    HistoryEvent'ActivityTaskScheduledEventAttributes !ActivityTaskScheduledEventAttributes |
    HistoryEvent'ActivityTaskStartedEventAttributes !ActivityTaskStartedEventAttributes |
    HistoryEvent'ActivityTaskCompletedEventAttributes !ActivityTaskCompletedEventAttributes |
    HistoryEvent'ActivityTaskFailedEventAttributes !ActivityTaskFailedEventAttributes |
    HistoryEvent'ActivityTaskTimedOutEventAttributes !ActivityTaskTimedOutEventAttributes |
    HistoryEvent'TimerStartedEventAttributes !TimerStartedEventAttributes |
    HistoryEvent'TimerFiredEventAttributes !TimerFiredEventAttributes |
    HistoryEvent'ActivityTaskCancelRequestedEventAttributes !ActivityTaskCancelRequestedEventAttributes |
    HistoryEvent'ActivityTaskCanceledEventAttributes !ActivityTaskCanceledEventAttributes |
    HistoryEvent'TimerCanceledEventAttributes !TimerCanceledEventAttributes |
    HistoryEvent'MarkerRecordedEventAttributes !MarkerRecordedEventAttributes |
    HistoryEvent'WorkflowExecutionSignaledEventAttributes !WorkflowExecutionSignaledEventAttributes |
    HistoryEvent'WorkflowExecutionTerminatedEventAttributes !WorkflowExecutionTerminatedEventAttributes |
    HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes !WorkflowExecutionCancelRequestedEventAttributes |
    HistoryEvent'WorkflowExecutionCanceledEventAttributes !WorkflowExecutionCanceledEventAttributes |
    HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes !RequestCancelExternalWorkflowExecutionInitiatedEventAttributes |
    HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes !RequestCancelExternalWorkflowExecutionFailedEventAttributes |
    HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes !ExternalWorkflowExecutionCancelRequestedEventAttributes |
    HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes !WorkflowExecutionContinuedAsNewEventAttributes |
    HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes !StartChildWorkflowExecutionInitiatedEventAttributes |
    HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes !StartChildWorkflowExecutionFailedEventAttributes |
    HistoryEvent'ChildWorkflowExecutionStartedEventAttributes !ChildWorkflowExecutionStartedEventAttributes |
    HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes !ChildWorkflowExecutionCompletedEventAttributes |
    HistoryEvent'ChildWorkflowExecutionFailedEventAttributes !ChildWorkflowExecutionFailedEventAttributes |
    HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes !ChildWorkflowExecutionCanceledEventAttributes |
    HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes !ChildWorkflowExecutionTimedOutEventAttributes |
    HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes !ChildWorkflowExecutionTerminatedEventAttributes |
    HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes !SignalExternalWorkflowExecutionInitiatedEventAttributes |
    HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes !SignalExternalWorkflowExecutionFailedEventAttributes |
    HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes !ExternalWorkflowExecutionSignaledEventAttributes |
    HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes !UpsertWorkflowSearchAttributesEventAttributes |
    HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes !WorkflowExecutionUpdateAcceptedEventAttributes |
    HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes !WorkflowExecutionUpdateRejectedEventAttributes |
    HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes !WorkflowExecutionUpdateCompletedEventAttributes |
    HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes !WorkflowPropertiesModifiedExternallyEventAttributes |
    HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes !ActivityPropertiesModifiedExternallyEventAttributes |
    HistoryEvent'WorkflowPropertiesModifiedEventAttributes !WorkflowPropertiesModifiedEventAttributes |
    HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes !WorkflowExecutionUpdateAdmittedEventAttributes |
    HistoryEvent'NexusOperationScheduledEventAttributes !NexusOperationScheduledEventAttributes |
    HistoryEvent'NexusOperationStartedEventAttributes !NexusOperationStartedEventAttributes |
    HistoryEvent'NexusOperationCompletedEventAttributes !NexusOperationCompletedEventAttributes |
    HistoryEvent'NexusOperationFailedEventAttributes !NexusOperationFailedEventAttributes |
    HistoryEvent'NexusOperationCanceledEventAttributes !NexusOperationCanceledEventAttributes |
    HistoryEvent'NexusOperationTimedOutEventAttributes !NexusOperationTimedOutEventAttributes |
    HistoryEvent'NexusOperationCancelRequestedEventAttributes !NexusOperationCancelRequestedEventAttributes
  deriving stock (Int -> HistoryEvent'Attributes -> ShowS
[HistoryEvent'Attributes] -> ShowS
HistoryEvent'Attributes -> String
(Int -> HistoryEvent'Attributes -> ShowS)
-> (HistoryEvent'Attributes -> String)
-> ([HistoryEvent'Attributes] -> ShowS)
-> Show HistoryEvent'Attributes
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> HistoryEvent'Attributes -> ShowS
showsPrec :: Int -> HistoryEvent'Attributes -> ShowS
$cshow :: HistoryEvent'Attributes -> String
show :: HistoryEvent'Attributes -> String
$cshowList :: [HistoryEvent'Attributes] -> ShowS
showList :: [HistoryEvent'Attributes] -> ShowS
Prelude.Show, HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
(HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool)
-> (HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool)
-> Eq HistoryEvent'Attributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
== :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
$c/= :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
/= :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
Prelude.Eq, Eq HistoryEvent'Attributes
Eq HistoryEvent'Attributes =>
(HistoryEvent'Attributes -> HistoryEvent'Attributes -> Ordering)
-> (HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool)
-> (HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool)
-> (HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool)
-> (HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool)
-> (HistoryEvent'Attributes
    -> HistoryEvent'Attributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> HistoryEvent'Attributes -> HistoryEvent'Attributes)
-> Ord HistoryEvent'Attributes
HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
HistoryEvent'Attributes -> HistoryEvent'Attributes -> Ordering
HistoryEvent'Attributes
-> HistoryEvent'Attributes -> HistoryEvent'Attributes
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 :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Ordering
compare :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Ordering
$c< :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
< :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
$c<= :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
<= :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
$c> :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
> :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
$c>= :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
>= :: HistoryEvent'Attributes -> HistoryEvent'Attributes -> Bool
$cmax :: HistoryEvent'Attributes
-> HistoryEvent'Attributes -> HistoryEvent'Attributes
max :: HistoryEvent'Attributes
-> HistoryEvent'Attributes -> HistoryEvent'Attributes
$cmin :: HistoryEvent'Attributes
-> HistoryEvent'Attributes -> HistoryEvent'Attributes
min :: HistoryEvent'Attributes
-> HistoryEvent'Attributes -> HistoryEvent'Attributes
Prelude.Ord)
instance Data.ProtoLens.Field.HasField HistoryEvent "eventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "eventId"
-> (Int64 -> f Int64) -> HistoryEvent -> f HistoryEvent
fieldOf Proxy# "eventId"
_
    = ((Int64 -> f Int64) -> HistoryEvent -> f HistoryEvent)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Int64)
-> (HistoryEvent -> Int64 -> HistoryEvent)
-> Lens HistoryEvent HistoryEvent Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Int64
_HistoryEvent'eventId
           (\ HistoryEvent
x__ Int64
y__ -> HistoryEvent
x__ {_HistoryEvent'eventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "eventTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "eventTime"
-> (Timestamp -> f Timestamp) -> HistoryEvent -> f HistoryEvent
fieldOf Proxy# "eventTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> HistoryEvent -> f HistoryEvent)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe Timestamp)
-> (HistoryEvent -> Maybe Timestamp -> HistoryEvent)
-> Lens
     HistoryEvent HistoryEvent (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe Timestamp
_HistoryEvent'eventTime
           (\ HistoryEvent
x__ Maybe Timestamp
y__ -> HistoryEvent
x__ {_HistoryEvent'eventTime = 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 HistoryEvent "maybe'eventTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'eventTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'eventTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe Timestamp)
-> (HistoryEvent -> Maybe Timestamp -> HistoryEvent)
-> Lens
     HistoryEvent HistoryEvent (Maybe Timestamp) (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe Timestamp
_HistoryEvent'eventTime
           (\ HistoryEvent
x__ Maybe Timestamp
y__ -> HistoryEvent
x__ {_HistoryEvent'eventTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "eventType" Proto.Temporal.Api.Enums.V1.EventType.EventType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "eventType"
-> (EventType -> f EventType) -> HistoryEvent -> f HistoryEvent
fieldOf Proxy# "eventType"
_
    = ((EventType -> f EventType) -> HistoryEvent -> f HistoryEvent)
-> ((EventType -> f EventType) -> EventType -> f EventType)
-> (EventType -> f EventType)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> EventType)
-> (HistoryEvent -> EventType -> HistoryEvent)
-> Lens HistoryEvent HistoryEvent EventType EventType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> EventType
_HistoryEvent'eventType
           (\ HistoryEvent
x__ EventType
y__ -> HistoryEvent
x__ {_HistoryEvent'eventType = y__}))
        (EventType -> f EventType) -> EventType -> f EventType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "version" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "version"
-> (Int64 -> f Int64) -> HistoryEvent -> f HistoryEvent
fieldOf Proxy# "version"
_
    = ((Int64 -> f Int64) -> HistoryEvent -> f HistoryEvent)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Int64)
-> (HistoryEvent -> Int64 -> HistoryEvent)
-> Lens HistoryEvent HistoryEvent Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Int64
_HistoryEvent'version
           (\ HistoryEvent
x__ Int64
y__ -> HistoryEvent
x__ {_HistoryEvent'version = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "taskId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskId"
-> (Int64 -> f Int64) -> HistoryEvent -> f HistoryEvent
fieldOf Proxy# "taskId"
_
    = ((Int64 -> f Int64) -> HistoryEvent -> f HistoryEvent)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Int64)
-> (HistoryEvent -> Int64 -> HistoryEvent)
-> Lens HistoryEvent HistoryEvent Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Int64
_HistoryEvent'taskId
           (\ HistoryEvent
x__ Int64
y__ -> HistoryEvent
x__ {_HistoryEvent'taskId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "workerMayIgnore" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerMayIgnore"
-> (Bool -> f Bool) -> HistoryEvent -> f HistoryEvent
fieldOf Proxy# "workerMayIgnore"
_
    = ((Bool -> f Bool) -> HistoryEvent -> f HistoryEvent)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Bool)
-> (HistoryEvent -> Bool -> HistoryEvent)
-> Lens HistoryEvent HistoryEvent Bool Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Bool
_HistoryEvent'workerMayIgnore
           (\ HistoryEvent
x__ Bool
y__ -> HistoryEvent
x__ {_HistoryEvent'workerMayIgnore = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'attributes" (Prelude.Maybe HistoryEvent'Attributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'attributes"
-> (Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'attributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe HistoryEvent'Attributes
     -> f (Maybe HistoryEvent'Attributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionStartedEventAttributes" (Prelude.Maybe WorkflowExecutionStartedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionStartedEventAttributes"
-> (Maybe WorkflowExecutionStartedEventAttributes
    -> f (Maybe WorkflowExecutionStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionStartedEventAttributes
     -> f (Maybe WorkflowExecutionStartedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionStartedEventAttributes
    -> f (Maybe WorkflowExecutionStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionStartedEventAttributes)
     (Maybe WorkflowExecutionStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionStartedEventAttributes WorkflowExecutionStartedEventAttributes
x__val))
                     -> WorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecutionStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStartedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionStartedEventAttributes
y__
              -> (WorkflowExecutionStartedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionStartedEventAttributes Maybe WorkflowExecutionStartedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionStartedEventAttributes" WorkflowExecutionStartedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionStartedEventAttributes"
-> (WorkflowExecutionStartedEventAttributes
    -> f WorkflowExecutionStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionStartedEventAttributes
     -> f WorkflowExecutionStartedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionStartedEventAttributes
    -> f WorkflowExecutionStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionStartedEventAttributes
  -> f (Maybe WorkflowExecutionStartedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionStartedEventAttributes
     -> f WorkflowExecutionStartedEventAttributes)
    -> Maybe WorkflowExecutionStartedEventAttributes
    -> f (Maybe WorkflowExecutionStartedEventAttributes))
-> (WorkflowExecutionStartedEventAttributes
    -> f WorkflowExecutionStartedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionStartedEventAttributes)
     (Maybe WorkflowExecutionStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionStartedEventAttributes WorkflowExecutionStartedEventAttributes
x__val))
                        -> WorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecutionStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStartedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionStartedEventAttributes
y__
                 -> (WorkflowExecutionStartedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionStartedEventAttributes Maybe WorkflowExecutionStartedEventAttributes
y__))
           (WorkflowExecutionStartedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionStartedEventAttributes)
     WorkflowExecutionStartedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionCompletedEventAttributes" (Prelude.Maybe WorkflowExecutionCompletedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionCompletedEventAttributes"
-> (Maybe WorkflowExecutionCompletedEventAttributes
    -> f (Maybe WorkflowExecutionCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionCompletedEventAttributes
     -> f (Maybe WorkflowExecutionCompletedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionCompletedEventAttributes
    -> f (Maybe WorkflowExecutionCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionCompletedEventAttributes)
     (Maybe WorkflowExecutionCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionCompletedEventAttributes WorkflowExecutionCompletedEventAttributes
x__val))
                     -> WorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecutionCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCompletedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionCompletedEventAttributes
y__
              -> (WorkflowExecutionCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCompletedEventAttributes Maybe WorkflowExecutionCompletedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionCompletedEventAttributes" WorkflowExecutionCompletedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionCompletedEventAttributes"
-> (WorkflowExecutionCompletedEventAttributes
    -> f WorkflowExecutionCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionCompletedEventAttributes
     -> f WorkflowExecutionCompletedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionCompletedEventAttributes
    -> f WorkflowExecutionCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionCompletedEventAttributes
  -> f (Maybe WorkflowExecutionCompletedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionCompletedEventAttributes
     -> f WorkflowExecutionCompletedEventAttributes)
    -> Maybe WorkflowExecutionCompletedEventAttributes
    -> f (Maybe WorkflowExecutionCompletedEventAttributes))
-> (WorkflowExecutionCompletedEventAttributes
    -> f WorkflowExecutionCompletedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionCompletedEventAttributes)
     (Maybe WorkflowExecutionCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionCompletedEventAttributes WorkflowExecutionCompletedEventAttributes
x__val))
                        -> WorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecutionCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCompletedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionCompletedEventAttributes
y__
                 -> (WorkflowExecutionCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCompletedEventAttributes Maybe WorkflowExecutionCompletedEventAttributes
y__))
           (WorkflowExecutionCompletedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionCompletedEventAttributes)
     WorkflowExecutionCompletedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionFailedEventAttributes" (Prelude.Maybe WorkflowExecutionFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionFailedEventAttributes"
-> (Maybe WorkflowExecutionFailedEventAttributes
    -> f (Maybe WorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionFailedEventAttributes
     -> f (Maybe WorkflowExecutionFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionFailedEventAttributes
    -> f (Maybe WorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionFailedEventAttributes)
     (Maybe WorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionFailedEventAttributes WorkflowExecutionFailedEventAttributes
x__val))
                     -> WorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionFailedEventAttributes
y__
              -> (WorkflowExecutionFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionFailedEventAttributes Maybe WorkflowExecutionFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionFailedEventAttributes" WorkflowExecutionFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionFailedEventAttributes"
-> (WorkflowExecutionFailedEventAttributes
    -> f WorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionFailedEventAttributes
     -> f WorkflowExecutionFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionFailedEventAttributes
    -> f WorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionFailedEventAttributes
  -> f (Maybe WorkflowExecutionFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionFailedEventAttributes
     -> f WorkflowExecutionFailedEventAttributes)
    -> Maybe WorkflowExecutionFailedEventAttributes
    -> f (Maybe WorkflowExecutionFailedEventAttributes))
-> (WorkflowExecutionFailedEventAttributes
    -> f WorkflowExecutionFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionFailedEventAttributes)
     (Maybe WorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionFailedEventAttributes WorkflowExecutionFailedEventAttributes
x__val))
                        -> WorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionFailedEventAttributes
y__
                 -> (WorkflowExecutionFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionFailedEventAttributes Maybe WorkflowExecutionFailedEventAttributes
y__))
           (WorkflowExecutionFailedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionFailedEventAttributes)
     WorkflowExecutionFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionTimedOutEventAttributes" (Prelude.Maybe WorkflowExecutionTimedOutEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimedOutEventAttributes"
-> (Maybe WorkflowExecutionTimedOutEventAttributes
    -> f (Maybe WorkflowExecutionTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionTimedOutEventAttributes
     -> f (Maybe WorkflowExecutionTimedOutEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionTimedOutEventAttributes
    -> f (Maybe WorkflowExecutionTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionTimedOutEventAttributes)
     (Maybe WorkflowExecutionTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionTimedOutEventAttributes WorkflowExecutionTimedOutEventAttributes
x__val))
                     -> WorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecutionTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionTimedOutEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionTimedOutEventAttributes
y__
              -> (WorkflowExecutionTimedOutEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionTimedOutEventAttributes Maybe WorkflowExecutionTimedOutEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionTimedOutEventAttributes" WorkflowExecutionTimedOutEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimedOutEventAttributes"
-> (WorkflowExecutionTimedOutEventAttributes
    -> f WorkflowExecutionTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionTimedOutEventAttributes
     -> f WorkflowExecutionTimedOutEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionTimedOutEventAttributes
    -> f WorkflowExecutionTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionTimedOutEventAttributes
  -> f (Maybe WorkflowExecutionTimedOutEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionTimedOutEventAttributes
     -> f WorkflowExecutionTimedOutEventAttributes)
    -> Maybe WorkflowExecutionTimedOutEventAttributes
    -> f (Maybe WorkflowExecutionTimedOutEventAttributes))
-> (WorkflowExecutionTimedOutEventAttributes
    -> f WorkflowExecutionTimedOutEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionTimedOutEventAttributes)
     (Maybe WorkflowExecutionTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionTimedOutEventAttributes WorkflowExecutionTimedOutEventAttributes
x__val))
                        -> WorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecutionTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionTimedOutEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionTimedOutEventAttributes
y__
                 -> (WorkflowExecutionTimedOutEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionTimedOutEventAttributes Maybe WorkflowExecutionTimedOutEventAttributes
y__))
           (WorkflowExecutionTimedOutEventAttributes
-> Lens'
     (Maybe WorkflowExecutionTimedOutEventAttributes)
     WorkflowExecutionTimedOutEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowTaskScheduledEventAttributes" (Prelude.Maybe WorkflowTaskScheduledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskScheduledEventAttributes"
-> (Maybe WorkflowTaskScheduledEventAttributes
    -> f (Maybe WorkflowTaskScheduledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowTaskScheduledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowTaskScheduledEventAttributes
     -> f (Maybe WorkflowTaskScheduledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowTaskScheduledEventAttributes
    -> f (Maybe WorkflowTaskScheduledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskScheduledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskScheduledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskScheduledEventAttributes)
     (Maybe WorkflowTaskScheduledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowTaskScheduledEventAttributes WorkflowTaskScheduledEventAttributes
x__val))
                     -> WorkflowTaskScheduledEventAttributes
-> Maybe WorkflowTaskScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskScheduledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskScheduledEventAttributes
y__
              -> (WorkflowTaskScheduledEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskScheduledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowTaskScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskScheduledEventAttributes Maybe WorkflowTaskScheduledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowTaskScheduledEventAttributes" WorkflowTaskScheduledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskScheduledEventAttributes"
-> (WorkflowTaskScheduledEventAttributes
    -> f WorkflowTaskScheduledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowTaskScheduledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowTaskScheduledEventAttributes
     -> f WorkflowTaskScheduledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowTaskScheduledEventAttributes
    -> f WorkflowTaskScheduledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowTaskScheduledEventAttributes
  -> f (Maybe WorkflowTaskScheduledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowTaskScheduledEventAttributes
     -> f WorkflowTaskScheduledEventAttributes)
    -> Maybe WorkflowTaskScheduledEventAttributes
    -> f (Maybe WorkflowTaskScheduledEventAttributes))
-> (WorkflowTaskScheduledEventAttributes
    -> f WorkflowTaskScheduledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskScheduledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskScheduledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskScheduledEventAttributes)
     (Maybe WorkflowTaskScheduledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowTaskScheduledEventAttributes WorkflowTaskScheduledEventAttributes
x__val))
                        -> WorkflowTaskScheduledEventAttributes
-> Maybe WorkflowTaskScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskScheduledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskScheduledEventAttributes
y__
                 -> (WorkflowTaskScheduledEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskScheduledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowTaskScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskScheduledEventAttributes Maybe WorkflowTaskScheduledEventAttributes
y__))
           (WorkflowTaskScheduledEventAttributes
-> Lens'
     (Maybe WorkflowTaskScheduledEventAttributes)
     WorkflowTaskScheduledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskScheduledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowTaskStartedEventAttributes" (Prelude.Maybe WorkflowTaskStartedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskStartedEventAttributes"
-> (Maybe WorkflowTaskStartedEventAttributes
    -> f (Maybe WorkflowTaskStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowTaskStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowTaskStartedEventAttributes
     -> f (Maybe WorkflowTaskStartedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowTaskStartedEventAttributes
    -> f (Maybe WorkflowTaskStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskStartedEventAttributes)
     (Maybe WorkflowTaskStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowTaskStartedEventAttributes WorkflowTaskStartedEventAttributes
x__val))
                     -> WorkflowTaskStartedEventAttributes
-> Maybe WorkflowTaskStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskStartedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskStartedEventAttributes
y__
              -> (WorkflowTaskStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowTaskStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskStartedEventAttributes Maybe WorkflowTaskStartedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowTaskStartedEventAttributes" WorkflowTaskStartedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskStartedEventAttributes"
-> (WorkflowTaskStartedEventAttributes
    -> f WorkflowTaskStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowTaskStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowTaskStartedEventAttributes
     -> f WorkflowTaskStartedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowTaskStartedEventAttributes
    -> f WorkflowTaskStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowTaskStartedEventAttributes
  -> f (Maybe WorkflowTaskStartedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowTaskStartedEventAttributes
     -> f WorkflowTaskStartedEventAttributes)
    -> Maybe WorkflowTaskStartedEventAttributes
    -> f (Maybe WorkflowTaskStartedEventAttributes))
-> (WorkflowTaskStartedEventAttributes
    -> f WorkflowTaskStartedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskStartedEventAttributes)
     (Maybe WorkflowTaskStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowTaskStartedEventAttributes WorkflowTaskStartedEventAttributes
x__val))
                        -> WorkflowTaskStartedEventAttributes
-> Maybe WorkflowTaskStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskStartedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskStartedEventAttributes
y__
                 -> (WorkflowTaskStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowTaskStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskStartedEventAttributes Maybe WorkflowTaskStartedEventAttributes
y__))
           (WorkflowTaskStartedEventAttributes
-> Lens'
     (Maybe WorkflowTaskStartedEventAttributes)
     WorkflowTaskStartedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowTaskCompletedEventAttributes" (Prelude.Maybe WorkflowTaskCompletedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskCompletedEventAttributes"
-> (Maybe WorkflowTaskCompletedEventAttributes
    -> f (Maybe WorkflowTaskCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowTaskCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowTaskCompletedEventAttributes
     -> f (Maybe WorkflowTaskCompletedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowTaskCompletedEventAttributes
    -> f (Maybe WorkflowTaskCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskCompletedEventAttributes)
     (Maybe WorkflowTaskCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedEventAttributes
x__val))
                     -> WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskCompletedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskCompletedEventAttributes
y__
              -> (WorkflowTaskCompletedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowTaskCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskCompletedEventAttributes Maybe WorkflowTaskCompletedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowTaskCompletedEventAttributes" WorkflowTaskCompletedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventAttributes"
-> (WorkflowTaskCompletedEventAttributes
    -> f WorkflowTaskCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowTaskCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowTaskCompletedEventAttributes
     -> f WorkflowTaskCompletedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowTaskCompletedEventAttributes
    -> f WorkflowTaskCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowTaskCompletedEventAttributes
  -> f (Maybe WorkflowTaskCompletedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowTaskCompletedEventAttributes
     -> f WorkflowTaskCompletedEventAttributes)
    -> Maybe WorkflowTaskCompletedEventAttributes
    -> f (Maybe WorkflowTaskCompletedEventAttributes))
-> (WorkflowTaskCompletedEventAttributes
    -> f WorkflowTaskCompletedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskCompletedEventAttributes)
     (Maybe WorkflowTaskCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedEventAttributes
x__val))
                        -> WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskCompletedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskCompletedEventAttributes
y__
                 -> (WorkflowTaskCompletedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowTaskCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskCompletedEventAttributes Maybe WorkflowTaskCompletedEventAttributes
y__))
           (WorkflowTaskCompletedEventAttributes
-> Lens'
     (Maybe WorkflowTaskCompletedEventAttributes)
     WorkflowTaskCompletedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowTaskTimedOutEventAttributes" (Prelude.Maybe WorkflowTaskTimedOutEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimedOutEventAttributes"
-> (Maybe WorkflowTaskTimedOutEventAttributes
    -> f (Maybe WorkflowTaskTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowTaskTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowTaskTimedOutEventAttributes
     -> f (Maybe WorkflowTaskTimedOutEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowTaskTimedOutEventAttributes
    -> f (Maybe WorkflowTaskTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskTimedOutEventAttributes)
     (Maybe WorkflowTaskTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowTaskTimedOutEventAttributes WorkflowTaskTimedOutEventAttributes
x__val))
                     -> WorkflowTaskTimedOutEventAttributes
-> Maybe WorkflowTaskTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskTimedOutEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskTimedOutEventAttributes
y__
              -> (WorkflowTaskTimedOutEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowTaskTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskTimedOutEventAttributes Maybe WorkflowTaskTimedOutEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowTaskTimedOutEventAttributes" WorkflowTaskTimedOutEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimedOutEventAttributes"
-> (WorkflowTaskTimedOutEventAttributes
    -> f WorkflowTaskTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowTaskTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowTaskTimedOutEventAttributes
     -> f WorkflowTaskTimedOutEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowTaskTimedOutEventAttributes
    -> f WorkflowTaskTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowTaskTimedOutEventAttributes
  -> f (Maybe WorkflowTaskTimedOutEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowTaskTimedOutEventAttributes
     -> f WorkflowTaskTimedOutEventAttributes)
    -> Maybe WorkflowTaskTimedOutEventAttributes
    -> f (Maybe WorkflowTaskTimedOutEventAttributes))
-> (WorkflowTaskTimedOutEventAttributes
    -> f WorkflowTaskTimedOutEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskTimedOutEventAttributes)
     (Maybe WorkflowTaskTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowTaskTimedOutEventAttributes WorkflowTaskTimedOutEventAttributes
x__val))
                        -> WorkflowTaskTimedOutEventAttributes
-> Maybe WorkflowTaskTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskTimedOutEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskTimedOutEventAttributes
y__
                 -> (WorkflowTaskTimedOutEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowTaskTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskTimedOutEventAttributes Maybe WorkflowTaskTimedOutEventAttributes
y__))
           (WorkflowTaskTimedOutEventAttributes
-> Lens'
     (Maybe WorkflowTaskTimedOutEventAttributes)
     WorkflowTaskTimedOutEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowTaskFailedEventAttributes" (Prelude.Maybe WorkflowTaskFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskFailedEventAttributes"
-> (Maybe WorkflowTaskFailedEventAttributes
    -> f (Maybe WorkflowTaskFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowTaskFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowTaskFailedEventAttributes
     -> f (Maybe WorkflowTaskFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowTaskFailedEventAttributes
    -> f (Maybe WorkflowTaskFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskFailedEventAttributes)
     (Maybe WorkflowTaskFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowTaskFailedEventAttributes WorkflowTaskFailedEventAttributes
x__val))
                     -> WorkflowTaskFailedEventAttributes
-> Maybe WorkflowTaskFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskFailedEventAttributes
y__
              -> (WorkflowTaskFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowTaskFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskFailedEventAttributes Maybe WorkflowTaskFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowTaskFailedEventAttributes" WorkflowTaskFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskFailedEventAttributes"
-> (WorkflowTaskFailedEventAttributes
    -> f WorkflowTaskFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowTaskFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowTaskFailedEventAttributes
     -> f WorkflowTaskFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowTaskFailedEventAttributes
    -> f WorkflowTaskFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowTaskFailedEventAttributes
  -> f (Maybe WorkflowTaskFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowTaskFailedEventAttributes
     -> f WorkflowTaskFailedEventAttributes)
    -> Maybe WorkflowTaskFailedEventAttributes
    -> f (Maybe WorkflowTaskFailedEventAttributes))
-> (WorkflowTaskFailedEventAttributes
    -> f WorkflowTaskFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowTaskFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowTaskFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowTaskFailedEventAttributes)
     (Maybe WorkflowTaskFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowTaskFailedEventAttributes WorkflowTaskFailedEventAttributes
x__val))
                        -> WorkflowTaskFailedEventAttributes
-> Maybe WorkflowTaskFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowTaskFailedEventAttributes
y__
                 -> (WorkflowTaskFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe WorkflowTaskFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowTaskFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskFailedEventAttributes Maybe WorkflowTaskFailedEventAttributes
y__))
           (WorkflowTaskFailedEventAttributes
-> Lens'
     (Maybe WorkflowTaskFailedEventAttributes)
     WorkflowTaskFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskScheduledEventAttributes" (Prelude.Maybe ActivityTaskScheduledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskScheduledEventAttributes"
-> (Maybe ActivityTaskScheduledEventAttributes
    -> f (Maybe ActivityTaskScheduledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskScheduledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskScheduledEventAttributes
     -> f (Maybe ActivityTaskScheduledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskScheduledEventAttributes
    -> f (Maybe ActivityTaskScheduledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskScheduledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskScheduledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskScheduledEventAttributes)
     (Maybe ActivityTaskScheduledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskScheduledEventAttributes ActivityTaskScheduledEventAttributes
x__val))
                     -> ActivityTaskScheduledEventAttributes
-> Maybe ActivityTaskScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskScheduledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskScheduledEventAttributes
y__
              -> (ActivityTaskScheduledEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskScheduledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskScheduledEventAttributes Maybe ActivityTaskScheduledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskScheduledEventAttributes" ActivityTaskScheduledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskScheduledEventAttributes"
-> (ActivityTaskScheduledEventAttributes
    -> f ActivityTaskScheduledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskScheduledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskScheduledEventAttributes
     -> f ActivityTaskScheduledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskScheduledEventAttributes
    -> f ActivityTaskScheduledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskScheduledEventAttributes
  -> f (Maybe ActivityTaskScheduledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskScheduledEventAttributes
     -> f ActivityTaskScheduledEventAttributes)
    -> Maybe ActivityTaskScheduledEventAttributes
    -> f (Maybe ActivityTaskScheduledEventAttributes))
-> (ActivityTaskScheduledEventAttributes
    -> f ActivityTaskScheduledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskScheduledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskScheduledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskScheduledEventAttributes)
     (Maybe ActivityTaskScheduledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskScheduledEventAttributes ActivityTaskScheduledEventAttributes
x__val))
                        -> ActivityTaskScheduledEventAttributes
-> Maybe ActivityTaskScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskScheduledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskScheduledEventAttributes
y__
                 -> (ActivityTaskScheduledEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskScheduledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskScheduledEventAttributes Maybe ActivityTaskScheduledEventAttributes
y__))
           (ActivityTaskScheduledEventAttributes
-> Lens'
     (Maybe ActivityTaskScheduledEventAttributes)
     ActivityTaskScheduledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskScheduledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskStartedEventAttributes" (Prelude.Maybe ActivityTaskStartedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskStartedEventAttributes"
-> (Maybe ActivityTaskStartedEventAttributes
    -> f (Maybe ActivityTaskStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskStartedEventAttributes
     -> f (Maybe ActivityTaskStartedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskStartedEventAttributes
    -> f (Maybe ActivityTaskStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskStartedEventAttributes)
     (Maybe ActivityTaskStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskStartedEventAttributes ActivityTaskStartedEventAttributes
x__val))
                     -> ActivityTaskStartedEventAttributes
-> Maybe ActivityTaskStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskStartedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskStartedEventAttributes
y__
              -> (ActivityTaskStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskStartedEventAttributes Maybe ActivityTaskStartedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskStartedEventAttributes" ActivityTaskStartedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskStartedEventAttributes"
-> (ActivityTaskStartedEventAttributes
    -> f ActivityTaskStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskStartedEventAttributes
     -> f ActivityTaskStartedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskStartedEventAttributes
    -> f ActivityTaskStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskStartedEventAttributes
  -> f (Maybe ActivityTaskStartedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskStartedEventAttributes
     -> f ActivityTaskStartedEventAttributes)
    -> Maybe ActivityTaskStartedEventAttributes
    -> f (Maybe ActivityTaskStartedEventAttributes))
-> (ActivityTaskStartedEventAttributes
    -> f ActivityTaskStartedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskStartedEventAttributes)
     (Maybe ActivityTaskStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskStartedEventAttributes ActivityTaskStartedEventAttributes
x__val))
                        -> ActivityTaskStartedEventAttributes
-> Maybe ActivityTaskStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskStartedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskStartedEventAttributes
y__
                 -> (ActivityTaskStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskStartedEventAttributes Maybe ActivityTaskStartedEventAttributes
y__))
           (ActivityTaskStartedEventAttributes
-> Lens'
     (Maybe ActivityTaskStartedEventAttributes)
     ActivityTaskStartedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskCompletedEventAttributes" (Prelude.Maybe ActivityTaskCompletedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskCompletedEventAttributes"
-> (Maybe ActivityTaskCompletedEventAttributes
    -> f (Maybe ActivityTaskCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskCompletedEventAttributes
     -> f (Maybe ActivityTaskCompletedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskCompletedEventAttributes
    -> f (Maybe ActivityTaskCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskCompletedEventAttributes)
     (Maybe ActivityTaskCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskCompletedEventAttributes ActivityTaskCompletedEventAttributes
x__val))
                     -> ActivityTaskCompletedEventAttributes
-> Maybe ActivityTaskCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCompletedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskCompletedEventAttributes
y__
              -> (ActivityTaskCompletedEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCompletedEventAttributes Maybe ActivityTaskCompletedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskCompletedEventAttributes" ActivityTaskCompletedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskCompletedEventAttributes"
-> (ActivityTaskCompletedEventAttributes
    -> f ActivityTaskCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskCompletedEventAttributes
     -> f ActivityTaskCompletedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskCompletedEventAttributes
    -> f ActivityTaskCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskCompletedEventAttributes
  -> f (Maybe ActivityTaskCompletedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskCompletedEventAttributes
     -> f ActivityTaskCompletedEventAttributes)
    -> Maybe ActivityTaskCompletedEventAttributes
    -> f (Maybe ActivityTaskCompletedEventAttributes))
-> (ActivityTaskCompletedEventAttributes
    -> f ActivityTaskCompletedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskCompletedEventAttributes)
     (Maybe ActivityTaskCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskCompletedEventAttributes ActivityTaskCompletedEventAttributes
x__val))
                        -> ActivityTaskCompletedEventAttributes
-> Maybe ActivityTaskCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCompletedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskCompletedEventAttributes
y__
                 -> (ActivityTaskCompletedEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCompletedEventAttributes Maybe ActivityTaskCompletedEventAttributes
y__))
           (ActivityTaskCompletedEventAttributes
-> Lens'
     (Maybe ActivityTaskCompletedEventAttributes)
     ActivityTaskCompletedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskFailedEventAttributes" (Prelude.Maybe ActivityTaskFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskFailedEventAttributes"
-> (Maybe ActivityTaskFailedEventAttributes
    -> f (Maybe ActivityTaskFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskFailedEventAttributes
     -> f (Maybe ActivityTaskFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskFailedEventAttributes
    -> f (Maybe ActivityTaskFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskFailedEventAttributes)
     (Maybe ActivityTaskFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskFailedEventAttributes ActivityTaskFailedEventAttributes
x__val))
                     -> ActivityTaskFailedEventAttributes
-> Maybe ActivityTaskFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskFailedEventAttributes
y__
              -> (ActivityTaskFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskFailedEventAttributes Maybe ActivityTaskFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskFailedEventAttributes" ActivityTaskFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskFailedEventAttributes"
-> (ActivityTaskFailedEventAttributes
    -> f ActivityTaskFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskFailedEventAttributes
     -> f ActivityTaskFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskFailedEventAttributes
    -> f ActivityTaskFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskFailedEventAttributes
  -> f (Maybe ActivityTaskFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskFailedEventAttributes
     -> f ActivityTaskFailedEventAttributes)
    -> Maybe ActivityTaskFailedEventAttributes
    -> f (Maybe ActivityTaskFailedEventAttributes))
-> (ActivityTaskFailedEventAttributes
    -> f ActivityTaskFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskFailedEventAttributes)
     (Maybe ActivityTaskFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskFailedEventAttributes ActivityTaskFailedEventAttributes
x__val))
                        -> ActivityTaskFailedEventAttributes
-> Maybe ActivityTaskFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskFailedEventAttributes
y__
                 -> (ActivityTaskFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskFailedEventAttributes Maybe ActivityTaskFailedEventAttributes
y__))
           (ActivityTaskFailedEventAttributes
-> Lens'
     (Maybe ActivityTaskFailedEventAttributes)
     ActivityTaskFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskTimedOutEventAttributes" (Prelude.Maybe ActivityTaskTimedOutEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskTimedOutEventAttributes"
-> (Maybe ActivityTaskTimedOutEventAttributes
    -> f (Maybe ActivityTaskTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskTimedOutEventAttributes
     -> f (Maybe ActivityTaskTimedOutEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskTimedOutEventAttributes
    -> f (Maybe ActivityTaskTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskTimedOutEventAttributes)
     (Maybe ActivityTaskTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskTimedOutEventAttributes ActivityTaskTimedOutEventAttributes
x__val))
                     -> ActivityTaskTimedOutEventAttributes
-> Maybe ActivityTaskTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskTimedOutEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskTimedOutEventAttributes
y__
              -> (ActivityTaskTimedOutEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskTimedOutEventAttributes Maybe ActivityTaskTimedOutEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskTimedOutEventAttributes" ActivityTaskTimedOutEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskTimedOutEventAttributes"
-> (ActivityTaskTimedOutEventAttributes
    -> f ActivityTaskTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskTimedOutEventAttributes
     -> f ActivityTaskTimedOutEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskTimedOutEventAttributes
    -> f ActivityTaskTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskTimedOutEventAttributes
  -> f (Maybe ActivityTaskTimedOutEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskTimedOutEventAttributes
     -> f ActivityTaskTimedOutEventAttributes)
    -> Maybe ActivityTaskTimedOutEventAttributes
    -> f (Maybe ActivityTaskTimedOutEventAttributes))
-> (ActivityTaskTimedOutEventAttributes
    -> f ActivityTaskTimedOutEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskTimedOutEventAttributes)
     (Maybe ActivityTaskTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskTimedOutEventAttributes ActivityTaskTimedOutEventAttributes
x__val))
                        -> ActivityTaskTimedOutEventAttributes
-> Maybe ActivityTaskTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskTimedOutEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskTimedOutEventAttributes
y__
                 -> (ActivityTaskTimedOutEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskTimedOutEventAttributes Maybe ActivityTaskTimedOutEventAttributes
y__))
           (ActivityTaskTimedOutEventAttributes
-> Lens'
     (Maybe ActivityTaskTimedOutEventAttributes)
     ActivityTaskTimedOutEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'timerStartedEventAttributes" (Prelude.Maybe TimerStartedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'timerStartedEventAttributes"
-> (Maybe TimerStartedEventAttributes
    -> f (Maybe TimerStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'timerStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe TimerStartedEventAttributes
     -> f (Maybe TimerStartedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe TimerStartedEventAttributes
    -> f (Maybe TimerStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe TimerStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe TimerStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe TimerStartedEventAttributes)
     (Maybe TimerStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'TimerStartedEventAttributes TimerStartedEventAttributes
x__val))
                     -> TimerStartedEventAttributes -> Maybe TimerStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerStartedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe TimerStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe TimerStartedEventAttributes
y__
              -> (TimerStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe TimerStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TimerStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerStartedEventAttributes Maybe TimerStartedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "timerStartedEventAttributes" TimerStartedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timerStartedEventAttributes"
-> (TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "timerStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((TimerStartedEventAttributes -> f TimerStartedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe TimerStartedEventAttributes
  -> f (Maybe TimerStartedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((TimerStartedEventAttributes -> f TimerStartedEventAttributes)
    -> Maybe TimerStartedEventAttributes
    -> f (Maybe TimerStartedEventAttributes))
-> (TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe TimerStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe TimerStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe TimerStartedEventAttributes)
     (Maybe TimerStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'TimerStartedEventAttributes TimerStartedEventAttributes
x__val))
                        -> TimerStartedEventAttributes -> Maybe TimerStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerStartedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe TimerStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe TimerStartedEventAttributes
y__
                 -> (TimerStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe TimerStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TimerStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerStartedEventAttributes Maybe TimerStartedEventAttributes
y__))
           (TimerStartedEventAttributes
-> Lens'
     (Maybe TimerStartedEventAttributes) TimerStartedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TimerStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'timerFiredEventAttributes" (Prelude.Maybe TimerFiredEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'timerFiredEventAttributes"
-> (Maybe TimerFiredEventAttributes
    -> f (Maybe TimerFiredEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'timerFiredEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe TimerFiredEventAttributes
     -> f (Maybe TimerFiredEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe TimerFiredEventAttributes
    -> f (Maybe TimerFiredEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes -> Maybe TimerFiredEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe TimerFiredEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe TimerFiredEventAttributes)
     (Maybe TimerFiredEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'TimerFiredEventAttributes TimerFiredEventAttributes
x__val))
                     -> TimerFiredEventAttributes -> Maybe TimerFiredEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerFiredEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe TimerFiredEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe TimerFiredEventAttributes
y__
              -> (TimerFiredEventAttributes -> HistoryEvent'Attributes)
-> Maybe TimerFiredEventAttributes -> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TimerFiredEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerFiredEventAttributes Maybe TimerFiredEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "timerFiredEventAttributes" TimerFiredEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timerFiredEventAttributes"
-> (TimerFiredEventAttributes -> f TimerFiredEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "timerFiredEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((TimerFiredEventAttributes -> f TimerFiredEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (TimerFiredEventAttributes -> f TimerFiredEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe TimerFiredEventAttributes
  -> f (Maybe TimerFiredEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((TimerFiredEventAttributes -> f TimerFiredEventAttributes)
    -> Maybe TimerFiredEventAttributes
    -> f (Maybe TimerFiredEventAttributes))
-> (TimerFiredEventAttributes -> f TimerFiredEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes -> Maybe TimerFiredEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe TimerFiredEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe TimerFiredEventAttributes)
     (Maybe TimerFiredEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'TimerFiredEventAttributes TimerFiredEventAttributes
x__val))
                        -> TimerFiredEventAttributes -> Maybe TimerFiredEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerFiredEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe TimerFiredEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe TimerFiredEventAttributes
y__
                 -> (TimerFiredEventAttributes -> HistoryEvent'Attributes)
-> Maybe TimerFiredEventAttributes -> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TimerFiredEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerFiredEventAttributes Maybe TimerFiredEventAttributes
y__))
           (TimerFiredEventAttributes
-> Lens'
     (Maybe TimerFiredEventAttributes) TimerFiredEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TimerFiredEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskCancelRequestedEventAttributes" (Prelude.Maybe ActivityTaskCancelRequestedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskCancelRequestedEventAttributes"
-> (Maybe ActivityTaskCancelRequestedEventAttributes
    -> f (Maybe ActivityTaskCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskCancelRequestedEventAttributes
     -> f (Maybe ActivityTaskCancelRequestedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskCancelRequestedEventAttributes
    -> f (Maybe ActivityTaskCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskCancelRequestedEventAttributes)
     (Maybe ActivityTaskCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskCancelRequestedEventAttributes ActivityTaskCancelRequestedEventAttributes
x__val))
                     -> ActivityTaskCancelRequestedEventAttributes
-> Maybe ActivityTaskCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCancelRequestedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskCancelRequestedEventAttributes
y__
              -> (ActivityTaskCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ActivityTaskCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCancelRequestedEventAttributes Maybe ActivityTaskCancelRequestedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskCancelRequestedEventAttributes" ActivityTaskCancelRequestedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskCancelRequestedEventAttributes"
-> (ActivityTaskCancelRequestedEventAttributes
    -> f ActivityTaskCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskCancelRequestedEventAttributes
     -> f ActivityTaskCancelRequestedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskCancelRequestedEventAttributes
    -> f ActivityTaskCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskCancelRequestedEventAttributes
  -> f (Maybe ActivityTaskCancelRequestedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskCancelRequestedEventAttributes
     -> f ActivityTaskCancelRequestedEventAttributes)
    -> Maybe ActivityTaskCancelRequestedEventAttributes
    -> f (Maybe ActivityTaskCancelRequestedEventAttributes))
-> (ActivityTaskCancelRequestedEventAttributes
    -> f ActivityTaskCancelRequestedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskCancelRequestedEventAttributes)
     (Maybe ActivityTaskCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskCancelRequestedEventAttributes ActivityTaskCancelRequestedEventAttributes
x__val))
                        -> ActivityTaskCancelRequestedEventAttributes
-> Maybe ActivityTaskCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCancelRequestedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskCancelRequestedEventAttributes
y__
                 -> (ActivityTaskCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ActivityTaskCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCancelRequestedEventAttributes Maybe ActivityTaskCancelRequestedEventAttributes
y__))
           (ActivityTaskCancelRequestedEventAttributes
-> Lens'
     (Maybe ActivityTaskCancelRequestedEventAttributes)
     ActivityTaskCancelRequestedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityTaskCanceledEventAttributes" (Prelude.Maybe ActivityTaskCanceledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityTaskCanceledEventAttributes"
-> (Maybe ActivityTaskCanceledEventAttributes
    -> f (Maybe ActivityTaskCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityTaskCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityTaskCanceledEventAttributes
     -> f (Maybe ActivityTaskCanceledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityTaskCanceledEventAttributes
    -> f (Maybe ActivityTaskCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskCanceledEventAttributes)
     (Maybe ActivityTaskCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityTaskCanceledEventAttributes ActivityTaskCanceledEventAttributes
x__val))
                     -> ActivityTaskCanceledEventAttributes
-> Maybe ActivityTaskCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCanceledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskCanceledEventAttributes
y__
              -> (ActivityTaskCanceledEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityTaskCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCanceledEventAttributes Maybe ActivityTaskCanceledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityTaskCanceledEventAttributes" ActivityTaskCanceledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityTaskCanceledEventAttributes"
-> (ActivityTaskCanceledEventAttributes
    -> f ActivityTaskCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityTaskCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityTaskCanceledEventAttributes
     -> f ActivityTaskCanceledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityTaskCanceledEventAttributes
    -> f ActivityTaskCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityTaskCanceledEventAttributes
  -> f (Maybe ActivityTaskCanceledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityTaskCanceledEventAttributes
     -> f ActivityTaskCanceledEventAttributes)
    -> Maybe ActivityTaskCanceledEventAttributes
    -> f (Maybe ActivityTaskCanceledEventAttributes))
-> (ActivityTaskCanceledEventAttributes
    -> f ActivityTaskCanceledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityTaskCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityTaskCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityTaskCanceledEventAttributes)
     (Maybe ActivityTaskCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityTaskCanceledEventAttributes ActivityTaskCanceledEventAttributes
x__val))
                        -> ActivityTaskCanceledEventAttributes
-> Maybe ActivityTaskCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCanceledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityTaskCanceledEventAttributes
y__
                 -> (ActivityTaskCanceledEventAttributes -> HistoryEvent'Attributes)
-> Maybe ActivityTaskCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityTaskCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCanceledEventAttributes Maybe ActivityTaskCanceledEventAttributes
y__))
           (ActivityTaskCanceledEventAttributes
-> Lens'
     (Maybe ActivityTaskCanceledEventAttributes)
     ActivityTaskCanceledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityTaskCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'timerCanceledEventAttributes" (Prelude.Maybe TimerCanceledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'timerCanceledEventAttributes"
-> (Maybe TimerCanceledEventAttributes
    -> f (Maybe TimerCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'timerCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe TimerCanceledEventAttributes
     -> f (Maybe TimerCanceledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe TimerCanceledEventAttributes
    -> f (Maybe TimerCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe TimerCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe TimerCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe TimerCanceledEventAttributes)
     (Maybe TimerCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'TimerCanceledEventAttributes TimerCanceledEventAttributes
x__val))
                     -> TimerCanceledEventAttributes -> Maybe TimerCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerCanceledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe TimerCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe TimerCanceledEventAttributes
y__
              -> (TimerCanceledEventAttributes -> HistoryEvent'Attributes)
-> Maybe TimerCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TimerCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerCanceledEventAttributes Maybe TimerCanceledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "timerCanceledEventAttributes" TimerCanceledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timerCanceledEventAttributes"
-> (TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "timerCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((TimerCanceledEventAttributes
     -> f TimerCanceledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe TimerCanceledEventAttributes
  -> f (Maybe TimerCanceledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((TimerCanceledEventAttributes
     -> f TimerCanceledEventAttributes)
    -> Maybe TimerCanceledEventAttributes
    -> f (Maybe TimerCanceledEventAttributes))
-> (TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe TimerCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe TimerCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe TimerCanceledEventAttributes)
     (Maybe TimerCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'TimerCanceledEventAttributes TimerCanceledEventAttributes
x__val))
                        -> TimerCanceledEventAttributes -> Maybe TimerCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerCanceledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe TimerCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe TimerCanceledEventAttributes
y__
                 -> (TimerCanceledEventAttributes -> HistoryEvent'Attributes)
-> Maybe TimerCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap TimerCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerCanceledEventAttributes Maybe TimerCanceledEventAttributes
y__))
           (TimerCanceledEventAttributes
-> Lens'
     (Maybe TimerCanceledEventAttributes) TimerCanceledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens TimerCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'markerRecordedEventAttributes" (Prelude.Maybe MarkerRecordedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'markerRecordedEventAttributes"
-> (Maybe MarkerRecordedEventAttributes
    -> f (Maybe MarkerRecordedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'markerRecordedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe MarkerRecordedEventAttributes
     -> f (Maybe MarkerRecordedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe MarkerRecordedEventAttributes
    -> f (Maybe MarkerRecordedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe MarkerRecordedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe MarkerRecordedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe MarkerRecordedEventAttributes)
     (Maybe MarkerRecordedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'MarkerRecordedEventAttributes MarkerRecordedEventAttributes
x__val))
                     -> MarkerRecordedEventAttributes
-> Maybe MarkerRecordedEventAttributes
forall a. a -> Maybe a
Prelude.Just MarkerRecordedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe MarkerRecordedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe MarkerRecordedEventAttributes
y__
              -> (MarkerRecordedEventAttributes -> HistoryEvent'Attributes)
-> Maybe MarkerRecordedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap MarkerRecordedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'MarkerRecordedEventAttributes Maybe MarkerRecordedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "markerRecordedEventAttributes" MarkerRecordedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "markerRecordedEventAttributes"
-> (MarkerRecordedEventAttributes
    -> f MarkerRecordedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "markerRecordedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((MarkerRecordedEventAttributes
     -> f MarkerRecordedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (MarkerRecordedEventAttributes
    -> f MarkerRecordedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe MarkerRecordedEventAttributes
  -> f (Maybe MarkerRecordedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((MarkerRecordedEventAttributes
     -> f MarkerRecordedEventAttributes)
    -> Maybe MarkerRecordedEventAttributes
    -> f (Maybe MarkerRecordedEventAttributes))
-> (MarkerRecordedEventAttributes
    -> f MarkerRecordedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe MarkerRecordedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe MarkerRecordedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe MarkerRecordedEventAttributes)
     (Maybe MarkerRecordedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'MarkerRecordedEventAttributes MarkerRecordedEventAttributes
x__val))
                        -> MarkerRecordedEventAttributes
-> Maybe MarkerRecordedEventAttributes
forall a. a -> Maybe a
Prelude.Just MarkerRecordedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe MarkerRecordedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe MarkerRecordedEventAttributes
y__
                 -> (MarkerRecordedEventAttributes -> HistoryEvent'Attributes)
-> Maybe MarkerRecordedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap MarkerRecordedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'MarkerRecordedEventAttributes Maybe MarkerRecordedEventAttributes
y__))
           (MarkerRecordedEventAttributes
-> Lens'
     (Maybe MarkerRecordedEventAttributes) MarkerRecordedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens MarkerRecordedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionSignaledEventAttributes" (Prelude.Maybe WorkflowExecutionSignaledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionSignaledEventAttributes"
-> (Maybe WorkflowExecutionSignaledEventAttributes
    -> f (Maybe WorkflowExecutionSignaledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionSignaledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionSignaledEventAttributes
     -> f (Maybe WorkflowExecutionSignaledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionSignaledEventAttributes
    -> f (Maybe WorkflowExecutionSignaledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionSignaledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionSignaledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionSignaledEventAttributes)
     (Maybe WorkflowExecutionSignaledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionSignaledEventAttributes WorkflowExecutionSignaledEventAttributes
x__val))
                     -> WorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecutionSignaledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionSignaledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionSignaledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionSignaledEventAttributes
y__
              -> (WorkflowExecutionSignaledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionSignaledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionSignaledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionSignaledEventAttributes Maybe WorkflowExecutionSignaledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionSignaledEventAttributes" WorkflowExecutionSignaledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionSignaledEventAttributes"
-> (WorkflowExecutionSignaledEventAttributes
    -> f WorkflowExecutionSignaledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionSignaledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionSignaledEventAttributes
     -> f WorkflowExecutionSignaledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionSignaledEventAttributes
    -> f WorkflowExecutionSignaledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionSignaledEventAttributes
  -> f (Maybe WorkflowExecutionSignaledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionSignaledEventAttributes
     -> f WorkflowExecutionSignaledEventAttributes)
    -> Maybe WorkflowExecutionSignaledEventAttributes
    -> f (Maybe WorkflowExecutionSignaledEventAttributes))
-> (WorkflowExecutionSignaledEventAttributes
    -> f WorkflowExecutionSignaledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionSignaledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionSignaledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionSignaledEventAttributes)
     (Maybe WorkflowExecutionSignaledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionSignaledEventAttributes WorkflowExecutionSignaledEventAttributes
x__val))
                        -> WorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecutionSignaledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionSignaledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionSignaledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionSignaledEventAttributes
y__
                 -> (WorkflowExecutionSignaledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionSignaledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionSignaledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionSignaledEventAttributes Maybe WorkflowExecutionSignaledEventAttributes
y__))
           (WorkflowExecutionSignaledEventAttributes
-> Lens'
     (Maybe WorkflowExecutionSignaledEventAttributes)
     WorkflowExecutionSignaledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionSignaledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionTerminatedEventAttributes" (Prelude.Maybe WorkflowExecutionTerminatedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTerminatedEventAttributes"
-> (Maybe WorkflowExecutionTerminatedEventAttributes
    -> f (Maybe WorkflowExecutionTerminatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionTerminatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionTerminatedEventAttributes
     -> f (Maybe WorkflowExecutionTerminatedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionTerminatedEventAttributes
    -> f (Maybe WorkflowExecutionTerminatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionTerminatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionTerminatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionTerminatedEventAttributes)
     (Maybe WorkflowExecutionTerminatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionTerminatedEventAttributes WorkflowExecutionTerminatedEventAttributes
x__val))
                     -> WorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecutionTerminatedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionTerminatedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionTerminatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionTerminatedEventAttributes
y__
              -> (WorkflowExecutionTerminatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionTerminatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionTerminatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionTerminatedEventAttributes Maybe WorkflowExecutionTerminatedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionTerminatedEventAttributes" WorkflowExecutionTerminatedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTerminatedEventAttributes"
-> (WorkflowExecutionTerminatedEventAttributes
    -> f WorkflowExecutionTerminatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionTerminatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionTerminatedEventAttributes
     -> f WorkflowExecutionTerminatedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionTerminatedEventAttributes
    -> f WorkflowExecutionTerminatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionTerminatedEventAttributes
  -> f (Maybe WorkflowExecutionTerminatedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionTerminatedEventAttributes
     -> f WorkflowExecutionTerminatedEventAttributes)
    -> Maybe WorkflowExecutionTerminatedEventAttributes
    -> f (Maybe WorkflowExecutionTerminatedEventAttributes))
-> (WorkflowExecutionTerminatedEventAttributes
    -> f WorkflowExecutionTerminatedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionTerminatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionTerminatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionTerminatedEventAttributes)
     (Maybe WorkflowExecutionTerminatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionTerminatedEventAttributes WorkflowExecutionTerminatedEventAttributes
x__val))
                        -> WorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecutionTerminatedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionTerminatedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionTerminatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionTerminatedEventAttributes
y__
                 -> (WorkflowExecutionTerminatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionTerminatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionTerminatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionTerminatedEventAttributes Maybe WorkflowExecutionTerminatedEventAttributes
y__))
           (WorkflowExecutionTerminatedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionTerminatedEventAttributes)
     WorkflowExecutionTerminatedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionTerminatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionCancelRequestedEventAttributes" (Prelude.Maybe WorkflowExecutionCancelRequestedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionCancelRequestedEventAttributes"
-> (Maybe WorkflowExecutionCancelRequestedEventAttributes
    -> f (Maybe WorkflowExecutionCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionCancelRequestedEventAttributes
     -> f (Maybe WorkflowExecutionCancelRequestedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionCancelRequestedEventAttributes
    -> f (Maybe WorkflowExecutionCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionCancelRequestedEventAttributes)
     (Maybe WorkflowExecutionCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes WorkflowExecutionCancelRequestedEventAttributes
x__val))
                     -> WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecutionCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCancelRequestedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionCancelRequestedEventAttributes
y__
              -> (WorkflowExecutionCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes Maybe WorkflowExecutionCancelRequestedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionCancelRequestedEventAttributes" WorkflowExecutionCancelRequestedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionCancelRequestedEventAttributes"
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> f WorkflowExecutionCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionCancelRequestedEventAttributes
     -> f WorkflowExecutionCancelRequestedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> f WorkflowExecutionCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionCancelRequestedEventAttributes
  -> f (Maybe WorkflowExecutionCancelRequestedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionCancelRequestedEventAttributes
     -> f WorkflowExecutionCancelRequestedEventAttributes)
    -> Maybe WorkflowExecutionCancelRequestedEventAttributes
    -> f (Maybe WorkflowExecutionCancelRequestedEventAttributes))
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> f WorkflowExecutionCancelRequestedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionCancelRequestedEventAttributes)
     (Maybe WorkflowExecutionCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes WorkflowExecutionCancelRequestedEventAttributes
x__val))
                        -> WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecutionCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCancelRequestedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionCancelRequestedEventAttributes
y__
                 -> (WorkflowExecutionCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes Maybe WorkflowExecutionCancelRequestedEventAttributes
y__))
           (WorkflowExecutionCancelRequestedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionCancelRequestedEventAttributes)
     WorkflowExecutionCancelRequestedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionCanceledEventAttributes" (Prelude.Maybe WorkflowExecutionCanceledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionCanceledEventAttributes"
-> (Maybe WorkflowExecutionCanceledEventAttributes
    -> f (Maybe WorkflowExecutionCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionCanceledEventAttributes
     -> f (Maybe WorkflowExecutionCanceledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionCanceledEventAttributes
    -> f (Maybe WorkflowExecutionCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionCanceledEventAttributes)
     (Maybe WorkflowExecutionCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionCanceledEventAttributes WorkflowExecutionCanceledEventAttributes
x__val))
                     -> WorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecutionCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCanceledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionCanceledEventAttributes
y__
              -> (WorkflowExecutionCanceledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCanceledEventAttributes Maybe WorkflowExecutionCanceledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionCanceledEventAttributes" WorkflowExecutionCanceledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionCanceledEventAttributes"
-> (WorkflowExecutionCanceledEventAttributes
    -> f WorkflowExecutionCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionCanceledEventAttributes
     -> f WorkflowExecutionCanceledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionCanceledEventAttributes
    -> f WorkflowExecutionCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionCanceledEventAttributes
  -> f (Maybe WorkflowExecutionCanceledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionCanceledEventAttributes
     -> f WorkflowExecutionCanceledEventAttributes)
    -> Maybe WorkflowExecutionCanceledEventAttributes
    -> f (Maybe WorkflowExecutionCanceledEventAttributes))
-> (WorkflowExecutionCanceledEventAttributes
    -> f WorkflowExecutionCanceledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionCanceledEventAttributes)
     (Maybe WorkflowExecutionCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionCanceledEventAttributes WorkflowExecutionCanceledEventAttributes
x__val))
                        -> WorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecutionCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCanceledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionCanceledEventAttributes
y__
                 -> (WorkflowExecutionCanceledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCanceledEventAttributes Maybe WorkflowExecutionCanceledEventAttributes
y__))
           (WorkflowExecutionCanceledEventAttributes
-> Lens'
     (Maybe WorkflowExecutionCanceledEventAttributes)
     WorkflowExecutionCanceledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'requestCancelExternalWorkflowExecutionInitiatedEventAttributes" (Prelude.Maybe RequestCancelExternalWorkflowExecutionInitiatedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy#
  "maybe'requestCancelExternalWorkflowExecutionInitiatedEventAttributes"
-> (Maybe
      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe
            RequestCancelExternalWorkflowExecutionInitiatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy#
  "maybe'requestCancelExternalWorkflowExecutionInitiatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe
       RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     -> f (Maybe
             RequestCancelExternalWorkflowExecutionInitiatedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe
      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe
            RequestCancelExternalWorkflowExecutionInitiatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe
      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe
         RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
     (Maybe
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__val))
                     -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
y__
              -> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
                   Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "requestCancelExternalWorkflowExecutionInitiatedEventAttributes" RequestCancelExternalWorkflowExecutionInitiatedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy#
  "requestCancelExternalWorkflowExecutionInitiatedEventAttributes"
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy#
  "requestCancelExternalWorkflowExecutionInitiatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe
    RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  -> f (Maybe
          RequestCancelExternalWorkflowExecutionInitiatedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
    -> Maybe
         RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe
            RequestCancelExternalWorkflowExecutionInitiatedEventAttributes))
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe
      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe
         RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
     (Maybe
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__val))
                        -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
y__
                 -> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
                      Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
y__))
           (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Lens'
     (Maybe
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'requestCancelExternalWorkflowExecutionFailedEventAttributes" (Prelude.Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy#
  "maybe'requestCancelExternalWorkflowExecutionFailedEventAttributes"
-> (Maybe
      RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> f (Maybe
            RequestCancelExternalWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy#
  "maybe'requestCancelExternalWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe
       RequestCancelExternalWorkflowExecutionFailedEventAttributes
     -> f (Maybe
             RequestCancelExternalWorkflowExecutionFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe
      RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> f (Maybe
            RequestCancelExternalWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe
      RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe
         RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)
     (Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__val))
                     -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
y__
              -> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes
                   Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "requestCancelExternalWorkflowExecutionFailedEventAttributes" RequestCancelExternalWorkflowExecutionFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy#
  "requestCancelExternalWorkflowExecutionFailedEventAttributes"
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy#
  "requestCancelExternalWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
     -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
  -> f (Maybe
          RequestCancelExternalWorkflowExecutionFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
     -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
    -> Maybe
         RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> f (Maybe
            RequestCancelExternalWorkflowExecutionFailedEventAttributes))
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe
      RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe
         RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)
     (Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__val))
                        -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
y__
                 -> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes
                      Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
y__))
           (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Lens'
     (Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'externalWorkflowExecutionCancelRequestedEventAttributes" (Prelude.Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy#
  "maybe'externalWorkflowExecutionCancelRequestedEventAttributes"
-> (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> f (Maybe
            ExternalWorkflowExecutionCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy#
  "maybe'externalWorkflowExecutionCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
     -> f (Maybe
             ExternalWorkflowExecutionCancelRequestedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> f (Maybe
            ExternalWorkflowExecutionCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
     (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes ExternalWorkflowExecutionCancelRequestedEventAttributes
x__val))
                     -> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just ExternalWorkflowExecutionCancelRequestedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
y__
              -> (ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ExternalWorkflowExecutionCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes
                   Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "externalWorkflowExecutionCancelRequestedEventAttributes" ExternalWorkflowExecutionCancelRequestedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "externalWorkflowExecutionCancelRequestedEventAttributes"
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "externalWorkflowExecutionCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ExternalWorkflowExecutionCancelRequestedEventAttributes
     -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
  -> f (Maybe
          ExternalWorkflowExecutionCancelRequestedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ExternalWorkflowExecutionCancelRequestedEventAttributes
     -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
    -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> f (Maybe
            ExternalWorkflowExecutionCancelRequestedEventAttributes))
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> f ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
     (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes ExternalWorkflowExecutionCancelRequestedEventAttributes
x__val))
                        -> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just ExternalWorkflowExecutionCancelRequestedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
y__
                 -> (ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ExternalWorkflowExecutionCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes
                      Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
y__))
           (ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Lens'
     (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ExternalWorkflowExecutionCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionContinuedAsNewEventAttributes" (Prelude.Maybe WorkflowExecutionContinuedAsNewEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionContinuedAsNewEventAttributes"
-> (Maybe WorkflowExecutionContinuedAsNewEventAttributes
    -> f (Maybe WorkflowExecutionContinuedAsNewEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionContinuedAsNewEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionContinuedAsNewEventAttributes
     -> f (Maybe WorkflowExecutionContinuedAsNewEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionContinuedAsNewEventAttributes
    -> f (Maybe WorkflowExecutionContinuedAsNewEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionContinuedAsNewEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionContinuedAsNewEventAttributes)
     (Maybe WorkflowExecutionContinuedAsNewEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes WorkflowExecutionContinuedAsNewEventAttributes
x__val))
                     -> WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowExecutionContinuedAsNewEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionContinuedAsNewEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionContinuedAsNewEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionContinuedAsNewEventAttributes
y__
              -> (WorkflowExecutionContinuedAsNewEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionContinuedAsNewEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes Maybe WorkflowExecutionContinuedAsNewEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionContinuedAsNewEventAttributes" WorkflowExecutionContinuedAsNewEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionContinuedAsNewEventAttributes"
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionContinuedAsNewEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionContinuedAsNewEventAttributes
     -> f WorkflowExecutionContinuedAsNewEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionContinuedAsNewEventAttributes
  -> f (Maybe WorkflowExecutionContinuedAsNewEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionContinuedAsNewEventAttributes
     -> f WorkflowExecutionContinuedAsNewEventAttributes)
    -> Maybe WorkflowExecutionContinuedAsNewEventAttributes
    -> f (Maybe WorkflowExecutionContinuedAsNewEventAttributes))
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionContinuedAsNewEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionContinuedAsNewEventAttributes)
     (Maybe WorkflowExecutionContinuedAsNewEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes WorkflowExecutionContinuedAsNewEventAttributes
x__val))
                        -> WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowExecutionContinuedAsNewEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionContinuedAsNewEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionContinuedAsNewEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionContinuedAsNewEventAttributes
y__
                 -> (WorkflowExecutionContinuedAsNewEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionContinuedAsNewEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes Maybe WorkflowExecutionContinuedAsNewEventAttributes
y__))
           (WorkflowExecutionContinuedAsNewEventAttributes
-> Lens'
     (Maybe WorkflowExecutionContinuedAsNewEventAttributes)
     WorkflowExecutionContinuedAsNewEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionContinuedAsNewEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'startChildWorkflowExecutionInitiatedEventAttributes" (Prelude.Maybe StartChildWorkflowExecutionInitiatedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startChildWorkflowExecutionInitiatedEventAttributes"
-> (Maybe StartChildWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe StartChildWorkflowExecutionInitiatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'startChildWorkflowExecutionInitiatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe StartChildWorkflowExecutionInitiatedEventAttributes
     -> f (Maybe StartChildWorkflowExecutionInitiatedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe StartChildWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe StartChildWorkflowExecutionInitiatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
     (Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes StartChildWorkflowExecutionInitiatedEventAttributes
x__val))
                     -> StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecutionInitiatedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe StartChildWorkflowExecutionInitiatedEventAttributes
y__
              -> (StartChildWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   StartChildWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes
                   Maybe StartChildWorkflowExecutionInitiatedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "startChildWorkflowExecutionInitiatedEventAttributes" StartChildWorkflowExecutionInitiatedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startChildWorkflowExecutionInitiatedEventAttributes"
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "startChildWorkflowExecutionInitiatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((StartChildWorkflowExecutionInitiatedEventAttributes
     -> f StartChildWorkflowExecutionInitiatedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe StartChildWorkflowExecutionInitiatedEventAttributes
  -> f (Maybe StartChildWorkflowExecutionInitiatedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((StartChildWorkflowExecutionInitiatedEventAttributes
     -> f StartChildWorkflowExecutionInitiatedEventAttributes)
    -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe StartChildWorkflowExecutionInitiatedEventAttributes))
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
     (Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes StartChildWorkflowExecutionInitiatedEventAttributes
x__val))
                        -> StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecutionInitiatedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe StartChildWorkflowExecutionInitiatedEventAttributes
y__
                 -> (StartChildWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      StartChildWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes
                      Maybe StartChildWorkflowExecutionInitiatedEventAttributes
y__))
           (StartChildWorkflowExecutionInitiatedEventAttributes
-> Lens'
     (Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
     StartChildWorkflowExecutionInitiatedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartChildWorkflowExecutionInitiatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'startChildWorkflowExecutionFailedEventAttributes" (Prelude.Maybe StartChildWorkflowExecutionFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startChildWorkflowExecutionFailedEventAttributes"
-> (Maybe StartChildWorkflowExecutionFailedEventAttributes
    -> f (Maybe StartChildWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'startChildWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe StartChildWorkflowExecutionFailedEventAttributes
     -> f (Maybe StartChildWorkflowExecutionFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe StartChildWorkflowExecutionFailedEventAttributes
    -> f (Maybe StartChildWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe StartChildWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe StartChildWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe StartChildWorkflowExecutionFailedEventAttributes)
     (Maybe StartChildWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes StartChildWorkflowExecutionFailedEventAttributes
x__val))
                     -> StartChildWorkflowExecutionFailedEventAttributes
-> Maybe StartChildWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecutionFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe StartChildWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe StartChildWorkflowExecutionFailedEventAttributes
y__
              -> (StartChildWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe StartChildWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   StartChildWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes Maybe StartChildWorkflowExecutionFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "startChildWorkflowExecutionFailedEventAttributes" StartChildWorkflowExecutionFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startChildWorkflowExecutionFailedEventAttributes"
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> f StartChildWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "startChildWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((StartChildWorkflowExecutionFailedEventAttributes
     -> f StartChildWorkflowExecutionFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> f StartChildWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe StartChildWorkflowExecutionFailedEventAttributes
  -> f (Maybe StartChildWorkflowExecutionFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((StartChildWorkflowExecutionFailedEventAttributes
     -> f StartChildWorkflowExecutionFailedEventAttributes)
    -> Maybe StartChildWorkflowExecutionFailedEventAttributes
    -> f (Maybe StartChildWorkflowExecutionFailedEventAttributes))
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> f StartChildWorkflowExecutionFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe StartChildWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe StartChildWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe StartChildWorkflowExecutionFailedEventAttributes)
     (Maybe StartChildWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes StartChildWorkflowExecutionFailedEventAttributes
x__val))
                        -> StartChildWorkflowExecutionFailedEventAttributes
-> Maybe StartChildWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecutionFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe StartChildWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe StartChildWorkflowExecutionFailedEventAttributes
y__
                 -> (StartChildWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe StartChildWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      StartChildWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes Maybe StartChildWorkflowExecutionFailedEventAttributes
y__))
           (StartChildWorkflowExecutionFailedEventAttributes
-> Lens'
     (Maybe StartChildWorkflowExecutionFailedEventAttributes)
     StartChildWorkflowExecutionFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens StartChildWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'childWorkflowExecutionStartedEventAttributes" (Prelude.Maybe ChildWorkflowExecutionStartedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowExecutionStartedEventAttributes"
-> (Maybe ChildWorkflowExecutionStartedEventAttributes
    -> f (Maybe ChildWorkflowExecutionStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'childWorkflowExecutionStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ChildWorkflowExecutionStartedEventAttributes
     -> f (Maybe ChildWorkflowExecutionStartedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ChildWorkflowExecutionStartedEventAttributes
    -> f (Maybe ChildWorkflowExecutionStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionStartedEventAttributes)
     (Maybe ChildWorkflowExecutionStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ChildWorkflowExecutionStartedEventAttributes ChildWorkflowExecutionStartedEventAttributes
x__val))
                     -> ChildWorkflowExecutionStartedEventAttributes
-> Maybe ChildWorkflowExecutionStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionStartedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionStartedEventAttributes
y__
              -> (ChildWorkflowExecutionStartedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ChildWorkflowExecutionStartedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionStartedEventAttributes Maybe ChildWorkflowExecutionStartedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "childWorkflowExecutionStartedEventAttributes" ChildWorkflowExecutionStartedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowExecutionStartedEventAttributes"
-> (ChildWorkflowExecutionStartedEventAttributes
    -> f ChildWorkflowExecutionStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "childWorkflowExecutionStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ChildWorkflowExecutionStartedEventAttributes
     -> f ChildWorkflowExecutionStartedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ChildWorkflowExecutionStartedEventAttributes
    -> f ChildWorkflowExecutionStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ChildWorkflowExecutionStartedEventAttributes
  -> f (Maybe ChildWorkflowExecutionStartedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ChildWorkflowExecutionStartedEventAttributes
     -> f ChildWorkflowExecutionStartedEventAttributes)
    -> Maybe ChildWorkflowExecutionStartedEventAttributes
    -> f (Maybe ChildWorkflowExecutionStartedEventAttributes))
-> (ChildWorkflowExecutionStartedEventAttributes
    -> f ChildWorkflowExecutionStartedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionStartedEventAttributes)
     (Maybe ChildWorkflowExecutionStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ChildWorkflowExecutionStartedEventAttributes ChildWorkflowExecutionStartedEventAttributes
x__val))
                        -> ChildWorkflowExecutionStartedEventAttributes
-> Maybe ChildWorkflowExecutionStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionStartedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionStartedEventAttributes
y__
                 -> (ChildWorkflowExecutionStartedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ChildWorkflowExecutionStartedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionStartedEventAttributes Maybe ChildWorkflowExecutionStartedEventAttributes
y__))
           (ChildWorkflowExecutionStartedEventAttributes
-> Lens'
     (Maybe ChildWorkflowExecutionStartedEventAttributes)
     ChildWorkflowExecutionStartedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowExecutionStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'childWorkflowExecutionCompletedEventAttributes" (Prelude.Maybe ChildWorkflowExecutionCompletedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowExecutionCompletedEventAttributes"
-> (Maybe ChildWorkflowExecutionCompletedEventAttributes
    -> f (Maybe ChildWorkflowExecutionCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'childWorkflowExecutionCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ChildWorkflowExecutionCompletedEventAttributes
     -> f (Maybe ChildWorkflowExecutionCompletedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ChildWorkflowExecutionCompletedEventAttributes
    -> f (Maybe ChildWorkflowExecutionCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionCompletedEventAttributes)
     (Maybe ChildWorkflowExecutionCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes ChildWorkflowExecutionCompletedEventAttributes
x__val))
                     -> ChildWorkflowExecutionCompletedEventAttributes
-> Maybe ChildWorkflowExecutionCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionCompletedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionCompletedEventAttributes
y__
              -> (ChildWorkflowExecutionCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ChildWorkflowExecutionCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes Maybe ChildWorkflowExecutionCompletedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "childWorkflowExecutionCompletedEventAttributes" ChildWorkflowExecutionCompletedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowExecutionCompletedEventAttributes"
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> f ChildWorkflowExecutionCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "childWorkflowExecutionCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ChildWorkflowExecutionCompletedEventAttributes
     -> f ChildWorkflowExecutionCompletedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> f ChildWorkflowExecutionCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ChildWorkflowExecutionCompletedEventAttributes
  -> f (Maybe ChildWorkflowExecutionCompletedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ChildWorkflowExecutionCompletedEventAttributes
     -> f ChildWorkflowExecutionCompletedEventAttributes)
    -> Maybe ChildWorkflowExecutionCompletedEventAttributes
    -> f (Maybe ChildWorkflowExecutionCompletedEventAttributes))
-> (ChildWorkflowExecutionCompletedEventAttributes
    -> f ChildWorkflowExecutionCompletedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionCompletedEventAttributes)
     (Maybe ChildWorkflowExecutionCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes ChildWorkflowExecutionCompletedEventAttributes
x__val))
                        -> ChildWorkflowExecutionCompletedEventAttributes
-> Maybe ChildWorkflowExecutionCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionCompletedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionCompletedEventAttributes
y__
                 -> (ChildWorkflowExecutionCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ChildWorkflowExecutionCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes Maybe ChildWorkflowExecutionCompletedEventAttributes
y__))
           (ChildWorkflowExecutionCompletedEventAttributes
-> Lens'
     (Maybe ChildWorkflowExecutionCompletedEventAttributes)
     ChildWorkflowExecutionCompletedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowExecutionCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'childWorkflowExecutionFailedEventAttributes" (Prelude.Maybe ChildWorkflowExecutionFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowExecutionFailedEventAttributes"
-> (Maybe ChildWorkflowExecutionFailedEventAttributes
    -> f (Maybe ChildWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'childWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ChildWorkflowExecutionFailedEventAttributes
     -> f (Maybe ChildWorkflowExecutionFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ChildWorkflowExecutionFailedEventAttributes
    -> f (Maybe ChildWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionFailedEventAttributes)
     (Maybe ChildWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ChildWorkflowExecutionFailedEventAttributes ChildWorkflowExecutionFailedEventAttributes
x__val))
                     -> ChildWorkflowExecutionFailedEventAttributes
-> Maybe ChildWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionFailedEventAttributes
y__
              -> (ChildWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ChildWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionFailedEventAttributes Maybe ChildWorkflowExecutionFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "childWorkflowExecutionFailedEventAttributes" ChildWorkflowExecutionFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowExecutionFailedEventAttributes"
-> (ChildWorkflowExecutionFailedEventAttributes
    -> f ChildWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "childWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ChildWorkflowExecutionFailedEventAttributes
     -> f ChildWorkflowExecutionFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ChildWorkflowExecutionFailedEventAttributes
    -> f ChildWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ChildWorkflowExecutionFailedEventAttributes
  -> f (Maybe ChildWorkflowExecutionFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ChildWorkflowExecutionFailedEventAttributes
     -> f ChildWorkflowExecutionFailedEventAttributes)
    -> Maybe ChildWorkflowExecutionFailedEventAttributes
    -> f (Maybe ChildWorkflowExecutionFailedEventAttributes))
-> (ChildWorkflowExecutionFailedEventAttributes
    -> f ChildWorkflowExecutionFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionFailedEventAttributes)
     (Maybe ChildWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ChildWorkflowExecutionFailedEventAttributes ChildWorkflowExecutionFailedEventAttributes
x__val))
                        -> ChildWorkflowExecutionFailedEventAttributes
-> Maybe ChildWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionFailedEventAttributes
y__
                 -> (ChildWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ChildWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionFailedEventAttributes Maybe ChildWorkflowExecutionFailedEventAttributes
y__))
           (ChildWorkflowExecutionFailedEventAttributes
-> Lens'
     (Maybe ChildWorkflowExecutionFailedEventAttributes)
     ChildWorkflowExecutionFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'childWorkflowExecutionCanceledEventAttributes" (Prelude.Maybe ChildWorkflowExecutionCanceledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowExecutionCanceledEventAttributes"
-> (Maybe ChildWorkflowExecutionCanceledEventAttributes
    -> f (Maybe ChildWorkflowExecutionCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'childWorkflowExecutionCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ChildWorkflowExecutionCanceledEventAttributes
     -> f (Maybe ChildWorkflowExecutionCanceledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ChildWorkflowExecutionCanceledEventAttributes
    -> f (Maybe ChildWorkflowExecutionCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionCanceledEventAttributes)
     (Maybe ChildWorkflowExecutionCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes ChildWorkflowExecutionCanceledEventAttributes
x__val))
                     -> ChildWorkflowExecutionCanceledEventAttributes
-> Maybe ChildWorkflowExecutionCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionCanceledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionCanceledEventAttributes
y__
              -> (ChildWorkflowExecutionCanceledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ChildWorkflowExecutionCanceledEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes Maybe ChildWorkflowExecutionCanceledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "childWorkflowExecutionCanceledEventAttributes" ChildWorkflowExecutionCanceledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowExecutionCanceledEventAttributes"
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> f ChildWorkflowExecutionCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "childWorkflowExecutionCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ChildWorkflowExecutionCanceledEventAttributes
     -> f ChildWorkflowExecutionCanceledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> f ChildWorkflowExecutionCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ChildWorkflowExecutionCanceledEventAttributes
  -> f (Maybe ChildWorkflowExecutionCanceledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ChildWorkflowExecutionCanceledEventAttributes
     -> f ChildWorkflowExecutionCanceledEventAttributes)
    -> Maybe ChildWorkflowExecutionCanceledEventAttributes
    -> f (Maybe ChildWorkflowExecutionCanceledEventAttributes))
-> (ChildWorkflowExecutionCanceledEventAttributes
    -> f ChildWorkflowExecutionCanceledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionCanceledEventAttributes)
     (Maybe ChildWorkflowExecutionCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes ChildWorkflowExecutionCanceledEventAttributes
x__val))
                        -> ChildWorkflowExecutionCanceledEventAttributes
-> Maybe ChildWorkflowExecutionCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionCanceledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionCanceledEventAttributes
y__
                 -> (ChildWorkflowExecutionCanceledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ChildWorkflowExecutionCanceledEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes Maybe ChildWorkflowExecutionCanceledEventAttributes
y__))
           (ChildWorkflowExecutionCanceledEventAttributes
-> Lens'
     (Maybe ChildWorkflowExecutionCanceledEventAttributes)
     ChildWorkflowExecutionCanceledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowExecutionCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'childWorkflowExecutionTimedOutEventAttributes" (Prelude.Maybe ChildWorkflowExecutionTimedOutEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowExecutionTimedOutEventAttributes"
-> (Maybe ChildWorkflowExecutionTimedOutEventAttributes
    -> f (Maybe ChildWorkflowExecutionTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'childWorkflowExecutionTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ChildWorkflowExecutionTimedOutEventAttributes
     -> f (Maybe ChildWorkflowExecutionTimedOutEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ChildWorkflowExecutionTimedOutEventAttributes
    -> f (Maybe ChildWorkflowExecutionTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionTimedOutEventAttributes)
     (Maybe ChildWorkflowExecutionTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes ChildWorkflowExecutionTimedOutEventAttributes
x__val))
                     -> ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe ChildWorkflowExecutionTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionTimedOutEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionTimedOutEventAttributes
y__
              -> (ChildWorkflowExecutionTimedOutEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ChildWorkflowExecutionTimedOutEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes Maybe ChildWorkflowExecutionTimedOutEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "childWorkflowExecutionTimedOutEventAttributes" ChildWorkflowExecutionTimedOutEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowExecutionTimedOutEventAttributes"
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "childWorkflowExecutionTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ChildWorkflowExecutionTimedOutEventAttributes
     -> f ChildWorkflowExecutionTimedOutEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ChildWorkflowExecutionTimedOutEventAttributes
  -> f (Maybe ChildWorkflowExecutionTimedOutEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ChildWorkflowExecutionTimedOutEventAttributes
     -> f ChildWorkflowExecutionTimedOutEventAttributes)
    -> Maybe ChildWorkflowExecutionTimedOutEventAttributes
    -> f (Maybe ChildWorkflowExecutionTimedOutEventAttributes))
-> (ChildWorkflowExecutionTimedOutEventAttributes
    -> f ChildWorkflowExecutionTimedOutEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionTimedOutEventAttributes)
     (Maybe ChildWorkflowExecutionTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes ChildWorkflowExecutionTimedOutEventAttributes
x__val))
                        -> ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe ChildWorkflowExecutionTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionTimedOutEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionTimedOutEventAttributes
y__
                 -> (ChildWorkflowExecutionTimedOutEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ChildWorkflowExecutionTimedOutEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes Maybe ChildWorkflowExecutionTimedOutEventAttributes
y__))
           (ChildWorkflowExecutionTimedOutEventAttributes
-> Lens'
     (Maybe ChildWorkflowExecutionTimedOutEventAttributes)
     ChildWorkflowExecutionTimedOutEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowExecutionTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'childWorkflowExecutionTerminatedEventAttributes" (Prelude.Maybe ChildWorkflowExecutionTerminatedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'childWorkflowExecutionTerminatedEventAttributes"
-> (Maybe ChildWorkflowExecutionTerminatedEventAttributes
    -> f (Maybe ChildWorkflowExecutionTerminatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'childWorkflowExecutionTerminatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ChildWorkflowExecutionTerminatedEventAttributes
     -> f (Maybe ChildWorkflowExecutionTerminatedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ChildWorkflowExecutionTerminatedEventAttributes
    -> f (Maybe ChildWorkflowExecutionTerminatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionTerminatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionTerminatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionTerminatedEventAttributes)
     (Maybe ChildWorkflowExecutionTerminatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes ChildWorkflowExecutionTerminatedEventAttributes
x__val))
                     -> ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe ChildWorkflowExecutionTerminatedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionTerminatedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionTerminatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionTerminatedEventAttributes
y__
              -> (ChildWorkflowExecutionTerminatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ChildWorkflowExecutionTerminatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes Maybe ChildWorkflowExecutionTerminatedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "childWorkflowExecutionTerminatedEventAttributes" ChildWorkflowExecutionTerminatedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowExecutionTerminatedEventAttributes"
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "childWorkflowExecutionTerminatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ChildWorkflowExecutionTerminatedEventAttributes
     -> f ChildWorkflowExecutionTerminatedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ChildWorkflowExecutionTerminatedEventAttributes
  -> f (Maybe ChildWorkflowExecutionTerminatedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ChildWorkflowExecutionTerminatedEventAttributes
     -> f ChildWorkflowExecutionTerminatedEventAttributes)
    -> Maybe ChildWorkflowExecutionTerminatedEventAttributes
    -> f (Maybe ChildWorkflowExecutionTerminatedEventAttributes))
-> (ChildWorkflowExecutionTerminatedEventAttributes
    -> f ChildWorkflowExecutionTerminatedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ChildWorkflowExecutionTerminatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionTerminatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ChildWorkflowExecutionTerminatedEventAttributes)
     (Maybe ChildWorkflowExecutionTerminatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes ChildWorkflowExecutionTerminatedEventAttributes
x__val))
                        -> ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe ChildWorkflowExecutionTerminatedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionTerminatedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionTerminatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ChildWorkflowExecutionTerminatedEventAttributes
y__
                 -> (ChildWorkflowExecutionTerminatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ChildWorkflowExecutionTerminatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes Maybe ChildWorkflowExecutionTerminatedEventAttributes
y__))
           (ChildWorkflowExecutionTerminatedEventAttributes
-> Lens'
     (Maybe ChildWorkflowExecutionTerminatedEventAttributes)
     ChildWorkflowExecutionTerminatedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ChildWorkflowExecutionTerminatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'signalExternalWorkflowExecutionInitiatedEventAttributes" (Prelude.Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy#
  "maybe'signalExternalWorkflowExecutionInitiatedEventAttributes"
-> (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe
            SignalExternalWorkflowExecutionInitiatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy#
  "maybe'signalExternalWorkflowExecutionInitiatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
     -> f (Maybe
             SignalExternalWorkflowExecutionInitiatedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe
            SignalExternalWorkflowExecutionInitiatedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
     (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes SignalExternalWorkflowExecutionInitiatedEventAttributes
x__val))
                     -> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecutionInitiatedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
y__
              -> (SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   SignalExternalWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes
                   Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "signalExternalWorkflowExecutionInitiatedEventAttributes" SignalExternalWorkflowExecutionInitiatedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalExternalWorkflowExecutionInitiatedEventAttributes"
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "signalExternalWorkflowExecutionInitiatedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((SignalExternalWorkflowExecutionInitiatedEventAttributes
     -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
  -> f (Maybe
          SignalExternalWorkflowExecutionInitiatedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((SignalExternalWorkflowExecutionInitiatedEventAttributes
     -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
    -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> f (Maybe
            SignalExternalWorkflowExecutionInitiatedEventAttributes))
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
     (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes SignalExternalWorkflowExecutionInitiatedEventAttributes
x__val))
                        -> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecutionInitiatedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
y__
                 -> (SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      SignalExternalWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes
                      Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
y__))
           (SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Lens'
     (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SignalExternalWorkflowExecutionInitiatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'signalExternalWorkflowExecutionFailedEventAttributes" (Prelude.Maybe SignalExternalWorkflowExecutionFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'signalExternalWorkflowExecutionFailedEventAttributes"
-> (Maybe SignalExternalWorkflowExecutionFailedEventAttributes
    -> f (Maybe SignalExternalWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'signalExternalWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe SignalExternalWorkflowExecutionFailedEventAttributes
     -> f (Maybe SignalExternalWorkflowExecutionFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe SignalExternalWorkflowExecutionFailedEventAttributes
    -> f (Maybe SignalExternalWorkflowExecutionFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
     (Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes SignalExternalWorkflowExecutionFailedEventAttributes
x__val))
                     -> SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecutionFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe SignalExternalWorkflowExecutionFailedEventAttributes
y__
              -> (SignalExternalWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   SignalExternalWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes
                   Maybe SignalExternalWorkflowExecutionFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "signalExternalWorkflowExecutionFailedEventAttributes" SignalExternalWorkflowExecutionFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalExternalWorkflowExecutionFailedEventAttributes"
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "signalExternalWorkflowExecutionFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((SignalExternalWorkflowExecutionFailedEventAttributes
     -> f SignalExternalWorkflowExecutionFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe SignalExternalWorkflowExecutionFailedEventAttributes
  -> f (Maybe SignalExternalWorkflowExecutionFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((SignalExternalWorkflowExecutionFailedEventAttributes
     -> f SignalExternalWorkflowExecutionFailedEventAttributes)
    -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
    -> f (Maybe SignalExternalWorkflowExecutionFailedEventAttributes))
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
     (Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes SignalExternalWorkflowExecutionFailedEventAttributes
x__val))
                        -> SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecutionFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe SignalExternalWorkflowExecutionFailedEventAttributes
y__
                 -> (SignalExternalWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      SignalExternalWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes
                      Maybe SignalExternalWorkflowExecutionFailedEventAttributes
y__))
           (SignalExternalWorkflowExecutionFailedEventAttributes
-> Lens'
     (Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
     SignalExternalWorkflowExecutionFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens SignalExternalWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'externalWorkflowExecutionSignaledEventAttributes" (Prelude.Maybe ExternalWorkflowExecutionSignaledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'externalWorkflowExecutionSignaledEventAttributes"
-> (Maybe ExternalWorkflowExecutionSignaledEventAttributes
    -> f (Maybe ExternalWorkflowExecutionSignaledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'externalWorkflowExecutionSignaledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ExternalWorkflowExecutionSignaledEventAttributes
     -> f (Maybe ExternalWorkflowExecutionSignaledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ExternalWorkflowExecutionSignaledEventAttributes
    -> f (Maybe ExternalWorkflowExecutionSignaledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ExternalWorkflowExecutionSignaledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ExternalWorkflowExecutionSignaledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ExternalWorkflowExecutionSignaledEventAttributes)
     (Maybe ExternalWorkflowExecutionSignaledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes ExternalWorkflowExecutionSignaledEventAttributes
x__val))
                     -> ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe ExternalWorkflowExecutionSignaledEventAttributes
forall a. a -> Maybe a
Prelude.Just ExternalWorkflowExecutionSignaledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ExternalWorkflowExecutionSignaledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ExternalWorkflowExecutionSignaledEventAttributes
y__
              -> (ExternalWorkflowExecutionSignaledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ExternalWorkflowExecutionSignaledEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes Maybe ExternalWorkflowExecutionSignaledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "externalWorkflowExecutionSignaledEventAttributes" ExternalWorkflowExecutionSignaledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "externalWorkflowExecutionSignaledEventAttributes"
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "externalWorkflowExecutionSignaledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ExternalWorkflowExecutionSignaledEventAttributes
     -> f ExternalWorkflowExecutionSignaledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ExternalWorkflowExecutionSignaledEventAttributes
  -> f (Maybe ExternalWorkflowExecutionSignaledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ExternalWorkflowExecutionSignaledEventAttributes
     -> f ExternalWorkflowExecutionSignaledEventAttributes)
    -> Maybe ExternalWorkflowExecutionSignaledEventAttributes
    -> f (Maybe ExternalWorkflowExecutionSignaledEventAttributes))
-> (ExternalWorkflowExecutionSignaledEventAttributes
    -> f ExternalWorkflowExecutionSignaledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ExternalWorkflowExecutionSignaledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ExternalWorkflowExecutionSignaledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ExternalWorkflowExecutionSignaledEventAttributes)
     (Maybe ExternalWorkflowExecutionSignaledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes ExternalWorkflowExecutionSignaledEventAttributes
x__val))
                        -> ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe ExternalWorkflowExecutionSignaledEventAttributes
forall a. a -> Maybe a
Prelude.Just ExternalWorkflowExecutionSignaledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ExternalWorkflowExecutionSignaledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ExternalWorkflowExecutionSignaledEventAttributes
y__
                 -> (ExternalWorkflowExecutionSignaledEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ExternalWorkflowExecutionSignaledEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes Maybe ExternalWorkflowExecutionSignaledEventAttributes
y__))
           (ExternalWorkflowExecutionSignaledEventAttributes
-> Lens'
     (Maybe ExternalWorkflowExecutionSignaledEventAttributes)
     ExternalWorkflowExecutionSignaledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ExternalWorkflowExecutionSignaledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'upsertWorkflowSearchAttributesEventAttributes" (Prelude.Maybe UpsertWorkflowSearchAttributesEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'upsertWorkflowSearchAttributesEventAttributes"
-> (Maybe UpsertWorkflowSearchAttributesEventAttributes
    -> f (Maybe UpsertWorkflowSearchAttributesEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'upsertWorkflowSearchAttributesEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe UpsertWorkflowSearchAttributesEventAttributes
     -> f (Maybe UpsertWorkflowSearchAttributesEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe UpsertWorkflowSearchAttributesEventAttributes
    -> f (Maybe UpsertWorkflowSearchAttributesEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe UpsertWorkflowSearchAttributesEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe UpsertWorkflowSearchAttributesEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe UpsertWorkflowSearchAttributesEventAttributes)
     (Maybe UpsertWorkflowSearchAttributesEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes UpsertWorkflowSearchAttributesEventAttributes
x__val))
                     -> UpsertWorkflowSearchAttributesEventAttributes
-> Maybe UpsertWorkflowSearchAttributesEventAttributes
forall a. a -> Maybe a
Prelude.Just UpsertWorkflowSearchAttributesEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe UpsertWorkflowSearchAttributesEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe UpsertWorkflowSearchAttributesEventAttributes
y__
              -> (UpsertWorkflowSearchAttributesEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe UpsertWorkflowSearchAttributesEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   UpsertWorkflowSearchAttributesEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes Maybe UpsertWorkflowSearchAttributesEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "upsertWorkflowSearchAttributesEventAttributes" UpsertWorkflowSearchAttributesEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "upsertWorkflowSearchAttributesEventAttributes"
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> f UpsertWorkflowSearchAttributesEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "upsertWorkflowSearchAttributesEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((UpsertWorkflowSearchAttributesEventAttributes
     -> f UpsertWorkflowSearchAttributesEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> f UpsertWorkflowSearchAttributesEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe UpsertWorkflowSearchAttributesEventAttributes
  -> f (Maybe UpsertWorkflowSearchAttributesEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((UpsertWorkflowSearchAttributesEventAttributes
     -> f UpsertWorkflowSearchAttributesEventAttributes)
    -> Maybe UpsertWorkflowSearchAttributesEventAttributes
    -> f (Maybe UpsertWorkflowSearchAttributesEventAttributes))
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> f UpsertWorkflowSearchAttributesEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe UpsertWorkflowSearchAttributesEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe UpsertWorkflowSearchAttributesEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe UpsertWorkflowSearchAttributesEventAttributes)
     (Maybe UpsertWorkflowSearchAttributesEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes UpsertWorkflowSearchAttributesEventAttributes
x__val))
                        -> UpsertWorkflowSearchAttributesEventAttributes
-> Maybe UpsertWorkflowSearchAttributesEventAttributes
forall a. a -> Maybe a
Prelude.Just UpsertWorkflowSearchAttributesEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe UpsertWorkflowSearchAttributesEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe UpsertWorkflowSearchAttributesEventAttributes
y__
                 -> (UpsertWorkflowSearchAttributesEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe UpsertWorkflowSearchAttributesEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      UpsertWorkflowSearchAttributesEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes Maybe UpsertWorkflowSearchAttributesEventAttributes
y__))
           (UpsertWorkflowSearchAttributesEventAttributes
-> Lens'
     (Maybe UpsertWorkflowSearchAttributesEventAttributes)
     UpsertWorkflowSearchAttributesEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens UpsertWorkflowSearchAttributesEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionUpdateAcceptedEventAttributes" (Prelude.Maybe WorkflowExecutionUpdateAcceptedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionUpdateAcceptedEventAttributes"
-> (Maybe WorkflowExecutionUpdateAcceptedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateAcceptedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionUpdateAcceptedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionUpdateAcceptedEventAttributes
     -> f (Maybe WorkflowExecutionUpdateAcceptedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionUpdateAcceptedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateAcceptedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
     (Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes WorkflowExecutionUpdateAcceptedEventAttributes
x__val))
                     -> WorkflowExecutionUpdateAcceptedEventAttributes
-> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateAcceptedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateAcceptedEventAttributes
y__
              -> (WorkflowExecutionUpdateAcceptedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionUpdateAcceptedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes Maybe WorkflowExecutionUpdateAcceptedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionUpdateAcceptedEventAttributes" WorkflowExecutionUpdateAcceptedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionUpdateAcceptedEventAttributes"
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionUpdateAcceptedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionUpdateAcceptedEventAttributes
     -> f WorkflowExecutionUpdateAcceptedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionUpdateAcceptedEventAttributes
  -> f (Maybe WorkflowExecutionUpdateAcceptedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionUpdateAcceptedEventAttributes
     -> f WorkflowExecutionUpdateAcceptedEventAttributes)
    -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateAcceptedEventAttributes))
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
     (Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes WorkflowExecutionUpdateAcceptedEventAttributes
x__val))
                        -> WorkflowExecutionUpdateAcceptedEventAttributes
-> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateAcceptedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateAcceptedEventAttributes
y__
                 -> (WorkflowExecutionUpdateAcceptedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionUpdateAcceptedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes Maybe WorkflowExecutionUpdateAcceptedEventAttributes
y__))
           (WorkflowExecutionUpdateAcceptedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
     WorkflowExecutionUpdateAcceptedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionUpdateAcceptedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionUpdateRejectedEventAttributes" (Prelude.Maybe WorkflowExecutionUpdateRejectedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionUpdateRejectedEventAttributes"
-> (Maybe WorkflowExecutionUpdateRejectedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateRejectedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionUpdateRejectedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionUpdateRejectedEventAttributes
     -> f (Maybe WorkflowExecutionUpdateRejectedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionUpdateRejectedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateRejectedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateRejectedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateRejectedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateRejectedEventAttributes)
     (Maybe WorkflowExecutionUpdateRejectedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes WorkflowExecutionUpdateRejectedEventAttributes
x__val))
                     -> WorkflowExecutionUpdateRejectedEventAttributes
-> Maybe WorkflowExecutionUpdateRejectedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateRejectedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateRejectedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateRejectedEventAttributes
y__
              -> (WorkflowExecutionUpdateRejectedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateRejectedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionUpdateRejectedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes Maybe WorkflowExecutionUpdateRejectedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionUpdateRejectedEventAttributes" WorkflowExecutionUpdateRejectedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionUpdateRejectedEventAttributes"
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionUpdateRejectedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionUpdateRejectedEventAttributes
     -> f WorkflowExecutionUpdateRejectedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionUpdateRejectedEventAttributes
  -> f (Maybe WorkflowExecutionUpdateRejectedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionUpdateRejectedEventAttributes
     -> f WorkflowExecutionUpdateRejectedEventAttributes)
    -> Maybe WorkflowExecutionUpdateRejectedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateRejectedEventAttributes))
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateRejectedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateRejectedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateRejectedEventAttributes)
     (Maybe WorkflowExecutionUpdateRejectedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes WorkflowExecutionUpdateRejectedEventAttributes
x__val))
                        -> WorkflowExecutionUpdateRejectedEventAttributes
-> Maybe WorkflowExecutionUpdateRejectedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateRejectedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateRejectedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateRejectedEventAttributes
y__
                 -> (WorkflowExecutionUpdateRejectedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateRejectedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionUpdateRejectedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes Maybe WorkflowExecutionUpdateRejectedEventAttributes
y__))
           (WorkflowExecutionUpdateRejectedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionUpdateRejectedEventAttributes)
     WorkflowExecutionUpdateRejectedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionUpdateRejectedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionUpdateCompletedEventAttributes" (Prelude.Maybe WorkflowExecutionUpdateCompletedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionUpdateCompletedEventAttributes"
-> (Maybe WorkflowExecutionUpdateCompletedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionUpdateCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionUpdateCompletedEventAttributes
     -> f (Maybe WorkflowExecutionUpdateCompletedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionUpdateCompletedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateCompletedEventAttributes)
     (Maybe WorkflowExecutionUpdateCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes WorkflowExecutionUpdateCompletedEventAttributes
x__val))
                     -> WorkflowExecutionUpdateCompletedEventAttributes
-> Maybe WorkflowExecutionUpdateCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateCompletedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateCompletedEventAttributes
y__
              -> (WorkflowExecutionUpdateCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionUpdateCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes Maybe WorkflowExecutionUpdateCompletedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionUpdateCompletedEventAttributes" WorkflowExecutionUpdateCompletedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionUpdateCompletedEventAttributes"
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionUpdateCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionUpdateCompletedEventAttributes
     -> f WorkflowExecutionUpdateCompletedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionUpdateCompletedEventAttributes
  -> f (Maybe WorkflowExecutionUpdateCompletedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionUpdateCompletedEventAttributes
     -> f WorkflowExecutionUpdateCompletedEventAttributes)
    -> Maybe WorkflowExecutionUpdateCompletedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateCompletedEventAttributes))
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateCompletedEventAttributes)
     (Maybe WorkflowExecutionUpdateCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes WorkflowExecutionUpdateCompletedEventAttributes
x__val))
                        -> WorkflowExecutionUpdateCompletedEventAttributes
-> Maybe WorkflowExecutionUpdateCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateCompletedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateCompletedEventAttributes
y__
                 -> (WorkflowExecutionUpdateCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionUpdateCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes Maybe WorkflowExecutionUpdateCompletedEventAttributes
y__))
           (WorkflowExecutionUpdateCompletedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionUpdateCompletedEventAttributes)
     WorkflowExecutionUpdateCompletedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionUpdateCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowPropertiesModifiedExternallyEventAttributes" (Prelude.Maybe WorkflowPropertiesModifiedExternallyEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowPropertiesModifiedExternallyEventAttributes"
-> (Maybe WorkflowPropertiesModifiedExternallyEventAttributes
    -> f (Maybe WorkflowPropertiesModifiedExternallyEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowPropertiesModifiedExternallyEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowPropertiesModifiedExternallyEventAttributes
     -> f (Maybe WorkflowPropertiesModifiedExternallyEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowPropertiesModifiedExternallyEventAttributes
    -> f (Maybe WorkflowPropertiesModifiedExternallyEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
     (Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes WorkflowPropertiesModifiedExternallyEventAttributes
x__val))
                     -> WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowPropertiesModifiedExternallyEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowPropertiesModifiedExternallyEventAttributes
y__
              -> (WorkflowPropertiesModifiedExternallyEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowPropertiesModifiedExternallyEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes
                   Maybe WorkflowPropertiesModifiedExternallyEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowPropertiesModifiedExternallyEventAttributes" WorkflowPropertiesModifiedExternallyEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowPropertiesModifiedExternallyEventAttributes"
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowPropertiesModifiedExternallyEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowPropertiesModifiedExternallyEventAttributes
     -> f WorkflowPropertiesModifiedExternallyEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowPropertiesModifiedExternallyEventAttributes
  -> f (Maybe WorkflowPropertiesModifiedExternallyEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowPropertiesModifiedExternallyEventAttributes
     -> f WorkflowPropertiesModifiedExternallyEventAttributes)
    -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
    -> f (Maybe WorkflowPropertiesModifiedExternallyEventAttributes))
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
     (Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes WorkflowPropertiesModifiedExternallyEventAttributes
x__val))
                        -> WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowPropertiesModifiedExternallyEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowPropertiesModifiedExternallyEventAttributes
y__
                 -> (WorkflowPropertiesModifiedExternallyEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowPropertiesModifiedExternallyEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes
                      Maybe WorkflowPropertiesModifiedExternallyEventAttributes
y__))
           (WorkflowPropertiesModifiedExternallyEventAttributes
-> Lens'
     (Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
     WorkflowPropertiesModifiedExternallyEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowPropertiesModifiedExternallyEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'activityPropertiesModifiedExternallyEventAttributes" (Prelude.Maybe ActivityPropertiesModifiedExternallyEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'activityPropertiesModifiedExternallyEventAttributes"
-> (Maybe ActivityPropertiesModifiedExternallyEventAttributes
    -> f (Maybe ActivityPropertiesModifiedExternallyEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'activityPropertiesModifiedExternallyEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe ActivityPropertiesModifiedExternallyEventAttributes
     -> f (Maybe ActivityPropertiesModifiedExternallyEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe ActivityPropertiesModifiedExternallyEventAttributes
    -> f (Maybe ActivityPropertiesModifiedExternallyEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityPropertiesModifiedExternallyEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityPropertiesModifiedExternallyEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityPropertiesModifiedExternallyEventAttributes)
     (Maybe ActivityPropertiesModifiedExternallyEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes ActivityPropertiesModifiedExternallyEventAttributes
x__val))
                     -> ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe ActivityPropertiesModifiedExternallyEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityPropertiesModifiedExternallyEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityPropertiesModifiedExternallyEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityPropertiesModifiedExternallyEventAttributes
y__
              -> (ActivityPropertiesModifiedExternallyEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   ActivityPropertiesModifiedExternallyEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes
                   Maybe ActivityPropertiesModifiedExternallyEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "activityPropertiesModifiedExternallyEventAttributes" ActivityPropertiesModifiedExternallyEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "activityPropertiesModifiedExternallyEventAttributes"
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> f ActivityPropertiesModifiedExternallyEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "activityPropertiesModifiedExternallyEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((ActivityPropertiesModifiedExternallyEventAttributes
     -> f ActivityPropertiesModifiedExternallyEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> f ActivityPropertiesModifiedExternallyEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe ActivityPropertiesModifiedExternallyEventAttributes
  -> f (Maybe ActivityPropertiesModifiedExternallyEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((ActivityPropertiesModifiedExternallyEventAttributes
     -> f ActivityPropertiesModifiedExternallyEventAttributes)
    -> Maybe ActivityPropertiesModifiedExternallyEventAttributes
    -> f (Maybe ActivityPropertiesModifiedExternallyEventAttributes))
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> f ActivityPropertiesModifiedExternallyEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe ActivityPropertiesModifiedExternallyEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe ActivityPropertiesModifiedExternallyEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe ActivityPropertiesModifiedExternallyEventAttributes)
     (Maybe ActivityPropertiesModifiedExternallyEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes ActivityPropertiesModifiedExternallyEventAttributes
x__val))
                        -> ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe ActivityPropertiesModifiedExternallyEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityPropertiesModifiedExternallyEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe ActivityPropertiesModifiedExternallyEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe ActivityPropertiesModifiedExternallyEventAttributes
y__
                 -> (ActivityPropertiesModifiedExternallyEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      ActivityPropertiesModifiedExternallyEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes
                      Maybe ActivityPropertiesModifiedExternallyEventAttributes
y__))
           (ActivityPropertiesModifiedExternallyEventAttributes
-> Lens'
     (Maybe ActivityPropertiesModifiedExternallyEventAttributes)
     ActivityPropertiesModifiedExternallyEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens ActivityPropertiesModifiedExternallyEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowPropertiesModifiedEventAttributes" (Prelude.Maybe WorkflowPropertiesModifiedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowPropertiesModifiedEventAttributes"
-> (Maybe WorkflowPropertiesModifiedEventAttributes
    -> f (Maybe WorkflowPropertiesModifiedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowPropertiesModifiedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowPropertiesModifiedEventAttributes
     -> f (Maybe WorkflowPropertiesModifiedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowPropertiesModifiedEventAttributes
    -> f (Maybe WorkflowPropertiesModifiedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowPropertiesModifiedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowPropertiesModifiedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowPropertiesModifiedEventAttributes)
     (Maybe WorkflowPropertiesModifiedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowPropertiesModifiedEventAttributes WorkflowPropertiesModifiedEventAttributes
x__val))
                     -> WorkflowPropertiesModifiedEventAttributes
-> Maybe WorkflowPropertiesModifiedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowPropertiesModifiedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowPropertiesModifiedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowPropertiesModifiedEventAttributes
y__
              -> (WorkflowPropertiesModifiedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowPropertiesModifiedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowPropertiesModifiedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowPropertiesModifiedEventAttributes Maybe WorkflowPropertiesModifiedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowPropertiesModifiedEventAttributes" WorkflowPropertiesModifiedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowPropertiesModifiedEventAttributes"
-> (WorkflowPropertiesModifiedEventAttributes
    -> f WorkflowPropertiesModifiedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowPropertiesModifiedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowPropertiesModifiedEventAttributes
     -> f WorkflowPropertiesModifiedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowPropertiesModifiedEventAttributes
    -> f WorkflowPropertiesModifiedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowPropertiesModifiedEventAttributes
  -> f (Maybe WorkflowPropertiesModifiedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowPropertiesModifiedEventAttributes
     -> f WorkflowPropertiesModifiedEventAttributes)
    -> Maybe WorkflowPropertiesModifiedEventAttributes
    -> f (Maybe WorkflowPropertiesModifiedEventAttributes))
-> (WorkflowPropertiesModifiedEventAttributes
    -> f WorkflowPropertiesModifiedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowPropertiesModifiedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowPropertiesModifiedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowPropertiesModifiedEventAttributes)
     (Maybe WorkflowPropertiesModifiedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowPropertiesModifiedEventAttributes WorkflowPropertiesModifiedEventAttributes
x__val))
                        -> WorkflowPropertiesModifiedEventAttributes
-> Maybe WorkflowPropertiesModifiedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowPropertiesModifiedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowPropertiesModifiedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowPropertiesModifiedEventAttributes
y__
                 -> (WorkflowPropertiesModifiedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowPropertiesModifiedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowPropertiesModifiedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowPropertiesModifiedEventAttributes Maybe WorkflowPropertiesModifiedEventAttributes
y__))
           (WorkflowPropertiesModifiedEventAttributes
-> Lens'
     (Maybe WorkflowPropertiesModifiedEventAttributes)
     WorkflowPropertiesModifiedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowPropertiesModifiedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'workflowExecutionUpdateAdmittedEventAttributes" (Prelude.Maybe WorkflowExecutionUpdateAdmittedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionUpdateAdmittedEventAttributes"
-> (Maybe WorkflowExecutionUpdateAdmittedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateAdmittedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'workflowExecutionUpdateAdmittedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe WorkflowExecutionUpdateAdmittedEventAttributes
     -> f (Maybe WorkflowExecutionUpdateAdmittedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe WorkflowExecutionUpdateAdmittedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateAdmittedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
     (Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes WorkflowExecutionUpdateAdmittedEventAttributes
x__val))
                     -> WorkflowExecutionUpdateAdmittedEventAttributes
-> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateAdmittedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateAdmittedEventAttributes
y__
              -> (WorkflowExecutionUpdateAdmittedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   WorkflowExecutionUpdateAdmittedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes Maybe WorkflowExecutionUpdateAdmittedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "workflowExecutionUpdateAdmittedEventAttributes" WorkflowExecutionUpdateAdmittedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionUpdateAdmittedEventAttributes"
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> f WorkflowExecutionUpdateAdmittedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "workflowExecutionUpdateAdmittedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((WorkflowExecutionUpdateAdmittedEventAttributes
     -> f WorkflowExecutionUpdateAdmittedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> f WorkflowExecutionUpdateAdmittedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe WorkflowExecutionUpdateAdmittedEventAttributes
  -> f (Maybe WorkflowExecutionUpdateAdmittedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((WorkflowExecutionUpdateAdmittedEventAttributes
     -> f WorkflowExecutionUpdateAdmittedEventAttributes)
    -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
    -> f (Maybe WorkflowExecutionUpdateAdmittedEventAttributes))
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> f WorkflowExecutionUpdateAdmittedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
     (Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes WorkflowExecutionUpdateAdmittedEventAttributes
x__val))
                        -> WorkflowExecutionUpdateAdmittedEventAttributes
-> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateAdmittedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe WorkflowExecutionUpdateAdmittedEventAttributes
y__
                 -> (WorkflowExecutionUpdateAdmittedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      WorkflowExecutionUpdateAdmittedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes Maybe WorkflowExecutionUpdateAdmittedEventAttributes
y__))
           (WorkflowExecutionUpdateAdmittedEventAttributes
-> Lens'
     (Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
     WorkflowExecutionUpdateAdmittedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowExecutionUpdateAdmittedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationScheduledEventAttributes" (Prelude.Maybe NexusOperationScheduledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationScheduledEventAttributes"
-> (Maybe NexusOperationScheduledEventAttributes
    -> f (Maybe NexusOperationScheduledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationScheduledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationScheduledEventAttributes
     -> f (Maybe NexusOperationScheduledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationScheduledEventAttributes
    -> f (Maybe NexusOperationScheduledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationScheduledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationScheduledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationScheduledEventAttributes)
     (Maybe NexusOperationScheduledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationScheduledEventAttributes NexusOperationScheduledEventAttributes
x__val))
                     -> NexusOperationScheduledEventAttributes
-> Maybe NexusOperationScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationScheduledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationScheduledEventAttributes
y__
              -> (NexusOperationScheduledEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationScheduledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationScheduledEventAttributes Maybe NexusOperationScheduledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationScheduledEventAttributes" NexusOperationScheduledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationScheduledEventAttributes"
-> (NexusOperationScheduledEventAttributes
    -> f NexusOperationScheduledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationScheduledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationScheduledEventAttributes
     -> f NexusOperationScheduledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationScheduledEventAttributes
    -> f NexusOperationScheduledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationScheduledEventAttributes
  -> f (Maybe NexusOperationScheduledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationScheduledEventAttributes
     -> f NexusOperationScheduledEventAttributes)
    -> Maybe NexusOperationScheduledEventAttributes
    -> f (Maybe NexusOperationScheduledEventAttributes))
-> (NexusOperationScheduledEventAttributes
    -> f NexusOperationScheduledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationScheduledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationScheduledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationScheduledEventAttributes)
     (Maybe NexusOperationScheduledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationScheduledEventAttributes NexusOperationScheduledEventAttributes
x__val))
                        -> NexusOperationScheduledEventAttributes
-> Maybe NexusOperationScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationScheduledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationScheduledEventAttributes
y__
                 -> (NexusOperationScheduledEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationScheduledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationScheduledEventAttributes Maybe NexusOperationScheduledEventAttributes
y__))
           (NexusOperationScheduledEventAttributes
-> Lens'
     (Maybe NexusOperationScheduledEventAttributes)
     NexusOperationScheduledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationScheduledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationStartedEventAttributes" (Prelude.Maybe NexusOperationStartedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationStartedEventAttributes"
-> (Maybe NexusOperationStartedEventAttributes
    -> f (Maybe NexusOperationStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationStartedEventAttributes
     -> f (Maybe NexusOperationStartedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationStartedEventAttributes
    -> f (Maybe NexusOperationStartedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationStartedEventAttributes)
     (Maybe NexusOperationStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationStartedEventAttributes NexusOperationStartedEventAttributes
x__val))
                     -> NexusOperationStartedEventAttributes
-> Maybe NexusOperationStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationStartedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationStartedEventAttributes
y__
              -> (NexusOperationStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationStartedEventAttributes Maybe NexusOperationStartedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationStartedEventAttributes" NexusOperationStartedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationStartedEventAttributes"
-> (NexusOperationStartedEventAttributes
    -> f NexusOperationStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationStartedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationStartedEventAttributes
     -> f NexusOperationStartedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationStartedEventAttributes
    -> f NexusOperationStartedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationStartedEventAttributes
  -> f (Maybe NexusOperationStartedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationStartedEventAttributes
     -> f NexusOperationStartedEventAttributes)
    -> Maybe NexusOperationStartedEventAttributes
    -> f (Maybe NexusOperationStartedEventAttributes))
-> (NexusOperationStartedEventAttributes
    -> f NexusOperationStartedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationStartedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationStartedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationStartedEventAttributes)
     (Maybe NexusOperationStartedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationStartedEventAttributes NexusOperationStartedEventAttributes
x__val))
                        -> NexusOperationStartedEventAttributes
-> Maybe NexusOperationStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationStartedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationStartedEventAttributes
y__
                 -> (NexusOperationStartedEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationStartedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationStartedEventAttributes Maybe NexusOperationStartedEventAttributes
y__))
           (NexusOperationStartedEventAttributes
-> Lens'
     (Maybe NexusOperationStartedEventAttributes)
     NexusOperationStartedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationCompletedEventAttributes" (Prelude.Maybe NexusOperationCompletedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationCompletedEventAttributes"
-> (Maybe NexusOperationCompletedEventAttributes
    -> f (Maybe NexusOperationCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationCompletedEventAttributes
     -> f (Maybe NexusOperationCompletedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationCompletedEventAttributes
    -> f (Maybe NexusOperationCompletedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationCompletedEventAttributes)
     (Maybe NexusOperationCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationCompletedEventAttributes NexusOperationCompletedEventAttributes
x__val))
                     -> NexusOperationCompletedEventAttributes
-> Maybe NexusOperationCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCompletedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationCompletedEventAttributes
y__
              -> (NexusOperationCompletedEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationCompletedEventAttributes Maybe NexusOperationCompletedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationCompletedEventAttributes" NexusOperationCompletedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationCompletedEventAttributes"
-> (NexusOperationCompletedEventAttributes
    -> f NexusOperationCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationCompletedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationCompletedEventAttributes
     -> f NexusOperationCompletedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationCompletedEventAttributes
    -> f NexusOperationCompletedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationCompletedEventAttributes
  -> f (Maybe NexusOperationCompletedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationCompletedEventAttributes
     -> f NexusOperationCompletedEventAttributes)
    -> Maybe NexusOperationCompletedEventAttributes
    -> f (Maybe NexusOperationCompletedEventAttributes))
-> (NexusOperationCompletedEventAttributes
    -> f NexusOperationCompletedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationCompletedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationCompletedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationCompletedEventAttributes)
     (Maybe NexusOperationCompletedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationCompletedEventAttributes NexusOperationCompletedEventAttributes
x__val))
                        -> NexusOperationCompletedEventAttributes
-> Maybe NexusOperationCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCompletedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationCompletedEventAttributes
y__
                 -> (NexusOperationCompletedEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationCompletedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationCompletedEventAttributes Maybe NexusOperationCompletedEventAttributes
y__))
           (NexusOperationCompletedEventAttributes
-> Lens'
     (Maybe NexusOperationCompletedEventAttributes)
     NexusOperationCompletedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationFailedEventAttributes" (Prelude.Maybe NexusOperationFailedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationFailedEventAttributes"
-> (Maybe NexusOperationFailedEventAttributes
    -> f (Maybe NexusOperationFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationFailedEventAttributes
     -> f (Maybe NexusOperationFailedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationFailedEventAttributes
    -> f (Maybe NexusOperationFailedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationFailedEventAttributes)
     (Maybe NexusOperationFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationFailedEventAttributes NexusOperationFailedEventAttributes
x__val))
                     -> NexusOperationFailedEventAttributes
-> Maybe NexusOperationFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationFailedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationFailedEventAttributes
y__
              -> (NexusOperationFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationFailedEventAttributes Maybe NexusOperationFailedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationFailedEventAttributes" NexusOperationFailedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationFailedEventAttributes"
-> (NexusOperationFailedEventAttributes
    -> f NexusOperationFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationFailedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationFailedEventAttributes
     -> f NexusOperationFailedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationFailedEventAttributes
    -> f NexusOperationFailedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationFailedEventAttributes
  -> f (Maybe NexusOperationFailedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationFailedEventAttributes
     -> f NexusOperationFailedEventAttributes)
    -> Maybe NexusOperationFailedEventAttributes
    -> f (Maybe NexusOperationFailedEventAttributes))
-> (NexusOperationFailedEventAttributes
    -> f NexusOperationFailedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationFailedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationFailedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationFailedEventAttributes)
     (Maybe NexusOperationFailedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationFailedEventAttributes NexusOperationFailedEventAttributes
x__val))
                        -> NexusOperationFailedEventAttributes
-> Maybe NexusOperationFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationFailedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationFailedEventAttributes
y__
                 -> (NexusOperationFailedEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationFailedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationFailedEventAttributes Maybe NexusOperationFailedEventAttributes
y__))
           (NexusOperationFailedEventAttributes
-> Lens'
     (Maybe NexusOperationFailedEventAttributes)
     NexusOperationFailedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationCanceledEventAttributes" (Prelude.Maybe NexusOperationCanceledEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationCanceledEventAttributes"
-> (Maybe NexusOperationCanceledEventAttributes
    -> f (Maybe NexusOperationCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationCanceledEventAttributes
     -> f (Maybe NexusOperationCanceledEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationCanceledEventAttributes
    -> f (Maybe NexusOperationCanceledEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationCanceledEventAttributes)
     (Maybe NexusOperationCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationCanceledEventAttributes NexusOperationCanceledEventAttributes
x__val))
                     -> NexusOperationCanceledEventAttributes
-> Maybe NexusOperationCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCanceledEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationCanceledEventAttributes
y__
              -> (NexusOperationCanceledEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationCanceledEventAttributes Maybe NexusOperationCanceledEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationCanceledEventAttributes" NexusOperationCanceledEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationCanceledEventAttributes"
-> (NexusOperationCanceledEventAttributes
    -> f NexusOperationCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationCanceledEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationCanceledEventAttributes
     -> f NexusOperationCanceledEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationCanceledEventAttributes
    -> f NexusOperationCanceledEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationCanceledEventAttributes
  -> f (Maybe NexusOperationCanceledEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationCanceledEventAttributes
     -> f NexusOperationCanceledEventAttributes)
    -> Maybe NexusOperationCanceledEventAttributes
    -> f (Maybe NexusOperationCanceledEventAttributes))
-> (NexusOperationCanceledEventAttributes
    -> f NexusOperationCanceledEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationCanceledEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationCanceledEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationCanceledEventAttributes)
     (Maybe NexusOperationCanceledEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationCanceledEventAttributes NexusOperationCanceledEventAttributes
x__val))
                        -> NexusOperationCanceledEventAttributes
-> Maybe NexusOperationCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCanceledEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationCanceledEventAttributes
y__
                 -> (NexusOperationCanceledEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationCanceledEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationCanceledEventAttributes Maybe NexusOperationCanceledEventAttributes
y__))
           (NexusOperationCanceledEventAttributes
-> Lens'
     (Maybe NexusOperationCanceledEventAttributes)
     NexusOperationCanceledEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationTimedOutEventAttributes" (Prelude.Maybe NexusOperationTimedOutEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationTimedOutEventAttributes"
-> (Maybe NexusOperationTimedOutEventAttributes
    -> f (Maybe NexusOperationTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationTimedOutEventAttributes
     -> f (Maybe NexusOperationTimedOutEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationTimedOutEventAttributes
    -> f (Maybe NexusOperationTimedOutEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationTimedOutEventAttributes)
     (Maybe NexusOperationTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationTimedOutEventAttributes NexusOperationTimedOutEventAttributes
x__val))
                     -> NexusOperationTimedOutEventAttributes
-> Maybe NexusOperationTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationTimedOutEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationTimedOutEventAttributes
y__
              -> (NexusOperationTimedOutEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationTimedOutEventAttributes Maybe NexusOperationTimedOutEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationTimedOutEventAttributes" NexusOperationTimedOutEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationTimedOutEventAttributes"
-> (NexusOperationTimedOutEventAttributes
    -> f NexusOperationTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationTimedOutEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationTimedOutEventAttributes
     -> f NexusOperationTimedOutEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationTimedOutEventAttributes
    -> f NexusOperationTimedOutEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationTimedOutEventAttributes
  -> f (Maybe NexusOperationTimedOutEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationTimedOutEventAttributes
     -> f NexusOperationTimedOutEventAttributes)
    -> Maybe NexusOperationTimedOutEventAttributes
    -> f (Maybe NexusOperationTimedOutEventAttributes))
-> (NexusOperationTimedOutEventAttributes
    -> f NexusOperationTimedOutEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationTimedOutEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationTimedOutEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationTimedOutEventAttributes)
     (Maybe NexusOperationTimedOutEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationTimedOutEventAttributes NexusOperationTimedOutEventAttributes
x__val))
                        -> NexusOperationTimedOutEventAttributes
-> Maybe NexusOperationTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationTimedOutEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationTimedOutEventAttributes
y__
                 -> (NexusOperationTimedOutEventAttributes -> HistoryEvent'Attributes)
-> Maybe NexusOperationTimedOutEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationTimedOutEventAttributes Maybe NexusOperationTimedOutEventAttributes
y__))
           (NexusOperationTimedOutEventAttributes
-> Lens'
     (Maybe NexusOperationTimedOutEventAttributes)
     NexusOperationTimedOutEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Field.HasField HistoryEvent "maybe'nexusOperationCancelRequestedEventAttributes" (Prelude.Maybe NexusOperationCancelRequestedEventAttributes) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'nexusOperationCancelRequestedEventAttributes"
-> (Maybe NexusOperationCancelRequestedEventAttributes
    -> f (Maybe NexusOperationCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "maybe'nexusOperationCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((Maybe NexusOperationCancelRequestedEventAttributes
     -> f (Maybe NexusOperationCancelRequestedEventAttributes))
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (Maybe NexusOperationCancelRequestedEventAttributes
    -> f (Maybe NexusOperationCancelRequestedEventAttributes))
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationCancelRequestedEventAttributes)
     (Maybe NexusOperationCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           (\ Maybe HistoryEvent'Attributes
x__
              -> case Maybe HistoryEvent'Attributes
x__ of
                   (Prelude.Just (HistoryEvent'NexusOperationCancelRequestedEventAttributes NexusOperationCancelRequestedEventAttributes
x__val))
                     -> NexusOperationCancelRequestedEventAttributes
-> Maybe NexusOperationCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCancelRequestedEventAttributes
x__val
                   Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
           (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationCancelRequestedEventAttributes
y__
              -> (NexusOperationCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe NexusOperationCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                   NexusOperationCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'NexusOperationCancelRequestedEventAttributes Maybe NexusOperationCancelRequestedEventAttributes
y__))
instance Data.ProtoLens.Field.HasField HistoryEvent "nexusOperationCancelRequestedEventAttributes" NexusOperationCancelRequestedEventAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusOperationCancelRequestedEventAttributes"
-> (NexusOperationCancelRequestedEventAttributes
    -> f NexusOperationCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
fieldOf Proxy# "nexusOperationCancelRequestedEventAttributes"
_
    = ((Maybe HistoryEvent'Attributes
  -> f (Maybe HistoryEvent'Attributes))
 -> HistoryEvent -> f HistoryEvent)
-> ((NexusOperationCancelRequestedEventAttributes
     -> f NexusOperationCancelRequestedEventAttributes)
    -> Maybe HistoryEvent'Attributes
    -> f (Maybe HistoryEvent'Attributes))
-> (NexusOperationCancelRequestedEventAttributes
    -> f NexusOperationCancelRequestedEventAttributes)
-> HistoryEvent
-> f HistoryEvent
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((HistoryEvent -> Maybe HistoryEvent'Attributes)
-> (HistoryEvent -> Maybe HistoryEvent'Attributes -> HistoryEvent)
-> Lens
     HistoryEvent
     HistoryEvent
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes
           (\ HistoryEvent
x__ Maybe HistoryEvent'Attributes
y__ -> HistoryEvent
x__ {_HistoryEvent'attributes = y__}))
        (((Maybe NexusOperationCancelRequestedEventAttributes
  -> f (Maybe NexusOperationCancelRequestedEventAttributes))
 -> Maybe HistoryEvent'Attributes
 -> f (Maybe HistoryEvent'Attributes))
-> ((NexusOperationCancelRequestedEventAttributes
     -> f NexusOperationCancelRequestedEventAttributes)
    -> Maybe NexusOperationCancelRequestedEventAttributes
    -> f (Maybe NexusOperationCancelRequestedEventAttributes))
-> (NexusOperationCancelRequestedEventAttributes
    -> f NexusOperationCancelRequestedEventAttributes)
-> Maybe HistoryEvent'Attributes
-> f (Maybe HistoryEvent'Attributes)
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
           ((Maybe HistoryEvent'Attributes
 -> Maybe NexusOperationCancelRequestedEventAttributes)
-> (Maybe HistoryEvent'Attributes
    -> Maybe NexusOperationCancelRequestedEventAttributes
    -> Maybe HistoryEvent'Attributes)
-> Lens
     (Maybe HistoryEvent'Attributes)
     (Maybe HistoryEvent'Attributes)
     (Maybe NexusOperationCancelRequestedEventAttributes)
     (Maybe NexusOperationCancelRequestedEventAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
              (\ Maybe HistoryEvent'Attributes
x__
                 -> case Maybe HistoryEvent'Attributes
x__ of
                      (Prelude.Just (HistoryEvent'NexusOperationCancelRequestedEventAttributes NexusOperationCancelRequestedEventAttributes
x__val))
                        -> NexusOperationCancelRequestedEventAttributes
-> Maybe NexusOperationCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCancelRequestedEventAttributes
x__val
                      Maybe HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
              (\ Maybe HistoryEvent'Attributes
_ Maybe NexusOperationCancelRequestedEventAttributes
y__
                 -> (NexusOperationCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> Maybe NexusOperationCancelRequestedEventAttributes
-> Maybe HistoryEvent'Attributes
forall a b. (a -> b) -> Maybe a -> Maybe b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                      NexusOperationCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'NexusOperationCancelRequestedEventAttributes Maybe NexusOperationCancelRequestedEventAttributes
y__))
           (NexusOperationCancelRequestedEventAttributes
-> Lens'
     (Maybe NexusOperationCancelRequestedEventAttributes)
     NexusOperationCancelRequestedEventAttributes
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens NexusOperationCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage))
instance Data.ProtoLens.Message HistoryEvent where
  messageName :: Proxy HistoryEvent -> Text
messageName Proxy HistoryEvent
_
    = String -> Text
Data.Text.pack String
"temporal.api.history.v1.HistoryEvent"
  packedMessageDescriptor :: Proxy HistoryEvent -> ByteString
packedMessageDescriptor Proxy HistoryEvent
_
    = ByteString
"\n\
      \\fHistoryEvent\DC2\EM\n\
      \\bevent_id\CAN\SOH \SOH(\ETXR\aeventId\DC29\n\
      \\n\
      \event_time\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\teventTime\DC2?\n\
      \\n\
      \event_type\CAN\ETX \SOH(\SO2 .temporal.api.enums.v1.EventTypeR\teventType\DC2\CAN\n\
      \\aversion\CAN\EOT \SOH(\ETXR\aversion\DC2\ETB\n\
      \\atask_id\CAN\ENQ \SOH(\ETXR\ACKtaskId\DC2+\n\
      \\DC1worker_may_ignore\CAN\172\STX \SOH(\bR\SIworkerMayIgnore\DC2\160\SOH\n\
      \+workflow_execution_started_event_attributes\CAN\ACK \SOH(\v2@.temporal.api.history.v1.WorkflowExecutionStartedEventAttributesH\NULR'workflowExecutionStartedEventAttributes\DC2\166\SOH\n\
      \-workflow_execution_completed_event_attributes\CAN\a \SOH(\v2B.temporal.api.history.v1.WorkflowExecutionCompletedEventAttributesH\NULR)workflowExecutionCompletedEventAttributes\DC2\157\SOH\n\
      \*workflow_execution_failed_event_attributes\CAN\b \SOH(\v2?.temporal.api.history.v1.WorkflowExecutionFailedEventAttributesH\NULR&workflowExecutionFailedEventAttributes\DC2\164\SOH\n\
      \-workflow_execution_timed_out_event_attributes\CAN\t \SOH(\v2A.temporal.api.history.v1.WorkflowExecutionTimedOutEventAttributesH\NULR(workflowExecutionTimedOutEventAttributes\DC2\151\SOH\n\
      \(workflow_task_scheduled_event_attributes\CAN\n\
      \ \SOH(\v2=.temporal.api.history.v1.WorkflowTaskScheduledEventAttributesH\NULR$workflowTaskScheduledEventAttributes\DC2\145\SOH\n\
      \&workflow_task_started_event_attributes\CAN\v \SOH(\v2;.temporal.api.history.v1.WorkflowTaskStartedEventAttributesH\NULR\"workflowTaskStartedEventAttributes\DC2\151\SOH\n\
      \(workflow_task_completed_event_attributes\CAN\f \SOH(\v2=.temporal.api.history.v1.WorkflowTaskCompletedEventAttributesH\NULR$workflowTaskCompletedEventAttributes\DC2\149\SOH\n\
      \(workflow_task_timed_out_event_attributes\CAN\r \SOH(\v2<.temporal.api.history.v1.WorkflowTaskTimedOutEventAttributesH\NULR#workflowTaskTimedOutEventAttributes\DC2\142\SOH\n\
      \%workflow_task_failed_event_attributes\CAN\SO \SOH(\v2:.temporal.api.history.v1.WorkflowTaskFailedEventAttributesH\NULR!workflowTaskFailedEventAttributes\DC2\151\SOH\n\
      \(activity_task_scheduled_event_attributes\CAN\SI \SOH(\v2=.temporal.api.history.v1.ActivityTaskScheduledEventAttributesH\NULR$activityTaskScheduledEventAttributes\DC2\145\SOH\n\
      \&activity_task_started_event_attributes\CAN\DLE \SOH(\v2;.temporal.api.history.v1.ActivityTaskStartedEventAttributesH\NULR\"activityTaskStartedEventAttributes\DC2\151\SOH\n\
      \(activity_task_completed_event_attributes\CAN\DC1 \SOH(\v2=.temporal.api.history.v1.ActivityTaskCompletedEventAttributesH\NULR$activityTaskCompletedEventAttributes\DC2\142\SOH\n\
      \%activity_task_failed_event_attributes\CAN\DC2 \SOH(\v2:.temporal.api.history.v1.ActivityTaskFailedEventAttributesH\NULR!activityTaskFailedEventAttributes\DC2\149\SOH\n\
      \(activity_task_timed_out_event_attributes\CAN\DC3 \SOH(\v2<.temporal.api.history.v1.ActivityTaskTimedOutEventAttributesH\NULR#activityTaskTimedOutEventAttributes\DC2{\n\
      \\RStimer_started_event_attributes\CAN\DC4 \SOH(\v24.temporal.api.history.v1.TimerStartedEventAttributesH\NULR\ESCtimerStartedEventAttributes\DC2u\n\
      \\FStimer_fired_event_attributes\CAN\NAK \SOH(\v22.temporal.api.history.v1.TimerFiredEventAttributesH\NULR\EMtimerFiredEventAttributes\DC2\170\SOH\n\
      \/activity_task_cancel_requested_event_attributes\CAN\SYN \SOH(\v2C.temporal.api.history.v1.ActivityTaskCancelRequestedEventAttributesH\NULR*activityTaskCancelRequestedEventAttributes\DC2\148\SOH\n\
      \'activity_task_canceled_event_attributes\CAN\ETB \SOH(\v2<.temporal.api.history.v1.ActivityTaskCanceledEventAttributesH\NULR#activityTaskCanceledEventAttributes\DC2~\n\
      \\UStimer_canceled_event_attributes\CAN\CAN \SOH(\v25.temporal.api.history.v1.TimerCanceledEventAttributesH\NULR\FStimerCanceledEventAttributes\DC2\129\SOH\n\
      \ marker_recorded_event_attributes\CAN\EM \SOH(\v26.temporal.api.history.v1.MarkerRecordedEventAttributesH\NULR\GSmarkerRecordedEventAttributes\DC2\163\SOH\n\
      \,workflow_execution_signaled_event_attributes\CAN\SUB \SOH(\v2A.temporal.api.history.v1.WorkflowExecutionSignaledEventAttributesH\NULR(workflowExecutionSignaledEventAttributes\DC2\169\SOH\n\
      \.workflow_execution_terminated_event_attributes\CAN\ESC \SOH(\v2C.temporal.api.history.v1.WorkflowExecutionTerminatedEventAttributesH\NULR*workflowExecutionTerminatedEventAttributes\DC2\185\SOH\n\
      \4workflow_execution_cancel_requested_event_attributes\CAN\FS \SOH(\v2H.temporal.api.history.v1.WorkflowExecutionCancelRequestedEventAttributesH\NULR/workflowExecutionCancelRequestedEventAttributes\DC2\163\SOH\n\
      \,workflow_execution_canceled_event_attributes\CAN\GS \SOH(\v2A.temporal.api.history.v1.WorkflowExecutionCanceledEventAttributesH\NULR(workflowExecutionCanceledEventAttributes\DC2\232\SOH\n\
      \Erequest_cancel_external_workflow_execution_initiated_event_attributes\CAN\RS \SOH(\v2W.temporal.api.history.v1.RequestCancelExternalWorkflowExecutionInitiatedEventAttributesH\NULR>requestCancelExternalWorkflowExecutionInitiatedEventAttributes\DC2\223\SOH\n\
      \Brequest_cancel_external_workflow_execution_failed_event_attributes\CAN\US \SOH(\v2T.temporal.api.history.v1.RequestCancelExternalWorkflowExecutionFailedEventAttributesH\NULR;requestCancelExternalWorkflowExecutionFailedEventAttributes\DC2\210\SOH\n\
      \=external_workflow_execution_cancel_requested_event_attributes\CAN  \SOH(\v2P.temporal.api.history.v1.ExternalWorkflowExecutionCancelRequestedEventAttributesH\NULR7externalWorkflowExecutionCancelRequestedEventAttributes\DC2\183\SOH\n\
      \4workflow_execution_continued_as_new_event_attributes\CAN! \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionContinuedAsNewEventAttributesH\NULR.workflowExecutionContinuedAsNewEventAttributes\DC2\198\SOH\n\
      \9start_child_workflow_execution_initiated_event_attributes\CAN\" \SOH(\v2L.temporal.api.history.v1.StartChildWorkflowExecutionInitiatedEventAttributesH\NULR3startChildWorkflowExecutionInitiatedEventAttributes\DC2\189\SOH\n\
      \6start_child_workflow_execution_failed_event_attributes\CAN# \SOH(\v2I.temporal.api.history.v1.StartChildWorkflowExecutionFailedEventAttributesH\NULR0startChildWorkflowExecutionFailedEventAttributes\DC2\176\SOH\n\
      \1child_workflow_execution_started_event_attributes\CAN$ \SOH(\v2E.temporal.api.history.v1.ChildWorkflowExecutionStartedEventAttributesH\NULR,childWorkflowExecutionStartedEventAttributes\DC2\182\SOH\n\
      \3child_workflow_execution_completed_event_attributes\CAN% \SOH(\v2G.temporal.api.history.v1.ChildWorkflowExecutionCompletedEventAttributesH\NULR.childWorkflowExecutionCompletedEventAttributes\DC2\173\SOH\n\
      \0child_workflow_execution_failed_event_attributes\CAN& \SOH(\v2D.temporal.api.history.v1.ChildWorkflowExecutionFailedEventAttributesH\NULR+childWorkflowExecutionFailedEventAttributes\DC2\179\SOH\n\
      \2child_workflow_execution_canceled_event_attributes\CAN' \SOH(\v2F.temporal.api.history.v1.ChildWorkflowExecutionCanceledEventAttributesH\NULR-childWorkflowExecutionCanceledEventAttributes\DC2\180\SOH\n\
      \3child_workflow_execution_timed_out_event_attributes\CAN( \SOH(\v2F.temporal.api.history.v1.ChildWorkflowExecutionTimedOutEventAttributesH\NULR-childWorkflowExecutionTimedOutEventAttributes\DC2\185\SOH\n\
      \4child_workflow_execution_terminated_event_attributes\CAN) \SOH(\v2H.temporal.api.history.v1.ChildWorkflowExecutionTerminatedEventAttributesH\NULR/childWorkflowExecutionTerminatedEventAttributes\DC2\210\SOH\n\
      \=signal_external_workflow_execution_initiated_event_attributes\CAN* \SOH(\v2P.temporal.api.history.v1.SignalExternalWorkflowExecutionInitiatedEventAttributesH\NULR7signalExternalWorkflowExecutionInitiatedEventAttributes\DC2\201\SOH\n\
      \:signal_external_workflow_execution_failed_event_attributes\CAN+ \SOH(\v2M.temporal.api.history.v1.SignalExternalWorkflowExecutionFailedEventAttributesH\NULR4signalExternalWorkflowExecutionFailedEventAttributes\DC2\188\SOH\n\
      \5external_workflow_execution_signaled_event_attributes\CAN, \SOH(\v2I.temporal.api.history.v1.ExternalWorkflowExecutionSignaledEventAttributesH\NULR0externalWorkflowExecutionSignaledEventAttributes\DC2\179\SOH\n\
      \2upsert_workflow_search_attributes_event_attributes\CAN- \SOH(\v2F.temporal.api.history.v1.UpsertWorkflowSearchAttributesEventAttributesH\NULR-upsertWorkflowSearchAttributesEventAttributes\DC2\182\SOH\n\
      \3workflow_execution_update_accepted_event_attributes\CAN. \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionUpdateAcceptedEventAttributesH\NULR.workflowExecutionUpdateAcceptedEventAttributes\DC2\182\SOH\n\
      \3workflow_execution_update_rejected_event_attributes\CAN/ \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionUpdateRejectedEventAttributesH\NULR.workflowExecutionUpdateRejectedEventAttributes\DC2\185\SOH\n\
      \4workflow_execution_update_completed_event_attributes\CAN0 \SOH(\v2H.temporal.api.history.v1.WorkflowExecutionUpdateCompletedEventAttributesH\NULR/workflowExecutionUpdateCompletedEventAttributes\DC2\197\SOH\n\
      \8workflow_properties_modified_externally_event_attributes\CAN1 \SOH(\v2L.temporal.api.history.v1.WorkflowPropertiesModifiedExternallyEventAttributesH\NULR3workflowPropertiesModifiedExternallyEventAttributes\DC2\197\SOH\n\
      \8activity_properties_modified_externally_event_attributes\CAN2 \SOH(\v2L.temporal.api.history.v1.ActivityPropertiesModifiedExternallyEventAttributesH\NULR3activityPropertiesModifiedExternallyEventAttributes\DC2\166\SOH\n\
      \-workflow_properties_modified_event_attributes\CAN3 \SOH(\v2B.temporal.api.history.v1.WorkflowPropertiesModifiedEventAttributesH\NULR)workflowPropertiesModifiedEventAttributes\DC2\182\SOH\n\
      \3workflow_execution_update_admitted_event_attributes\CAN4 \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionUpdateAdmittedEventAttributesH\NULR.workflowExecutionUpdateAdmittedEventAttributes\DC2\157\SOH\n\
      \*nexus_operation_scheduled_event_attributes\CAN5 \SOH(\v2?.temporal.api.history.v1.NexusOperationScheduledEventAttributesH\NULR&nexusOperationScheduledEventAttributes\DC2\151\SOH\n\
      \(nexus_operation_started_event_attributes\CAN6 \SOH(\v2=.temporal.api.history.v1.NexusOperationStartedEventAttributesH\NULR$nexusOperationStartedEventAttributes\DC2\157\SOH\n\
      \*nexus_operation_completed_event_attributes\CAN7 \SOH(\v2?.temporal.api.history.v1.NexusOperationCompletedEventAttributesH\NULR&nexusOperationCompletedEventAttributes\DC2\148\SOH\n\
      \'nexus_operation_failed_event_attributes\CAN8 \SOH(\v2<.temporal.api.history.v1.NexusOperationFailedEventAttributesH\NULR#nexusOperationFailedEventAttributes\DC2\154\SOH\n\
      \)nexus_operation_canceled_event_attributes\CAN9 \SOH(\v2>.temporal.api.history.v1.NexusOperationCanceledEventAttributesH\NULR%nexusOperationCanceledEventAttributes\DC2\155\SOH\n\
      \*nexus_operation_timed_out_event_attributes\CAN: \SOH(\v2>.temporal.api.history.v1.NexusOperationTimedOutEventAttributesH\NULR%nexusOperationTimedOutEventAttributes\DC2\176\SOH\n\
      \1nexus_operation_cancel_requested_event_attributes\CAN; \SOH(\v2E.temporal.api.history.v1.NexusOperationCancelRequestedEventAttributesH\NULR,nexusOperationCancelRequestedEventAttributesB\f\n\
      \\n\
      \attributes"
  packedFileDescriptor :: Proxy HistoryEvent -> ByteString
packedFileDescriptor Proxy HistoryEvent
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor HistoryEvent)
fieldsByTag
    = let
        eventId__field_descriptor :: FieldDescriptor HistoryEvent
eventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor HistoryEvent Int64
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"event_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 HistoryEvent HistoryEvent Int64 Int64
-> FieldAccessor HistoryEvent 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 @"eventId")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        eventTime__field_descriptor :: FieldDescriptor HistoryEvent
eventTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor HistoryEvent Timestamp
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"event_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 HistoryEvent HistoryEvent (Maybe Timestamp) (Maybe Timestamp)
-> FieldAccessor HistoryEvent 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'eventTime")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        eventType__field_descriptor :: FieldDescriptor HistoryEvent
eventType__field_descriptor
          = String
-> FieldTypeDescriptor EventType
-> FieldAccessor HistoryEvent EventType
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"event_type"
              (ScalarField EventType -> FieldTypeDescriptor EventType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField EventType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.EventType.EventType)
              (WireDefault EventType
-> Lens HistoryEvent HistoryEvent EventType EventType
-> FieldAccessor HistoryEvent EventType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault EventType
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 @"eventType")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        version__field_descriptor :: FieldDescriptor HistoryEvent
version__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor HistoryEvent Int64
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"version"
              (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 HistoryEvent HistoryEvent Int64 Int64
-> FieldAccessor HistoryEvent 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 @"version")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        taskId__field_descriptor :: FieldDescriptor HistoryEvent
taskId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor HistoryEvent Int64
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"task_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 HistoryEvent HistoryEvent Int64 Int64
-> FieldAccessor HistoryEvent 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 @"taskId")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workerMayIgnore__field_descriptor :: FieldDescriptor HistoryEvent
workerMayIgnore__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor HistoryEvent Bool
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_may_ignore"
              (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 HistoryEvent HistoryEvent Bool Bool
-> FieldAccessor HistoryEvent 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 @"workerMayIgnore")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionStartedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionStartedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionStartedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionStartedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_started_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionStartedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionStartedEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowExecutionStartedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionStartedEventAttributes
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'workflowExecutionStartedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionCompletedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionCompletedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionCompletedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionCompletedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_completed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionCompletedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionCompletedEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowExecutionCompletedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionCompletedEventAttributes
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'workflowExecutionCompletedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionFailedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionFailedEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowExecutionFailedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionFailedEventAttributes
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'workflowExecutionFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionTimedOutEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionTimedOutEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionTimedOutEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionTimedOutEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_timed_out_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionTimedOutEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionTimedOutEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowExecutionTimedOutEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionTimedOutEventAttributes
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'workflowExecutionTimedOutEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowTaskScheduledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowTaskScheduledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskScheduledEventAttributes
-> FieldAccessor HistoryEvent WorkflowTaskScheduledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_scheduled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowTaskScheduledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowTaskScheduledEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowTaskScheduledEventAttributes)
-> FieldAccessor HistoryEvent WorkflowTaskScheduledEventAttributes
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'workflowTaskScheduledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowTaskStartedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowTaskStartedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskStartedEventAttributes
-> FieldAccessor HistoryEvent WorkflowTaskStartedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_started_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowTaskStartedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowTaskStartedEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowTaskStartedEventAttributes)
-> FieldAccessor HistoryEvent WorkflowTaskStartedEventAttributes
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'workflowTaskStartedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowTaskCompletedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowTaskCompletedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskCompletedEventAttributes
-> FieldAccessor HistoryEvent WorkflowTaskCompletedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowTaskCompletedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowTaskCompletedEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowTaskCompletedEventAttributes)
-> FieldAccessor HistoryEvent WorkflowTaskCompletedEventAttributes
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'workflowTaskCompletedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowTaskTimedOutEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowTaskTimedOutEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskTimedOutEventAttributes
-> FieldAccessor HistoryEvent WorkflowTaskTimedOutEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_timed_out_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowTaskTimedOutEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowTaskTimedOutEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowTaskTimedOutEventAttributes)
-> FieldAccessor HistoryEvent WorkflowTaskTimedOutEventAttributes
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'workflowTaskTimedOutEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowTaskFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowTaskFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskFailedEventAttributes
-> FieldAccessor HistoryEvent WorkflowTaskFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowTaskFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowTaskFailedEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowTaskFailedEventAttributes)
-> FieldAccessor HistoryEvent WorkflowTaskFailedEventAttributes
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'workflowTaskFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskScheduledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskScheduledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskScheduledEventAttributes
-> FieldAccessor HistoryEvent ActivityTaskScheduledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_scheduled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskScheduledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskScheduledEventAttributes)
              (Lens' HistoryEvent (Maybe ActivityTaskScheduledEventAttributes)
-> FieldAccessor HistoryEvent ActivityTaskScheduledEventAttributes
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'activityTaskScheduledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskStartedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskStartedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskStartedEventAttributes
-> FieldAccessor HistoryEvent ActivityTaskStartedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_started_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskStartedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskStartedEventAttributes)
              (Lens' HistoryEvent (Maybe ActivityTaskStartedEventAttributes)
-> FieldAccessor HistoryEvent ActivityTaskStartedEventAttributes
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'activityTaskStartedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskCompletedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskCompletedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskCompletedEventAttributes
-> FieldAccessor HistoryEvent ActivityTaskCompletedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_completed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskCompletedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskCompletedEventAttributes)
              (Lens' HistoryEvent (Maybe ActivityTaskCompletedEventAttributes)
-> FieldAccessor HistoryEvent ActivityTaskCompletedEventAttributes
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'activityTaskCompletedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskFailedEventAttributes
-> FieldAccessor HistoryEvent ActivityTaskFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskFailedEventAttributes)
              (Lens' HistoryEvent (Maybe ActivityTaskFailedEventAttributes)
-> FieldAccessor HistoryEvent ActivityTaskFailedEventAttributes
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'activityTaskFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskTimedOutEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskTimedOutEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskTimedOutEventAttributes
-> FieldAccessor HistoryEvent ActivityTaskTimedOutEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_timed_out_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskTimedOutEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskTimedOutEventAttributes)
              (Lens' HistoryEvent (Maybe ActivityTaskTimedOutEventAttributes)
-> FieldAccessor HistoryEvent ActivityTaskTimedOutEventAttributes
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'activityTaskTimedOutEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        timerStartedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
timerStartedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor TimerStartedEventAttributes
-> FieldAccessor HistoryEvent TimerStartedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timer_started_event_attributes"
              (MessageOrGroup -> FieldTypeDescriptor TimerStartedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TimerStartedEventAttributes)
              (Lens' HistoryEvent (Maybe TimerStartedEventAttributes)
-> FieldAccessor HistoryEvent TimerStartedEventAttributes
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'timerStartedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        timerFiredEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
timerFiredEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor TimerFiredEventAttributes
-> FieldAccessor HistoryEvent TimerFiredEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timer_fired_event_attributes"
              (MessageOrGroup -> FieldTypeDescriptor TimerFiredEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TimerFiredEventAttributes)
              (Lens' HistoryEvent (Maybe TimerFiredEventAttributes)
-> FieldAccessor HistoryEvent TimerFiredEventAttributes
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'timerFiredEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskCancelRequestedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskCancelRequestedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskCancelRequestedEventAttributes
-> FieldAccessor
     HistoryEvent ActivityTaskCancelRequestedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_cancel_requested_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskCancelRequestedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskCancelRequestedEventAttributes)
              (Lens'
  HistoryEvent (Maybe ActivityTaskCancelRequestedEventAttributes)
-> FieldAccessor
     HistoryEvent ActivityTaskCancelRequestedEventAttributes
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'activityTaskCancelRequestedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityTaskCanceledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityTaskCanceledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ActivityTaskCanceledEventAttributes
-> FieldAccessor HistoryEvent ActivityTaskCanceledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_task_canceled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ActivityTaskCanceledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityTaskCanceledEventAttributes)
              (Lens' HistoryEvent (Maybe ActivityTaskCanceledEventAttributes)
-> FieldAccessor HistoryEvent ActivityTaskCanceledEventAttributes
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'activityTaskCanceledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        timerCanceledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
timerCanceledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor TimerCanceledEventAttributes
-> FieldAccessor HistoryEvent TimerCanceledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timer_canceled_event_attributes"
              (MessageOrGroup -> FieldTypeDescriptor TimerCanceledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor TimerCanceledEventAttributes)
              (Lens' HistoryEvent (Maybe TimerCanceledEventAttributes)
-> FieldAccessor HistoryEvent TimerCanceledEventAttributes
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'timerCanceledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        markerRecordedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
markerRecordedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor MarkerRecordedEventAttributes
-> FieldAccessor HistoryEvent MarkerRecordedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"marker_recorded_event_attributes"
              (MessageOrGroup -> FieldTypeDescriptor MarkerRecordedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor MarkerRecordedEventAttributes)
              (Lens' HistoryEvent (Maybe MarkerRecordedEventAttributes)
-> FieldAccessor HistoryEvent MarkerRecordedEventAttributes
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'markerRecordedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionSignaledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionSignaledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionSignaledEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionSignaledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_signaled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionSignaledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionSignaledEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowExecutionSignaledEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionSignaledEventAttributes
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'workflowExecutionSignaledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionTerminatedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionTerminatedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionTerminatedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionTerminatedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_terminated_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionTerminatedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionTerminatedEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowExecutionTerminatedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionTerminatedEventAttributes
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'workflowExecutionTerminatedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionCancelRequestedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionCancelRequestedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowExecutionCancelRequestedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionCancelRequestedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_cancel_requested_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowExecutionCancelRequestedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionCancelRequestedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe WorkflowExecutionCancelRequestedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionCancelRequestedEventAttributes
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'workflowExecutionCancelRequestedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionCanceledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionCanceledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecutionCanceledEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionCanceledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_canceled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowExecutionCanceledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionCanceledEventAttributes)
              (Lens' HistoryEvent (Maybe WorkflowExecutionCanceledEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionCanceledEventAttributes
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'workflowExecutionCanceledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        requestCancelExternalWorkflowExecutionInitiatedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
requestCancelExternalWorkflowExecutionInitiatedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> FieldAccessor
     HistoryEvent
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_cancel_external_workflow_execution_initiated_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> FieldAccessor
     HistoryEvent
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
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'requestCancelExternalWorkflowExecutionInitiatedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        requestCancelExternalWorkflowExecutionFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
requestCancelExternalWorkflowExecutionFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> FieldAccessor
     HistoryEvent
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_cancel_external_workflow_execution_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> FieldAccessor
     HistoryEvent
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
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'requestCancelExternalWorkflowExecutionFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        externalWorkflowExecutionCancelRequestedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
externalWorkflowExecutionCancelRequestedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
-> FieldAccessor
     HistoryEvent
     ExternalWorkflowExecutionCancelRequestedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"external_workflow_execution_cancel_requested_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExternalWorkflowExecutionCancelRequestedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> FieldAccessor
     HistoryEvent
     ExternalWorkflowExecutionCancelRequestedEventAttributes
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'externalWorkflowExecutionCancelRequestedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionContinuedAsNewEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionContinuedAsNewEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowExecutionContinuedAsNewEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionContinuedAsNewEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_continued_as_new_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowExecutionContinuedAsNewEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionContinuedAsNewEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowExecutionContinuedAsNewEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionContinuedAsNewEventAttributes
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'workflowExecutionContinuedAsNewEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        startChildWorkflowExecutionInitiatedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
startChildWorkflowExecutionInitiatedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
-> FieldAccessor
     HistoryEvent StartChildWorkflowExecutionInitiatedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_child_workflow_execution_initiated_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartChildWorkflowExecutionInitiatedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
-> FieldAccessor
     HistoryEvent StartChildWorkflowExecutionInitiatedEventAttributes
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'startChildWorkflowExecutionInitiatedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        startChildWorkflowExecutionFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
startChildWorkflowExecutionFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     StartChildWorkflowExecutionFailedEventAttributes
-> FieldAccessor
     HistoryEvent StartChildWorkflowExecutionFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_child_workflow_execution_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     StartChildWorkflowExecutionFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor StartChildWorkflowExecutionFailedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe StartChildWorkflowExecutionFailedEventAttributes)
-> FieldAccessor
     HistoryEvent StartChildWorkflowExecutionFailedEventAttributes
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'startChildWorkflowExecutionFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        childWorkflowExecutionStartedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
childWorkflowExecutionStartedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ChildWorkflowExecutionStartedEventAttributes
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionStartedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_execution_started_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ChildWorkflowExecutionStartedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ChildWorkflowExecutionStartedEventAttributes)
              (Lens'
  HistoryEvent (Maybe ChildWorkflowExecutionStartedEventAttributes)
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionStartedEventAttributes
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'childWorkflowExecutionStartedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        childWorkflowExecutionCompletedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
childWorkflowExecutionCompletedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ChildWorkflowExecutionCompletedEventAttributes
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionCompletedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_execution_completed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ChildWorkflowExecutionCompletedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ChildWorkflowExecutionCompletedEventAttributes)
              (Lens'
  HistoryEvent (Maybe ChildWorkflowExecutionCompletedEventAttributes)
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionCompletedEventAttributes
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'childWorkflowExecutionCompletedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        childWorkflowExecutionFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
childWorkflowExecutionFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor ChildWorkflowExecutionFailedEventAttributes
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_execution_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor ChildWorkflowExecutionFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ChildWorkflowExecutionFailedEventAttributes)
              (Lens'
  HistoryEvent (Maybe ChildWorkflowExecutionFailedEventAttributes)
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionFailedEventAttributes
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'childWorkflowExecutionFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        childWorkflowExecutionCanceledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
childWorkflowExecutionCanceledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ChildWorkflowExecutionCanceledEventAttributes
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionCanceledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_execution_canceled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ChildWorkflowExecutionCanceledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ChildWorkflowExecutionCanceledEventAttributes)
              (Lens'
  HistoryEvent (Maybe ChildWorkflowExecutionCanceledEventAttributes)
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionCanceledEventAttributes
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'childWorkflowExecutionCanceledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        childWorkflowExecutionTimedOutEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
childWorkflowExecutionTimedOutEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ChildWorkflowExecutionTimedOutEventAttributes
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionTimedOutEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_execution_timed_out_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ChildWorkflowExecutionTimedOutEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ChildWorkflowExecutionTimedOutEventAttributes)
              (Lens'
  HistoryEvent (Maybe ChildWorkflowExecutionTimedOutEventAttributes)
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionTimedOutEventAttributes
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'childWorkflowExecutionTimedOutEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        childWorkflowExecutionTerminatedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
childWorkflowExecutionTerminatedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ChildWorkflowExecutionTerminatedEventAttributes
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionTerminatedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_execution_terminated_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ChildWorkflowExecutionTerminatedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ChildWorkflowExecutionTerminatedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe ChildWorkflowExecutionTerminatedEventAttributes)
-> FieldAccessor
     HistoryEvent ChildWorkflowExecutionTerminatedEventAttributes
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'childWorkflowExecutionTerminatedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        signalExternalWorkflowExecutionInitiatedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
signalExternalWorkflowExecutionInitiatedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
-> FieldAccessor
     HistoryEvent
     SignalExternalWorkflowExecutionInitiatedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_external_workflow_execution_initiated_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> FieldAccessor
     HistoryEvent
     SignalExternalWorkflowExecutionInitiatedEventAttributes
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'signalExternalWorkflowExecutionInitiatedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        signalExternalWorkflowExecutionFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
signalExternalWorkflowExecutionFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
-> FieldAccessor
     HistoryEvent SignalExternalWorkflowExecutionFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_external_workflow_execution_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor SignalExternalWorkflowExecutionFailedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
-> FieldAccessor
     HistoryEvent SignalExternalWorkflowExecutionFailedEventAttributes
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'signalExternalWorkflowExecutionFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        externalWorkflowExecutionSignaledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
externalWorkflowExecutionSignaledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ExternalWorkflowExecutionSignaledEventAttributes
-> FieldAccessor
     HistoryEvent ExternalWorkflowExecutionSignaledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"external_workflow_execution_signaled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ExternalWorkflowExecutionSignaledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ExternalWorkflowExecutionSignaledEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe ExternalWorkflowExecutionSignaledEventAttributes)
-> FieldAccessor
     HistoryEvent ExternalWorkflowExecutionSignaledEventAttributes
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'externalWorkflowExecutionSignaledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        upsertWorkflowSearchAttributesEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
upsertWorkflowSearchAttributesEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     UpsertWorkflowSearchAttributesEventAttributes
-> FieldAccessor
     HistoryEvent UpsertWorkflowSearchAttributesEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"upsert_workflow_search_attributes_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     UpsertWorkflowSearchAttributesEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor UpsertWorkflowSearchAttributesEventAttributes)
              (Lens'
  HistoryEvent (Maybe UpsertWorkflowSearchAttributesEventAttributes)
-> FieldAccessor
     HistoryEvent UpsertWorkflowSearchAttributesEventAttributes
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'upsertWorkflowSearchAttributesEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionUpdateAcceptedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionUpdateAcceptedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowExecutionUpdateAcceptedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateAcceptedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_update_accepted_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowExecutionUpdateAcceptedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionUpdateAcceptedEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateAcceptedEventAttributes
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'workflowExecutionUpdateAcceptedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionUpdateRejectedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionUpdateRejectedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowExecutionUpdateRejectedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateRejectedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_update_rejected_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowExecutionUpdateRejectedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionUpdateRejectedEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowExecutionUpdateRejectedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateRejectedEventAttributes
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'workflowExecutionUpdateRejectedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionUpdateCompletedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionUpdateCompletedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowExecutionUpdateCompletedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateCompletedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_update_completed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowExecutionUpdateCompletedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionUpdateCompletedEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe WorkflowExecutionUpdateCompletedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateCompletedEventAttributes
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'workflowExecutionUpdateCompletedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowPropertiesModifiedExternallyEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowPropertiesModifiedExternallyEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowPropertiesModifiedExternallyEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_properties_modified_externally_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowPropertiesModifiedExternallyEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowPropertiesModifiedExternallyEventAttributes
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'workflowPropertiesModifiedExternallyEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        activityPropertiesModifiedExternallyEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
activityPropertiesModifiedExternallyEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     ActivityPropertiesModifiedExternallyEventAttributes
-> FieldAccessor
     HistoryEvent ActivityPropertiesModifiedExternallyEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"activity_properties_modified_externally_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     ActivityPropertiesModifiedExternallyEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor ActivityPropertiesModifiedExternallyEventAttributes)
              (Lens'
  HistoryEvent
  (Maybe ActivityPropertiesModifiedExternallyEventAttributes)
-> FieldAccessor
     HistoryEvent ActivityPropertiesModifiedExternallyEventAttributes
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'activityPropertiesModifiedExternallyEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowPropertiesModifiedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowPropertiesModifiedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowPropertiesModifiedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowPropertiesModifiedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_properties_modified_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor WorkflowPropertiesModifiedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowPropertiesModifiedEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowPropertiesModifiedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowPropertiesModifiedEventAttributes
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'workflowPropertiesModifiedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        workflowExecutionUpdateAdmittedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
workflowExecutionUpdateAdmittedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor
     WorkflowExecutionUpdateAdmittedEventAttributes
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateAdmittedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_update_admitted_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor
     WorkflowExecutionUpdateAdmittedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor WorkflowExecutionUpdateAdmittedEventAttributes)
              (Lens'
  HistoryEvent (Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
-> FieldAccessor
     HistoryEvent WorkflowExecutionUpdateAdmittedEventAttributes
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'workflowExecutionUpdateAdmittedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationScheduledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationScheduledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationScheduledEventAttributes
-> FieldAccessor
     HistoryEvent NexusOperationScheduledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_scheduled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationScheduledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationScheduledEventAttributes)
              (Lens' HistoryEvent (Maybe NexusOperationScheduledEventAttributes)
-> FieldAccessor
     HistoryEvent NexusOperationScheduledEventAttributes
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'nexusOperationScheduledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationStartedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationStartedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationStartedEventAttributes
-> FieldAccessor HistoryEvent NexusOperationStartedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_started_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationStartedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationStartedEventAttributes)
              (Lens' HistoryEvent (Maybe NexusOperationStartedEventAttributes)
-> FieldAccessor HistoryEvent NexusOperationStartedEventAttributes
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'nexusOperationStartedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationCompletedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationCompletedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationCompletedEventAttributes
-> FieldAccessor
     HistoryEvent NexusOperationCompletedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_completed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationCompletedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationCompletedEventAttributes)
              (Lens' HistoryEvent (Maybe NexusOperationCompletedEventAttributes)
-> FieldAccessor
     HistoryEvent NexusOperationCompletedEventAttributes
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'nexusOperationCompletedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationFailedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationFailedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationFailedEventAttributes
-> FieldAccessor HistoryEvent NexusOperationFailedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_failed_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationFailedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationFailedEventAttributes)
              (Lens' HistoryEvent (Maybe NexusOperationFailedEventAttributes)
-> FieldAccessor HistoryEvent NexusOperationFailedEventAttributes
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'nexusOperationFailedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationCanceledEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationCanceledEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationCanceledEventAttributes
-> FieldAccessor HistoryEvent NexusOperationCanceledEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_canceled_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationCanceledEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationCanceledEventAttributes)
              (Lens' HistoryEvent (Maybe NexusOperationCanceledEventAttributes)
-> FieldAccessor HistoryEvent NexusOperationCanceledEventAttributes
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'nexusOperationCanceledEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationTimedOutEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationTimedOutEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationTimedOutEventAttributes
-> FieldAccessor HistoryEvent NexusOperationTimedOutEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_timed_out_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationTimedOutEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationTimedOutEventAttributes)
              (Lens' HistoryEvent (Maybe NexusOperationTimedOutEventAttributes)
-> FieldAccessor HistoryEvent NexusOperationTimedOutEventAttributes
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'nexusOperationTimedOutEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
        nexusOperationCancelRequestedEventAttributes__field_descriptor :: FieldDescriptor HistoryEvent
nexusOperationCancelRequestedEventAttributes__field_descriptor
          = String
-> FieldTypeDescriptor NexusOperationCancelRequestedEventAttributes
-> FieldAccessor
     HistoryEvent NexusOperationCancelRequestedEventAttributes
-> FieldDescriptor HistoryEvent
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_operation_cancel_requested_event_attributes"
              (MessageOrGroup
-> FieldTypeDescriptor NexusOperationCancelRequestedEventAttributes
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationCancelRequestedEventAttributes)
              (Lens'
  HistoryEvent (Maybe NexusOperationCancelRequestedEventAttributes)
-> FieldAccessor
     HistoryEvent NexusOperationCancelRequestedEventAttributes
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'nexusOperationCancelRequestedEventAttributes")) ::
              Data.ProtoLens.FieldDescriptor HistoryEvent
      in
        [(Tag, FieldDescriptor HistoryEvent)]
-> Map Tag (FieldDescriptor HistoryEvent)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor HistoryEvent
eventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor HistoryEvent
eventTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor HistoryEvent
eventType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor HistoryEvent
version__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor HistoryEvent
taskId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
300, FieldDescriptor HistoryEvent
workerMayIgnore__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, 
            FieldDescriptor HistoryEvent
workflowExecutionStartedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, 
            FieldDescriptor HistoryEvent
workflowExecutionCompletedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, 
            FieldDescriptor HistoryEvent
workflowExecutionFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, 
            FieldDescriptor HistoryEvent
workflowExecutionTimedOutEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, 
            FieldDescriptor HistoryEvent
workflowTaskScheduledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor HistoryEvent
workflowTaskStartedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, 
            FieldDescriptor HistoryEvent
workflowTaskCompletedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, 
            FieldDescriptor HistoryEvent
workflowTaskTimedOutEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, 
            FieldDescriptor HistoryEvent
workflowTaskFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, 
            FieldDescriptor HistoryEvent
activityTaskScheduledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, 
            FieldDescriptor HistoryEvent
activityTaskStartedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, 
            FieldDescriptor HistoryEvent
activityTaskCompletedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, 
            FieldDescriptor HistoryEvent
activityTaskFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, 
            FieldDescriptor HistoryEvent
activityTaskTimedOutEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
20, 
            FieldDescriptor HistoryEvent
timerStartedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
21, 
            FieldDescriptor HistoryEvent
timerFiredEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
22, 
            FieldDescriptor HistoryEvent
activityTaskCancelRequestedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
23, 
            FieldDescriptor HistoryEvent
activityTaskCanceledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
24, 
            FieldDescriptor HistoryEvent
timerCanceledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
25, 
            FieldDescriptor HistoryEvent
markerRecordedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
26, 
            FieldDescriptor HistoryEvent
workflowExecutionSignaledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
27, 
            FieldDescriptor HistoryEvent
workflowExecutionTerminatedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
28, 
            FieldDescriptor HistoryEvent
workflowExecutionCancelRequestedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
29, 
            FieldDescriptor HistoryEvent
workflowExecutionCanceledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
30, 
            FieldDescriptor HistoryEvent
requestCancelExternalWorkflowExecutionInitiatedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
31, 
            FieldDescriptor HistoryEvent
requestCancelExternalWorkflowExecutionFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
32, 
            FieldDescriptor HistoryEvent
externalWorkflowExecutionCancelRequestedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
33, 
            FieldDescriptor HistoryEvent
workflowExecutionContinuedAsNewEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
34, 
            FieldDescriptor HistoryEvent
startChildWorkflowExecutionInitiatedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
35, 
            FieldDescriptor HistoryEvent
startChildWorkflowExecutionFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
36, 
            FieldDescriptor HistoryEvent
childWorkflowExecutionStartedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
37, 
            FieldDescriptor HistoryEvent
childWorkflowExecutionCompletedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
38, 
            FieldDescriptor HistoryEvent
childWorkflowExecutionFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
39, 
            FieldDescriptor HistoryEvent
childWorkflowExecutionCanceledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
40, 
            FieldDescriptor HistoryEvent
childWorkflowExecutionTimedOutEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
41, 
            FieldDescriptor HistoryEvent
childWorkflowExecutionTerminatedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
42, 
            FieldDescriptor HistoryEvent
signalExternalWorkflowExecutionInitiatedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
43, 
            FieldDescriptor HistoryEvent
signalExternalWorkflowExecutionFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
44, 
            FieldDescriptor HistoryEvent
externalWorkflowExecutionSignaledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
45, 
            FieldDescriptor HistoryEvent
upsertWorkflowSearchAttributesEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
46, 
            FieldDescriptor HistoryEvent
workflowExecutionUpdateAcceptedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
47, 
            FieldDescriptor HistoryEvent
workflowExecutionUpdateRejectedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
48, 
            FieldDescriptor HistoryEvent
workflowExecutionUpdateCompletedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
49, 
            FieldDescriptor HistoryEvent
workflowPropertiesModifiedExternallyEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
50, 
            FieldDescriptor HistoryEvent
activityPropertiesModifiedExternallyEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
51, 
            FieldDescriptor HistoryEvent
workflowPropertiesModifiedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
52, 
            FieldDescriptor HistoryEvent
workflowExecutionUpdateAdmittedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
53, 
            FieldDescriptor HistoryEvent
nexusOperationScheduledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
54, 
            FieldDescriptor HistoryEvent
nexusOperationStartedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
55, 
            FieldDescriptor HistoryEvent
nexusOperationCompletedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
56, 
            FieldDescriptor HistoryEvent
nexusOperationFailedEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
57, 
            FieldDescriptor HistoryEvent
nexusOperationCanceledEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
58, 
            FieldDescriptor HistoryEvent
nexusOperationTimedOutEventAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
59, 
            FieldDescriptor HistoryEvent
nexusOperationCancelRequestedEventAttributes__field_descriptor)]
  unknownFields :: Lens' HistoryEvent FieldSet
unknownFields
    = (HistoryEvent -> FieldSet)
-> (HistoryEvent -> FieldSet -> HistoryEvent)
-> Lens' HistoryEvent FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        HistoryEvent -> FieldSet
_HistoryEvent'_unknownFields
        (\ HistoryEvent
x__ FieldSet
y__ -> HistoryEvent
x__ {_HistoryEvent'_unknownFields = y__})
  defMessage :: HistoryEvent
defMessage
    = HistoryEvent'_constructor
        {_HistoryEvent'eventId :: Int64
_HistoryEvent'eventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistoryEvent'eventTime :: Maybe Timestamp
_HistoryEvent'eventTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _HistoryEvent'eventType :: EventType
_HistoryEvent'eventType = EventType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistoryEvent'version :: Int64
_HistoryEvent'version = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistoryEvent'taskId :: Int64
_HistoryEvent'taskId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistoryEvent'workerMayIgnore :: Bool
_HistoryEvent'workerMayIgnore = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _HistoryEvent'attributes :: Maybe HistoryEvent'Attributes
_HistoryEvent'attributes = Maybe HistoryEvent'Attributes
forall a. Maybe a
Prelude.Nothing,
         _HistoryEvent'_unknownFields :: FieldSet
_HistoryEvent'_unknownFields = []}
  parseMessage :: Parser HistoryEvent
parseMessage
    = let
        loop ::
          HistoryEvent -> Data.ProtoLens.Encoding.Bytes.Parser HistoryEvent
        loop :: HistoryEvent -> Parser HistoryEvent
loop HistoryEvent
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 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
"event_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"eventId") 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
"event_time"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"eventTime") y x)
                        Word64
24
                          -> do y <- Parser EventType -> String -> Parser EventType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> EventType) -> Parser Int -> Parser EventType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> EventType
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
"event_type"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"eventType") 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
"version"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"version") y x)
                        Word64
40
                          -> 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
"task_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"taskId") y x)
                        Word64
2400
                          -> 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
"worker_may_ignore"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerMayIgnore") y x)
                        Word64
50
                          -> do y <- Parser WorkflowExecutionStartedEventAttributes
-> String -> Parser WorkflowExecutionStartedEventAttributes
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_started_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionStartedEventAttributes")
                                     y x)
                        Word64
58
                          -> do y <- Parser WorkflowExecutionCompletedEventAttributes
-> String -> Parser WorkflowExecutionCompletedEventAttributes
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_completed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionCompletedEventAttributes")
                                     y x)
                        Word64
66
                          -> do y <- Parser WorkflowExecutionFailedEventAttributes
-> String -> Parser WorkflowExecutionFailedEventAttributes
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_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionFailedEventAttributes")
                                     y x)
                        Word64
74
                          -> do y <- Parser WorkflowExecutionTimedOutEventAttributes
-> String -> Parser WorkflowExecutionTimedOutEventAttributes
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_timed_out_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionTimedOutEventAttributes")
                                     y x)
                        Word64
82
                          -> do y <- Parser WorkflowTaskScheduledEventAttributes
-> String -> Parser WorkflowTaskScheduledEventAttributes
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_scheduled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowTaskScheduledEventAttributes")
                                     y x)
                        Word64
90
                          -> do y <- Parser WorkflowTaskStartedEventAttributes
-> String -> Parser WorkflowTaskStartedEventAttributes
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_started_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowTaskStartedEventAttributes")
                                     y x)
                        Word64
98
                          -> do y <- Parser WorkflowTaskCompletedEventAttributes
-> String -> Parser WorkflowTaskCompletedEventAttributes
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_completed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowTaskCompletedEventAttributes")
                                     y x)
                        Word64
106
                          -> do y <- Parser WorkflowTaskTimedOutEventAttributes
-> String -> Parser WorkflowTaskTimedOutEventAttributes
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_timed_out_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowTaskTimedOutEventAttributes")
                                     y x)
                        Word64
114
                          -> do y <- Parser WorkflowTaskFailedEventAttributes
-> String -> Parser WorkflowTaskFailedEventAttributes
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_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowTaskFailedEventAttributes")
                                     y x)
                        Word64
122
                          -> do y <- Parser ActivityTaskScheduledEventAttributes
-> String -> Parser ActivityTaskScheduledEventAttributes
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_task_scheduled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskScheduledEventAttributes")
                                     y x)
                        Word64
130
                          -> do y <- Parser ActivityTaskStartedEventAttributes
-> String -> Parser ActivityTaskStartedEventAttributes
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_task_started_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskStartedEventAttributes")
                                     y x)
                        Word64
138
                          -> do y <- Parser ActivityTaskCompletedEventAttributes
-> String -> Parser ActivityTaskCompletedEventAttributes
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_task_completed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskCompletedEventAttributes")
                                     y x)
                        Word64
146
                          -> do y <- Parser ActivityTaskFailedEventAttributes
-> String -> Parser ActivityTaskFailedEventAttributes
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_task_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskFailedEventAttributes")
                                     y x)
                        Word64
154
                          -> do y <- Parser ActivityTaskTimedOutEventAttributes
-> String -> Parser ActivityTaskTimedOutEventAttributes
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_task_timed_out_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskTimedOutEventAttributes")
                                     y x)
                        Word64
162
                          -> do y <- Parser TimerStartedEventAttributes
-> String -> Parser TimerStartedEventAttributes
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
"timer_started_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"timerStartedEventAttributes") y
                                     x)
                        Word64
170
                          -> do y <- Parser TimerFiredEventAttributes
-> String -> Parser TimerFiredEventAttributes
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
"timer_fired_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"timerFiredEventAttributes") y x)
                        Word64
178
                          -> do y <- Parser ActivityTaskCancelRequestedEventAttributes
-> String -> Parser ActivityTaskCancelRequestedEventAttributes
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_task_cancel_requested_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskCancelRequestedEventAttributes")
                                     y x)
                        Word64
186
                          -> do y <- Parser ActivityTaskCanceledEventAttributes
-> String -> Parser ActivityTaskCanceledEventAttributes
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_task_canceled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityTaskCanceledEventAttributes")
                                     y x)
                        Word64
194
                          -> do y <- Parser TimerCanceledEventAttributes
-> String -> Parser TimerCanceledEventAttributes
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
"timer_canceled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"timerCanceledEventAttributes") y
                                     x)
                        Word64
202
                          -> do y <- Parser MarkerRecordedEventAttributes
-> String -> Parser MarkerRecordedEventAttributes
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
"marker_recorded_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"markerRecordedEventAttributes") y
                                     x)
                        Word64
210
                          -> do y <- Parser WorkflowExecutionSignaledEventAttributes
-> String -> Parser WorkflowExecutionSignaledEventAttributes
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_signaled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionSignaledEventAttributes")
                                     y x)
                        Word64
218
                          -> do y <- Parser WorkflowExecutionTerminatedEventAttributes
-> String -> Parser WorkflowExecutionTerminatedEventAttributes
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_terminated_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionTerminatedEventAttributes")
                                     y x)
                        Word64
226
                          -> do y <- Parser WorkflowExecutionCancelRequestedEventAttributes
-> String -> Parser WorkflowExecutionCancelRequestedEventAttributes
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_cancel_requested_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionCancelRequestedEventAttributes")
                                     y x)
                        Word64
234
                          -> do y <- Parser WorkflowExecutionCanceledEventAttributes
-> String -> Parser WorkflowExecutionCanceledEventAttributes
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_canceled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionCanceledEventAttributes")
                                     y x)
                        Word64
242
                          -> do y <- Parser
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> String
-> Parser
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
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
"request_cancel_external_workflow_execution_initiated_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"requestCancelExternalWorkflowExecutionInitiatedEventAttributes")
                                     y x)
                        Word64
250
                          -> do y <- Parser RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> String
-> Parser
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
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
"request_cancel_external_workflow_execution_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"requestCancelExternalWorkflowExecutionFailedEventAttributes")
                                     y x)
                        Word64
258
                          -> do y <- Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
-> String
-> Parser ExternalWorkflowExecutionCancelRequestedEventAttributes
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
"external_workflow_execution_cancel_requested_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"externalWorkflowExecutionCancelRequestedEventAttributes")
                                     y x)
                        Word64
266
                          -> do y <- Parser WorkflowExecutionContinuedAsNewEventAttributes
-> String -> Parser WorkflowExecutionContinuedAsNewEventAttributes
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_continued_as_new_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionContinuedAsNewEventAttributes")
                                     y x)
                        Word64
274
                          -> do y <- Parser StartChildWorkflowExecutionInitiatedEventAttributes
-> String
-> Parser StartChildWorkflowExecutionInitiatedEventAttributes
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_child_workflow_execution_initiated_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"startChildWorkflowExecutionInitiatedEventAttributes")
                                     y x)
                        Word64
282
                          -> do y <- Parser StartChildWorkflowExecutionFailedEventAttributes
-> String
-> Parser StartChildWorkflowExecutionFailedEventAttributes
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_child_workflow_execution_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"startChildWorkflowExecutionFailedEventAttributes")
                                     y x)
                        Word64
290
                          -> do y <- Parser ChildWorkflowExecutionStartedEventAttributes
-> String -> Parser ChildWorkflowExecutionStartedEventAttributes
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
"child_workflow_execution_started_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"childWorkflowExecutionStartedEventAttributes")
                                     y x)
                        Word64
298
                          -> do y <- Parser ChildWorkflowExecutionCompletedEventAttributes
-> String -> Parser ChildWorkflowExecutionCompletedEventAttributes
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
"child_workflow_execution_completed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"childWorkflowExecutionCompletedEventAttributes")
                                     y x)
                        Word64
306
                          -> do y <- Parser ChildWorkflowExecutionFailedEventAttributes
-> String -> Parser ChildWorkflowExecutionFailedEventAttributes
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
"child_workflow_execution_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"childWorkflowExecutionFailedEventAttributes")
                                     y x)
                        Word64
314
                          -> do y <- Parser ChildWorkflowExecutionCanceledEventAttributes
-> String -> Parser ChildWorkflowExecutionCanceledEventAttributes
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
"child_workflow_execution_canceled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"childWorkflowExecutionCanceledEventAttributes")
                                     y x)
                        Word64
322
                          -> do y <- Parser ChildWorkflowExecutionTimedOutEventAttributes
-> String -> Parser ChildWorkflowExecutionTimedOutEventAttributes
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
"child_workflow_execution_timed_out_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"childWorkflowExecutionTimedOutEventAttributes")
                                     y x)
                        Word64
330
                          -> do y <- Parser ChildWorkflowExecutionTerminatedEventAttributes
-> String -> Parser ChildWorkflowExecutionTerminatedEventAttributes
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
"child_workflow_execution_terminated_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"childWorkflowExecutionTerminatedEventAttributes")
                                     y x)
                        Word64
338
                          -> do y <- Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
-> String
-> Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
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
"signal_external_workflow_execution_initiated_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"signalExternalWorkflowExecutionInitiatedEventAttributes")
                                     y x)
                        Word64
346
                          -> do y <- Parser SignalExternalWorkflowExecutionFailedEventAttributes
-> String
-> Parser SignalExternalWorkflowExecutionFailedEventAttributes
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
"signal_external_workflow_execution_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"signalExternalWorkflowExecutionFailedEventAttributes")
                                     y x)
                        Word64
354
                          -> do y <- Parser ExternalWorkflowExecutionSignaledEventAttributes
-> String
-> Parser ExternalWorkflowExecutionSignaledEventAttributes
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
"external_workflow_execution_signaled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"externalWorkflowExecutionSignaledEventAttributes")
                                     y x)
                        Word64
362
                          -> do y <- Parser UpsertWorkflowSearchAttributesEventAttributes
-> String -> Parser UpsertWorkflowSearchAttributesEventAttributes
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
"upsert_workflow_search_attributes_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"upsertWorkflowSearchAttributesEventAttributes")
                                     y x)
                        Word64
370
                          -> do y <- Parser WorkflowExecutionUpdateAcceptedEventAttributes
-> String -> Parser WorkflowExecutionUpdateAcceptedEventAttributes
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_update_accepted_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionUpdateAcceptedEventAttributes")
                                     y x)
                        Word64
378
                          -> do y <- Parser WorkflowExecutionUpdateRejectedEventAttributes
-> String -> Parser WorkflowExecutionUpdateRejectedEventAttributes
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_update_rejected_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionUpdateRejectedEventAttributes")
                                     y x)
                        Word64
386
                          -> do y <- Parser WorkflowExecutionUpdateCompletedEventAttributes
-> String -> Parser WorkflowExecutionUpdateCompletedEventAttributes
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_update_completed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionUpdateCompletedEventAttributes")
                                     y x)
                        Word64
394
                          -> do y <- Parser WorkflowPropertiesModifiedExternallyEventAttributes
-> String
-> Parser WorkflowPropertiesModifiedExternallyEventAttributes
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_properties_modified_externally_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowPropertiesModifiedExternallyEventAttributes")
                                     y x)
                        Word64
402
                          -> do y <- Parser ActivityPropertiesModifiedExternallyEventAttributes
-> String
-> Parser ActivityPropertiesModifiedExternallyEventAttributes
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_properties_modified_externally_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"activityPropertiesModifiedExternallyEventAttributes")
                                     y x)
                        Word64
410
                          -> do y <- Parser WorkflowPropertiesModifiedEventAttributes
-> String -> Parser WorkflowPropertiesModifiedEventAttributes
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_properties_modified_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowPropertiesModifiedEventAttributes")
                                     y x)
                        Word64
418
                          -> do y <- Parser WorkflowExecutionUpdateAdmittedEventAttributes
-> String -> Parser WorkflowExecutionUpdateAdmittedEventAttributes
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_update_admitted_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"workflowExecutionUpdateAdmittedEventAttributes")
                                     y x)
                        Word64
426
                          -> do y <- Parser NexusOperationScheduledEventAttributes
-> String -> Parser NexusOperationScheduledEventAttributes
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
"nexus_operation_scheduled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationScheduledEventAttributes")
                                     y x)
                        Word64
434
                          -> do y <- Parser NexusOperationStartedEventAttributes
-> String -> Parser NexusOperationStartedEventAttributes
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
"nexus_operation_started_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationStartedEventAttributes")
                                     y x)
                        Word64
442
                          -> do y <- Parser NexusOperationCompletedEventAttributes
-> String -> Parser NexusOperationCompletedEventAttributes
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
"nexus_operation_completed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationCompletedEventAttributes")
                                     y x)
                        Word64
450
                          -> do y <- Parser NexusOperationFailedEventAttributes
-> String -> Parser NexusOperationFailedEventAttributes
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
"nexus_operation_failed_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationFailedEventAttributes")
                                     y x)
                        Word64
458
                          -> do y <- Parser NexusOperationCanceledEventAttributes
-> String -> Parser NexusOperationCanceledEventAttributes
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
"nexus_operation_canceled_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationCanceledEventAttributes")
                                     y x)
                        Word64
466
                          -> do y <- Parser NexusOperationTimedOutEventAttributes
-> String -> Parser NexusOperationTimedOutEventAttributes
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
"nexus_operation_timed_out_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationTimedOutEventAttributes")
                                     y x)
                        Word64
474
                          -> do y <- Parser NexusOperationCancelRequestedEventAttributes
-> String -> Parser NexusOperationCancelRequestedEventAttributes
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
"nexus_operation_cancel_requested_event_attributes"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"nexusOperationCancelRequestedEventAttributes")
                                     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 HistoryEvent -> String -> Parser HistoryEvent
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do HistoryEvent -> Parser HistoryEvent
loop HistoryEvent
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"HistoryEvent"
  buildMessage :: HistoryEvent -> Builder
buildMessage
    = \ HistoryEvent
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v = FoldLike Int64 HistoryEvent HistoryEvent Int64 Int64
-> HistoryEvent -> 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 @"eventId") HistoryEvent
_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
8)
                      ((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)
  HistoryEvent
  HistoryEvent
  (Maybe Timestamp)
  (Maybe Timestamp)
-> HistoryEvent -> 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'eventTime") HistoryEvent
_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.<>)
                   (let
                      _v :: EventType
_v = FoldLike EventType HistoryEvent HistoryEvent EventType EventType
-> HistoryEvent -> EventType
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 @"eventType") HistoryEvent
_x
                    in
                      if EventType -> EventType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) EventType
_v EventType
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) -> (EventType -> Int) -> EventType -> 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)
                               EventType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum EventType
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (let
                         _v :: Int64
_v = FoldLike Int64 HistoryEvent HistoryEvent Int64 Int64
-> HistoryEvent -> 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 @"version") HistoryEvent
_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 :: Int64
_v = FoldLike Int64 HistoryEvent HistoryEvent Int64 Int64
-> HistoryEvent -> 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 @"taskId") HistoryEvent
_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
40)
                                  ((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 :: Bool
_v
                                 = FoldLike Bool HistoryEvent HistoryEvent Bool Bool
-> HistoryEvent -> 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 @"workerMayIgnore") HistoryEvent
_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
2400)
                                     ((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))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe HistoryEvent'Attributes)
  HistoryEvent
  HistoryEvent
  (Maybe HistoryEvent'Attributes)
  (Maybe HistoryEvent'Attributes)
-> HistoryEvent -> Maybe HistoryEvent'Attributes
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'attributes") HistoryEvent
_x
                                of
                                  Maybe HistoryEvent'Attributes
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionStartedEventAttributes WorkflowExecutionStartedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionStartedEventAttributes -> ByteString)
-> WorkflowExecutionStartedEventAttributes
-> 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))
                                            WorkflowExecutionStartedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionStartedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionCompletedEventAttributes WorkflowExecutionCompletedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
58)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionCompletedEventAttributes -> ByteString)
-> WorkflowExecutionCompletedEventAttributes
-> 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))
                                            WorkflowExecutionCompletedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionCompletedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionFailedEventAttributes WorkflowExecutionFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
66)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionFailedEventAttributes -> ByteString)
-> WorkflowExecutionFailedEventAttributes
-> 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))
                                            WorkflowExecutionFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionTimedOutEventAttributes WorkflowExecutionTimedOutEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
74)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionTimedOutEventAttributes -> ByteString)
-> WorkflowExecutionTimedOutEventAttributes
-> 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))
                                            WorkflowExecutionTimedOutEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionTimedOutEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowTaskScheduledEventAttributes WorkflowTaskScheduledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
82)
                                         ((ByteString -> Builder)
-> (WorkflowTaskScheduledEventAttributes -> ByteString)
-> WorkflowTaskScheduledEventAttributes
-> 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))
                                            WorkflowTaskScheduledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskScheduledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowTaskStartedEventAttributes WorkflowTaskStartedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
90)
                                         ((ByteString -> Builder)
-> (WorkflowTaskStartedEventAttributes -> ByteString)
-> WorkflowTaskStartedEventAttributes
-> 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))
                                            WorkflowTaskStartedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskStartedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
98)
                                         ((ByteString -> Builder)
-> (WorkflowTaskCompletedEventAttributes -> ByteString)
-> WorkflowTaskCompletedEventAttributes
-> 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))
                                            WorkflowTaskCompletedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskCompletedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowTaskTimedOutEventAttributes WorkflowTaskTimedOutEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
106)
                                         ((ByteString -> Builder)
-> (WorkflowTaskTimedOutEventAttributes -> ByteString)
-> WorkflowTaskTimedOutEventAttributes
-> 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))
                                            WorkflowTaskTimedOutEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskTimedOutEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowTaskFailedEventAttributes WorkflowTaskFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
114)
                                         ((ByteString -> Builder)
-> (WorkflowTaskFailedEventAttributes -> ByteString)
-> WorkflowTaskFailedEventAttributes
-> 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))
                                            WorkflowTaskFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskScheduledEventAttributes ActivityTaskScheduledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
122)
                                         ((ByteString -> Builder)
-> (ActivityTaskScheduledEventAttributes -> ByteString)
-> ActivityTaskScheduledEventAttributes
-> 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))
                                            ActivityTaskScheduledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskScheduledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskStartedEventAttributes ActivityTaskStartedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
130)
                                         ((ByteString -> Builder)
-> (ActivityTaskStartedEventAttributes -> ByteString)
-> ActivityTaskStartedEventAttributes
-> 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))
                                            ActivityTaskStartedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskStartedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskCompletedEventAttributes ActivityTaskCompletedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
138)
                                         ((ByteString -> Builder)
-> (ActivityTaskCompletedEventAttributes -> ByteString)
-> ActivityTaskCompletedEventAttributes
-> 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))
                                            ActivityTaskCompletedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskCompletedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskFailedEventAttributes ActivityTaskFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
146)
                                         ((ByteString -> Builder)
-> (ActivityTaskFailedEventAttributes -> ByteString)
-> ActivityTaskFailedEventAttributes
-> 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))
                                            ActivityTaskFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskTimedOutEventAttributes ActivityTaskTimedOutEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
154)
                                         ((ByteString -> Builder)
-> (ActivityTaskTimedOutEventAttributes -> ByteString)
-> ActivityTaskTimedOutEventAttributes
-> 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))
                                            ActivityTaskTimedOutEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskTimedOutEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'TimerStartedEventAttributes TimerStartedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
162)
                                         ((ByteString -> Builder)
-> (TimerStartedEventAttributes -> ByteString)
-> TimerStartedEventAttributes
-> 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))
                                            TimerStartedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimerStartedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'TimerFiredEventAttributes TimerFiredEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
170)
                                         ((ByteString -> Builder)
-> (TimerFiredEventAttributes -> ByteString)
-> TimerFiredEventAttributes
-> 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))
                                            TimerFiredEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimerFiredEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskCancelRequestedEventAttributes ActivityTaskCancelRequestedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
178)
                                         ((ByteString -> Builder)
-> (ActivityTaskCancelRequestedEventAttributes -> ByteString)
-> ActivityTaskCancelRequestedEventAttributes
-> 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))
                                            ActivityTaskCancelRequestedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskCancelRequestedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityTaskCanceledEventAttributes ActivityTaskCanceledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
186)
                                         ((ByteString -> Builder)
-> (ActivityTaskCanceledEventAttributes -> ByteString)
-> ActivityTaskCanceledEventAttributes
-> 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))
                                            ActivityTaskCanceledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityTaskCanceledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'TimerCanceledEventAttributes TimerCanceledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
194)
                                         ((ByteString -> Builder)
-> (TimerCanceledEventAttributes -> ByteString)
-> TimerCanceledEventAttributes
-> 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))
                                            TimerCanceledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage TimerCanceledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'MarkerRecordedEventAttributes MarkerRecordedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
202)
                                         ((ByteString -> Builder)
-> (MarkerRecordedEventAttributes -> ByteString)
-> MarkerRecordedEventAttributes
-> 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))
                                            MarkerRecordedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage MarkerRecordedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionSignaledEventAttributes WorkflowExecutionSignaledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
210)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionSignaledEventAttributes -> ByteString)
-> WorkflowExecutionSignaledEventAttributes
-> 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))
                                            WorkflowExecutionSignaledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionSignaledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionTerminatedEventAttributes WorkflowExecutionTerminatedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
218)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionTerminatedEventAttributes -> ByteString)
-> WorkflowExecutionTerminatedEventAttributes
-> 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))
                                            WorkflowExecutionTerminatedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionTerminatedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes WorkflowExecutionCancelRequestedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
226)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionCancelRequestedEventAttributes -> ByteString)
-> WorkflowExecutionCancelRequestedEventAttributes
-> 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))
                                            WorkflowExecutionCancelRequestedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionCancelRequestedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionCanceledEventAttributes WorkflowExecutionCanceledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
234)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionCanceledEventAttributes -> ByteString)
-> WorkflowExecutionCanceledEventAttributes
-> 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))
                                            WorkflowExecutionCanceledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionCanceledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
242)
                                         ((ByteString -> Builder)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> ByteString)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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))
                                            RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes RequestCancelExternalWorkflowExecutionFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
250)
                                         ((ByteString -> Builder)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> ByteString)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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))
                                            RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage RequestCancelExternalWorkflowExecutionFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes ExternalWorkflowExecutionCancelRequestedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
258)
                                         ((ByteString -> Builder)
-> (ExternalWorkflowExecutionCancelRequestedEventAttributes
    -> ByteString)
-> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> 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))
                                            ExternalWorkflowExecutionCancelRequestedEventAttributes
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExternalWorkflowExecutionCancelRequestedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes WorkflowExecutionContinuedAsNewEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
266)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionContinuedAsNewEventAttributes -> ByteString)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> 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))
                                            WorkflowExecutionContinuedAsNewEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionContinuedAsNewEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes StartChildWorkflowExecutionInitiatedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
274)
                                         ((ByteString -> Builder)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> ByteString)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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))
                                            StartChildWorkflowExecutionInitiatedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartChildWorkflowExecutionInitiatedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes StartChildWorkflowExecutionFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
282)
                                         ((ByteString -> Builder)
-> (StartChildWorkflowExecutionFailedEventAttributes -> ByteString)
-> StartChildWorkflowExecutionFailedEventAttributes
-> 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))
                                            StartChildWorkflowExecutionFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage StartChildWorkflowExecutionFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ChildWorkflowExecutionStartedEventAttributes ChildWorkflowExecutionStartedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
290)
                                         ((ByteString -> Builder)
-> (ChildWorkflowExecutionStartedEventAttributes -> ByteString)
-> ChildWorkflowExecutionStartedEventAttributes
-> 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))
                                            ChildWorkflowExecutionStartedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowExecutionStartedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes ChildWorkflowExecutionCompletedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
298)
                                         ((ByteString -> Builder)
-> (ChildWorkflowExecutionCompletedEventAttributes -> ByteString)
-> ChildWorkflowExecutionCompletedEventAttributes
-> 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))
                                            ChildWorkflowExecutionCompletedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowExecutionCompletedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ChildWorkflowExecutionFailedEventAttributes ChildWorkflowExecutionFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
306)
                                         ((ByteString -> Builder)
-> (ChildWorkflowExecutionFailedEventAttributes -> ByteString)
-> ChildWorkflowExecutionFailedEventAttributes
-> 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))
                                            ChildWorkflowExecutionFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowExecutionFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes ChildWorkflowExecutionCanceledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
314)
                                         ((ByteString -> Builder)
-> (ChildWorkflowExecutionCanceledEventAttributes -> ByteString)
-> ChildWorkflowExecutionCanceledEventAttributes
-> 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))
                                            ChildWorkflowExecutionCanceledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowExecutionCanceledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes ChildWorkflowExecutionTimedOutEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
322)
                                         ((ByteString -> Builder)
-> (ChildWorkflowExecutionTimedOutEventAttributes -> ByteString)
-> ChildWorkflowExecutionTimedOutEventAttributes
-> 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))
                                            ChildWorkflowExecutionTimedOutEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowExecutionTimedOutEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes ChildWorkflowExecutionTerminatedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
330)
                                         ((ByteString -> Builder)
-> (ChildWorkflowExecutionTerminatedEventAttributes -> ByteString)
-> ChildWorkflowExecutionTerminatedEventAttributes
-> 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))
                                            ChildWorkflowExecutionTerminatedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ChildWorkflowExecutionTerminatedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes SignalExternalWorkflowExecutionInitiatedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
338)
                                         ((ByteString -> Builder)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> ByteString)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> 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))
                                            SignalExternalWorkflowExecutionInitiatedEventAttributes
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SignalExternalWorkflowExecutionInitiatedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes SignalExternalWorkflowExecutionFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
346)
                                         ((ByteString -> Builder)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> ByteString)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> 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))
                                            SignalExternalWorkflowExecutionFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage SignalExternalWorkflowExecutionFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes ExternalWorkflowExecutionSignaledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
354)
                                         ((ByteString -> Builder)
-> (ExternalWorkflowExecutionSignaledEventAttributes -> ByteString)
-> ExternalWorkflowExecutionSignaledEventAttributes
-> 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))
                                            ExternalWorkflowExecutionSignaledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ExternalWorkflowExecutionSignaledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes UpsertWorkflowSearchAttributesEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
362)
                                         ((ByteString -> Builder)
-> (UpsertWorkflowSearchAttributesEventAttributes -> ByteString)
-> UpsertWorkflowSearchAttributesEventAttributes
-> 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))
                                            UpsertWorkflowSearchAttributesEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage UpsertWorkflowSearchAttributesEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes WorkflowExecutionUpdateAcceptedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
370)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionUpdateAcceptedEventAttributes -> ByteString)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> 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))
                                            WorkflowExecutionUpdateAcceptedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionUpdateAcceptedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes WorkflowExecutionUpdateRejectedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
378)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionUpdateRejectedEventAttributes -> ByteString)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> 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))
                                            WorkflowExecutionUpdateRejectedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionUpdateRejectedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes WorkflowExecutionUpdateCompletedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
386)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionUpdateCompletedEventAttributes -> ByteString)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> 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))
                                            WorkflowExecutionUpdateCompletedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionUpdateCompletedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes WorkflowPropertiesModifiedExternallyEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
394)
                                         ((ByteString -> Builder)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> ByteString)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> 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))
                                            WorkflowPropertiesModifiedExternallyEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowPropertiesModifiedExternallyEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes ActivityPropertiesModifiedExternallyEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
402)
                                         ((ByteString -> Builder)
-> (ActivityPropertiesModifiedExternallyEventAttributes
    -> ByteString)
-> ActivityPropertiesModifiedExternallyEventAttributes
-> 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))
                                            ActivityPropertiesModifiedExternallyEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage ActivityPropertiesModifiedExternallyEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowPropertiesModifiedEventAttributes WorkflowPropertiesModifiedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
410)
                                         ((ByteString -> Builder)
-> (WorkflowPropertiesModifiedEventAttributes -> ByteString)
-> WorkflowPropertiesModifiedEventAttributes
-> 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))
                                            WorkflowPropertiesModifiedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowPropertiesModifiedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes WorkflowExecutionUpdateAdmittedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
418)
                                         ((ByteString -> Builder)
-> (WorkflowExecutionUpdateAdmittedEventAttributes -> ByteString)
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> 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))
                                            WorkflowExecutionUpdateAdmittedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowExecutionUpdateAdmittedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationScheduledEventAttributes NexusOperationScheduledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
426)
                                         ((ByteString -> Builder)
-> (NexusOperationScheduledEventAttributes -> ByteString)
-> NexusOperationScheduledEventAttributes
-> 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))
                                            NexusOperationScheduledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationScheduledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationStartedEventAttributes NexusOperationStartedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
434)
                                         ((ByteString -> Builder)
-> (NexusOperationStartedEventAttributes -> ByteString)
-> NexusOperationStartedEventAttributes
-> 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))
                                            NexusOperationStartedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationStartedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationCompletedEventAttributes NexusOperationCompletedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
442)
                                         ((ByteString -> Builder)
-> (NexusOperationCompletedEventAttributes -> ByteString)
-> NexusOperationCompletedEventAttributes
-> 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))
                                            NexusOperationCompletedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationCompletedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationFailedEventAttributes NexusOperationFailedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
450)
                                         ((ByteString -> Builder)
-> (NexusOperationFailedEventAttributes -> ByteString)
-> NexusOperationFailedEventAttributes
-> 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))
                                            NexusOperationFailedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationFailedEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationCanceledEventAttributes NexusOperationCanceledEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
458)
                                         ((ByteString -> Builder)
-> (NexusOperationCanceledEventAttributes -> ByteString)
-> NexusOperationCanceledEventAttributes
-> 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))
                                            NexusOperationCanceledEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationCanceledEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationTimedOutEventAttributes NexusOperationTimedOutEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
466)
                                         ((ByteString -> Builder)
-> (NexusOperationTimedOutEventAttributes -> ByteString)
-> NexusOperationTimedOutEventAttributes
-> 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))
                                            NexusOperationTimedOutEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationTimedOutEventAttributes
v)
                                  (Prelude.Just (HistoryEvent'NexusOperationCancelRequestedEventAttributes NexusOperationCancelRequestedEventAttributes
v))
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
474)
                                         ((ByteString -> Builder)
-> (NexusOperationCancelRequestedEventAttributes -> ByteString)
-> NexusOperationCancelRequestedEventAttributes
-> 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))
                                            NexusOperationCancelRequestedEventAttributes -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage NexusOperationCancelRequestedEventAttributes
v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike FieldSet HistoryEvent HistoryEvent FieldSet FieldSet
-> HistoryEvent -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike FieldSet HistoryEvent HistoryEvent FieldSet FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' HistoryEvent FieldSet
Data.ProtoLens.unknownFields HistoryEvent
_x))))))))
instance Control.DeepSeq.NFData HistoryEvent where
  rnf :: HistoryEvent -> ()
rnf
    = \ HistoryEvent
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (HistoryEvent -> FieldSet
_HistoryEvent'_unknownFields HistoryEvent
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (HistoryEvent -> Int64
_HistoryEvent'eventId HistoryEvent
x__)
                (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (HistoryEvent -> Maybe Timestamp
_HistoryEvent'eventTime HistoryEvent
x__)
                   (EventType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (HistoryEvent -> EventType
_HistoryEvent'eventType HistoryEvent
x__)
                      (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (HistoryEvent -> Int64
_HistoryEvent'version HistoryEvent
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (HistoryEvent -> Int64
_HistoryEvent'taskId HistoryEvent
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (HistoryEvent -> Bool
_HistoryEvent'workerMayIgnore HistoryEvent
x__)
                               (Maybe HistoryEvent'Attributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq (HistoryEvent -> Maybe HistoryEvent'Attributes
_HistoryEvent'attributes HistoryEvent
x__) ())))))))
instance Control.DeepSeq.NFData HistoryEvent'Attributes where
  rnf :: HistoryEvent'Attributes -> ()
rnf (HistoryEvent'WorkflowExecutionStartedEventAttributes WorkflowExecutionStartedEventAttributes
x__)
    = WorkflowExecutionStartedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionStartedEventAttributes
x__
  rnf (HistoryEvent'WorkflowExecutionCompletedEventAttributes WorkflowExecutionCompletedEventAttributes
x__)
    = WorkflowExecutionCompletedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionCompletedEventAttributes
x__
  rnf (HistoryEvent'WorkflowExecutionFailedEventAttributes WorkflowExecutionFailedEventAttributes
x__)
    = WorkflowExecutionFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionFailedEventAttributes
x__
  rnf (HistoryEvent'WorkflowExecutionTimedOutEventAttributes WorkflowExecutionTimedOutEventAttributes
x__)
    = WorkflowExecutionTimedOutEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionTimedOutEventAttributes
x__
  rnf (HistoryEvent'WorkflowTaskScheduledEventAttributes WorkflowTaskScheduledEventAttributes
x__)
    = WorkflowTaskScheduledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTaskScheduledEventAttributes
x__
  rnf (HistoryEvent'WorkflowTaskStartedEventAttributes WorkflowTaskStartedEventAttributes
x__)
    = WorkflowTaskStartedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTaskStartedEventAttributes
x__
  rnf (HistoryEvent'WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedEventAttributes
x__)
    = WorkflowTaskCompletedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTaskCompletedEventAttributes
x__
  rnf (HistoryEvent'WorkflowTaskTimedOutEventAttributes WorkflowTaskTimedOutEventAttributes
x__)
    = WorkflowTaskTimedOutEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTaskTimedOutEventAttributes
x__
  rnf (HistoryEvent'WorkflowTaskFailedEventAttributes WorkflowTaskFailedEventAttributes
x__)
    = WorkflowTaskFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowTaskFailedEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskScheduledEventAttributes ActivityTaskScheduledEventAttributes
x__)
    = ActivityTaskScheduledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskScheduledEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskStartedEventAttributes ActivityTaskStartedEventAttributes
x__)
    = ActivityTaskStartedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskStartedEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskCompletedEventAttributes ActivityTaskCompletedEventAttributes
x__)
    = ActivityTaskCompletedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskCompletedEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskFailedEventAttributes ActivityTaskFailedEventAttributes
x__)
    = ActivityTaskFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskFailedEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskTimedOutEventAttributes ActivityTaskTimedOutEventAttributes
x__)
    = ActivityTaskTimedOutEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskTimedOutEventAttributes
x__
  rnf (HistoryEvent'TimerStartedEventAttributes TimerStartedEventAttributes
x__)
    = TimerStartedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf TimerStartedEventAttributes
x__
  rnf (HistoryEvent'TimerFiredEventAttributes TimerFiredEventAttributes
x__)
    = TimerFiredEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf TimerFiredEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskCancelRequestedEventAttributes ActivityTaskCancelRequestedEventAttributes
x__)
    = ActivityTaskCancelRequestedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskCancelRequestedEventAttributes
x__
  rnf (HistoryEvent'ActivityTaskCanceledEventAttributes ActivityTaskCanceledEventAttributes
x__)
    = ActivityTaskCanceledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityTaskCanceledEventAttributes
x__
  rnf (HistoryEvent'TimerCanceledEventAttributes TimerCanceledEventAttributes
x__)
    = TimerCanceledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf TimerCanceledEventAttributes
x__
  rnf (HistoryEvent'MarkerRecordedEventAttributes MarkerRecordedEventAttributes
x__)
    = MarkerRecordedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf MarkerRecordedEventAttributes
x__
  rnf (HistoryEvent'WorkflowExecutionSignaledEventAttributes WorkflowExecutionSignaledEventAttributes
x__)
    = WorkflowExecutionSignaledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionSignaledEventAttributes
x__
  rnf (HistoryEvent'WorkflowExecutionTerminatedEventAttributes WorkflowExecutionTerminatedEventAttributes
x__)
    = WorkflowExecutionTerminatedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionTerminatedEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes WorkflowExecutionCancelRequestedEventAttributes
x__)
    = WorkflowExecutionCancelRequestedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionCancelRequestedEventAttributes
x__
  rnf (HistoryEvent'WorkflowExecutionCanceledEventAttributes WorkflowExecutionCanceledEventAttributes
x__)
    = WorkflowExecutionCanceledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionCanceledEventAttributes
x__
  rnf
    (HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
    = RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
  rnf
    (HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
    = RequestCancelExternalWorkflowExecutionFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
  rnf
    (HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes ExternalWorkflowExecutionCancelRequestedEventAttributes
x__)
    = ExternalWorkflowExecutionCancelRequestedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ExternalWorkflowExecutionCancelRequestedEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes WorkflowExecutionContinuedAsNewEventAttributes
x__)
    = WorkflowExecutionContinuedAsNewEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionContinuedAsNewEventAttributes
x__
  rnf
    (HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes StartChildWorkflowExecutionInitiatedEventAttributes
x__)
    = StartChildWorkflowExecutionInitiatedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartChildWorkflowExecutionInitiatedEventAttributes
x__
  rnf
    (HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes StartChildWorkflowExecutionFailedEventAttributes
x__)
    = StartChildWorkflowExecutionFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf StartChildWorkflowExecutionFailedEventAttributes
x__
  rnf (HistoryEvent'ChildWorkflowExecutionStartedEventAttributes ChildWorkflowExecutionStartedEventAttributes
x__)
    = ChildWorkflowExecutionStartedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ChildWorkflowExecutionStartedEventAttributes
x__
  rnf
    (HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes ChildWorkflowExecutionCompletedEventAttributes
x__)
    = ChildWorkflowExecutionCompletedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ChildWorkflowExecutionCompletedEventAttributes
x__
  rnf (HistoryEvent'ChildWorkflowExecutionFailedEventAttributes ChildWorkflowExecutionFailedEventAttributes
x__)
    = ChildWorkflowExecutionFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ChildWorkflowExecutionFailedEventAttributes
x__
  rnf
    (HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes ChildWorkflowExecutionCanceledEventAttributes
x__)
    = ChildWorkflowExecutionCanceledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ChildWorkflowExecutionCanceledEventAttributes
x__
  rnf
    (HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes ChildWorkflowExecutionTimedOutEventAttributes
x__)
    = ChildWorkflowExecutionTimedOutEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ChildWorkflowExecutionTimedOutEventAttributes
x__
  rnf
    (HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes ChildWorkflowExecutionTerminatedEventAttributes
x__)
    = ChildWorkflowExecutionTerminatedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ChildWorkflowExecutionTerminatedEventAttributes
x__
  rnf
    (HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
    = SignalExternalWorkflowExecutionInitiatedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
  rnf
    (HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes SignalExternalWorkflowExecutionFailedEventAttributes
x__)
    = SignalExternalWorkflowExecutionFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf SignalExternalWorkflowExecutionFailedEventAttributes
x__
  rnf
    (HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes ExternalWorkflowExecutionSignaledEventAttributes
x__)
    = ExternalWorkflowExecutionSignaledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ExternalWorkflowExecutionSignaledEventAttributes
x__
  rnf
    (HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes UpsertWorkflowSearchAttributesEventAttributes
x__)
    = UpsertWorkflowSearchAttributesEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf UpsertWorkflowSearchAttributesEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes WorkflowExecutionUpdateAcceptedEventAttributes
x__)
    = WorkflowExecutionUpdateAcceptedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionUpdateAcceptedEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes WorkflowExecutionUpdateRejectedEventAttributes
x__)
    = WorkflowExecutionUpdateRejectedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionUpdateRejectedEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes WorkflowExecutionUpdateCompletedEventAttributes
x__)
    = WorkflowExecutionUpdateCompletedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionUpdateCompletedEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes WorkflowPropertiesModifiedExternallyEventAttributes
x__)
    = WorkflowPropertiesModifiedExternallyEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowPropertiesModifiedExternallyEventAttributes
x__
  rnf
    (HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes ActivityPropertiesModifiedExternallyEventAttributes
x__)
    = ActivityPropertiesModifiedExternallyEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf ActivityPropertiesModifiedExternallyEventAttributes
x__
  rnf (HistoryEvent'WorkflowPropertiesModifiedEventAttributes WorkflowPropertiesModifiedEventAttributes
x__)
    = WorkflowPropertiesModifiedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowPropertiesModifiedEventAttributes
x__
  rnf
    (HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes WorkflowExecutionUpdateAdmittedEventAttributes
x__)
    = WorkflowExecutionUpdateAdmittedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf WorkflowExecutionUpdateAdmittedEventAttributes
x__
  rnf (HistoryEvent'NexusOperationScheduledEventAttributes NexusOperationScheduledEventAttributes
x__)
    = NexusOperationScheduledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationScheduledEventAttributes
x__
  rnf (HistoryEvent'NexusOperationStartedEventAttributes NexusOperationStartedEventAttributes
x__)
    = NexusOperationStartedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationStartedEventAttributes
x__
  rnf (HistoryEvent'NexusOperationCompletedEventAttributes NexusOperationCompletedEventAttributes
x__)
    = NexusOperationCompletedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationCompletedEventAttributes
x__
  rnf (HistoryEvent'NexusOperationFailedEventAttributes NexusOperationFailedEventAttributes
x__)
    = NexusOperationFailedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationFailedEventAttributes
x__
  rnf (HistoryEvent'NexusOperationCanceledEventAttributes NexusOperationCanceledEventAttributes
x__)
    = NexusOperationCanceledEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationCanceledEventAttributes
x__
  rnf (HistoryEvent'NexusOperationTimedOutEventAttributes NexusOperationTimedOutEventAttributes
x__)
    = NexusOperationTimedOutEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationTimedOutEventAttributes
x__
  rnf (HistoryEvent'NexusOperationCancelRequestedEventAttributes NexusOperationCancelRequestedEventAttributes
x__)
    = NexusOperationCancelRequestedEventAttributes -> ()
forall a. NFData a => a -> ()
Control.DeepSeq.rnf NexusOperationCancelRequestedEventAttributes
x__
_HistoryEvent'WorkflowExecutionStartedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionStartedEventAttributes
_HistoryEvent'WorkflowExecutionStartedEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionStartedEventAttributes
_HistoryEvent'WorkflowExecutionStartedEventAttributes
  = (WorkflowExecutionStartedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionStartedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionStartedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionStartedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionStartedEventAttributes WorkflowExecutionStartedEventAttributes
p__val)
                -> WorkflowExecutionStartedEventAttributes
-> Maybe WorkflowExecutionStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionStartedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionCompletedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionCompletedEventAttributes
_HistoryEvent'WorkflowExecutionCompletedEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionCompletedEventAttributes
_HistoryEvent'WorkflowExecutionCompletedEventAttributes
  = (WorkflowExecutionCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCompletedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionCompletedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCompletedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionCompletedEventAttributes WorkflowExecutionCompletedEventAttributes
p__val)
                -> WorkflowExecutionCompletedEventAttributes
-> Maybe WorkflowExecutionCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCompletedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionFailedEventAttributes
_HistoryEvent'WorkflowExecutionFailedEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionFailedEventAttributes
_HistoryEvent'WorkflowExecutionFailedEventAttributes
  = (WorkflowExecutionFailedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionFailedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionFailedEventAttributes WorkflowExecutionFailedEventAttributes
p__val)
                -> WorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionTimedOutEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionTimedOutEventAttributes
_HistoryEvent'WorkflowExecutionTimedOutEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionTimedOutEventAttributes
_HistoryEvent'WorkflowExecutionTimedOutEventAttributes
  = (WorkflowExecutionTimedOutEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionTimedOutEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionTimedOutEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionTimedOutEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionTimedOutEventAttributes WorkflowExecutionTimedOutEventAttributes
p__val)
                -> WorkflowExecutionTimedOutEventAttributes
-> Maybe WorkflowExecutionTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionTimedOutEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowTaskScheduledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowTaskScheduledEventAttributes
_HistoryEvent'WorkflowTaskScheduledEventAttributes :: Prism' HistoryEvent'Attributes WorkflowTaskScheduledEventAttributes
_HistoryEvent'WorkflowTaskScheduledEventAttributes
  = (WorkflowTaskScheduledEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowTaskScheduledEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowTaskScheduledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTaskScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskScheduledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowTaskScheduledEventAttributes WorkflowTaskScheduledEventAttributes
p__val)
                -> WorkflowTaskScheduledEventAttributes
-> Maybe WorkflowTaskScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskScheduledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowTaskStartedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowTaskStartedEventAttributes
_HistoryEvent'WorkflowTaskStartedEventAttributes :: Prism' HistoryEvent'Attributes WorkflowTaskStartedEventAttributes
_HistoryEvent'WorkflowTaskStartedEventAttributes
  = (WorkflowTaskStartedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowTaskStartedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowTaskStartedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTaskStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskStartedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowTaskStartedEventAttributes WorkflowTaskStartedEventAttributes
p__val)
                -> WorkflowTaskStartedEventAttributes
-> Maybe WorkflowTaskStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskStartedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowTaskCompletedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowTaskCompletedEventAttributes
_HistoryEvent'WorkflowTaskCompletedEventAttributes :: Prism' HistoryEvent'Attributes WorkflowTaskCompletedEventAttributes
_HistoryEvent'WorkflowTaskCompletedEventAttributes
  = (WorkflowTaskCompletedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowTaskCompletedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowTaskCompletedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTaskCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskCompletedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedEventAttributes
p__val)
                -> WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskCompletedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowTaskTimedOutEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowTaskTimedOutEventAttributes
_HistoryEvent'WorkflowTaskTimedOutEventAttributes :: Prism' HistoryEvent'Attributes WorkflowTaskTimedOutEventAttributes
_HistoryEvent'WorkflowTaskTimedOutEventAttributes
  = (WorkflowTaskTimedOutEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowTaskTimedOutEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowTaskTimedOutEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTaskTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskTimedOutEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowTaskTimedOutEventAttributes WorkflowTaskTimedOutEventAttributes
p__val)
                -> WorkflowTaskTimedOutEventAttributes
-> Maybe WorkflowTaskTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskTimedOutEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowTaskFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowTaskFailedEventAttributes
_HistoryEvent'WorkflowTaskFailedEventAttributes :: Prism' HistoryEvent'Attributes WorkflowTaskFailedEventAttributes
_HistoryEvent'WorkflowTaskFailedEventAttributes
  = (WorkflowTaskFailedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowTaskFailedEventAttributes)
-> Prism' HistoryEvent'Attributes WorkflowTaskFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowTaskFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowTaskFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowTaskFailedEventAttributes WorkflowTaskFailedEventAttributes
p__val)
                -> WorkflowTaskFailedEventAttributes
-> Maybe WorkflowTaskFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowTaskFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowTaskFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskScheduledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskScheduledEventAttributes
_HistoryEvent'ActivityTaskScheduledEventAttributes :: Prism' HistoryEvent'Attributes ActivityTaskScheduledEventAttributes
_HistoryEvent'ActivityTaskScheduledEventAttributes
  = (ActivityTaskScheduledEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskScheduledEventAttributes)
-> Prism'
     HistoryEvent'Attributes ActivityTaskScheduledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskScheduledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskScheduledEventAttributes ActivityTaskScheduledEventAttributes
p__val)
                -> ActivityTaskScheduledEventAttributes
-> Maybe ActivityTaskScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskScheduledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskStartedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskStartedEventAttributes
_HistoryEvent'ActivityTaskStartedEventAttributes :: Prism' HistoryEvent'Attributes ActivityTaskStartedEventAttributes
_HistoryEvent'ActivityTaskStartedEventAttributes
  = (ActivityTaskStartedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskStartedEventAttributes)
-> Prism'
     HistoryEvent'Attributes ActivityTaskStartedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskStartedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskStartedEventAttributes ActivityTaskStartedEventAttributes
p__val)
                -> ActivityTaskStartedEventAttributes
-> Maybe ActivityTaskStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskStartedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskCompletedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskCompletedEventAttributes
_HistoryEvent'ActivityTaskCompletedEventAttributes :: Prism' HistoryEvent'Attributes ActivityTaskCompletedEventAttributes
_HistoryEvent'ActivityTaskCompletedEventAttributes
  = (ActivityTaskCompletedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskCompletedEventAttributes)
-> Prism'
     HistoryEvent'Attributes ActivityTaskCompletedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCompletedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskCompletedEventAttributes ActivityTaskCompletedEventAttributes
p__val)
                -> ActivityTaskCompletedEventAttributes
-> Maybe ActivityTaskCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCompletedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskFailedEventAttributes
_HistoryEvent'ActivityTaskFailedEventAttributes :: Prism' HistoryEvent'Attributes ActivityTaskFailedEventAttributes
_HistoryEvent'ActivityTaskFailedEventAttributes
  = (ActivityTaskFailedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskFailedEventAttributes)
-> Prism' HistoryEvent'Attributes ActivityTaskFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskFailedEventAttributes ActivityTaskFailedEventAttributes
p__val)
                -> ActivityTaskFailedEventAttributes
-> Maybe ActivityTaskFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskTimedOutEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskTimedOutEventAttributes
_HistoryEvent'ActivityTaskTimedOutEventAttributes :: Prism' HistoryEvent'Attributes ActivityTaskTimedOutEventAttributes
_HistoryEvent'ActivityTaskTimedOutEventAttributes
  = (ActivityTaskTimedOutEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskTimedOutEventAttributes)
-> Prism'
     HistoryEvent'Attributes ActivityTaskTimedOutEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskTimedOutEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskTimedOutEventAttributes ActivityTaskTimedOutEventAttributes
p__val)
                -> ActivityTaskTimedOutEventAttributes
-> Maybe ActivityTaskTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskTimedOutEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'TimerStartedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes TimerStartedEventAttributes
_HistoryEvent'TimerStartedEventAttributes :: Prism' HistoryEvent'Attributes TimerStartedEventAttributes
_HistoryEvent'TimerStartedEventAttributes
  = (TimerStartedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes -> Maybe TimerStartedEventAttributes)
-> Prism' HistoryEvent'Attributes TimerStartedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      TimerStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerStartedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'TimerStartedEventAttributes TimerStartedEventAttributes
p__val)
                -> TimerStartedEventAttributes -> Maybe TimerStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerStartedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe TimerStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'TimerFiredEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes TimerFiredEventAttributes
_HistoryEvent'TimerFiredEventAttributes :: Prism' HistoryEvent'Attributes TimerFiredEventAttributes
_HistoryEvent'TimerFiredEventAttributes
  = (TimerFiredEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes -> Maybe TimerFiredEventAttributes)
-> Prism' HistoryEvent'Attributes TimerFiredEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      TimerFiredEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerFiredEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'TimerFiredEventAttributes TimerFiredEventAttributes
p__val)
                -> TimerFiredEventAttributes -> Maybe TimerFiredEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerFiredEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe TimerFiredEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskCancelRequestedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskCancelRequestedEventAttributes
_HistoryEvent'ActivityTaskCancelRequestedEventAttributes :: Prism'
  HistoryEvent'Attributes ActivityTaskCancelRequestedEventAttributes
_HistoryEvent'ActivityTaskCancelRequestedEventAttributes
  = (ActivityTaskCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskCancelRequestedEventAttributes)
-> Prism'
     HistoryEvent'Attributes ActivityTaskCancelRequestedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCancelRequestedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskCancelRequestedEventAttributes ActivityTaskCancelRequestedEventAttributes
p__val)
                -> ActivityTaskCancelRequestedEventAttributes
-> Maybe ActivityTaskCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCancelRequestedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityTaskCanceledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityTaskCanceledEventAttributes
_HistoryEvent'ActivityTaskCanceledEventAttributes :: Prism' HistoryEvent'Attributes ActivityTaskCanceledEventAttributes
_HistoryEvent'ActivityTaskCanceledEventAttributes
  = (ActivityTaskCanceledEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityTaskCanceledEventAttributes)
-> Prism'
     HistoryEvent'Attributes ActivityTaskCanceledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityTaskCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'ActivityTaskCanceledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityTaskCanceledEventAttributes ActivityTaskCanceledEventAttributes
p__val)
                -> ActivityTaskCanceledEventAttributes
-> Maybe ActivityTaskCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityTaskCanceledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityTaskCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'TimerCanceledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes TimerCanceledEventAttributes
_HistoryEvent'TimerCanceledEventAttributes :: Prism' HistoryEvent'Attributes TimerCanceledEventAttributes
_HistoryEvent'TimerCanceledEventAttributes
  = (TimerCanceledEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes -> Maybe TimerCanceledEventAttributes)
-> Prism' HistoryEvent'Attributes TimerCanceledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      TimerCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'TimerCanceledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'TimerCanceledEventAttributes TimerCanceledEventAttributes
p__val)
                -> TimerCanceledEventAttributes -> Maybe TimerCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just TimerCanceledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe TimerCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'MarkerRecordedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes MarkerRecordedEventAttributes
_HistoryEvent'MarkerRecordedEventAttributes :: Prism' HistoryEvent'Attributes MarkerRecordedEventAttributes
_HistoryEvent'MarkerRecordedEventAttributes
  = (MarkerRecordedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes -> Maybe MarkerRecordedEventAttributes)
-> Prism' HistoryEvent'Attributes MarkerRecordedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      MarkerRecordedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'MarkerRecordedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'MarkerRecordedEventAttributes MarkerRecordedEventAttributes
p__val)
                -> MarkerRecordedEventAttributes
-> Maybe MarkerRecordedEventAttributes
forall a. a -> Maybe a
Prelude.Just MarkerRecordedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe MarkerRecordedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionSignaledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionSignaledEventAttributes
_HistoryEvent'WorkflowExecutionSignaledEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionSignaledEventAttributes
_HistoryEvent'WorkflowExecutionSignaledEventAttributes
  = (WorkflowExecutionSignaledEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionSignaledEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionSignaledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionSignaledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionSignaledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionSignaledEventAttributes WorkflowExecutionSignaledEventAttributes
p__val)
                -> WorkflowExecutionSignaledEventAttributes
-> Maybe WorkflowExecutionSignaledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionSignaledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionSignaledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionTerminatedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionTerminatedEventAttributes
_HistoryEvent'WorkflowExecutionTerminatedEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionTerminatedEventAttributes
_HistoryEvent'WorkflowExecutionTerminatedEventAttributes
  = (WorkflowExecutionTerminatedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionTerminatedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionTerminatedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionTerminatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionTerminatedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionTerminatedEventAttributes WorkflowExecutionTerminatedEventAttributes
p__val)
                -> WorkflowExecutionTerminatedEventAttributes
-> Maybe WorkflowExecutionTerminatedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionTerminatedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionTerminatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionCancelRequestedEventAttributes
_HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowExecutionCancelRequestedEventAttributes
_HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes
  = (WorkflowExecutionCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCancelRequestedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowExecutionCancelRequestedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionCancelRequestedEventAttributes WorkflowExecutionCancelRequestedEventAttributes
p__val)
                -> WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecutionCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCancelRequestedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionCanceledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionCanceledEventAttributes
_HistoryEvent'WorkflowExecutionCanceledEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowExecutionCanceledEventAttributes
_HistoryEvent'WorkflowExecutionCanceledEventAttributes
  = (WorkflowExecutionCanceledEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionCanceledEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowExecutionCanceledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionCanceledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionCanceledEventAttributes WorkflowExecutionCanceledEventAttributes
p__val)
                -> WorkflowExecutionCanceledEventAttributes
-> Maybe WorkflowExecutionCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionCanceledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes :: Prism'
  HistoryEvent'Attributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  = (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe
         RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'RequestCancelExternalWorkflowExecutionInitiatedEventAttributes RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
p__val)
                -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes RequestCancelExternalWorkflowExecutionFailedEventAttributes
_HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes :: Prism'
  HistoryEvent'Attributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
_HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes
  = (RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe
         RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'RequestCancelExternalWorkflowExecutionFailedEventAttributes RequestCancelExternalWorkflowExecutionFailedEventAttributes
p__val)
                -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just RequestCancelExternalWorkflowExecutionFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ExternalWorkflowExecutionCancelRequestedEventAttributes
_HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes :: Prism'
  HistoryEvent'Attributes
  ExternalWorkflowExecutionCancelRequestedEventAttributes
_HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes
  = (ExternalWorkflowExecutionCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ExternalWorkflowExecutionCancelRequestedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ExternalWorkflowExecutionCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ExternalWorkflowExecutionCancelRequestedEventAttributes ExternalWorkflowExecutionCancelRequestedEventAttributes
p__val)
                -> ExternalWorkflowExecutionCancelRequestedEventAttributes
-> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just ExternalWorkflowExecutionCancelRequestedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ExternalWorkflowExecutionCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionContinuedAsNewEventAttributes
_HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowExecutionContinuedAsNewEventAttributes
_HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes
  = (WorkflowExecutionContinuedAsNewEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionContinuedAsNewEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowExecutionContinuedAsNewEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionContinuedAsNewEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionContinuedAsNewEventAttributes WorkflowExecutionContinuedAsNewEventAttributes
p__val)
                -> WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowExecutionContinuedAsNewEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionContinuedAsNewEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionContinuedAsNewEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes StartChildWorkflowExecutionInitiatedEventAttributes
_HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes :: Prism'
  HistoryEvent'Attributes
  StartChildWorkflowExecutionInitiatedEventAttributes
_HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes
  = (StartChildWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     StartChildWorkflowExecutionInitiatedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartChildWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'StartChildWorkflowExecutionInitiatedEventAttributes StartChildWorkflowExecutionInitiatedEventAttributes
p__val)
                -> StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecutionInitiatedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe StartChildWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes StartChildWorkflowExecutionFailedEventAttributes
_HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes :: Prism'
  HistoryEvent'Attributes
  StartChildWorkflowExecutionFailedEventAttributes
_HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes
  = (StartChildWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe StartChildWorkflowExecutionFailedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     StartChildWorkflowExecutionFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      StartChildWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'StartChildWorkflowExecutionFailedEventAttributes StartChildWorkflowExecutionFailedEventAttributes
p__val)
                -> StartChildWorkflowExecutionFailedEventAttributes
-> Maybe StartChildWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just StartChildWorkflowExecutionFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe StartChildWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ChildWorkflowExecutionStartedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ChildWorkflowExecutionStartedEventAttributes
_HistoryEvent'ChildWorkflowExecutionStartedEventAttributes :: Prism'
  HistoryEvent'Attributes
  ChildWorkflowExecutionStartedEventAttributes
_HistoryEvent'ChildWorkflowExecutionStartedEventAttributes
  = (ChildWorkflowExecutionStartedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionStartedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ChildWorkflowExecutionStartedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ChildWorkflowExecutionStartedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionStartedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ChildWorkflowExecutionStartedEventAttributes ChildWorkflowExecutionStartedEventAttributes
p__val)
                -> ChildWorkflowExecutionStartedEventAttributes
-> Maybe ChildWorkflowExecutionStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionStartedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ChildWorkflowExecutionCompletedEventAttributes
_HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes :: Prism'
  HistoryEvent'Attributes
  ChildWorkflowExecutionCompletedEventAttributes
_HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes
  = (ChildWorkflowExecutionCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionCompletedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ChildWorkflowExecutionCompletedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ChildWorkflowExecutionCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ChildWorkflowExecutionCompletedEventAttributes ChildWorkflowExecutionCompletedEventAttributes
p__val)
                -> ChildWorkflowExecutionCompletedEventAttributes
-> Maybe ChildWorkflowExecutionCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionCompletedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ChildWorkflowExecutionFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ChildWorkflowExecutionFailedEventAttributes
_HistoryEvent'ChildWorkflowExecutionFailedEventAttributes :: Prism'
  HistoryEvent'Attributes ChildWorkflowExecutionFailedEventAttributes
_HistoryEvent'ChildWorkflowExecutionFailedEventAttributes
  = (ChildWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionFailedEventAttributes)
-> Prism'
     HistoryEvent'Attributes ChildWorkflowExecutionFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ChildWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ChildWorkflowExecutionFailedEventAttributes ChildWorkflowExecutionFailedEventAttributes
p__val)
                -> ChildWorkflowExecutionFailedEventAttributes
-> Maybe ChildWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ChildWorkflowExecutionCanceledEventAttributes
_HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes :: Prism'
  HistoryEvent'Attributes
  ChildWorkflowExecutionCanceledEventAttributes
_HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes
  = (ChildWorkflowExecutionCanceledEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionCanceledEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ChildWorkflowExecutionCanceledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ChildWorkflowExecutionCanceledEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ChildWorkflowExecutionCanceledEventAttributes ChildWorkflowExecutionCanceledEventAttributes
p__val)
                -> ChildWorkflowExecutionCanceledEventAttributes
-> Maybe ChildWorkflowExecutionCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionCanceledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ChildWorkflowExecutionTimedOutEventAttributes
_HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes :: Prism'
  HistoryEvent'Attributes
  ChildWorkflowExecutionTimedOutEventAttributes
_HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes
  = (ChildWorkflowExecutionTimedOutEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionTimedOutEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ChildWorkflowExecutionTimedOutEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ChildWorkflowExecutionTimedOutEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ChildWorkflowExecutionTimedOutEventAttributes ChildWorkflowExecutionTimedOutEventAttributes
p__val)
                -> ChildWorkflowExecutionTimedOutEventAttributes
-> Maybe ChildWorkflowExecutionTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionTimedOutEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ChildWorkflowExecutionTerminatedEventAttributes
_HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes :: Prism'
  HistoryEvent'Attributes
  ChildWorkflowExecutionTerminatedEventAttributes
_HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes
  = (ChildWorkflowExecutionTerminatedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ChildWorkflowExecutionTerminatedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ChildWorkflowExecutionTerminatedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ChildWorkflowExecutionTerminatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ChildWorkflowExecutionTerminatedEventAttributes ChildWorkflowExecutionTerminatedEventAttributes
p__val)
                -> ChildWorkflowExecutionTerminatedEventAttributes
-> Maybe ChildWorkflowExecutionTerminatedEventAttributes
forall a. a -> Maybe a
Prelude.Just ChildWorkflowExecutionTerminatedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ChildWorkflowExecutionTerminatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes SignalExternalWorkflowExecutionInitiatedEventAttributes
_HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes :: Prism'
  HistoryEvent'Attributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
_HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes
  = (SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      SignalExternalWorkflowExecutionInitiatedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'SignalExternalWorkflowExecutionInitiatedEventAttributes SignalExternalWorkflowExecutionInitiatedEventAttributes
p__val)
                -> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecutionInitiatedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes SignalExternalWorkflowExecutionFailedEventAttributes
_HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes :: Prism'
  HistoryEvent'Attributes
  SignalExternalWorkflowExecutionFailedEventAttributes
_HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes
  = (SignalExternalWorkflowExecutionFailedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     SignalExternalWorkflowExecutionFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      SignalExternalWorkflowExecutionFailedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'SignalExternalWorkflowExecutionFailedEventAttributes SignalExternalWorkflowExecutionFailedEventAttributes
p__val)
                -> SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just SignalExternalWorkflowExecutionFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe SignalExternalWorkflowExecutionFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ExternalWorkflowExecutionSignaledEventAttributes
_HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes :: Prism'
  HistoryEvent'Attributes
  ExternalWorkflowExecutionSignaledEventAttributes
_HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes
  = (ExternalWorkflowExecutionSignaledEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ExternalWorkflowExecutionSignaledEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ExternalWorkflowExecutionSignaledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ExternalWorkflowExecutionSignaledEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ExternalWorkflowExecutionSignaledEventAttributes ExternalWorkflowExecutionSignaledEventAttributes
p__val)
                -> ExternalWorkflowExecutionSignaledEventAttributes
-> Maybe ExternalWorkflowExecutionSignaledEventAttributes
forall a. a -> Maybe a
Prelude.Just ExternalWorkflowExecutionSignaledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ExternalWorkflowExecutionSignaledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes UpsertWorkflowSearchAttributesEventAttributes
_HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes :: Prism'
  HistoryEvent'Attributes
  UpsertWorkflowSearchAttributesEventAttributes
_HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes
  = (UpsertWorkflowSearchAttributesEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe UpsertWorkflowSearchAttributesEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     UpsertWorkflowSearchAttributesEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      UpsertWorkflowSearchAttributesEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'UpsertWorkflowSearchAttributesEventAttributes UpsertWorkflowSearchAttributesEventAttributes
p__val)
                -> UpsertWorkflowSearchAttributesEventAttributes
-> Maybe UpsertWorkflowSearchAttributesEventAttributes
forall a. a -> Maybe a
Prelude.Just UpsertWorkflowSearchAttributesEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe UpsertWorkflowSearchAttributesEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionUpdateAcceptedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowExecutionUpdateAcceptedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes
  = (WorkflowExecutionUpdateAcceptedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowExecutionUpdateAcceptedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionUpdateAcceptedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionUpdateAcceptedEventAttributes WorkflowExecutionUpdateAcceptedEventAttributes
p__val)
                -> WorkflowExecutionUpdateAcceptedEventAttributes
-> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateAcceptedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateAcceptedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionUpdateRejectedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowExecutionUpdateRejectedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes
  = (WorkflowExecutionUpdateRejectedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateRejectedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowExecutionUpdateRejectedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionUpdateRejectedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionUpdateRejectedEventAttributes WorkflowExecutionUpdateRejectedEventAttributes
p__val)
                -> WorkflowExecutionUpdateRejectedEventAttributes
-> Maybe WorkflowExecutionUpdateRejectedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateRejectedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateRejectedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionUpdateCompletedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowExecutionUpdateCompletedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes
  = (WorkflowExecutionUpdateCompletedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateCompletedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowExecutionUpdateCompletedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionUpdateCompletedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionUpdateCompletedEventAttributes WorkflowExecutionUpdateCompletedEventAttributes
p__val)
                -> WorkflowExecutionUpdateCompletedEventAttributes
-> Maybe WorkflowExecutionUpdateCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateCompletedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowPropertiesModifiedExternallyEventAttributes
_HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowPropertiesModifiedExternallyEventAttributes
_HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes
  = (WorkflowPropertiesModifiedExternallyEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowPropertiesModifiedExternallyEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowPropertiesModifiedExternallyEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowPropertiesModifiedExternallyEventAttributes WorkflowPropertiesModifiedExternallyEventAttributes
p__val)
                -> WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowPropertiesModifiedExternallyEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowPropertiesModifiedExternallyEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes ActivityPropertiesModifiedExternallyEventAttributes
_HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes :: Prism'
  HistoryEvent'Attributes
  ActivityPropertiesModifiedExternallyEventAttributes
_HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes
  = (ActivityPropertiesModifiedExternallyEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe ActivityPropertiesModifiedExternallyEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     ActivityPropertiesModifiedExternallyEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      ActivityPropertiesModifiedExternallyEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'ActivityPropertiesModifiedExternallyEventAttributes ActivityPropertiesModifiedExternallyEventAttributes
p__val)
                -> ActivityPropertiesModifiedExternallyEventAttributes
-> Maybe ActivityPropertiesModifiedExternallyEventAttributes
forall a. a -> Maybe a
Prelude.Just ActivityPropertiesModifiedExternallyEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe ActivityPropertiesModifiedExternallyEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowPropertiesModifiedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowPropertiesModifiedEventAttributes
_HistoryEvent'WorkflowPropertiesModifiedEventAttributes :: Prism'
  HistoryEvent'Attributes WorkflowPropertiesModifiedEventAttributes
_HistoryEvent'WorkflowPropertiesModifiedEventAttributes
  = (WorkflowPropertiesModifiedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowPropertiesModifiedEventAttributes)
-> Prism'
     HistoryEvent'Attributes WorkflowPropertiesModifiedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowPropertiesModifiedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowPropertiesModifiedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowPropertiesModifiedEventAttributes WorkflowPropertiesModifiedEventAttributes
p__val)
                -> WorkflowPropertiesModifiedEventAttributes
-> Maybe WorkflowPropertiesModifiedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowPropertiesModifiedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowPropertiesModifiedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes WorkflowExecutionUpdateAdmittedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes :: Prism'
  HistoryEvent'Attributes
  WorkflowExecutionUpdateAdmittedEventAttributes
_HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes
  = (WorkflowExecutionUpdateAdmittedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     WorkflowExecutionUpdateAdmittedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      WorkflowExecutionUpdateAdmittedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'WorkflowExecutionUpdateAdmittedEventAttributes WorkflowExecutionUpdateAdmittedEventAttributes
p__val)
                -> WorkflowExecutionUpdateAdmittedEventAttributes
-> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
forall a. a -> Maybe a
Prelude.Just WorkflowExecutionUpdateAdmittedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe WorkflowExecutionUpdateAdmittedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationScheduledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationScheduledEventAttributes
_HistoryEvent'NexusOperationScheduledEventAttributes :: Prism'
  HistoryEvent'Attributes NexusOperationScheduledEventAttributes
_HistoryEvent'NexusOperationScheduledEventAttributes
  = (NexusOperationScheduledEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationScheduledEventAttributes)
-> Prism'
     HistoryEvent'Attributes NexusOperationScheduledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationScheduledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationScheduledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationScheduledEventAttributes NexusOperationScheduledEventAttributes
p__val)
                -> NexusOperationScheduledEventAttributes
-> Maybe NexusOperationScheduledEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationScheduledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationScheduledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationStartedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationStartedEventAttributes
_HistoryEvent'NexusOperationStartedEventAttributes :: Prism' HistoryEvent'Attributes NexusOperationStartedEventAttributes
_HistoryEvent'NexusOperationStartedEventAttributes
  = (NexusOperationStartedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationStartedEventAttributes)
-> Prism'
     HistoryEvent'Attributes NexusOperationStartedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationStartedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationStartedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationStartedEventAttributes NexusOperationStartedEventAttributes
p__val)
                -> NexusOperationStartedEventAttributes
-> Maybe NexusOperationStartedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationStartedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationStartedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationCompletedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationCompletedEventAttributes
_HistoryEvent'NexusOperationCompletedEventAttributes :: Prism'
  HistoryEvent'Attributes NexusOperationCompletedEventAttributes
_HistoryEvent'NexusOperationCompletedEventAttributes
  = (NexusOperationCompletedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationCompletedEventAttributes)
-> Prism'
     HistoryEvent'Attributes NexusOperationCompletedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationCompletedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationCompletedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationCompletedEventAttributes NexusOperationCompletedEventAttributes
p__val)
                -> NexusOperationCompletedEventAttributes
-> Maybe NexusOperationCompletedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCompletedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCompletedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationFailedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationFailedEventAttributes
_HistoryEvent'NexusOperationFailedEventAttributes :: Prism' HistoryEvent'Attributes NexusOperationFailedEventAttributes
_HistoryEvent'NexusOperationFailedEventAttributes
  = (NexusOperationFailedEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationFailedEventAttributes)
-> Prism'
     HistoryEvent'Attributes NexusOperationFailedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationFailedEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationFailedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationFailedEventAttributes NexusOperationFailedEventAttributes
p__val)
                -> NexusOperationFailedEventAttributes
-> Maybe NexusOperationFailedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationFailedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationFailedEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationCanceledEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationCanceledEventAttributes
_HistoryEvent'NexusOperationCanceledEventAttributes :: Prism'
  HistoryEvent'Attributes NexusOperationCanceledEventAttributes
_HistoryEvent'NexusOperationCanceledEventAttributes
  = (NexusOperationCanceledEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationCanceledEventAttributes)
-> Prism'
     HistoryEvent'Attributes NexusOperationCanceledEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationCanceledEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationCanceledEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationCanceledEventAttributes NexusOperationCanceledEventAttributes
p__val)
                -> NexusOperationCanceledEventAttributes
-> Maybe NexusOperationCanceledEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCanceledEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCanceledEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationTimedOutEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationTimedOutEventAttributes
_HistoryEvent'NexusOperationTimedOutEventAttributes :: Prism'
  HistoryEvent'Attributes NexusOperationTimedOutEventAttributes
_HistoryEvent'NexusOperationTimedOutEventAttributes
  = (NexusOperationTimedOutEventAttributes -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationTimedOutEventAttributes)
-> Prism'
     HistoryEvent'Attributes NexusOperationTimedOutEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationTimedOutEventAttributes -> HistoryEvent'Attributes
HistoryEvent'NexusOperationTimedOutEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationTimedOutEventAttributes NexusOperationTimedOutEventAttributes
p__val)
                -> NexusOperationTimedOutEventAttributes
-> Maybe NexusOperationTimedOutEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationTimedOutEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationTimedOutEventAttributes
forall a. Maybe a
Prelude.Nothing)
_HistoryEvent'NexusOperationCancelRequestedEventAttributes ::
  Data.ProtoLens.Prism.Prism' HistoryEvent'Attributes NexusOperationCancelRequestedEventAttributes
_HistoryEvent'NexusOperationCancelRequestedEventAttributes :: Prism'
  HistoryEvent'Attributes
  NexusOperationCancelRequestedEventAttributes
_HistoryEvent'NexusOperationCancelRequestedEventAttributes
  = (NexusOperationCancelRequestedEventAttributes
 -> HistoryEvent'Attributes)
-> (HistoryEvent'Attributes
    -> Maybe NexusOperationCancelRequestedEventAttributes)
-> Prism'
     HistoryEvent'Attributes
     NexusOperationCancelRequestedEventAttributes
forall b s a. (b -> s) -> (s -> Maybe a) -> Prism s s a b
Data.ProtoLens.Prism.prism'
      NexusOperationCancelRequestedEventAttributes
-> HistoryEvent'Attributes
HistoryEvent'NexusOperationCancelRequestedEventAttributes
      (\ HistoryEvent'Attributes
p__
         -> case HistoryEvent'Attributes
p__ of
              (HistoryEvent'NexusOperationCancelRequestedEventAttributes NexusOperationCancelRequestedEventAttributes
p__val)
                -> NexusOperationCancelRequestedEventAttributes
-> Maybe NexusOperationCancelRequestedEventAttributes
forall a. a -> Maybe a
Prelude.Just NexusOperationCancelRequestedEventAttributes
p__val
              HistoryEvent'Attributes
_otherwise -> Maybe NexusOperationCancelRequestedEventAttributes
forall a. Maybe a
Prelude.Nothing)
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.markerName' @:: Lens' MarkerRecordedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.details' @:: Lens' MarkerRecordedEventAttributes (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' MarkerRecordedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' MarkerRecordedEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' MarkerRecordedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' MarkerRecordedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' MarkerRecordedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data MarkerRecordedEventAttributes
  = MarkerRecordedEventAttributes'_constructor {MarkerRecordedEventAttributes -> Text
_MarkerRecordedEventAttributes'markerName :: !Data.Text.Text,
                                                MarkerRecordedEventAttributes -> Map Text Payloads
_MarkerRecordedEventAttributes'details :: !(Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                MarkerRecordedEventAttributes -> Int64
_MarkerRecordedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                MarkerRecordedEventAttributes -> Maybe Header
_MarkerRecordedEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                MarkerRecordedEventAttributes -> Maybe Failure
_MarkerRecordedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                MarkerRecordedEventAttributes -> FieldSet
_MarkerRecordedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
(MarkerRecordedEventAttributes
 -> MarkerRecordedEventAttributes -> Bool)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> Bool)
-> Eq MarkerRecordedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
== :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
$c/= :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
/= :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
Prelude.Eq, Eq MarkerRecordedEventAttributes
Eq MarkerRecordedEventAttributes =>
(MarkerRecordedEventAttributes
 -> MarkerRecordedEventAttributes -> Ordering)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> Bool)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> Bool)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> Bool)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> Bool)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes)
-> (MarkerRecordedEventAttributes
    -> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes)
-> Ord MarkerRecordedEventAttributes
MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Ordering
MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes
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 :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Ordering
compare :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Ordering
$c< :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
< :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
$c<= :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
<= :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
$c> :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
> :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
$c>= :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
>= :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> Bool
$cmax :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes
max :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes
$cmin :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes
min :: MarkerRecordedEventAttributes
-> MarkerRecordedEventAttributes -> MarkerRecordedEventAttributes
Prelude.Ord)
instance Prelude.Show MarkerRecordedEventAttributes where
  showsPrec :: Int -> MarkerRecordedEventAttributes -> ShowS
showsPrec Int
_ MarkerRecordedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (MarkerRecordedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MarkerRecordedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes "markerName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "markerName"
-> (Text -> f Text)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "markerName"
_
    = ((Text -> f Text)
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Text)
-> (MarkerRecordedEventAttributes
    -> Text -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Text
_MarkerRecordedEventAttributes'markerName
           (\ MarkerRecordedEventAttributes
x__ Text
y__
              -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'markerName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes "details" (Data.Map.Map Data.Text.Text Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Map Text Payloads -> f (Map Text Payloads))
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "details"
_
    = ((Map Text Payloads -> f (Map Text Payloads))
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Map Text Payloads -> f (Map Text Payloads))
    -> Map Text Payloads -> f (Map Text Payloads))
-> (Map Text Payloads -> f (Map Text Payloads))
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Map Text Payloads)
-> (MarkerRecordedEventAttributes
    -> Map Text Payloads -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     (Map Text Payloads)
     (Map Text Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Map Text Payloads
_MarkerRecordedEventAttributes'details
           (\ MarkerRecordedEventAttributes
x__ Map Text Payloads
y__ -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'details = y__}))
        (Map Text Payloads -> f (Map Text Payloads))
-> Map Text Payloads -> f (Map Text Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Int64)
-> (MarkerRecordedEventAttributes
    -> Int64 -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Int64
_MarkerRecordedEventAttributes'workflowTaskCompletedEventId
           (\ MarkerRecordedEventAttributes
x__ Int64
y__
              -> MarkerRecordedEventAttributes
x__
                   {_MarkerRecordedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Maybe Header)
-> (MarkerRecordedEventAttributes
    -> Maybe Header -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Maybe Header
_MarkerRecordedEventAttributes'header
           (\ MarkerRecordedEventAttributes
x__ Maybe Header
y__ -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'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 MarkerRecordedEventAttributes "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))
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Maybe Header)
-> (MarkerRecordedEventAttributes
    -> Maybe Header -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Maybe Header
_MarkerRecordedEventAttributes'header
           (\ MarkerRecordedEventAttributes
x__ Maybe Header
y__ -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Maybe Failure)
-> (MarkerRecordedEventAttributes
    -> Maybe Failure -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Maybe Failure
_MarkerRecordedEventAttributes'failure
           (\ MarkerRecordedEventAttributes
x__ Maybe Failure
y__ -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'failure = 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 MarkerRecordedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> MarkerRecordedEventAttributes
 -> f MarkerRecordedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> MarkerRecordedEventAttributes
-> f MarkerRecordedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes -> Maybe Failure)
-> (MarkerRecordedEventAttributes
    -> Maybe Failure -> MarkerRecordedEventAttributes)
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes -> Maybe Failure
_MarkerRecordedEventAttributes'failure
           (\ MarkerRecordedEventAttributes
x__ Maybe Failure
y__ -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MarkerRecordedEventAttributes where
  messageName :: Proxy MarkerRecordedEventAttributes -> Text
messageName Proxy MarkerRecordedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.MarkerRecordedEventAttributes"
  packedMessageDescriptor :: Proxy MarkerRecordedEventAttributes -> ByteString
packedMessageDescriptor Proxy MarkerRecordedEventAttributes
_
    = ByteString
"\n\
      \\GSMarkerRecordedEventAttributes\DC2\US\n\
      \\vmarker_name\CAN\SOH \SOH(\tR\n\
      \markerName\DC2]\n\
      \\adetails\CAN\STX \ETX(\v2C.temporal.api.history.v1.MarkerRecordedEventAttributes.DetailsEntryR\adetails\DC2F\n\
      \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC26\n\
      \\ACKheader\CAN\EOT \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2:\n\
      \\afailure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\SUB\\\n\
      \\fDetailsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC26\n\
      \\ENQvalue\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MarkerRecordedEventAttributes -> ByteString
packedFileDescriptor Proxy MarkerRecordedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor MarkerRecordedEventAttributes)
fieldsByTag
    = let
        markerName__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes
markerName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MarkerRecordedEventAttributes Text
-> FieldDescriptor MarkerRecordedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"marker_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
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     Text
     Text
-> FieldAccessor MarkerRecordedEventAttributes 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 @"markerName")) ::
              Data.ProtoLens.FieldDescriptor MarkerRecordedEventAttributes
        details__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes
details__field_descriptor
          = String
-> FieldTypeDescriptor MarkerRecordedEventAttributes'DetailsEntry
-> FieldAccessor
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes'DetailsEntry
-> FieldDescriptor MarkerRecordedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"details"
              (MessageOrGroup
-> FieldTypeDescriptor MarkerRecordedEventAttributes'DetailsEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor MarkerRecordedEventAttributes'DetailsEntry)
              (Lens' MarkerRecordedEventAttributes'DetailsEntry Text
-> Lens' MarkerRecordedEventAttributes'DetailsEntry Payloads
-> Lens
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     (Map Text Payloads)
     (Map Text Payloads)
-> FieldAccessor
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes'DetailsEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"details")) ::
              Data.ProtoLens.FieldDescriptor MarkerRecordedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor MarkerRecordedEventAttributes Int64
-> FieldDescriptor MarkerRecordedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     MarkerRecordedEventAttributes
     MarkerRecordedEventAttributes
     Int64
     Int64
-> FieldAccessor MarkerRecordedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor MarkerRecordedEventAttributes
        header__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor MarkerRecordedEventAttributes Header
-> FieldDescriptor MarkerRecordedEventAttributes
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
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor MarkerRecordedEventAttributes 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 MarkerRecordedEventAttributes
        failure__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor MarkerRecordedEventAttributes Failure
-> FieldDescriptor MarkerRecordedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor MarkerRecordedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor MarkerRecordedEventAttributes
      in
        [(Tag, FieldDescriptor MarkerRecordedEventAttributes)]
-> Map Tag (FieldDescriptor MarkerRecordedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor MarkerRecordedEventAttributes
markerName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor MarkerRecordedEventAttributes
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor MarkerRecordedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor MarkerRecordedEventAttributes
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor MarkerRecordedEventAttributes
failure__field_descriptor)]
  unknownFields :: Lens' MarkerRecordedEventAttributes FieldSet
unknownFields
    = (MarkerRecordedEventAttributes -> FieldSet)
-> (MarkerRecordedEventAttributes
    -> FieldSet -> MarkerRecordedEventAttributes)
-> Lens' MarkerRecordedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MarkerRecordedEventAttributes -> FieldSet
_MarkerRecordedEventAttributes'_unknownFields
        (\ MarkerRecordedEventAttributes
x__ FieldSet
y__
           -> MarkerRecordedEventAttributes
x__ {_MarkerRecordedEventAttributes'_unknownFields = y__})
  defMessage :: MarkerRecordedEventAttributes
defMessage
    = MarkerRecordedEventAttributes'_constructor
        {_MarkerRecordedEventAttributes'markerName :: Text
_MarkerRecordedEventAttributes'markerName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MarkerRecordedEventAttributes'details :: Map Text Payloads
_MarkerRecordedEventAttributes'details = Map Text Payloads
forall k a. Map k a
Data.Map.empty,
         _MarkerRecordedEventAttributes'workflowTaskCompletedEventId :: Int64
_MarkerRecordedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MarkerRecordedEventAttributes'header :: Maybe Header
_MarkerRecordedEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _MarkerRecordedEventAttributes'failure :: Maybe Failure
_MarkerRecordedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _MarkerRecordedEventAttributes'_unknownFields :: FieldSet
_MarkerRecordedEventAttributes'_unknownFields = []}
  parseMessage :: Parser MarkerRecordedEventAttributes
parseMessage
    = let
        loop ::
          MarkerRecordedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser MarkerRecordedEventAttributes
        loop :: MarkerRecordedEventAttributes
-> Parser MarkerRecordedEventAttributes
loop MarkerRecordedEventAttributes
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
"marker_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"markerName") y x)
                        Word64
18
                          -> do !(entry :: MarkerRecordedEventAttributes'DetailsEntry) <- Parser MarkerRecordedEventAttributes'DetailsEntry
-> String -> Parser MarkerRecordedEventAttributes'DetailsEntry
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
"details"
                                (let
                                   key = FoldLike
  Text
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  Text
  Text
-> MarkerRecordedEventAttributes'DetailsEntry -> 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 @"key") MarkerRecordedEventAttributes'DetailsEntry
entry
                                   value
                                     = FoldLike
  Payloads
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  Payloads
  Payloads
-> MarkerRecordedEventAttributes'DetailsEntry -> 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 @"value") MarkerRecordedEventAttributes'DetailsEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"details")
                                        (\ !Map Text Payloads
t -> Text -> Payloads -> Map Text Payloads -> Map Text Payloads
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Payloads
value Map Text Payloads
t) 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
34
                          -> 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
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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") 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 MarkerRecordedEventAttributes
-> String -> Parser MarkerRecordedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do MarkerRecordedEventAttributes
-> Parser MarkerRecordedEventAttributes
loop MarkerRecordedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"MarkerRecordedEventAttributes"
  buildMessage :: MarkerRecordedEventAttributes -> Builder
buildMessage
    = \ MarkerRecordedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  Text
  Text
-> MarkerRecordedEventAttributes -> 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 @"markerName") MarkerRecordedEventAttributes
_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.<>)
                ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                   (((Text, Payloads) -> Builder) -> [(Text, Payloads)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                      (\ (Text, Payloads)
_v
                         -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                              (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                              ((ByteString -> Builder)
-> (MarkerRecordedEventAttributes'DetailsEntry -> ByteString)
-> MarkerRecordedEventAttributes'DetailsEntry
-> 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))
                                 MarkerRecordedEventAttributes'DetailsEntry -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                 (Setter
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  Text
  Text
-> Text
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                    (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ((Text, Payloads) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Payloads)
_v)
                                    (Setter
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  Payloads
  Payloads
-> Payloads
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                       (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value") ((Text, Payloads) -> Payloads
forall a b. (a, b) -> b
Prelude.snd (Text, Payloads)
_v)
                                       (MarkerRecordedEventAttributes'DetailsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                          MarkerRecordedEventAttributes'DetailsEntry)))))
                      (Map Text Payloads -> [(Text, Payloads)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                         (FoldLike
  (Map Text Payloads)
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  (Map Text Payloads)
  (Map Text Payloads)
-> MarkerRecordedEventAttributes -> Map Text 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 @"details") MarkerRecordedEventAttributes
_x))))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int64
_v
                        = FoldLike
  Int64
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  Int64
  Int64
-> MarkerRecordedEventAttributes -> 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 @"workflowTaskCompletedEventId") MarkerRecordedEventAttributes
_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 Header)
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> MarkerRecordedEventAttributes -> 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") MarkerRecordedEventAttributes
_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
34)
                                ((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))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Failure)
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> MarkerRecordedEventAttributes -> 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'failure") MarkerRecordedEventAttributes
_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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  FieldSet
  FieldSet
-> MarkerRecordedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  MarkerRecordedEventAttributes
  MarkerRecordedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' MarkerRecordedEventAttributes FieldSet
Data.ProtoLens.unknownFields MarkerRecordedEventAttributes
_x))))))
instance Control.DeepSeq.NFData MarkerRecordedEventAttributes where
  rnf :: MarkerRecordedEventAttributes -> ()
rnf
    = \ MarkerRecordedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MarkerRecordedEventAttributes -> FieldSet
_MarkerRecordedEventAttributes'_unknownFields MarkerRecordedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MarkerRecordedEventAttributes -> Text
_MarkerRecordedEventAttributes'markerName MarkerRecordedEventAttributes
x__)
                (Map Text Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MarkerRecordedEventAttributes -> Map Text Payloads
_MarkerRecordedEventAttributes'details MarkerRecordedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (MarkerRecordedEventAttributes -> Int64
_MarkerRecordedEventAttributes'workflowTaskCompletedEventId MarkerRecordedEventAttributes
x__)
                      (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (MarkerRecordedEventAttributes -> Maybe Header
_MarkerRecordedEventAttributes'header MarkerRecordedEventAttributes
x__)
                         (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (MarkerRecordedEventAttributes -> Maybe Failure
_MarkerRecordedEventAttributes'failure MarkerRecordedEventAttributes
x__) ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.key' @:: Lens' MarkerRecordedEventAttributes'DetailsEntry Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.value' @:: Lens' MarkerRecordedEventAttributes'DetailsEntry Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'value' @:: Lens' MarkerRecordedEventAttributes'DetailsEntry (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@ -}
data MarkerRecordedEventAttributes'DetailsEntry
  = MarkerRecordedEventAttributes'DetailsEntry'_constructor {MarkerRecordedEventAttributes'DetailsEntry -> Text
_MarkerRecordedEventAttributes'DetailsEntry'key :: !Data.Text.Text,
                                                             MarkerRecordedEventAttributes'DetailsEntry -> Maybe Payloads
_MarkerRecordedEventAttributes'DetailsEntry'value :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                             MarkerRecordedEventAttributes'DetailsEntry -> FieldSet
_MarkerRecordedEventAttributes'DetailsEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
(MarkerRecordedEventAttributes'DetailsEntry
 -> MarkerRecordedEventAttributes'DetailsEntry -> Bool)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry -> Bool)
-> Eq MarkerRecordedEventAttributes'DetailsEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
== :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
$c/= :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
/= :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
Prelude.Eq, Eq MarkerRecordedEventAttributes'DetailsEntry
Eq MarkerRecordedEventAttributes'DetailsEntry =>
(MarkerRecordedEventAttributes'DetailsEntry
 -> MarkerRecordedEventAttributes'DetailsEntry -> Ordering)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry -> Bool)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry -> Bool)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry -> Bool)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry -> Bool)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry
    -> MarkerRecordedEventAttributes'DetailsEntry)
-> Ord MarkerRecordedEventAttributes'DetailsEntry
MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Ordering
MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
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 :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Ordering
compare :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Ordering
$c< :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
< :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
$c<= :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
<= :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
$c> :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
> :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
$c>= :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
>= :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry -> Bool
$cmax :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
max :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
$cmin :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
min :: MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
-> MarkerRecordedEventAttributes'DetailsEntry
Prelude.Ord)
instance Prelude.Show MarkerRecordedEventAttributes'DetailsEntry where
  showsPrec :: Int -> MarkerRecordedEventAttributes'DetailsEntry -> ShowS
showsPrec Int
_ MarkerRecordedEventAttributes'DetailsEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (MarkerRecordedEventAttributes'DetailsEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort MarkerRecordedEventAttributes'DetailsEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes'DetailsEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> MarkerRecordedEventAttributes'DetailsEntry
-> f MarkerRecordedEventAttributes'DetailsEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> MarkerRecordedEventAttributes'DetailsEntry
 -> f MarkerRecordedEventAttributes'DetailsEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> MarkerRecordedEventAttributes'DetailsEntry
-> f MarkerRecordedEventAttributes'DetailsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes'DetailsEntry -> Text)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> Text -> MarkerRecordedEventAttributes'DetailsEntry)
-> Lens' MarkerRecordedEventAttributes'DetailsEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes'DetailsEntry -> Text
_MarkerRecordedEventAttributes'DetailsEntry'key
           (\ MarkerRecordedEventAttributes'DetailsEntry
x__ Text
y__
              -> MarkerRecordedEventAttributes'DetailsEntry
x__ {_MarkerRecordedEventAttributes'DetailsEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField MarkerRecordedEventAttributes'DetailsEntry "value" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Payloads -> f Payloads)
-> MarkerRecordedEventAttributes'DetailsEntry
-> f MarkerRecordedEventAttributes'DetailsEntry
fieldOf Proxy# "value"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> MarkerRecordedEventAttributes'DetailsEntry
 -> f MarkerRecordedEventAttributes'DetailsEntry)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> MarkerRecordedEventAttributes'DetailsEntry
-> f MarkerRecordedEventAttributes'DetailsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes'DetailsEntry -> Maybe Payloads)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> Maybe Payloads -> MarkerRecordedEventAttributes'DetailsEntry)
-> Lens
     MarkerRecordedEventAttributes'DetailsEntry
     MarkerRecordedEventAttributes'DetailsEntry
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes'DetailsEntry -> Maybe Payloads
_MarkerRecordedEventAttributes'DetailsEntry'value
           (\ MarkerRecordedEventAttributes'DetailsEntry
x__ Maybe Payloads
y__
              -> MarkerRecordedEventAttributes'DetailsEntry
x__ {_MarkerRecordedEventAttributes'DetailsEntry'value = 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 MarkerRecordedEventAttributes'DetailsEntry "maybe'value" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'value"
-> (Maybe Payloads -> f (Maybe Payloads))
-> MarkerRecordedEventAttributes'DetailsEntry
-> f MarkerRecordedEventAttributes'DetailsEntry
fieldOf Proxy# "maybe'value"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> MarkerRecordedEventAttributes'DetailsEntry
 -> f MarkerRecordedEventAttributes'DetailsEntry)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> MarkerRecordedEventAttributes'DetailsEntry
-> f MarkerRecordedEventAttributes'DetailsEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((MarkerRecordedEventAttributes'DetailsEntry -> Maybe Payloads)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> Maybe Payloads -> MarkerRecordedEventAttributes'DetailsEntry)
-> Lens
     MarkerRecordedEventAttributes'DetailsEntry
     MarkerRecordedEventAttributes'DetailsEntry
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           MarkerRecordedEventAttributes'DetailsEntry -> Maybe Payloads
_MarkerRecordedEventAttributes'DetailsEntry'value
           (\ MarkerRecordedEventAttributes'DetailsEntry
x__ Maybe Payloads
y__
              -> MarkerRecordedEventAttributes'DetailsEntry
x__ {_MarkerRecordedEventAttributes'DetailsEntry'value = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message MarkerRecordedEventAttributes'DetailsEntry where
  messageName :: Proxy MarkerRecordedEventAttributes'DetailsEntry -> Text
messageName Proxy MarkerRecordedEventAttributes'DetailsEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.MarkerRecordedEventAttributes.DetailsEntry"
  packedMessageDescriptor :: Proxy MarkerRecordedEventAttributes'DetailsEntry -> ByteString
packedMessageDescriptor Proxy MarkerRecordedEventAttributes'DetailsEntry
_
    = ByteString
"\n\
      \\fDetailsEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC26\n\
      \\ENQvalue\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy MarkerRecordedEventAttributes'DetailsEntry -> ByteString
packedFileDescriptor Proxy MarkerRecordedEventAttributes'DetailsEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor MarkerRecordedEventAttributes'DetailsEntry Text
-> FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"key"
              (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' MarkerRecordedEventAttributes'DetailsEntry Text
-> FieldAccessor MarkerRecordedEventAttributes'DetailsEntry 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 @"key")) ::
              Data.ProtoLens.FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
        value__field_descriptor :: FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     MarkerRecordedEventAttributes'DetailsEntry Payloads
-> FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     MarkerRecordedEventAttributes'DetailsEntry 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'value")) ::
              Data.ProtoLens.FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
      in
        [(Tag, FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry)]
-> Map
     Tag (FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor MarkerRecordedEventAttributes'DetailsEntry
value__field_descriptor)]
  unknownFields :: Lens' MarkerRecordedEventAttributes'DetailsEntry FieldSet
unknownFields
    = (MarkerRecordedEventAttributes'DetailsEntry -> FieldSet)
-> (MarkerRecordedEventAttributes'DetailsEntry
    -> FieldSet -> MarkerRecordedEventAttributes'DetailsEntry)
-> Lens' MarkerRecordedEventAttributes'DetailsEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        MarkerRecordedEventAttributes'DetailsEntry -> FieldSet
_MarkerRecordedEventAttributes'DetailsEntry'_unknownFields
        (\ MarkerRecordedEventAttributes'DetailsEntry
x__ FieldSet
y__
           -> MarkerRecordedEventAttributes'DetailsEntry
x__
                {_MarkerRecordedEventAttributes'DetailsEntry'_unknownFields = y__})
  defMessage :: MarkerRecordedEventAttributes'DetailsEntry
defMessage
    = MarkerRecordedEventAttributes'DetailsEntry'_constructor
        {_MarkerRecordedEventAttributes'DetailsEntry'key :: Text
_MarkerRecordedEventAttributes'DetailsEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _MarkerRecordedEventAttributes'DetailsEntry'value :: Maybe Payloads
_MarkerRecordedEventAttributes'DetailsEntry'value = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _MarkerRecordedEventAttributes'DetailsEntry'_unknownFields :: FieldSet
_MarkerRecordedEventAttributes'DetailsEntry'_unknownFields = []}
  parseMessage :: Parser MarkerRecordedEventAttributes'DetailsEntry
parseMessage
    = let
        loop ::
          MarkerRecordedEventAttributes'DetailsEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser MarkerRecordedEventAttributes'DetailsEntry
        loop :: MarkerRecordedEventAttributes'DetailsEntry
-> Parser MarkerRecordedEventAttributes'DetailsEntry
loop MarkerRecordedEventAttributes'DetailsEntry
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
"key"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") y x)
                        Word64
18
                          -> 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
"value"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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 MarkerRecordedEventAttributes'DetailsEntry
-> String -> Parser MarkerRecordedEventAttributes'DetailsEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do MarkerRecordedEventAttributes'DetailsEntry
-> Parser MarkerRecordedEventAttributes'DetailsEntry
loop MarkerRecordedEventAttributes'DetailsEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"DetailsEntry"
  buildMessage :: MarkerRecordedEventAttributes'DetailsEntry -> Builder
buildMessage
    = \ MarkerRecordedEventAttributes'DetailsEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  Text
  Text
-> MarkerRecordedEventAttributes'DetailsEntry -> 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 @"key") MarkerRecordedEventAttributes'DetailsEntry
_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 Payloads)
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  (Maybe Payloads)
  (Maybe Payloads)
-> MarkerRecordedEventAttributes'DetailsEntry -> 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'value") MarkerRecordedEventAttributes'DetailsEntry
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  FieldSet
  FieldSet
-> MarkerRecordedEventAttributes'DetailsEntry -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  MarkerRecordedEventAttributes'DetailsEntry
  MarkerRecordedEventAttributes'DetailsEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' MarkerRecordedEventAttributes'DetailsEntry FieldSet
Data.ProtoLens.unknownFields MarkerRecordedEventAttributes'DetailsEntry
_x)))
instance Control.DeepSeq.NFData MarkerRecordedEventAttributes'DetailsEntry where
  rnf :: MarkerRecordedEventAttributes'DetailsEntry -> ()
rnf
    = \ MarkerRecordedEventAttributes'DetailsEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (MarkerRecordedEventAttributes'DetailsEntry -> FieldSet
_MarkerRecordedEventAttributes'DetailsEntry'_unknownFields MarkerRecordedEventAttributes'DetailsEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (MarkerRecordedEventAttributes'DetailsEntry -> Text
_MarkerRecordedEventAttributes'DetailsEntry'key MarkerRecordedEventAttributes'DetailsEntry
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (MarkerRecordedEventAttributes'DetailsEntry -> Maybe Payloads
_MarkerRecordedEventAttributes'DetailsEntry'value MarkerRecordedEventAttributes'DetailsEntry
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' NexusOperationCancelRequestedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' NexusOperationCancelRequestedEventAttributes Data.Int.Int64@ -}
data NexusOperationCancelRequestedEventAttributes
  = NexusOperationCancelRequestedEventAttributes'_constructor {NexusOperationCancelRequestedEventAttributes -> Int64
_NexusOperationCancelRequestedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                               NexusOperationCancelRequestedEventAttributes -> Int64
_NexusOperationCancelRequestedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                               NexusOperationCancelRequestedEventAttributes -> FieldSet
_NexusOperationCancelRequestedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
(NexusOperationCancelRequestedEventAttributes
 -> NexusOperationCancelRequestedEventAttributes -> Bool)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes -> Bool)
-> Eq NexusOperationCancelRequestedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
== :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
$c/= :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
/= :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationCancelRequestedEventAttributes
Eq NexusOperationCancelRequestedEventAttributes =>
(NexusOperationCancelRequestedEventAttributes
 -> NexusOperationCancelRequestedEventAttributes -> Ordering)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes -> Bool)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes -> Bool)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes -> Bool)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes -> Bool)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes)
-> (NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes
    -> NexusOperationCancelRequestedEventAttributes)
-> Ord NexusOperationCancelRequestedEventAttributes
NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Ordering
NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
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 :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Ordering
compare :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Ordering
$c< :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
< :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
$c<= :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
<= :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
$c> :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
> :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
$c>= :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
>= :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes -> Bool
$cmax :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
max :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
$cmin :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
min :: NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
-> NexusOperationCancelRequestedEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationCancelRequestedEventAttributes where
  showsPrec :: Int -> NexusOperationCancelRequestedEventAttributes -> ShowS
showsPrec Int
_ NexusOperationCancelRequestedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationCancelRequestedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationCancelRequestedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationCancelRequestedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> NexusOperationCancelRequestedEventAttributes
-> f NexusOperationCancelRequestedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationCancelRequestedEventAttributes
 -> f NexusOperationCancelRequestedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationCancelRequestedEventAttributes
-> f NexusOperationCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCancelRequestedEventAttributes -> Int64)
-> (NexusOperationCancelRequestedEventAttributes
    -> Int64 -> NexusOperationCancelRequestedEventAttributes)
-> Lens
     NexusOperationCancelRequestedEventAttributes
     NexusOperationCancelRequestedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCancelRequestedEventAttributes -> Int64
_NexusOperationCancelRequestedEventAttributes'scheduledEventId
           (\ NexusOperationCancelRequestedEventAttributes
x__ Int64
y__
              -> NexusOperationCancelRequestedEventAttributes
x__
                   {_NexusOperationCancelRequestedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCancelRequestedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> NexusOperationCancelRequestedEventAttributes
-> f NexusOperationCancelRequestedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationCancelRequestedEventAttributes
 -> f NexusOperationCancelRequestedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationCancelRequestedEventAttributes
-> f NexusOperationCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCancelRequestedEventAttributes -> Int64)
-> (NexusOperationCancelRequestedEventAttributes
    -> Int64 -> NexusOperationCancelRequestedEventAttributes)
-> Lens
     NexusOperationCancelRequestedEventAttributes
     NexusOperationCancelRequestedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCancelRequestedEventAttributes -> Int64
_NexusOperationCancelRequestedEventAttributes'workflowTaskCompletedEventId
           (\ NexusOperationCancelRequestedEventAttributes
x__ Int64
y__
              -> NexusOperationCancelRequestedEventAttributes
x__
                   {_NexusOperationCancelRequestedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationCancelRequestedEventAttributes where
  messageName :: Proxy NexusOperationCancelRequestedEventAttributes -> Text
messageName Proxy NexusOperationCancelRequestedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationCancelRequestedEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationCancelRequestedEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationCancelRequestedEventAttributes
_
    = ByteString
"\n\
      \,NexusOperationCancelRequestedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2F\n\
      \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId"
  packedFileDescriptor :: Proxy NexusOperationCancelRequestedEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationCancelRequestedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor NexusOperationCancelRequestedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor NexusOperationCancelRequestedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationCancelRequestedEventAttributes Int64
-> FieldDescriptor NexusOperationCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     NexusOperationCancelRequestedEventAttributes
     NexusOperationCancelRequestedEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationCancelRequestedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationCancelRequestedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor NexusOperationCancelRequestedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationCancelRequestedEventAttributes Int64
-> FieldDescriptor NexusOperationCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     NexusOperationCancelRequestedEventAttributes
     NexusOperationCancelRequestedEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationCancelRequestedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationCancelRequestedEventAttributes
      in
        [(Tag,
  FieldDescriptor NexusOperationCancelRequestedEventAttributes)]
-> Map
     Tag (FieldDescriptor NexusOperationCancelRequestedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationCancelRequestedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor NexusOperationCancelRequestedEventAttributes
workflowTaskCompletedEventId__field_descriptor)]
  unknownFields :: Lens' NexusOperationCancelRequestedEventAttributes FieldSet
unknownFields
    = (NexusOperationCancelRequestedEventAttributes -> FieldSet)
-> (NexusOperationCancelRequestedEventAttributes
    -> FieldSet -> NexusOperationCancelRequestedEventAttributes)
-> Lens' NexusOperationCancelRequestedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationCancelRequestedEventAttributes -> FieldSet
_NexusOperationCancelRequestedEventAttributes'_unknownFields
        (\ NexusOperationCancelRequestedEventAttributes
x__ FieldSet
y__
           -> NexusOperationCancelRequestedEventAttributes
x__
                {_NexusOperationCancelRequestedEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationCancelRequestedEventAttributes
defMessage
    = NexusOperationCancelRequestedEventAttributes'_constructor
        {_NexusOperationCancelRequestedEventAttributes'scheduledEventId :: Int64
_NexusOperationCancelRequestedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationCancelRequestedEventAttributes'workflowTaskCompletedEventId :: Int64
_NexusOperationCancelRequestedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationCancelRequestedEventAttributes'_unknownFields :: FieldSet
_NexusOperationCancelRequestedEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationCancelRequestedEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationCancelRequestedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationCancelRequestedEventAttributes
        loop :: NexusOperationCancelRequestedEventAttributes
-> Parser NexusOperationCancelRequestedEventAttributes
loop NexusOperationCancelRequestedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
16
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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 NexusOperationCancelRequestedEventAttributes
-> String -> Parser NexusOperationCancelRequestedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationCancelRequestedEventAttributes
-> Parser NexusOperationCancelRequestedEventAttributes
loop NexusOperationCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationCancelRequestedEventAttributes"
  buildMessage :: NexusOperationCancelRequestedEventAttributes -> Builder
buildMessage
    = \ NexusOperationCancelRequestedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  NexusOperationCancelRequestedEventAttributes
  NexusOperationCancelRequestedEventAttributes
  Int64
  Int64
-> NexusOperationCancelRequestedEventAttributes -> 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 @"scheduledEventId") NexusOperationCancelRequestedEventAttributes
_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
8)
                      ((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
  NexusOperationCancelRequestedEventAttributes
  NexusOperationCancelRequestedEventAttributes
  Int64
  Int64
-> NexusOperationCancelRequestedEventAttributes -> 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 @"workflowTaskCompletedEventId") NexusOperationCancelRequestedEventAttributes
_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
16)
                         ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationCancelRequestedEventAttributes
  NexusOperationCancelRequestedEventAttributes
  FieldSet
  FieldSet
-> NexusOperationCancelRequestedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationCancelRequestedEventAttributes
  NexusOperationCancelRequestedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationCancelRequestedEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationCancelRequestedEventAttributes
_x)))
instance Control.DeepSeq.NFData NexusOperationCancelRequestedEventAttributes where
  rnf :: NexusOperationCancelRequestedEventAttributes -> ()
rnf
    = \ NexusOperationCancelRequestedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationCancelRequestedEventAttributes -> FieldSet
_NexusOperationCancelRequestedEventAttributes'_unknownFields NexusOperationCancelRequestedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationCancelRequestedEventAttributes -> Int64
_NexusOperationCancelRequestedEventAttributes'scheduledEventId
                   NexusOperationCancelRequestedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationCancelRequestedEventAttributes -> Int64
_NexusOperationCancelRequestedEventAttributes'workflowTaskCompletedEventId
                      NexusOperationCancelRequestedEventAttributes
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' NexusOperationCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' NexusOperationCanceledEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' NexusOperationCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data NexusOperationCanceledEventAttributes
  = NexusOperationCanceledEventAttributes'_constructor {NexusOperationCanceledEventAttributes -> Int64
_NexusOperationCanceledEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                        NexusOperationCanceledEventAttributes -> Maybe Failure
_NexusOperationCanceledEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                        NexusOperationCanceledEventAttributes -> FieldSet
_NexusOperationCanceledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
(NexusOperationCanceledEventAttributes
 -> NexusOperationCanceledEventAttributes -> Bool)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes -> Bool)
-> Eq NexusOperationCanceledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
== :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
$c/= :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
/= :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationCanceledEventAttributes
Eq NexusOperationCanceledEventAttributes =>
(NexusOperationCanceledEventAttributes
 -> NexusOperationCanceledEventAttributes -> Ordering)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes -> Bool)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes -> Bool)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes -> Bool)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes -> Bool)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes)
-> (NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes
    -> NexusOperationCanceledEventAttributes)
-> Ord NexusOperationCanceledEventAttributes
NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Ordering
NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
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 :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Ordering
compare :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Ordering
$c< :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
< :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
$c<= :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
<= :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
$c> :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
> :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
$c>= :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
>= :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes -> Bool
$cmax :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
max :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
$cmin :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
min :: NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
-> NexusOperationCanceledEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationCanceledEventAttributes where
  showsPrec :: Int -> NexusOperationCanceledEventAttributes -> ShowS
showsPrec Int
_ NexusOperationCanceledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationCanceledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationCanceledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationCanceledEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> NexusOperationCanceledEventAttributes
-> f NexusOperationCanceledEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationCanceledEventAttributes
 -> f NexusOperationCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationCanceledEventAttributes
-> f NexusOperationCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCanceledEventAttributes -> Int64)
-> (NexusOperationCanceledEventAttributes
    -> Int64 -> NexusOperationCanceledEventAttributes)
-> Lens
     NexusOperationCanceledEventAttributes
     NexusOperationCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCanceledEventAttributes -> Int64
_NexusOperationCanceledEventAttributes'scheduledEventId
           (\ NexusOperationCanceledEventAttributes
x__ Int64
y__
              -> NexusOperationCanceledEventAttributes
x__
                   {_NexusOperationCanceledEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCanceledEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> NexusOperationCanceledEventAttributes
-> f NexusOperationCanceledEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> NexusOperationCanceledEventAttributes
 -> f NexusOperationCanceledEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> NexusOperationCanceledEventAttributes
-> f NexusOperationCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCanceledEventAttributes -> Maybe Failure)
-> (NexusOperationCanceledEventAttributes
    -> Maybe Failure -> NexusOperationCanceledEventAttributes)
-> Lens
     NexusOperationCanceledEventAttributes
     NexusOperationCanceledEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCanceledEventAttributes -> Maybe Failure
_NexusOperationCanceledEventAttributes'failure
           (\ NexusOperationCanceledEventAttributes
x__ Maybe Failure
y__
              -> NexusOperationCanceledEventAttributes
x__ {_NexusOperationCanceledEventAttributes'failure = 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 NexusOperationCanceledEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationCanceledEventAttributes
-> f NexusOperationCanceledEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> NexusOperationCanceledEventAttributes
 -> f NexusOperationCanceledEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationCanceledEventAttributes
-> f NexusOperationCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCanceledEventAttributes -> Maybe Failure)
-> (NexusOperationCanceledEventAttributes
    -> Maybe Failure -> NexusOperationCanceledEventAttributes)
-> Lens
     NexusOperationCanceledEventAttributes
     NexusOperationCanceledEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCanceledEventAttributes -> Maybe Failure
_NexusOperationCanceledEventAttributes'failure
           (\ NexusOperationCanceledEventAttributes
x__ Maybe Failure
y__
              -> NexusOperationCanceledEventAttributes
x__ {_NexusOperationCanceledEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationCanceledEventAttributes where
  messageName :: Proxy NexusOperationCanceledEventAttributes -> Text
messageName Proxy NexusOperationCanceledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationCanceledEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationCanceledEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationCanceledEventAttributes
_
    = ByteString
"\n\
      \%NexusOperationCanceledEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2:\n\
      \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy NexusOperationCanceledEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationCanceledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NexusOperationCanceledEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor NexusOperationCanceledEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationCanceledEventAttributes Int64
-> FieldDescriptor NexusOperationCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     NexusOperationCanceledEventAttributes
     NexusOperationCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationCanceledEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationCanceledEventAttributes
        failure__field_descriptor :: FieldDescriptor NexusOperationCanceledEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor NexusOperationCanceledEventAttributes Failure
-> FieldDescriptor NexusOperationCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  NexusOperationCanceledEventAttributes
  NexusOperationCanceledEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor NexusOperationCanceledEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationCanceledEventAttributes
      in
        [(Tag, FieldDescriptor NexusOperationCanceledEventAttributes)]
-> Map Tag (FieldDescriptor NexusOperationCanceledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationCanceledEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NexusOperationCanceledEventAttributes
failure__field_descriptor)]
  unknownFields :: Lens' NexusOperationCanceledEventAttributes FieldSet
unknownFields
    = (NexusOperationCanceledEventAttributes -> FieldSet)
-> (NexusOperationCanceledEventAttributes
    -> FieldSet -> NexusOperationCanceledEventAttributes)
-> Lens' NexusOperationCanceledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationCanceledEventAttributes -> FieldSet
_NexusOperationCanceledEventAttributes'_unknownFields
        (\ NexusOperationCanceledEventAttributes
x__ FieldSet
y__
           -> NexusOperationCanceledEventAttributes
x__
                {_NexusOperationCanceledEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationCanceledEventAttributes
defMessage
    = NexusOperationCanceledEventAttributes'_constructor
        {_NexusOperationCanceledEventAttributes'scheduledEventId :: Int64
_NexusOperationCanceledEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationCanceledEventAttributes'failure :: Maybe Failure
_NexusOperationCanceledEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _NexusOperationCanceledEventAttributes'_unknownFields :: FieldSet
_NexusOperationCanceledEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationCanceledEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationCanceledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationCanceledEventAttributes
        loop :: NexusOperationCanceledEventAttributes
-> Parser NexusOperationCanceledEventAttributes
loop NexusOperationCanceledEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
18
                          -> 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") 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 NexusOperationCanceledEventAttributes
-> String -> Parser NexusOperationCanceledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationCanceledEventAttributes
-> Parser NexusOperationCanceledEventAttributes
loop NexusOperationCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationCanceledEventAttributes"
  buildMessage :: NexusOperationCanceledEventAttributes -> Builder
buildMessage
    = \ NexusOperationCanceledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  NexusOperationCanceledEventAttributes
  NexusOperationCanceledEventAttributes
  Int64
  Int64
-> NexusOperationCanceledEventAttributes -> 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 @"scheduledEventId") NexusOperationCanceledEventAttributes
_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
8)
                      ((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 Failure)
  NexusOperationCanceledEventAttributes
  NexusOperationCanceledEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> NexusOperationCanceledEventAttributes -> 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'failure") NexusOperationCanceledEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationCanceledEventAttributes
  NexusOperationCanceledEventAttributes
  FieldSet
  FieldSet
-> NexusOperationCanceledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationCanceledEventAttributes
  NexusOperationCanceledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationCanceledEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationCanceledEventAttributes
_x)))
instance Control.DeepSeq.NFData NexusOperationCanceledEventAttributes where
  rnf :: NexusOperationCanceledEventAttributes -> ()
rnf
    = \ NexusOperationCanceledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationCanceledEventAttributes -> FieldSet
_NexusOperationCanceledEventAttributes'_unknownFields NexusOperationCanceledEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationCanceledEventAttributes -> Int64
_NexusOperationCanceledEventAttributes'scheduledEventId NexusOperationCanceledEventAttributes
x__)
                (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationCanceledEventAttributes -> Maybe Failure
_NexusOperationCanceledEventAttributes'failure NexusOperationCanceledEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' NexusOperationCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.result' @:: Lens' NexusOperationCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'result' @:: Lens' NexusOperationCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@ -}
data NexusOperationCompletedEventAttributes
  = NexusOperationCompletedEventAttributes'_constructor {NexusOperationCompletedEventAttributes -> Int64
_NexusOperationCompletedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                         NexusOperationCompletedEventAttributes -> Maybe Payload
_NexusOperationCompletedEventAttributes'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                         NexusOperationCompletedEventAttributes -> FieldSet
_NexusOperationCompletedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
(NexusOperationCompletedEventAttributes
 -> NexusOperationCompletedEventAttributes -> Bool)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes -> Bool)
-> Eq NexusOperationCompletedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
== :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
$c/= :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
/= :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationCompletedEventAttributes
Eq NexusOperationCompletedEventAttributes =>
(NexusOperationCompletedEventAttributes
 -> NexusOperationCompletedEventAttributes -> Ordering)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes -> Bool)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes -> Bool)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes -> Bool)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes -> Bool)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes)
-> (NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes
    -> NexusOperationCompletedEventAttributes)
-> Ord NexusOperationCompletedEventAttributes
NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Ordering
NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
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 :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Ordering
compare :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Ordering
$c< :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
< :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
$c<= :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
<= :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
$c> :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
> :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
$c>= :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
>= :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes -> Bool
$cmax :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
max :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
$cmin :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
min :: NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
-> NexusOperationCompletedEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationCompletedEventAttributes where
  showsPrec :: Int -> NexusOperationCompletedEventAttributes -> ShowS
showsPrec Int
_ NexusOperationCompletedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationCompletedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationCompletedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationCompletedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> NexusOperationCompletedEventAttributes
-> f NexusOperationCompletedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationCompletedEventAttributes
 -> f NexusOperationCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationCompletedEventAttributes
-> f NexusOperationCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCompletedEventAttributes -> Int64)
-> (NexusOperationCompletedEventAttributes
    -> Int64 -> NexusOperationCompletedEventAttributes)
-> Lens
     NexusOperationCompletedEventAttributes
     NexusOperationCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCompletedEventAttributes -> Int64
_NexusOperationCompletedEventAttributes'scheduledEventId
           (\ NexusOperationCompletedEventAttributes
x__ Int64
y__
              -> NexusOperationCompletedEventAttributes
x__
                   {_NexusOperationCompletedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationCompletedEventAttributes "result" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payload -> f Payload)
-> NexusOperationCompletedEventAttributes
-> f NexusOperationCompletedEventAttributes
fieldOf Proxy# "result"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> NexusOperationCompletedEventAttributes
 -> f NexusOperationCompletedEventAttributes)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> NexusOperationCompletedEventAttributes
-> f NexusOperationCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCompletedEventAttributes -> Maybe Payload)
-> (NexusOperationCompletedEventAttributes
    -> Maybe Payload -> NexusOperationCompletedEventAttributes)
-> Lens
     NexusOperationCompletedEventAttributes
     NexusOperationCompletedEventAttributes
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCompletedEventAttributes -> Maybe Payload
_NexusOperationCompletedEventAttributes'result
           (\ NexusOperationCompletedEventAttributes
x__ Maybe Payload
y__
              -> NexusOperationCompletedEventAttributes
x__ {_NexusOperationCompletedEventAttributes'result = y__}))
        (Payload -> Lens' (Maybe Payload) Payload
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payload
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NexusOperationCompletedEventAttributes "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payload -> f (Maybe Payload))
-> NexusOperationCompletedEventAttributes
-> f NexusOperationCompletedEventAttributes
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> NexusOperationCompletedEventAttributes
 -> f NexusOperationCompletedEventAttributes)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> NexusOperationCompletedEventAttributes
-> f NexusOperationCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationCompletedEventAttributes -> Maybe Payload)
-> (NexusOperationCompletedEventAttributes
    -> Maybe Payload -> NexusOperationCompletedEventAttributes)
-> Lens
     NexusOperationCompletedEventAttributes
     NexusOperationCompletedEventAttributes
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationCompletedEventAttributes -> Maybe Payload
_NexusOperationCompletedEventAttributes'result
           (\ NexusOperationCompletedEventAttributes
x__ Maybe Payload
y__
              -> NexusOperationCompletedEventAttributes
x__ {_NexusOperationCompletedEventAttributes'result = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationCompletedEventAttributes where
  messageName :: Proxy NexusOperationCompletedEventAttributes -> Text
messageName Proxy NexusOperationCompletedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationCompletedEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationCompletedEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationCompletedEventAttributes
_
    = ByteString
"\n\
      \&NexusOperationCompletedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC27\n\
      \\ACKresult\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ACKresult"
  packedFileDescriptor :: Proxy NexusOperationCompletedEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationCompletedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NexusOperationCompletedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor NexusOperationCompletedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationCompletedEventAttributes Int64
-> FieldDescriptor NexusOperationCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     NexusOperationCompletedEventAttributes
     NexusOperationCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationCompletedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationCompletedEventAttributes
        result__field_descriptor :: FieldDescriptor NexusOperationCompletedEventAttributes
result__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor NexusOperationCompletedEventAttributes Payload
-> FieldDescriptor NexusOperationCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (MessageOrGroup -> FieldTypeDescriptor Payload
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payload)
              (Lens
  NexusOperationCompletedEventAttributes
  NexusOperationCompletedEventAttributes
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor NexusOperationCompletedEventAttributes Payload
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'result")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationCompletedEventAttributes
      in
        [(Tag, FieldDescriptor NexusOperationCompletedEventAttributes)]
-> Map Tag (FieldDescriptor NexusOperationCompletedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationCompletedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NexusOperationCompletedEventAttributes
result__field_descriptor)]
  unknownFields :: Lens' NexusOperationCompletedEventAttributes FieldSet
unknownFields
    = (NexusOperationCompletedEventAttributes -> FieldSet)
-> (NexusOperationCompletedEventAttributes
    -> FieldSet -> NexusOperationCompletedEventAttributes)
-> Lens' NexusOperationCompletedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationCompletedEventAttributes -> FieldSet
_NexusOperationCompletedEventAttributes'_unknownFields
        (\ NexusOperationCompletedEventAttributes
x__ FieldSet
y__
           -> NexusOperationCompletedEventAttributes
x__
                {_NexusOperationCompletedEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationCompletedEventAttributes
defMessage
    = NexusOperationCompletedEventAttributes'_constructor
        {_NexusOperationCompletedEventAttributes'scheduledEventId :: Int64
_NexusOperationCompletedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationCompletedEventAttributes'result :: Maybe Payload
_NexusOperationCompletedEventAttributes'result = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _NexusOperationCompletedEventAttributes'_unknownFields :: FieldSet
_NexusOperationCompletedEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationCompletedEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationCompletedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationCompletedEventAttributes
        loop :: NexusOperationCompletedEventAttributes
-> Parser NexusOperationCompletedEventAttributes
loop NexusOperationCompletedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
18
                          -> do y <- Parser Payload -> String -> Parser Payload
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
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") 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 NexusOperationCompletedEventAttributes
-> String -> Parser NexusOperationCompletedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationCompletedEventAttributes
-> Parser NexusOperationCompletedEventAttributes
loop NexusOperationCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationCompletedEventAttributes"
  buildMessage :: NexusOperationCompletedEventAttributes -> Builder
buildMessage
    = \ NexusOperationCompletedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  NexusOperationCompletedEventAttributes
  NexusOperationCompletedEventAttributes
  Int64
  Int64
-> NexusOperationCompletedEventAttributes -> 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 @"scheduledEventId") NexusOperationCompletedEventAttributes
_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
8)
                      ((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 Payload)
  NexusOperationCompletedEventAttributes
  NexusOperationCompletedEventAttributes
  (Maybe Payload)
  (Maybe Payload)
-> NexusOperationCompletedEventAttributes -> Maybe Payload
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'result") NexusOperationCompletedEventAttributes
_x
                 of
                   Maybe Payload
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                   (Prelude.Just Payload
_v)
                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                          ((ByteString -> Builder)
-> (Payload -> ByteString) -> Payload -> 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))
                             Payload -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payload
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationCompletedEventAttributes
  NexusOperationCompletedEventAttributes
  FieldSet
  FieldSet
-> NexusOperationCompletedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationCompletedEventAttributes
  NexusOperationCompletedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationCompletedEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationCompletedEventAttributes
_x)))
instance Control.DeepSeq.NFData NexusOperationCompletedEventAttributes where
  rnf :: NexusOperationCompletedEventAttributes -> ()
rnf
    = \ NexusOperationCompletedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationCompletedEventAttributes -> FieldSet
_NexusOperationCompletedEventAttributes'_unknownFields NexusOperationCompletedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationCompletedEventAttributes -> Int64
_NexusOperationCompletedEventAttributes'scheduledEventId NexusOperationCompletedEventAttributes
x__)
                (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationCompletedEventAttributes -> Maybe Payload
_NexusOperationCompletedEventAttributes'result NexusOperationCompletedEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' NexusOperationFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' NexusOperationFailedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' NexusOperationFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data NexusOperationFailedEventAttributes
  = NexusOperationFailedEventAttributes'_constructor {NexusOperationFailedEventAttributes -> Int64
_NexusOperationFailedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                      NexusOperationFailedEventAttributes -> Maybe Failure
_NexusOperationFailedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                      NexusOperationFailedEventAttributes -> FieldSet
_NexusOperationFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
(NexusOperationFailedEventAttributes
 -> NexusOperationFailedEventAttributes -> Bool)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes -> Bool)
-> Eq NexusOperationFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
== :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
$c/= :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
/= :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationFailedEventAttributes
Eq NexusOperationFailedEventAttributes =>
(NexusOperationFailedEventAttributes
 -> NexusOperationFailedEventAttributes -> Ordering)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes -> Bool)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes -> Bool)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes -> Bool)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes -> Bool)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes)
-> (NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes
    -> NexusOperationFailedEventAttributes)
-> Ord NexusOperationFailedEventAttributes
NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Ordering
NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
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 :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Ordering
compare :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Ordering
$c< :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
< :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
$c<= :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
<= :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
$c> :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
> :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
$c>= :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
>= :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes -> Bool
$cmax :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
max :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
$cmin :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
min :: NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
-> NexusOperationFailedEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationFailedEventAttributes where
  showsPrec :: Int -> NexusOperationFailedEventAttributes -> ShowS
showsPrec Int
_ NexusOperationFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationFailedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> NexusOperationFailedEventAttributes
-> f NexusOperationFailedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationFailedEventAttributes
 -> f NexusOperationFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationFailedEventAttributes
-> f NexusOperationFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationFailedEventAttributes -> Int64)
-> (NexusOperationFailedEventAttributes
    -> Int64 -> NexusOperationFailedEventAttributes)
-> Lens
     NexusOperationFailedEventAttributes
     NexusOperationFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationFailedEventAttributes -> Int64
_NexusOperationFailedEventAttributes'scheduledEventId
           (\ NexusOperationFailedEventAttributes
x__ Int64
y__
              -> NexusOperationFailedEventAttributes
x__
                   {_NexusOperationFailedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationFailedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> NexusOperationFailedEventAttributes
-> f NexusOperationFailedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> NexusOperationFailedEventAttributes
 -> f NexusOperationFailedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> NexusOperationFailedEventAttributes
-> f NexusOperationFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationFailedEventAttributes -> Maybe Failure)
-> (NexusOperationFailedEventAttributes
    -> Maybe Failure -> NexusOperationFailedEventAttributes)
-> Lens
     NexusOperationFailedEventAttributes
     NexusOperationFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationFailedEventAttributes -> Maybe Failure
_NexusOperationFailedEventAttributes'failure
           (\ NexusOperationFailedEventAttributes
x__ Maybe Failure
y__
              -> NexusOperationFailedEventAttributes
x__ {_NexusOperationFailedEventAttributes'failure = 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 NexusOperationFailedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationFailedEventAttributes
-> f NexusOperationFailedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> NexusOperationFailedEventAttributes
 -> f NexusOperationFailedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationFailedEventAttributes
-> f NexusOperationFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationFailedEventAttributes -> Maybe Failure)
-> (NexusOperationFailedEventAttributes
    -> Maybe Failure -> NexusOperationFailedEventAttributes)
-> Lens
     NexusOperationFailedEventAttributes
     NexusOperationFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationFailedEventAttributes -> Maybe Failure
_NexusOperationFailedEventAttributes'failure
           (\ NexusOperationFailedEventAttributes
x__ Maybe Failure
y__
              -> NexusOperationFailedEventAttributes
x__ {_NexusOperationFailedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationFailedEventAttributes where
  messageName :: Proxy NexusOperationFailedEventAttributes -> Text
messageName Proxy NexusOperationFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationFailedEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationFailedEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationFailedEventAttributes
_
    = ByteString
"\n\
      \#NexusOperationFailedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2:\n\
      \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy NexusOperationFailedEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NexusOperationFailedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor NexusOperationFailedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationFailedEventAttributes Int64
-> FieldDescriptor NexusOperationFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     NexusOperationFailedEventAttributes
     NexusOperationFailedEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationFailedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationFailedEventAttributes
        failure__field_descriptor :: FieldDescriptor NexusOperationFailedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor NexusOperationFailedEventAttributes Failure
-> FieldDescriptor NexusOperationFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  NexusOperationFailedEventAttributes
  NexusOperationFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor NexusOperationFailedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationFailedEventAttributes
      in
        [(Tag, FieldDescriptor NexusOperationFailedEventAttributes)]
-> Map Tag (FieldDescriptor NexusOperationFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationFailedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NexusOperationFailedEventAttributes
failure__field_descriptor)]
  unknownFields :: Lens' NexusOperationFailedEventAttributes FieldSet
unknownFields
    = (NexusOperationFailedEventAttributes -> FieldSet)
-> (NexusOperationFailedEventAttributes
    -> FieldSet -> NexusOperationFailedEventAttributes)
-> Lens' NexusOperationFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationFailedEventAttributes -> FieldSet
_NexusOperationFailedEventAttributes'_unknownFields
        (\ NexusOperationFailedEventAttributes
x__ FieldSet
y__
           -> NexusOperationFailedEventAttributes
x__ {_NexusOperationFailedEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationFailedEventAttributes
defMessage
    = NexusOperationFailedEventAttributes'_constructor
        {_NexusOperationFailedEventAttributes'scheduledEventId :: Int64
_NexusOperationFailedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationFailedEventAttributes'failure :: Maybe Failure
_NexusOperationFailedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _NexusOperationFailedEventAttributes'_unknownFields :: FieldSet
_NexusOperationFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationFailedEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationFailedEventAttributes
        loop :: NexusOperationFailedEventAttributes
-> Parser NexusOperationFailedEventAttributes
loop NexusOperationFailedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
18
                          -> 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") 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 NexusOperationFailedEventAttributes
-> String -> Parser NexusOperationFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationFailedEventAttributes
-> Parser NexusOperationFailedEventAttributes
loop NexusOperationFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationFailedEventAttributes"
  buildMessage :: NexusOperationFailedEventAttributes -> Builder
buildMessage
    = \ NexusOperationFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  NexusOperationFailedEventAttributes
  NexusOperationFailedEventAttributes
  Int64
  Int64
-> NexusOperationFailedEventAttributes -> 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 @"scheduledEventId") NexusOperationFailedEventAttributes
_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
8)
                      ((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 Failure)
  NexusOperationFailedEventAttributes
  NexusOperationFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> NexusOperationFailedEventAttributes -> 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'failure") NexusOperationFailedEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationFailedEventAttributes
  NexusOperationFailedEventAttributes
  FieldSet
  FieldSet
-> NexusOperationFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationFailedEventAttributes
  NexusOperationFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationFailedEventAttributes
_x)))
instance Control.DeepSeq.NFData NexusOperationFailedEventAttributes where
  rnf :: NexusOperationFailedEventAttributes -> ()
rnf
    = \ NexusOperationFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationFailedEventAttributes -> FieldSet
_NexusOperationFailedEventAttributes'_unknownFields NexusOperationFailedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationFailedEventAttributes -> Int64
_NexusOperationFailedEventAttributes'scheduledEventId NexusOperationFailedEventAttributes
x__)
                (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationFailedEventAttributes -> Maybe Failure
_NexusOperationFailedEventAttributes'failure NexusOperationFailedEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.endpoint' @:: Lens' NexusOperationScheduledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.service' @:: Lens' NexusOperationScheduledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.operation' @:: Lens' NexusOperationScheduledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' NexusOperationScheduledEventAttributes Proto.Temporal.Api.Common.V1.Message.Payload@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' NexusOperationScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduleToCloseTimeout' @:: Lens' NexusOperationScheduledEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'scheduleToCloseTimeout' @:: Lens' NexusOperationScheduledEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.nexusHeader' @:: Lens' NexusOperationScheduledEventAttributes (Data.Map.Map Data.Text.Text Data.Text.Text)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' NexusOperationScheduledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.requestId' @:: Lens' NexusOperationScheduledEventAttributes Data.Text.Text@ -}
data NexusOperationScheduledEventAttributes
  = NexusOperationScheduledEventAttributes'_constructor {NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'endpoint :: !Data.Text.Text,
                                                         NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'service :: !Data.Text.Text,
                                                         NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'operation :: !Data.Text.Text,
                                                         NexusOperationScheduledEventAttributes -> Maybe Payload
_NexusOperationScheduledEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload),
                                                         NexusOperationScheduledEventAttributes -> Maybe Duration
_NexusOperationScheduledEventAttributes'scheduleToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                         NexusOperationScheduledEventAttributes -> Map Text Text
_NexusOperationScheduledEventAttributes'nexusHeader :: !(Data.Map.Map Data.Text.Text Data.Text.Text),
                                                         NexusOperationScheduledEventAttributes -> Int64
_NexusOperationScheduledEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                         NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'requestId :: !Data.Text.Text,
                                                         NexusOperationScheduledEventAttributes -> FieldSet
_NexusOperationScheduledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
(NexusOperationScheduledEventAttributes
 -> NexusOperationScheduledEventAttributes -> Bool)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes -> Bool)
-> Eq NexusOperationScheduledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
== :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
$c/= :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
/= :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationScheduledEventAttributes
Eq NexusOperationScheduledEventAttributes =>
(NexusOperationScheduledEventAttributes
 -> NexusOperationScheduledEventAttributes -> Ordering)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes -> Bool)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes -> Bool)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes -> Bool)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes -> Bool)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes)
-> (NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes
    -> NexusOperationScheduledEventAttributes)
-> Ord NexusOperationScheduledEventAttributes
NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Ordering
NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
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 :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Ordering
compare :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Ordering
$c< :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
< :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
$c<= :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
<= :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
$c> :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
> :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
$c>= :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
>= :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes -> Bool
$cmax :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
max :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
$cmin :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
min :: NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
-> NexusOperationScheduledEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationScheduledEventAttributes where
  showsPrec :: Int -> NexusOperationScheduledEventAttributes -> ShowS
showsPrec Int
_ NexusOperationScheduledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationScheduledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationScheduledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "endpoint" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "endpoint"
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "endpoint"
_
    = ((Text -> f Text)
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Text)
-> (NexusOperationScheduledEventAttributes
    -> Text -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'endpoint
           (\ NexusOperationScheduledEventAttributes
x__ Text
y__
              -> NexusOperationScheduledEventAttributes
x__ {_NexusOperationScheduledEventAttributes'endpoint = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "service" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "service"
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "service"
_
    = ((Text -> f Text)
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Text)
-> (NexusOperationScheduledEventAttributes
    -> Text -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'service
           (\ NexusOperationScheduledEventAttributes
x__ Text
y__
              -> NexusOperationScheduledEventAttributes
x__ {_NexusOperationScheduledEventAttributes'service = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "operation" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operation"
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "operation"
_
    = ((Text -> f Text)
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Text)
-> (NexusOperationScheduledEventAttributes
    -> Text -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'operation
           (\ NexusOperationScheduledEventAttributes
x__ Text
y__
              -> NexusOperationScheduledEventAttributes
x__ {_NexusOperationScheduledEventAttributes'operation = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payload where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payload -> f Payload)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Payload -> f Payload) -> Maybe Payload -> f (Maybe Payload))
-> (Payload -> f Payload)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Maybe Payload)
-> (NexusOperationScheduledEventAttributes
    -> Maybe Payload -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Maybe Payload
_NexusOperationScheduledEventAttributes'input
           (\ NexusOperationScheduledEventAttributes
x__ Maybe Payload
y__
              -> NexusOperationScheduledEventAttributes
x__ {_NexusOperationScheduledEventAttributes'input = y__}))
        (Payload -> Lens' (Maybe Payload) Payload
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Payload
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "maybe'input" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payload) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'input"
-> (Maybe Payload -> f (Maybe Payload))
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payload -> f (Maybe Payload))
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Maybe Payload -> f (Maybe Payload))
    -> Maybe Payload -> f (Maybe Payload))
-> (Maybe Payload -> f (Maybe Payload))
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Maybe Payload)
-> (NexusOperationScheduledEventAttributes
    -> Maybe Payload -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     (Maybe Payload)
     (Maybe Payload)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Maybe Payload
_NexusOperationScheduledEventAttributes'input
           (\ NexusOperationScheduledEventAttributes
x__ Maybe Payload
y__
              -> NexusOperationScheduledEventAttributes
x__ {_NexusOperationScheduledEventAttributes'input = y__}))
        (Maybe Payload -> f (Maybe Payload))
-> Maybe Payload -> f (Maybe Payload)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "scheduleToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduleToCloseTimeout"
-> (Duration -> f Duration)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Maybe Duration)
-> (NexusOperationScheduledEventAttributes
    -> Maybe Duration -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Maybe Duration
_NexusOperationScheduledEventAttributes'scheduleToCloseTimeout
           (\ NexusOperationScheduledEventAttributes
x__ Maybe Duration
y__
              -> NexusOperationScheduledEventAttributes
x__
                   {_NexusOperationScheduledEventAttributes'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 NexusOperationScheduledEventAttributes "maybe'scheduleToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'scheduleToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "maybe'scheduleToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Maybe Duration)
-> (NexusOperationScheduledEventAttributes
    -> Maybe Duration -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Maybe Duration
_NexusOperationScheduledEventAttributes'scheduleToCloseTimeout
           (\ NexusOperationScheduledEventAttributes
x__ Maybe Duration
y__
              -> NexusOperationScheduledEventAttributes
x__
                   {_NexusOperationScheduledEventAttributes'scheduleToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "nexusHeader" (Data.Map.Map Data.Text.Text Data.Text.Text) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "nexusHeader"
-> (Map Text Text -> f (Map Text Text))
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "nexusHeader"
_
    = ((Map Text Text -> f (Map Text Text))
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Map Text Text -> f (Map Text Text))
    -> Map Text Text -> f (Map Text Text))
-> (Map Text Text -> f (Map Text Text))
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Map Text Text)
-> (NexusOperationScheduledEventAttributes
    -> Map Text Text -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     (Map Text Text)
     (Map Text Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Map Text Text
_NexusOperationScheduledEventAttributes'nexusHeader
           (\ NexusOperationScheduledEventAttributes
x__ Map Text Text
y__
              -> NexusOperationScheduledEventAttributes
x__
                   {_NexusOperationScheduledEventAttributes'nexusHeader = y__}))
        (Map Text Text -> f (Map Text Text))
-> Map Text Text -> f (Map Text Text)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Int64)
-> (NexusOperationScheduledEventAttributes
    -> Int64 -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Int64
_NexusOperationScheduledEventAttributes'workflowTaskCompletedEventId
           (\ NexusOperationScheduledEventAttributes
x__ Int64
y__
              -> NexusOperationScheduledEventAttributes
x__
                   {_NexusOperationScheduledEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> NexusOperationScheduledEventAttributes
 -> f NexusOperationScheduledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes
-> f NexusOperationScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes -> Text)
-> (NexusOperationScheduledEventAttributes
    -> Text -> NexusOperationScheduledEventAttributes)
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'requestId
           (\ NexusOperationScheduledEventAttributes
x__ Text
y__
              -> NexusOperationScheduledEventAttributes
x__ {_NexusOperationScheduledEventAttributes'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationScheduledEventAttributes where
  messageName :: Proxy NexusOperationScheduledEventAttributes -> Text
messageName Proxy NexusOperationScheduledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationScheduledEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationScheduledEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationScheduledEventAttributes
_
    = ByteString
"\n\
      \&NexusOperationScheduledEventAttributes\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\DC25\n\
      \\ENQinput\CAN\EOT \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2T\n\
      \\EMschedule_to_close_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2s\n\
      \\fnexus_header\CAN\ACK \ETX(\v2P.temporal.api.history.v1.NexusOperationScheduledEventAttributes.NexusHeaderEntryR\vnexusHeader\DC2F\n\
      \ workflow_task_completed_event_id\CAN\a \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\GS\n\
      \\n\
      \request_id\CAN\b \SOH(\tR\trequestId\SUB>\n\
      \\DLENexusHeaderEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy NexusOperationScheduledEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationScheduledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NexusOperationScheduledEventAttributes)
fieldsByTag
    = let
        endpoint__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
endpoint__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor NexusOperationScheduledEventAttributes Text
-> FieldDescriptor NexusOperationScheduledEventAttributes
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
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
-> FieldAccessor NexusOperationScheduledEventAttributes 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 NexusOperationScheduledEventAttributes
        service__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
service__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor NexusOperationScheduledEventAttributes Text
-> FieldDescriptor NexusOperationScheduledEventAttributes
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
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
-> FieldAccessor NexusOperationScheduledEventAttributes 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 NexusOperationScheduledEventAttributes
        operation__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
operation__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor NexusOperationScheduledEventAttributes Text
-> FieldDescriptor NexusOperationScheduledEventAttributes
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
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
-> FieldAccessor NexusOperationScheduledEventAttributes 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 NexusOperationScheduledEventAttributes
        input__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payload
-> FieldAccessor NexusOperationScheduledEventAttributes Payload
-> FieldDescriptor NexusOperationScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"input"
              (MessageOrGroup -> FieldTypeDescriptor Payload
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.Payload)
              (Lens
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  (Maybe Payload)
  (Maybe Payload)
-> FieldAccessor NexusOperationScheduledEventAttributes Payload
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 NexusOperationScheduledEventAttributes
        scheduleToCloseTimeout__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
scheduleToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor NexusOperationScheduledEventAttributes Duration
-> FieldDescriptor NexusOperationScheduledEventAttributes
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
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor NexusOperationScheduledEventAttributes 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 NexusOperationScheduledEventAttributes
        nexusHeader__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
nexusHeader__field_descriptor
          = String
-> FieldTypeDescriptor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> FieldAccessor
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> FieldDescriptor NexusOperationScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"nexus_header"
              (MessageOrGroup
-> FieldTypeDescriptor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor NexusOperationScheduledEventAttributes'NexusHeaderEntry)
              (Lens' NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
-> Lens'
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
-> Lens
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     (Map Text Text)
     (Map Text Text)
-> FieldAccessor
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall key value value1 msg.
(Ord key, Message value) =>
Lens' value key
-> Lens' value value1
-> Lens' msg (Map key value1)
-> FieldAccessor msg value
Data.ProtoLens.MapField
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key")
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                 (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"nexusHeader")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationScheduledEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationScheduledEventAttributes Int64
-> FieldDescriptor NexusOperationScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationScheduledEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationScheduledEventAttributes
        requestId__field_descriptor :: FieldDescriptor NexusOperationScheduledEventAttributes
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor NexusOperationScheduledEventAttributes Text
-> FieldDescriptor NexusOperationScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_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
     NexusOperationScheduledEventAttributes
     NexusOperationScheduledEventAttributes
     Text
     Text
-> FieldAccessor NexusOperationScheduledEventAttributes 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 @"requestId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationScheduledEventAttributes
      in
        [(Tag, FieldDescriptor NexusOperationScheduledEventAttributes)]
-> Map Tag (FieldDescriptor NexusOperationScheduledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationScheduledEventAttributes
endpoint__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NexusOperationScheduledEventAttributes
service__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor NexusOperationScheduledEventAttributes
operation__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor NexusOperationScheduledEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor NexusOperationScheduledEventAttributes
scheduleToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor NexusOperationScheduledEventAttributes
nexusHeader__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, 
            FieldDescriptor NexusOperationScheduledEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor NexusOperationScheduledEventAttributes
requestId__field_descriptor)]
  unknownFields :: Lens' NexusOperationScheduledEventAttributes FieldSet
unknownFields
    = (NexusOperationScheduledEventAttributes -> FieldSet)
-> (NexusOperationScheduledEventAttributes
    -> FieldSet -> NexusOperationScheduledEventAttributes)
-> Lens' NexusOperationScheduledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationScheduledEventAttributes -> FieldSet
_NexusOperationScheduledEventAttributes'_unknownFields
        (\ NexusOperationScheduledEventAttributes
x__ FieldSet
y__
           -> NexusOperationScheduledEventAttributes
x__
                {_NexusOperationScheduledEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationScheduledEventAttributes
defMessage
    = NexusOperationScheduledEventAttributes'_constructor
        {_NexusOperationScheduledEventAttributes'endpoint :: Text
_NexusOperationScheduledEventAttributes'endpoint = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'service :: Text
_NexusOperationScheduledEventAttributes'service = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'operation :: Text
_NexusOperationScheduledEventAttributes'operation = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'input :: Maybe Payload
_NexusOperationScheduledEventAttributes'input = Maybe Payload
forall a. Maybe a
Prelude.Nothing,
         _NexusOperationScheduledEventAttributes'scheduleToCloseTimeout :: Maybe Duration
_NexusOperationScheduledEventAttributes'scheduleToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _NexusOperationScheduledEventAttributes'nexusHeader :: Map Text Text
_NexusOperationScheduledEventAttributes'nexusHeader = Map Text Text
forall k a. Map k a
Data.Map.empty,
         _NexusOperationScheduledEventAttributes'workflowTaskCompletedEventId :: Int64
_NexusOperationScheduledEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'requestId :: Text
_NexusOperationScheduledEventAttributes'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'_unknownFields :: FieldSet
_NexusOperationScheduledEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationScheduledEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationScheduledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationScheduledEventAttributes
        loop :: NexusOperationScheduledEventAttributes
-> Parser NexusOperationScheduledEventAttributes
loop NexusOperationScheduledEventAttributes
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 Payload -> String -> Parser Payload
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
"schedule_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduleToCloseTimeout") y x)
                        Word64
50
                          -> do !(entry :: NexusOperationScheduledEventAttributes'NexusHeaderEntry) <- Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> String
-> Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
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
"nexus_header"
                                (let
                                   key = FoldLike
  Text
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  Text
  Text
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> 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 @"key") NexusOperationScheduledEventAttributes'NexusHeaderEntry
entry
                                   value
                                     = FoldLike
  Text
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  Text
  Text
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> 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 @"value") NexusOperationScheduledEventAttributes'NexusHeaderEntry
entry
                                 in
                                   loop
                                     (Lens.Family2.over
                                        (Data.ProtoLens.Field.field @"nexusHeader")
                                        (\ !Map Text Text
t -> Text -> Text -> Map Text Text -> Map Text Text
forall k a. Ord k => k -> a -> Map k a -> Map k a
Data.Map.insert Text
key Text
value Map Text Text
t) x))
                        Word64
56
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
66
                          -> 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
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") 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 NexusOperationScheduledEventAttributes
-> String -> Parser NexusOperationScheduledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationScheduledEventAttributes
-> Parser NexusOperationScheduledEventAttributes
loop NexusOperationScheduledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationScheduledEventAttributes"
  buildMessage :: NexusOperationScheduledEventAttributes -> Builder
buildMessage
    = \ NexusOperationScheduledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  Text
  Text
-> NexusOperationScheduledEventAttributes -> 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") NexusOperationScheduledEventAttributes
_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
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  Text
  Text
-> NexusOperationScheduledEventAttributes -> 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") NexusOperationScheduledEventAttributes
_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
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  Text
  Text
-> NexusOperationScheduledEventAttributes -> 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") NexusOperationScheduledEventAttributes
_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.<>)
                      (case
                           FoldLike
  (Maybe Payload)
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  (Maybe Payload)
  (Maybe Payload)
-> NexusOperationScheduledEventAttributes -> Maybe Payload
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") NexusOperationScheduledEventAttributes
_x
                       of
                         Maybe Payload
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Payload
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Payload -> ByteString) -> Payload -> 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))
                                   Payload -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Payload
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Duration)
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> NexusOperationScheduledEventAttributes -> 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") NexusOperationScheduledEventAttributes
_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.<>)
                            ([Builder] -> Builder
forall a. Monoid a => [a] -> a
Data.Monoid.mconcat
                               (((Text, Text) -> Builder) -> [(Text, Text)] -> [Builder]
forall a b. (a -> b) -> [a] -> [b]
Prelude.map
                                  (\ (Text, Text)
_v
                                     -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                          (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                          ((ByteString -> Builder)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> ByteString)
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> 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))
                                             NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage
                                             (Setter
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  Text
  Text
-> Text
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"key") ((Text, Text) -> Text
forall a b. (a, b) -> a
Prelude.fst (Text, Text)
_v)
                                                (Setter
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  Text
  Text
-> Text
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall s t a b. Setter s t a b -> b -> s -> t
Lens.Family2.set
                                                   (forall (x :: Symbol) s a (f :: * -> *).
(HasField s x a, Functor f) =>
(a -> f a) -> s -> f s
Data.ProtoLens.Field.field @"value")
                                                   ((Text, Text) -> Text
forall a b. (a, b) -> b
Prelude.snd (Text, Text)
_v)
                                                   (NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage ::
                                                      NexusOperationScheduledEventAttributes'NexusHeaderEntry)))))
                                  (Map Text Text -> [(Text, Text)]
forall k a. Map k a -> [(k, a)]
Data.Map.toList
                                     (FoldLike
  (Map Text Text)
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  (Map Text Text)
  (Map Text Text)
-> NexusOperationScheduledEventAttributes -> Map Text 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 @"nexusHeader") NexusOperationScheduledEventAttributes
_x))))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Int64
_v
                                    = FoldLike
  Int64
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  Int64
  Int64
-> NexusOperationScheduledEventAttributes -> 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 @"workflowTaskCompletedEventId")
                                        NexusOperationScheduledEventAttributes
_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
56)
                                        ((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
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  Text
  Text
-> NexusOperationScheduledEventAttributes -> 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 @"requestId") NexusOperationScheduledEventAttributes
_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
66)
                                           ((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
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  FieldSet
  FieldSet
-> NexusOperationScheduledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationScheduledEventAttributes
  NexusOperationScheduledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationScheduledEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationScheduledEventAttributes
_x)))))))))
instance Control.DeepSeq.NFData NexusOperationScheduledEventAttributes where
  rnf :: NexusOperationScheduledEventAttributes -> ()
rnf
    = \ NexusOperationScheduledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationScheduledEventAttributes -> FieldSet
_NexusOperationScheduledEventAttributes'_unknownFields NexusOperationScheduledEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'endpoint NexusOperationScheduledEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'service NexusOperationScheduledEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'operation NexusOperationScheduledEventAttributes
x__)
                      (Maybe Payload -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (NexusOperationScheduledEventAttributes -> Maybe Payload
_NexusOperationScheduledEventAttributes'input NexusOperationScheduledEventAttributes
x__)
                         (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (NexusOperationScheduledEventAttributes -> Maybe Duration
_NexusOperationScheduledEventAttributes'scheduleToCloseTimeout
                               NexusOperationScheduledEventAttributes
x__)
                            (Map Text Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (NexusOperationScheduledEventAttributes -> Map Text Text
_NexusOperationScheduledEventAttributes'nexusHeader NexusOperationScheduledEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (NexusOperationScheduledEventAttributes -> Int64
_NexusOperationScheduledEventAttributes'workflowTaskCompletedEventId
                                     NexusOperationScheduledEventAttributes
x__)
                                  (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (NexusOperationScheduledEventAttributes -> Text
_NexusOperationScheduledEventAttributes'requestId NexusOperationScheduledEventAttributes
x__)
                                     ()))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.key' @:: Lens' NexusOperationScheduledEventAttributes'NexusHeaderEntry Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.value' @:: Lens' NexusOperationScheduledEventAttributes'NexusHeaderEntry Data.Text.Text@ -}
data NexusOperationScheduledEventAttributes'NexusHeaderEntry
  = NexusOperationScheduledEventAttributes'NexusHeaderEntry'_constructor {NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'key :: !Data.Text.Text,
                                                                          NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'value :: !Data.Text.Text,
                                                                          NexusOperationScheduledEventAttributes'NexusHeaderEntry -> FieldSet
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
(NexusOperationScheduledEventAttributes'NexusHeaderEntry
 -> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool)
-> Eq NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
== :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
$c/= :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
/= :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
Prelude.Eq, Eq NexusOperationScheduledEventAttributes'NexusHeaderEntry
Eq NexusOperationScheduledEventAttributes'NexusHeaderEntry =>
(NexusOperationScheduledEventAttributes'NexusHeaderEntry
 -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
 -> Ordering)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> Ord NexusOperationScheduledEventAttributes'NexusHeaderEntry
NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> Ordering
NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
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 :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> Ordering
compare :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> Ordering
$c< :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
< :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
$c<= :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
<= :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
$c> :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
> :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
$c>= :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
>= :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Bool
$cmax :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
max :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
$cmin :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
min :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
Prelude.Ord)
instance Prelude.Show NexusOperationScheduledEventAttributes'NexusHeaderEntry where
  showsPrec :: Int
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> ShowS
showsPrec Int
_ NexusOperationScheduledEventAttributes'NexusHeaderEntry
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationScheduledEventAttributes'NexusHeaderEntry -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationScheduledEventAttributes'NexusHeaderEntry
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes'NexusHeaderEntry "key" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "key"
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> f NexusOperationScheduledEventAttributes'NexusHeaderEntry
fieldOf Proxy# "key"
_
    = ((Text -> f Text)
 -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
 -> f NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> f NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> Text -> NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> Lens'
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'key
           (\ NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__ Text
y__
              -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__
                   {_NexusOperationScheduledEventAttributes'NexusHeaderEntry'key = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationScheduledEventAttributes'NexusHeaderEntry "value" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "value"
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> f NexusOperationScheduledEventAttributes'NexusHeaderEntry
fieldOf Proxy# "value"
_
    = ((Text -> f Text)
 -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
 -> f NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> f NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> Text -> NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> Lens'
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'value
           (\ NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__ Text
y__
              -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__
                   {_NexusOperationScheduledEventAttributes'NexusHeaderEntry'value = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationScheduledEventAttributes'NexusHeaderEntry where
  messageName :: Proxy NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> Text
messageName Proxy NexusOperationScheduledEventAttributes'NexusHeaderEntry
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationScheduledEventAttributes.NexusHeaderEntry"
  packedMessageDescriptor :: Proxy NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> ByteString
packedMessageDescriptor Proxy NexusOperationScheduledEventAttributes'NexusHeaderEntry
_
    = ByteString
"\n\
      \\DLENexusHeaderEntry\DC2\DLE\n\
      \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
      \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH"
  packedFileDescriptor :: Proxy NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> ByteString
packedFileDescriptor Proxy NexusOperationScheduledEventAttributes'NexusHeaderEntry
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry)
fieldsByTag
    = let
        key__field_descriptor :: FieldDescriptor
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
key__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
-> FieldDescriptor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"key"
              (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'
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
-> FieldAccessor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry 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 @"key")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationScheduledEventAttributes'NexusHeaderEntry
        value__field_descriptor :: FieldDescriptor
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
value__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
-> FieldDescriptor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"value"
              (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'
     NexusOperationScheduledEventAttributes'NexusHeaderEntry Text
-> FieldAccessor
     NexusOperationScheduledEventAttributes'NexusHeaderEntry 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 @"value")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationScheduledEventAttributes'NexusHeaderEntry
      in
        [(Tag,
  FieldDescriptor
    NexusOperationScheduledEventAttributes'NexusHeaderEntry)]
-> Map
     Tag
     (FieldDescriptor
        NexusOperationScheduledEventAttributes'NexusHeaderEntry)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
key__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
value__field_descriptor)]
  unknownFields :: Lens'
  NexusOperationScheduledEventAttributes'NexusHeaderEntry FieldSet
unknownFields
    = (NexusOperationScheduledEventAttributes'NexusHeaderEntry
 -> FieldSet)
-> (NexusOperationScheduledEventAttributes'NexusHeaderEntry
    -> FieldSet
    -> NexusOperationScheduledEventAttributes'NexusHeaderEntry)
-> Lens'
     NexusOperationScheduledEventAttributes'NexusHeaderEntry FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationScheduledEventAttributes'NexusHeaderEntry -> FieldSet
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'_unknownFields
        (\ NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__ FieldSet
y__
           -> NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__
                {_NexusOperationScheduledEventAttributes'NexusHeaderEntry'_unknownFields = y__})
  defMessage :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
defMessage
    = NexusOperationScheduledEventAttributes'NexusHeaderEntry'_constructor
        {_NexusOperationScheduledEventAttributes'NexusHeaderEntry'key :: Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'key = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'NexusHeaderEntry'value :: Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'value = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationScheduledEventAttributes'NexusHeaderEntry'_unknownFields :: FieldSet
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'_unknownFields = []}
  parseMessage :: Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
parseMessage
    = let
        loop ::
          NexusOperationScheduledEventAttributes'NexusHeaderEntry
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
        loop :: NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
loop NexusOperationScheduledEventAttributes'NexusHeaderEntry
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
"key"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"key") 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
"value"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"value") 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 NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> String
-> Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> Parser NexusOperationScheduledEventAttributes'NexusHeaderEntry
loop NexusOperationScheduledEventAttributes'NexusHeaderEntry
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"NexusHeaderEntry"
  buildMessage :: NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Builder
buildMessage
    = \ NexusOperationScheduledEventAttributes'NexusHeaderEntry
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let _v :: Text
_v = FoldLike
  Text
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  Text
  Text
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> 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 @"key") NexusOperationScheduledEventAttributes'NexusHeaderEntry
_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
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  Text
  Text
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry -> 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 @"value") NexusOperationScheduledEventAttributes'NexusHeaderEntry
_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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  FieldSet
  FieldSet
-> NexusOperationScheduledEventAttributes'NexusHeaderEntry
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  NexusOperationScheduledEventAttributes'NexusHeaderEntry
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  NexusOperationScheduledEventAttributes'NexusHeaderEntry FieldSet
Data.ProtoLens.unknownFields NexusOperationScheduledEventAttributes'NexusHeaderEntry
_x)))
instance Control.DeepSeq.NFData NexusOperationScheduledEventAttributes'NexusHeaderEntry where
  rnf :: NexusOperationScheduledEventAttributes'NexusHeaderEntry -> ()
rnf
    = \ NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationScheduledEventAttributes'NexusHeaderEntry -> FieldSet
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'_unknownFields
                NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'key NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationScheduledEventAttributes'NexusHeaderEntry -> Text
_NexusOperationScheduledEventAttributes'NexusHeaderEntry'value
                      NexusOperationScheduledEventAttributes'NexusHeaderEntry
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' NexusOperationStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.operationId' @:: Lens' NexusOperationStartedEventAttributes Data.Text.Text@ -}
data NexusOperationStartedEventAttributes
  = NexusOperationStartedEventAttributes'_constructor {NexusOperationStartedEventAttributes -> Int64
_NexusOperationStartedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                       NexusOperationStartedEventAttributes -> Text
_NexusOperationStartedEventAttributes'operationId :: !Data.Text.Text,
                                                       NexusOperationStartedEventAttributes -> FieldSet
_NexusOperationStartedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
(NexusOperationStartedEventAttributes
 -> NexusOperationStartedEventAttributes -> Bool)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes -> Bool)
-> Eq NexusOperationStartedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
== :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
$c/= :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
/= :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationStartedEventAttributes
Eq NexusOperationStartedEventAttributes =>
(NexusOperationStartedEventAttributes
 -> NexusOperationStartedEventAttributes -> Ordering)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes -> Bool)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes -> Bool)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes -> Bool)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes -> Bool)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes)
-> (NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes
    -> NexusOperationStartedEventAttributes)
-> Ord NexusOperationStartedEventAttributes
NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Ordering
NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
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 :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Ordering
compare :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Ordering
$c< :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
< :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
$c<= :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
<= :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
$c> :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
> :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
$c>= :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
>= :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes -> Bool
$cmax :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
max :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
$cmin :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
min :: NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
-> NexusOperationStartedEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationStartedEventAttributes where
  showsPrec :: Int -> NexusOperationStartedEventAttributes -> ShowS
showsPrec Int
_ NexusOperationStartedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationStartedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationStartedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationStartedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> NexusOperationStartedEventAttributes
-> f NexusOperationStartedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationStartedEventAttributes
 -> f NexusOperationStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationStartedEventAttributes
-> f NexusOperationStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationStartedEventAttributes -> Int64)
-> (NexusOperationStartedEventAttributes
    -> Int64 -> NexusOperationStartedEventAttributes)
-> Lens
     NexusOperationStartedEventAttributes
     NexusOperationStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationStartedEventAttributes -> Int64
_NexusOperationStartedEventAttributes'scheduledEventId
           (\ NexusOperationStartedEventAttributes
x__ Int64
y__
              -> NexusOperationStartedEventAttributes
x__
                   {_NexusOperationStartedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationStartedEventAttributes "operationId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "operationId"
-> (Text -> f Text)
-> NexusOperationStartedEventAttributes
-> f NexusOperationStartedEventAttributes
fieldOf Proxy# "operationId"
_
    = ((Text -> f Text)
 -> NexusOperationStartedEventAttributes
 -> f NexusOperationStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> NexusOperationStartedEventAttributes
-> f NexusOperationStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationStartedEventAttributes -> Text)
-> (NexusOperationStartedEventAttributes
    -> Text -> NexusOperationStartedEventAttributes)
-> Lens
     NexusOperationStartedEventAttributes
     NexusOperationStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationStartedEventAttributes -> Text
_NexusOperationStartedEventAttributes'operationId
           (\ NexusOperationStartedEventAttributes
x__ Text
y__
              -> NexusOperationStartedEventAttributes
x__ {_NexusOperationStartedEventAttributes'operationId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationStartedEventAttributes where
  messageName :: Proxy NexusOperationStartedEventAttributes -> Text
messageName Proxy NexusOperationStartedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationStartedEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationStartedEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationStartedEventAttributes
_
    = ByteString
"\n\
      \$NexusOperationStartedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2!\n\
      \\foperation_id\CAN\ETX \SOH(\tR\voperationId"
  packedFileDescriptor :: Proxy NexusOperationStartedEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationStartedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NexusOperationStartedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor NexusOperationStartedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationStartedEventAttributes Int64
-> FieldDescriptor NexusOperationStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     NexusOperationStartedEventAttributes
     NexusOperationStartedEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationStartedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationStartedEventAttributes
        operationId__field_descriptor :: FieldDescriptor NexusOperationStartedEventAttributes
operationId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor NexusOperationStartedEventAttributes Text
-> FieldDescriptor NexusOperationStartedEventAttributes
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
     NexusOperationStartedEventAttributes
     NexusOperationStartedEventAttributes
     Text
     Text
-> FieldAccessor NexusOperationStartedEventAttributes 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 NexusOperationStartedEventAttributes
      in
        [(Tag, FieldDescriptor NexusOperationStartedEventAttributes)]
-> Map Tag (FieldDescriptor NexusOperationStartedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationStartedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor NexusOperationStartedEventAttributes
operationId__field_descriptor)]
  unknownFields :: Lens' NexusOperationStartedEventAttributes FieldSet
unknownFields
    = (NexusOperationStartedEventAttributes -> FieldSet)
-> (NexusOperationStartedEventAttributes
    -> FieldSet -> NexusOperationStartedEventAttributes)
-> Lens' NexusOperationStartedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationStartedEventAttributes -> FieldSet
_NexusOperationStartedEventAttributes'_unknownFields
        (\ NexusOperationStartedEventAttributes
x__ FieldSet
y__
           -> NexusOperationStartedEventAttributes
x__
                {_NexusOperationStartedEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationStartedEventAttributes
defMessage
    = NexusOperationStartedEventAttributes'_constructor
        {_NexusOperationStartedEventAttributes'scheduledEventId :: Int64
_NexusOperationStartedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationStartedEventAttributes'operationId :: Text
_NexusOperationStartedEventAttributes'operationId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationStartedEventAttributes'_unknownFields :: FieldSet
_NexusOperationStartedEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationStartedEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationStartedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationStartedEventAttributes
        loop :: NexusOperationStartedEventAttributes
-> Parser NexusOperationStartedEventAttributes
loop NexusOperationStartedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"operationId") 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 NexusOperationStartedEventAttributes
-> String -> Parser NexusOperationStartedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationStartedEventAttributes
-> Parser NexusOperationStartedEventAttributes
loop NexusOperationStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationStartedEventAttributes"
  buildMessage :: NexusOperationStartedEventAttributes -> Builder
buildMessage
    = \ NexusOperationStartedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  NexusOperationStartedEventAttributes
  NexusOperationStartedEventAttributes
  Int64
  Int64
-> NexusOperationStartedEventAttributes -> 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 @"scheduledEventId") NexusOperationStartedEventAttributes
_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
8)
                      ((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
  NexusOperationStartedEventAttributes
  NexusOperationStartedEventAttributes
  Text
  Text
-> NexusOperationStartedEventAttributes -> 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") NexusOperationStartedEventAttributes
_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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationStartedEventAttributes
  NexusOperationStartedEventAttributes
  FieldSet
  FieldSet
-> NexusOperationStartedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationStartedEventAttributes
  NexusOperationStartedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationStartedEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationStartedEventAttributes
_x)))
instance Control.DeepSeq.NFData NexusOperationStartedEventAttributes where
  rnf :: NexusOperationStartedEventAttributes -> ()
rnf
    = \ NexusOperationStartedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationStartedEventAttributes -> FieldSet
_NexusOperationStartedEventAttributes'_unknownFields NexusOperationStartedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationStartedEventAttributes -> Int64
_NexusOperationStartedEventAttributes'scheduledEventId NexusOperationStartedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationStartedEventAttributes -> Text
_NexusOperationStartedEventAttributes'operationId NexusOperationStartedEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' NexusOperationTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' NexusOperationTimedOutEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' NexusOperationTimedOutEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data NexusOperationTimedOutEventAttributes
  = NexusOperationTimedOutEventAttributes'_constructor {NexusOperationTimedOutEventAttributes -> Int64
_NexusOperationTimedOutEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                        NexusOperationTimedOutEventAttributes -> Maybe Failure
_NexusOperationTimedOutEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                        NexusOperationTimedOutEventAttributes -> FieldSet
_NexusOperationTimedOutEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
(NexusOperationTimedOutEventAttributes
 -> NexusOperationTimedOutEventAttributes -> Bool)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes -> Bool)
-> Eq NexusOperationTimedOutEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
== :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
$c/= :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
/= :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
Prelude.Eq, Eq NexusOperationTimedOutEventAttributes
Eq NexusOperationTimedOutEventAttributes =>
(NexusOperationTimedOutEventAttributes
 -> NexusOperationTimedOutEventAttributes -> Ordering)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes -> Bool)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes -> Bool)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes -> Bool)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes -> Bool)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes)
-> (NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes
    -> NexusOperationTimedOutEventAttributes)
-> Ord NexusOperationTimedOutEventAttributes
NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Ordering
NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
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 :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Ordering
compare :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Ordering
$c< :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
< :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
$c<= :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
<= :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
$c> :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
> :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
$c>= :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
>= :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes -> Bool
$cmax :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
max :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
$cmin :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
min :: NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
-> NexusOperationTimedOutEventAttributes
Prelude.Ord)
instance Prelude.Show NexusOperationTimedOutEventAttributes where
  showsPrec :: Int -> NexusOperationTimedOutEventAttributes -> ShowS
showsPrec Int
_ NexusOperationTimedOutEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (NexusOperationTimedOutEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort NexusOperationTimedOutEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField NexusOperationTimedOutEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> NexusOperationTimedOutEventAttributes
-> f NexusOperationTimedOutEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> NexusOperationTimedOutEventAttributes
 -> f NexusOperationTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> NexusOperationTimedOutEventAttributes
-> f NexusOperationTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationTimedOutEventAttributes -> Int64)
-> (NexusOperationTimedOutEventAttributes
    -> Int64 -> NexusOperationTimedOutEventAttributes)
-> Lens
     NexusOperationTimedOutEventAttributes
     NexusOperationTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationTimedOutEventAttributes -> Int64
_NexusOperationTimedOutEventAttributes'scheduledEventId
           (\ NexusOperationTimedOutEventAttributes
x__ Int64
y__
              -> NexusOperationTimedOutEventAttributes
x__
                   {_NexusOperationTimedOutEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField NexusOperationTimedOutEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> NexusOperationTimedOutEventAttributes
-> f NexusOperationTimedOutEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> NexusOperationTimedOutEventAttributes
 -> f NexusOperationTimedOutEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> NexusOperationTimedOutEventAttributes
-> f NexusOperationTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationTimedOutEventAttributes -> Maybe Failure)
-> (NexusOperationTimedOutEventAttributes
    -> Maybe Failure -> NexusOperationTimedOutEventAttributes)
-> Lens
     NexusOperationTimedOutEventAttributes
     NexusOperationTimedOutEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationTimedOutEventAttributes -> Maybe Failure
_NexusOperationTimedOutEventAttributes'failure
           (\ NexusOperationTimedOutEventAttributes
x__ Maybe Failure
y__
              -> NexusOperationTimedOutEventAttributes
x__ {_NexusOperationTimedOutEventAttributes'failure = 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 NexusOperationTimedOutEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationTimedOutEventAttributes
-> f NexusOperationTimedOutEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> NexusOperationTimedOutEventAttributes
 -> f NexusOperationTimedOutEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> NexusOperationTimedOutEventAttributes
-> f NexusOperationTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((NexusOperationTimedOutEventAttributes -> Maybe Failure)
-> (NexusOperationTimedOutEventAttributes
    -> Maybe Failure -> NexusOperationTimedOutEventAttributes)
-> Lens
     NexusOperationTimedOutEventAttributes
     NexusOperationTimedOutEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           NexusOperationTimedOutEventAttributes -> Maybe Failure
_NexusOperationTimedOutEventAttributes'failure
           (\ NexusOperationTimedOutEventAttributes
x__ Maybe Failure
y__
              -> NexusOperationTimedOutEventAttributes
x__ {_NexusOperationTimedOutEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message NexusOperationTimedOutEventAttributes where
  messageName :: Proxy NexusOperationTimedOutEventAttributes -> Text
messageName Proxy NexusOperationTimedOutEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.NexusOperationTimedOutEventAttributes"
  packedMessageDescriptor :: Proxy NexusOperationTimedOutEventAttributes -> ByteString
packedMessageDescriptor Proxy NexusOperationTimedOutEventAttributes
_
    = ByteString
"\n\
      \%NexusOperationTimedOutEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2:\n\
      \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy NexusOperationTimedOutEventAttributes -> ByteString
packedFileDescriptor Proxy NexusOperationTimedOutEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor NexusOperationTimedOutEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor NexusOperationTimedOutEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor NexusOperationTimedOutEventAttributes Int64
-> FieldDescriptor NexusOperationTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     NexusOperationTimedOutEventAttributes
     NexusOperationTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor NexusOperationTimedOutEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationTimedOutEventAttributes
        failure__field_descriptor :: FieldDescriptor NexusOperationTimedOutEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor NexusOperationTimedOutEventAttributes Failure
-> FieldDescriptor NexusOperationTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  NexusOperationTimedOutEventAttributes
  NexusOperationTimedOutEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor NexusOperationTimedOutEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor NexusOperationTimedOutEventAttributes
      in
        [(Tag, FieldDescriptor NexusOperationTimedOutEventAttributes)]
-> Map Tag (FieldDescriptor NexusOperationTimedOutEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor NexusOperationTimedOutEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor NexusOperationTimedOutEventAttributes
failure__field_descriptor)]
  unknownFields :: Lens' NexusOperationTimedOutEventAttributes FieldSet
unknownFields
    = (NexusOperationTimedOutEventAttributes -> FieldSet)
-> (NexusOperationTimedOutEventAttributes
    -> FieldSet -> NexusOperationTimedOutEventAttributes)
-> Lens' NexusOperationTimedOutEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        NexusOperationTimedOutEventAttributes -> FieldSet
_NexusOperationTimedOutEventAttributes'_unknownFields
        (\ NexusOperationTimedOutEventAttributes
x__ FieldSet
y__
           -> NexusOperationTimedOutEventAttributes
x__
                {_NexusOperationTimedOutEventAttributes'_unknownFields = y__})
  defMessage :: NexusOperationTimedOutEventAttributes
defMessage
    = NexusOperationTimedOutEventAttributes'_constructor
        {_NexusOperationTimedOutEventAttributes'scheduledEventId :: Int64
_NexusOperationTimedOutEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _NexusOperationTimedOutEventAttributes'failure :: Maybe Failure
_NexusOperationTimedOutEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _NexusOperationTimedOutEventAttributes'_unknownFields :: FieldSet
_NexusOperationTimedOutEventAttributes'_unknownFields = []}
  parseMessage :: Parser NexusOperationTimedOutEventAttributes
parseMessage
    = let
        loop ::
          NexusOperationTimedOutEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser NexusOperationTimedOutEventAttributes
        loop :: NexusOperationTimedOutEventAttributes
-> Parser NexusOperationTimedOutEventAttributes
loop NexusOperationTimedOutEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
18
                          -> 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") 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 NexusOperationTimedOutEventAttributes
-> String -> Parser NexusOperationTimedOutEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do NexusOperationTimedOutEventAttributes
-> Parser NexusOperationTimedOutEventAttributes
loop NexusOperationTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"NexusOperationTimedOutEventAttributes"
  buildMessage :: NexusOperationTimedOutEventAttributes -> Builder
buildMessage
    = \ NexusOperationTimedOutEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  NexusOperationTimedOutEventAttributes
  NexusOperationTimedOutEventAttributes
  Int64
  Int64
-> NexusOperationTimedOutEventAttributes -> 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 @"scheduledEventId") NexusOperationTimedOutEventAttributes
_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
8)
                      ((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 Failure)
  NexusOperationTimedOutEventAttributes
  NexusOperationTimedOutEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> NexusOperationTimedOutEventAttributes -> 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'failure") NexusOperationTimedOutEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  NexusOperationTimedOutEventAttributes
  NexusOperationTimedOutEventAttributes
  FieldSet
  FieldSet
-> NexusOperationTimedOutEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  NexusOperationTimedOutEventAttributes
  NexusOperationTimedOutEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' NexusOperationTimedOutEventAttributes FieldSet
Data.ProtoLens.unknownFields NexusOperationTimedOutEventAttributes
_x)))
instance Control.DeepSeq.NFData NexusOperationTimedOutEventAttributes where
  rnf :: NexusOperationTimedOutEventAttributes -> ()
rnf
    = \ NexusOperationTimedOutEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (NexusOperationTimedOutEventAttributes -> FieldSet
_NexusOperationTimedOutEventAttributes'_unknownFields NexusOperationTimedOutEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (NexusOperationTimedOutEventAttributes -> Int64
_NexusOperationTimedOutEventAttributes'scheduledEventId NexusOperationTimedOutEventAttributes
x__)
                (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (NexusOperationTimedOutEventAttributes -> Maybe Failure
_NexusOperationTimedOutEventAttributes'failure NexusOperationTimedOutEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cause' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Enums.V1.FailedCause.CancelExternalWorkflowExecutionFailedCause@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' RequestCancelExternalWorkflowExecutionFailedEventAttributes Data.Text.Text@ -}
data RequestCancelExternalWorkflowExecutionFailedEventAttributes
  = RequestCancelExternalWorkflowExecutionFailedEventAttributes'_constructor {RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> CancelExternalWorkflowExecutionFailedCause
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'cause :: !Proto.Temporal.Api.Enums.V1.FailedCause.CancelExternalWorkflowExecutionFailedCause,
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespace :: !Data.Text.Text,
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'control :: !Data.Text.Text,
                                                                              RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> FieldSet
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
(RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Bool)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Bool)
-> Eq RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
== :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
$c/= :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
/= :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
Prelude.Eq, Eq RequestCancelExternalWorkflowExecutionFailedEventAttributes
Eq RequestCancelExternalWorkflowExecutionFailedEventAttributes =>
(RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Ordering)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Ord RequestCancelExternalWorkflowExecutionFailedEventAttributes
RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Ordering
RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
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 :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Ordering
compare :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Ordering
$c< :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
< :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
$c<= :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
<= :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
$c> :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
> :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
$c>= :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
>= :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Bool
$cmax :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
max :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
$cmin :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
min :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
Prelude.Ord)
instance Prelude.Show RequestCancelExternalWorkflowExecutionFailedEventAttributes where
  showsPrec :: Int
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> ShowS
showsPrec Int
_ RequestCancelExternalWorkflowExecutionFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelExternalWorkflowExecutionFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "cause" Proto.Temporal.Api.Enums.V1.FailedCause.CancelExternalWorkflowExecutionFailedCause where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (CancelExternalWorkflowExecutionFailedCause
    -> f CancelExternalWorkflowExecutionFailedCause)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "cause"
_
    = ((CancelExternalWorkflowExecutionFailedCause
  -> f CancelExternalWorkflowExecutionFailedCause)
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((CancelExternalWorkflowExecutionFailedCause
     -> f CancelExternalWorkflowExecutionFailedCause)
    -> CancelExternalWorkflowExecutionFailedCause
    -> f CancelExternalWorkflowExecutionFailedCause)
-> (CancelExternalWorkflowExecutionFailedCause
    -> f CancelExternalWorkflowExecutionFailedCause)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> CancelExternalWorkflowExecutionFailedCause)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> CancelExternalWorkflowExecutionFailedCause
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     CancelExternalWorkflowExecutionFailedCause
     CancelExternalWorkflowExecutionFailedCause
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> CancelExternalWorkflowExecutionFailedCause
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'cause
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ CancelExternalWorkflowExecutionFailedCause
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'cause = y__}))
        (CancelExternalWorkflowExecutionFailedCause
 -> f CancelExternalWorkflowExecutionFailedCause)
-> CancelExternalWorkflowExecutionFailedCause
-> f CancelExternalWorkflowExecutionFailedCause
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Int64)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Int64
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespace
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespaceId
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowExecution)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowExecution
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution = 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 RequestCancelExternalWorkflowExecutionFailedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowExecution)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowExecution
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Int64)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Int64
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'initiatedEventId
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionFailedEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> f RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'control
           (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RequestCancelExternalWorkflowExecutionFailedEventAttributes where
  messageName :: Proxy RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Text
messageName Proxy RequestCancelExternalWorkflowExecutionFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.RequestCancelExternalWorkflowExecutionFailedEventAttributes"
  packedMessageDescriptor :: Proxy RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> ByteString
packedMessageDescriptor Proxy RequestCancelExternalWorkflowExecutionFailedEventAttributes
_
    = ByteString
"\n\
      \;RequestCancelExternalWorkflowExecutionFailedEventAttributes\DC2W\n\
      \\ENQcause\CAN\SOH \SOH(\SO2A.temporal.api.enums.v1.CancelExternalWorkflowExecutionFailedCauseR\ENQcause\DC2F\n\
      \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
      \\tnamespace\CAN\ETX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\EOT \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2,\n\
      \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2\CAN\n\
      \\acontrol\CAN\ACK \SOH(\tR\acontrol"
  packedFileDescriptor :: Proxy RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> ByteString
packedFileDescriptor Proxy RequestCancelExternalWorkflowExecutionFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes)
fieldsByTag
    = let
        cause__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
cause__field_descriptor
          = String
-> FieldTypeDescriptor CancelExternalWorkflowExecutionFailedCause
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     CancelExternalWorkflowExecutionFailedCause
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cause"
              (ScalarField CancelExternalWorkflowExecutionFailedCause
-> FieldTypeDescriptor CancelExternalWorkflowExecutionFailedCause
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField CancelExternalWorkflowExecutionFailedCause
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.FailedCause.CancelExternalWorkflowExecutionFailedCause)
              (WireDefault CancelExternalWorkflowExecutionFailedCause
-> Lens
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     CancelExternalWorkflowExecutionFailedCause
     CancelExternalWorkflowExecutionFailedCause
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     CancelExternalWorkflowExecutionFailedCause
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault CancelExternalWorkflowExecutionFailedCause
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 @"cause")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
        namespace__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     WorkflowExecution
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
        control__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionFailedEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionFailedEventAttributes
      in
        [(Tag,
  FieldDescriptor
    RequestCancelExternalWorkflowExecutionFailedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        RequestCancelExternalWorkflowExecutionFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
cause__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
control__field_descriptor)]
  unknownFields :: Lens'
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  FieldSet
unknownFields
    = (RequestCancelExternalWorkflowExecutionFailedEventAttributes
 -> FieldSet)
-> (RequestCancelExternalWorkflowExecutionFailedEventAttributes
    -> FieldSet
    -> RequestCancelExternalWorkflowExecutionFailedEventAttributes)
-> Lens'
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> FieldSet
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'_unknownFields
        (\ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__ FieldSet
y__
           -> RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
                {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'_unknownFields = y__})
  defMessage :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
defMessage
    = RequestCancelExternalWorkflowExecutionFailedEventAttributes'_constructor
        {_RequestCancelExternalWorkflowExecutionFailedEventAttributes'cause :: CancelExternalWorkflowExecutionFailedCause
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'cause = CancelExternalWorkflowExecutionFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespace :: Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespaceId :: Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'initiatedEventId :: Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'control :: Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionFailedEventAttributes'_unknownFields :: FieldSet
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser RequestCancelExternalWorkflowExecutionFailedEventAttributes
parseMessage
    = let
        loop ::
          RequestCancelExternalWorkflowExecutionFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelExternalWorkflowExecutionFailedEventAttributes
        loop :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Parser
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
loop RequestCancelExternalWorkflowExecutionFailedEventAttributes
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 CancelExternalWorkflowExecutionFailedCause
-> String -> Parser CancelExternalWorkflowExecutionFailedCause
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> CancelExternalWorkflowExecutionFailedCause)
-> Parser Int -> Parser CancelExternalWorkflowExecutionFailedCause
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> CancelExternalWorkflowExecutionFailedCause
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
"cause"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cause") y x)
                        Word64
16
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
34
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
40
                          -> 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") y x)
                        Word64
50
                          -> 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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") 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 RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> String
-> Parser
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Parser
     RequestCancelExternalWorkflowExecutionFailedEventAttributes
loop RequestCancelExternalWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RequestCancelExternalWorkflowExecutionFailedEventAttributes"
  buildMessage :: RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Builder
buildMessage
    = \ RequestCancelExternalWorkflowExecutionFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: CancelExternalWorkflowExecutionFailedCause
_v = FoldLike
  CancelExternalWorkflowExecutionFailedCause
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  CancelExternalWorkflowExecutionFailedCause
  CancelExternalWorkflowExecutionFailedCause
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> CancelExternalWorkflowExecutionFailedCause
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 @"cause") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_x
              in
                if CancelExternalWorkflowExecutionFailedCause
-> CancelExternalWorkflowExecutionFailedCause -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) CancelExternalWorkflowExecutionFailedCause
_v CancelExternalWorkflowExecutionFailedCause
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)
-> (CancelExternalWorkflowExecutionFailedCause -> Int)
-> CancelExternalWorkflowExecutionFailedCause
-> 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)
                         CancelExternalWorkflowExecutionFailedCause -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum CancelExternalWorkflowExecutionFailedCause
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike
  Int64
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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 @"workflowTaskCompletedEventId") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_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
16)
                         ((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
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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 @"namespace") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_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
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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 @"namespaceId") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_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)
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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'workflowExecution") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_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
34)
                                   ((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 :: Int64
_v
                                 = FoldLike
  Int64
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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 @"initiatedEventId") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_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
40)
                                     ((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
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> 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 @"control") RequestCancelExternalWorkflowExecutionFailedEventAttributes
_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
50)
                                        ((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
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
-> RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  RequestCancelExternalWorkflowExecutionFailedEventAttributes
  FieldSet
Data.ProtoLens.unknownFields RequestCancelExternalWorkflowExecutionFailedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData RequestCancelExternalWorkflowExecutionFailedEventAttributes where
  rnf :: RequestCancelExternalWorkflowExecutionFailedEventAttributes -> ()
rnf
    = \ RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> FieldSet
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'_unknownFields
                RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
             (CancelExternalWorkflowExecutionFailedCause -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> CancelExternalWorkflowExecutionFailedCause
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'cause
                   RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
                      RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespace
                         RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'namespaceId
                            RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                         (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'workflowExecution
                               RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RequestCancelExternalWorkflowExecutionFailedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'initiatedEventId
                                  RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (RequestCancelExternalWorkflowExecutionFailedEventAttributes -> Text
_RequestCancelExternalWorkflowExecutionFailedEventAttributes'control
                                     RequestCancelExternalWorkflowExecutionFailedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowOnly' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Prelude.Bool@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.reason' @:: Lens' RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@ -}
data RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  = RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_constructor {RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespace :: !Data.Text.Text,
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'control :: !Data.Text.Text,
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly :: !Prelude.Bool,
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'reason :: !Data.Text.Text,
                                                                                 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> FieldSet
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
(RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Bool)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool)
-> Eq
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
== :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
$c/= :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
/= :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
Prelude.Eq, Eq RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
Eq
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes =>
(RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Ordering)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Ord
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Ordering
RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
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 :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Ordering
compare :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Ordering
$c< :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
< :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
$c<= :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
<= :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
$c> :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
> :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
$c>= :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
>= :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
$cmax :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
max :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
$cmin :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
min :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
Prelude.Ord)
instance Prelude.Show RequestCancelExternalWorkflowExecutionInitiatedEventAttributes where
  showsPrec :: Int
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> ShowS
showsPrec Int
_ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Int64)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Int64
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Int64
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespace
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespaceId
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe WorkflowExecution)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe WorkflowExecution
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution = 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 RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe WorkflowExecution)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe WorkflowExecution
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'control
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "childWorkflowOnly" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowOnly"
-> (Bool -> f Bool)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "childWorkflowOnly"
_
    = ((Bool -> f Bool)
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Bool)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Bool
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField RequestCancelExternalWorkflowExecutionInitiatedEventAttributes "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> f RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> Text)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> Text
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'reason
           (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message RequestCancelExternalWorkflowExecutionInitiatedEventAttributes where
  messageName :: Proxy
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
messageName Proxy
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.RequestCancelExternalWorkflowExecutionInitiatedEventAttributes"
  packedMessageDescriptor :: Proxy
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> ByteString
packedMessageDescriptor Proxy
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_
    = ByteString
"\n\
      \>RequestCancelExternalWorkflowExecutionInitiatedEventAttributes\DC2F\n\
      \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\CAN\n\
      \\acontrol\CAN\EOT \SOH(\tR\acontrol\DC2.\n\
      \\DC3child_workflow_only\CAN\ENQ \SOH(\bR\DC1childWorkflowOnly\DC2\SYN\n\
      \\ACKreason\CAN\ACK \SOH(\tR\ACKreason"
  packedFileDescriptor :: Proxy
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> ByteString
packedFileDescriptor Proxy
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
fieldsByTag
    = let
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Int64
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Int64
     Int64
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        namespace__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     WorkflowExecution
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        control__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        childWorkflowOnly__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
childWorkflowOnly__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Bool
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_only"
              (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
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Bool
     Bool
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes 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 @"childWorkflowOnly")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        reason__field_descriptor :: FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (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
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes 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 @"reason")) ::
              Data.ProtoLens.FieldDescriptor RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
      in
        [(Tag,
  FieldDescriptor
    RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, 
            FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
control__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
childWorkflowOnly__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
reason__field_descriptor)]
  unknownFields :: Lens'
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  FieldSet
unknownFields
    = (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
 -> FieldSet)
-> (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
    -> FieldSet
    -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens'
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
     FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> FieldSet
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields
        (\ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__ FieldSet
y__
           -> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
                {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields = y__})
  defMessage :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
defMessage
    = RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_constructor
        {_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId :: Int64
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespace :: Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespaceId :: Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'control :: Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly :: Bool
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'reason :: Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields :: FieldSet
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields = []}
  parseMessage :: Parser
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
parseMessage
    = let
        loop ::
          RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
        loop :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Parser
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
loop RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
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 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") 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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") y x)
                        Word64
40
                          -> 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
"child_workflow_only"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"childWorkflowOnly") y x)
                        Word64
50
                          -> 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
"reason"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") 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
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> String
-> Parser
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Parser
     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
loop RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"RequestCancelExternalWorkflowExecutionInitiatedEventAttributes"
  buildMessage :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Builder
buildMessage
    = \ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  Int64
  Int64
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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 @"workflowTaskCompletedEventId") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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
8)
                      ((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
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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 @"namespace") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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 @"namespaceId") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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)
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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'workflowExecution") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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
26)
                                ((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
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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 @"control") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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.<>)
                            (let
                               _v :: Bool
_v
                                 = FoldLike
  Bool
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  Bool
  Bool
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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 @"childWorkflowOnly") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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
40)
                                     ((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))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (let
                                  _v :: Text
_v = FoldLike
  Text
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> 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 @"reason") RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_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
50)
                                        ((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
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  FieldSet
  FieldSet
-> RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
  FieldSet
Data.ProtoLens.unknownFields RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData RequestCancelExternalWorkflowExecutionInitiatedEventAttributes where
  rnf :: RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> ()
rnf
    = \ RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> FieldSet
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields
                RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Int64
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId
                   RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespace
                      RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'namespaceId
                         RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution
                            RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'control
                               RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                            (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Bool
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly
                                  RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
-> Text
_RequestCancelExternalWorkflowExecutionInitiatedEventAttributes'reason
                                     RequestCancelExternalWorkflowExecutionInitiatedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cause' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Enums.V1.FailedCause.SignalExternalWorkflowExecutionFailedCause@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' SignalExternalWorkflowExecutionFailedEventAttributes Data.Text.Text@ -}
data SignalExternalWorkflowExecutionFailedEventAttributes
  = SignalExternalWorkflowExecutionFailedEventAttributes'_constructor {SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedCause
_SignalExternalWorkflowExecutionFailedEventAttributes'cause :: !Proto.Temporal.Api.Enums.V1.FailedCause.SignalExternalWorkflowExecutionFailedCause,
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes -> Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespace :: !Data.Text.Text,
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes -> Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'control :: !Data.Text.Text,
                                                                       SignalExternalWorkflowExecutionFailedEventAttributes -> FieldSet
_SignalExternalWorkflowExecutionFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
(SignalExternalWorkflowExecutionFailedEventAttributes
 -> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool)
-> Eq SignalExternalWorkflowExecutionFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
== :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
$c/= :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
/= :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
Prelude.Eq, Eq SignalExternalWorkflowExecutionFailedEventAttributes
Eq SignalExternalWorkflowExecutionFailedEventAttributes =>
(SignalExternalWorkflowExecutionFailedEventAttributes
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> Ordering)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Ord SignalExternalWorkflowExecutionFailedEventAttributes
SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Ordering
SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
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 :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Ordering
compare :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Ordering
$c< :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
< :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
$c<= :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
<= :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
$c> :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
> :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
$c>= :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
>= :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes -> Bool
$cmax :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
max :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
$cmin :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
min :: SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedEventAttributes
Prelude.Ord)
instance Prelude.Show SignalExternalWorkflowExecutionFailedEventAttributes where
  showsPrec :: Int
-> SignalExternalWorkflowExecutionFailedEventAttributes -> ShowS
showsPrec Int
_ SignalExternalWorkflowExecutionFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalExternalWorkflowExecutionFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalExternalWorkflowExecutionFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "cause" Proto.Temporal.Api.Enums.V1.FailedCause.SignalExternalWorkflowExecutionFailedCause where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (SignalExternalWorkflowExecutionFailedCause
    -> f SignalExternalWorkflowExecutionFailedCause)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "cause"
_
    = ((SignalExternalWorkflowExecutionFailedCause
  -> f SignalExternalWorkflowExecutionFailedCause)
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((SignalExternalWorkflowExecutionFailedCause
     -> f SignalExternalWorkflowExecutionFailedCause)
    -> SignalExternalWorkflowExecutionFailedCause
    -> f SignalExternalWorkflowExecutionFailedCause)
-> (SignalExternalWorkflowExecutionFailedCause
    -> f SignalExternalWorkflowExecutionFailedCause)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes
 -> SignalExternalWorkflowExecutionFailedCause)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> SignalExternalWorkflowExecutionFailedCause
    -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedCause
     SignalExternalWorkflowExecutionFailedCause
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedCause
_SignalExternalWorkflowExecutionFailedEventAttributes'cause
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ SignalExternalWorkflowExecutionFailedCause
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'cause = y__}))
        (SignalExternalWorkflowExecutionFailedCause
 -> f SignalExternalWorkflowExecutionFailedCause)
-> SignalExternalWorkflowExecutionFailedCause
-> f SignalExternalWorkflowExecutionFailedCause
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes -> Int64)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Int64 -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes -> Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespace
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespaceId
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowExecution)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowExecution
    -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution = 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 SignalExternalWorkflowExecutionFailedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowExecution)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowExecution
    -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes -> Int64)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Int64 -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes -> Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'initiatedEventId
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionFailedEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionFailedEventAttributes
 -> f SignalExternalWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> f SignalExternalWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionFailedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'control
           (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionFailedEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalExternalWorkflowExecutionFailedEventAttributes where
  messageName :: Proxy SignalExternalWorkflowExecutionFailedEventAttributes -> Text
messageName Proxy SignalExternalWorkflowExecutionFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.SignalExternalWorkflowExecutionFailedEventAttributes"
  packedMessageDescriptor :: Proxy SignalExternalWorkflowExecutionFailedEventAttributes
-> ByteString
packedMessageDescriptor Proxy SignalExternalWorkflowExecutionFailedEventAttributes
_
    = ByteString
"\n\
      \4SignalExternalWorkflowExecutionFailedEventAttributes\DC2W\n\
      \\ENQcause\CAN\SOH \SOH(\SO2A.temporal.api.enums.v1.SignalExternalWorkflowExecutionFailedCauseR\ENQcause\DC2F\n\
      \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
      \\tnamespace\CAN\ETX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\EOT \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2,\n\
      \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2\CAN\n\
      \\acontrol\CAN\ACK \SOH(\tR\acontrol"
  packedFileDescriptor :: Proxy SignalExternalWorkflowExecutionFailedEventAttributes
-> ByteString
packedFileDescriptor Proxy SignalExternalWorkflowExecutionFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes)
fieldsByTag
    = let
        cause__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
cause__field_descriptor
          = String
-> FieldTypeDescriptor SignalExternalWorkflowExecutionFailedCause
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedCause
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cause"
              (ScalarField SignalExternalWorkflowExecutionFailedCause
-> FieldTypeDescriptor SignalExternalWorkflowExecutionFailedCause
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField SignalExternalWorkflowExecutionFailedCause
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.FailedCause.SignalExternalWorkflowExecutionFailedCause)
              (WireDefault SignalExternalWorkflowExecutionFailedCause
-> Lens
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedCause
     SignalExternalWorkflowExecutionFailedCause
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedCause
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault SignalExternalWorkflowExecutionFailedCause
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 @"cause")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
        namespace__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes
     WorkflowExecution
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes
     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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
        control__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     SignalExternalWorkflowExecutionFailedEventAttributes
     SignalExternalWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionFailedEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionFailedEventAttributes
      in
        [(Tag,
  FieldDescriptor
    SignalExternalWorkflowExecutionFailedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        SignalExternalWorkflowExecutionFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
cause__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor
  SignalExternalWorkflowExecutionFailedEventAttributes
control__field_descriptor)]
  unknownFields :: Lens' SignalExternalWorkflowExecutionFailedEventAttributes FieldSet
unknownFields
    = (SignalExternalWorkflowExecutionFailedEventAttributes -> FieldSet)
-> (SignalExternalWorkflowExecutionFailedEventAttributes
    -> FieldSet
    -> SignalExternalWorkflowExecutionFailedEventAttributes)
-> Lens'
     SignalExternalWorkflowExecutionFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalExternalWorkflowExecutionFailedEventAttributes -> FieldSet
_SignalExternalWorkflowExecutionFailedEventAttributes'_unknownFields
        (\ SignalExternalWorkflowExecutionFailedEventAttributes
x__ FieldSet
y__
           -> SignalExternalWorkflowExecutionFailedEventAttributes
x__
                {_SignalExternalWorkflowExecutionFailedEventAttributes'_unknownFields = y__})
  defMessage :: SignalExternalWorkflowExecutionFailedEventAttributes
defMessage
    = SignalExternalWorkflowExecutionFailedEventAttributes'_constructor
        {_SignalExternalWorkflowExecutionFailedEventAttributes'cause :: SignalExternalWorkflowExecutionFailedCause
_SignalExternalWorkflowExecutionFailedEventAttributes'cause = SignalExternalWorkflowExecutionFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionFailedEventAttributes'namespace :: Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionFailedEventAttributes'namespaceId :: Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _SignalExternalWorkflowExecutionFailedEventAttributes'initiatedEventId :: Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionFailedEventAttributes'control :: Text
_SignalExternalWorkflowExecutionFailedEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionFailedEventAttributes'_unknownFields :: FieldSet
_SignalExternalWorkflowExecutionFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser SignalExternalWorkflowExecutionFailedEventAttributes
parseMessage
    = let
        loop ::
          SignalExternalWorkflowExecutionFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalExternalWorkflowExecutionFailedEventAttributes
        loop :: SignalExternalWorkflowExecutionFailedEventAttributes
-> Parser SignalExternalWorkflowExecutionFailedEventAttributes
loop SignalExternalWorkflowExecutionFailedEventAttributes
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 SignalExternalWorkflowExecutionFailedCause
-> String -> Parser SignalExternalWorkflowExecutionFailedCause
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> SignalExternalWorkflowExecutionFailedCause)
-> Parser Int -> Parser SignalExternalWorkflowExecutionFailedCause
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> SignalExternalWorkflowExecutionFailedCause
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
"cause"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cause") y x)
                        Word64
16
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
34
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") y x)
                        Word64
40
                          -> 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_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") y x)
                        Word64
50
                          -> 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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") 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 SignalExternalWorkflowExecutionFailedEventAttributes
-> String
-> Parser SignalExternalWorkflowExecutionFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalExternalWorkflowExecutionFailedEventAttributes
-> Parser SignalExternalWorkflowExecutionFailedEventAttributes
loop SignalExternalWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"SignalExternalWorkflowExecutionFailedEventAttributes"
  buildMessage :: SignalExternalWorkflowExecutionFailedEventAttributes -> Builder
buildMessage
    = \ SignalExternalWorkflowExecutionFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: SignalExternalWorkflowExecutionFailedCause
_v = FoldLike
  SignalExternalWorkflowExecutionFailedCause
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedCause
  SignalExternalWorkflowExecutionFailedCause
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedCause
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 @"cause") SignalExternalWorkflowExecutionFailedEventAttributes
_x
              in
                if SignalExternalWorkflowExecutionFailedCause
-> SignalExternalWorkflowExecutionFailedCause -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) SignalExternalWorkflowExecutionFailedCause
_v SignalExternalWorkflowExecutionFailedCause
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)
-> (SignalExternalWorkflowExecutionFailedCause -> Int)
-> SignalExternalWorkflowExecutionFailedCause
-> 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)
                         SignalExternalWorkflowExecutionFailedCause -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum SignalExternalWorkflowExecutionFailedCause
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike
  Int64
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> SignalExternalWorkflowExecutionFailedEventAttributes -> 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 @"workflowTaskCompletedEventId") SignalExternalWorkflowExecutionFailedEventAttributes
_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
16)
                         ((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
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionFailedEventAttributes -> 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 @"namespace") SignalExternalWorkflowExecutionFailedEventAttributes
_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
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionFailedEventAttributes -> 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 @"namespaceId") SignalExternalWorkflowExecutionFailedEventAttributes
_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)
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> SignalExternalWorkflowExecutionFailedEventAttributes
-> 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'workflowExecution") SignalExternalWorkflowExecutionFailedEventAttributes
_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
34)
                                   ((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 :: Int64
_v
                                 = FoldLike
  Int64
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> SignalExternalWorkflowExecutionFailedEventAttributes -> 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 @"initiatedEventId") SignalExternalWorkflowExecutionFailedEventAttributes
_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
40)
                                     ((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
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionFailedEventAttributes -> 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 @"control") SignalExternalWorkflowExecutionFailedEventAttributes
_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
50)
                                        ((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
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
-> SignalExternalWorkflowExecutionFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalExternalWorkflowExecutionFailedEventAttributes
  SignalExternalWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' SignalExternalWorkflowExecutionFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields SignalExternalWorkflowExecutionFailedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData SignalExternalWorkflowExecutionFailedEventAttributes where
  rnf :: SignalExternalWorkflowExecutionFailedEventAttributes -> ()
rnf
    = \ SignalExternalWorkflowExecutionFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalExternalWorkflowExecutionFailedEventAttributes -> FieldSet
_SignalExternalWorkflowExecutionFailedEventAttributes'_unknownFields
                SignalExternalWorkflowExecutionFailedEventAttributes
x__)
             (SignalExternalWorkflowExecutionFailedCause -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalExternalWorkflowExecutionFailedEventAttributes
-> SignalExternalWorkflowExecutionFailedCause
_SignalExternalWorkflowExecutionFailedEventAttributes'cause SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalExternalWorkflowExecutionFailedEventAttributes -> Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
                      SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespace
                         SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'namespaceId
                            SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                         (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (SignalExternalWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionFailedEventAttributes'workflowExecution
                               SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                            (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (SignalExternalWorkflowExecutionFailedEventAttributes -> Int64
_SignalExternalWorkflowExecutionFailedEventAttributes'initiatedEventId
                                  SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (SignalExternalWorkflowExecutionFailedEventAttributes -> Text
_SignalExternalWorkflowExecutionFailedEventAttributes'control
                                     SignalExternalWorkflowExecutionFailedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecution' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecution' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.signalName' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.childWorkflowOnly' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Prelude.Bool@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' SignalExternalWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@ -}
data SignalExternalWorkflowExecutionInitiatedEventAttributes
  = SignalExternalWorkflowExecutionInitiatedEventAttributes'_constructor {SignalExternalWorkflowExecutionInitiatedEventAttributes -> Int64
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespace :: !Data.Text.Text,
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'signalName :: !Data.Text.Text,
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_SignalExternalWorkflowExecutionInitiatedEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'control :: !Data.Text.Text,
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
_SignalExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly :: !Prelude.Bool,
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Header
_SignalExternalWorkflowExecutionInitiatedEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                                          SignalExternalWorkflowExecutionInitiatedEventAttributes -> FieldSet
_SignalExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
(SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> Eq SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
== :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
$c/= :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
/= :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
Prelude.Eq, Eq SignalExternalWorkflowExecutionInitiatedEventAttributes
Eq SignalExternalWorkflowExecutionInitiatedEventAttributes =>
(SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Ordering)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Ord SignalExternalWorkflowExecutionInitiatedEventAttributes
SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Ordering
SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
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 :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Ordering
compare :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Ordering
$c< :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
< :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
$c<= :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
<= :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
$c> :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
> :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
$c>= :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
>= :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
$cmax :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
max :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
$cmin :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
min :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
Prelude.Ord)
instance Prelude.Show SignalExternalWorkflowExecutionInitiatedEventAttributes where
  showsPrec :: Int
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> ShowS
showsPrec Int
_ SignalExternalWorkflowExecutionInitiatedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (SignalExternalWorkflowExecutionInitiatedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort SignalExternalWorkflowExecutionInitiatedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes -> Int64)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Int64
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes -> Int64
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Int64
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespace
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespaceId
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "workflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe WorkflowExecution)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe WorkflowExecution
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution = 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 SignalExternalWorkflowExecutionInitiatedEventAttributes "maybe'workflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'workflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe WorkflowExecution)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe WorkflowExecution
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "signalName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalName"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "signalName"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'signalName
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'signalName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe Payloads)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe Payloads
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_SignalExternalWorkflowExecutionInitiatedEventAttributes'input
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe Payloads
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'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 SignalExternalWorkflowExecutionInitiatedEventAttributes "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))
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe Payloads)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe Payloads
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_SignalExternalWorkflowExecutionInitiatedEventAttributes'input
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe Payloads
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Text -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'control
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "childWorkflowOnly" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "childWorkflowOnly"
-> (Bool -> f Bool)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "childWorkflowOnly"
_
    = ((Bool -> f Bool)
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Bool -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
_SignalExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Bool
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField SignalExternalWorkflowExecutionInitiatedEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe Header)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe Header
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Header
_SignalExternalWorkflowExecutionInitiatedEventAttributes'header
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe Header
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'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 SignalExternalWorkflowExecutionInitiatedEventAttributes "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))
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> f SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> f SignalExternalWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> Maybe Header)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> Maybe Header
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Header
_SignalExternalWorkflowExecutionInitiatedEventAttributes'header
           (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ Maybe Header
y__
              -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                   {_SignalExternalWorkflowExecutionInitiatedEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message SignalExternalWorkflowExecutionInitiatedEventAttributes where
  messageName :: Proxy SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Text
messageName Proxy SignalExternalWorkflowExecutionInitiatedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.SignalExternalWorkflowExecutionInitiatedEventAttributes"
  packedMessageDescriptor :: Proxy SignalExternalWorkflowExecutionInitiatedEventAttributes
-> ByteString
packedMessageDescriptor Proxy SignalExternalWorkflowExecutionInitiatedEventAttributes
_
    = ByteString
"\n\
      \7SignalExternalWorkflowExecutionInitiatedEventAttributes\DC2F\n\
      \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
      \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\t \SOH(\tR\vnamespaceId\DC2X\n\
      \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\US\n\
      \\vsignal_name\CAN\EOT \SOH(\tR\n\
      \signalName\DC26\n\
      \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2\CAN\n\
      \\acontrol\CAN\ACK \SOH(\tR\acontrol\DC2.\n\
      \\DC3child_workflow_only\CAN\a \SOH(\bR\DC1childWorkflowOnly\DC26\n\
      \\ACKheader\CAN\b \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader"
  packedFileDescriptor :: Proxy SignalExternalWorkflowExecutionInitiatedEventAttributes
-> ByteString
packedFileDescriptor Proxy SignalExternalWorkflowExecutionInitiatedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes)
fieldsByTag
    = let
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Int64
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Int64
     Int64
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        namespace__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        workflowExecution__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
workflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     WorkflowExecution
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     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'workflowExecution")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        signalName__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
signalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_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
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 @"signalName")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        input__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Payloads
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 SignalExternalWorkflowExecutionInitiatedEventAttributes
        control__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        childWorkflowOnly__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
childWorkflowOnly__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Bool
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"child_workflow_only"
              (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
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     SignalExternalWorkflowExecutionInitiatedEventAttributes
     Bool
     Bool
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 @"childWorkflowOnly")) ::
              Data.ProtoLens.FieldDescriptor SignalExternalWorkflowExecutionInitiatedEventAttributes
        header__field_descriptor :: FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes Header
-> FieldDescriptor
     SignalExternalWorkflowExecutionInitiatedEventAttributes
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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor
     SignalExternalWorkflowExecutionInitiatedEventAttributes 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 SignalExternalWorkflowExecutionInitiatedEventAttributes
      in
        [(Tag,
  FieldDescriptor
    SignalExternalWorkflowExecutionInitiatedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        SignalExternalWorkflowExecutionInitiatedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, 
            FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
workflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
signalName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
control__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
childWorkflowOnly__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor
  SignalExternalWorkflowExecutionInitiatedEventAttributes
header__field_descriptor)]
  unknownFields :: Lens'
  SignalExternalWorkflowExecutionInitiatedEventAttributes FieldSet
unknownFields
    = (SignalExternalWorkflowExecutionInitiatedEventAttributes
 -> FieldSet)
-> (SignalExternalWorkflowExecutionInitiatedEventAttributes
    -> FieldSet
    -> SignalExternalWorkflowExecutionInitiatedEventAttributes)
-> Lens'
     SignalExternalWorkflowExecutionInitiatedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        SignalExternalWorkflowExecutionInitiatedEventAttributes -> FieldSet
_SignalExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields
        (\ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__ FieldSet
y__
           -> SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
                {_SignalExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields = y__})
  defMessage :: SignalExternalWorkflowExecutionInitiatedEventAttributes
defMessage
    = SignalExternalWorkflowExecutionInitiatedEventAttributes'_constructor
        {_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId :: Int64
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'namespace :: Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'namespaceId :: Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution :: Maybe WorkflowExecution
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'signalName :: Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'signalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'input :: Maybe Payloads
_SignalExternalWorkflowExecutionInitiatedEventAttributes'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'control :: Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly :: Bool
_SignalExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'header :: Maybe Header
_SignalExternalWorkflowExecutionInitiatedEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _SignalExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields :: FieldSet
_SignalExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields = []}
  parseMessage :: Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
parseMessage
    = let
        loop ::
          SignalExternalWorkflowExecutionInitiatedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
        loop :: SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
loop SignalExternalWorkflowExecutionInitiatedEventAttributes
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 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
74
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") y x)
                        Word64
26
                          -> 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
"workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecution") 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
"signal_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"signalName") y x)
                        Word64
42
                          -> 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
50
                          -> 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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") y x)
                        Word64
56
                          -> 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
"child_workflow_only"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"childWorkflowOnly") y x)
                        Word64
66
                          -> 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 SignalExternalWorkflowExecutionInitiatedEventAttributes
-> String
-> Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Parser SignalExternalWorkflowExecutionInitiatedEventAttributes
loop SignalExternalWorkflowExecutionInitiatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"SignalExternalWorkflowExecutionInitiatedEventAttributes"
  buildMessage :: SignalExternalWorkflowExecutionInitiatedEventAttributes -> Builder
buildMessage
    = \ SignalExternalWorkflowExecutionInitiatedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  Int64
  Int64
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> 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 @"workflowTaskCompletedEventId") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
8)
                      ((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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> 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 @"namespace") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> 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 @"namespaceId") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
74)
                            ((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)
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> 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'workflowExecution") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
26)
                                ((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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> 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 @"signalName") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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 Payloads)
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> 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") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
42)
                                      ((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.<>)
                               (let
                                  _v :: Text
_v = FoldLike
  Text
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> 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 @"control") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
50)
                                        ((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 :: Bool
_v
                                       = FoldLike
  Bool
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  Bool
  Bool
-> SignalExternalWorkflowExecutionInitiatedEventAttributes -> 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 @"childWorkflowOnly") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
56)
                                           ((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))
                                  (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                     (case
                                          FoldLike
  (Maybe Header)
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> 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") SignalExternalWorkflowExecutionInitiatedEventAttributes
_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
66)
                                               ((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
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  FieldSet
  FieldSet
-> SignalExternalWorkflowExecutionInitiatedEventAttributes
-> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  SignalExternalWorkflowExecutionInitiatedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens'
  SignalExternalWorkflowExecutionInitiatedEventAttributes FieldSet
Data.ProtoLens.unknownFields SignalExternalWorkflowExecutionInitiatedEventAttributes
_x))))))))))
instance Control.DeepSeq.NFData SignalExternalWorkflowExecutionInitiatedEventAttributes where
  rnf :: SignalExternalWorkflowExecutionInitiatedEventAttributes -> ()
rnf
    = \ SignalExternalWorkflowExecutionInitiatedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (SignalExternalWorkflowExecutionInitiatedEventAttributes -> FieldSet
_SignalExternalWorkflowExecutionInitiatedEventAttributes'_unknownFields
                SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (SignalExternalWorkflowExecutionInitiatedEventAttributes -> Int64
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId
                   SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespace
                      SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'namespaceId
                         SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowExecution
_SignalExternalWorkflowExecutionInitiatedEventAttributes'workflowExecution
                            SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'signalName
                               SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                            (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_SignalExternalWorkflowExecutionInitiatedEventAttributes'input
                                  SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (SignalExternalWorkflowExecutionInitiatedEventAttributes -> Text
_SignalExternalWorkflowExecutionInitiatedEventAttributes'control
                                     SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                                  (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (SignalExternalWorkflowExecutionInitiatedEventAttributes -> Bool
_SignalExternalWorkflowExecutionInitiatedEventAttributes'childWorkflowOnly
                                        SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                                     (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (SignalExternalWorkflowExecutionInitiatedEventAttributes
-> Maybe Header
_SignalExternalWorkflowExecutionInitiatedEventAttributes'header
                                           SignalExternalWorkflowExecutionInitiatedEventAttributes
x__)
                                        ())))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowId' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cause' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Enums.V1.FailedCause.StartChildWorkflowExecutionFailedCause@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiatedEventId' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' StartChildWorkflowExecutionFailedEventAttributes Data.Int.Int64@ -}
data StartChildWorkflowExecutionFailedEventAttributes
  = StartChildWorkflowExecutionFailedEventAttributes'_constructor {StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'namespace :: !Data.Text.Text,
                                                                   StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                   StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'workflowId :: !Data.Text.Text,
                                                                   StartChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionFailedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                   StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedCause
_StartChildWorkflowExecutionFailedEventAttributes'cause :: !Proto.Temporal.Api.Enums.V1.FailedCause.StartChildWorkflowExecutionFailedCause,
                                                                   StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'control :: !Data.Text.Text,
                                                                   StartChildWorkflowExecutionFailedEventAttributes -> Int64
_StartChildWorkflowExecutionFailedEventAttributes'initiatedEventId :: !Data.Int.Int64,
                                                                   StartChildWorkflowExecutionFailedEventAttributes -> Int64
_StartChildWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                   StartChildWorkflowExecutionFailedEventAttributes -> FieldSet
_StartChildWorkflowExecutionFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
(StartChildWorkflowExecutionFailedEventAttributes
 -> StartChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes -> Bool)
-> Eq StartChildWorkflowExecutionFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
== :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
$c/= :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
/= :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
Prelude.Eq, Eq StartChildWorkflowExecutionFailedEventAttributes
Eq StartChildWorkflowExecutionFailedEventAttributes =>
(StartChildWorkflowExecutionFailedEventAttributes
 -> StartChildWorkflowExecutionFailedEventAttributes -> Ordering)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedEventAttributes)
-> Ord StartChildWorkflowExecutionFailedEventAttributes
StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Ordering
StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
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 :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Ordering
compare :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Ordering
$c< :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
< :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
$c<= :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
<= :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
$c> :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
> :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
$c>= :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
>= :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes -> Bool
$cmax :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
max :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
$cmin :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
min :: StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedEventAttributes
Prelude.Ord)
instance Prelude.Show StartChildWorkflowExecutionFailedEventAttributes where
  showsPrec :: Int -> StartChildWorkflowExecutionFailedEventAttributes -> ShowS
showsPrec Int
_ StartChildWorkflowExecutionFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartChildWorkflowExecutionFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartChildWorkflowExecutionFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes -> Text)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Text -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'namespace
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes -> Text)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Text -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'namespaceId
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes -> Text)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Text -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'workflowId
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowType)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowType
    -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionFailedEventAttributes'workflowType
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowType
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'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 StartChildWorkflowExecutionFailedEventAttributes "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))
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes
 -> Maybe WorkflowType)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Maybe WorkflowType
    -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionFailedEventAttributes'workflowType
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Maybe WorkflowType
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "cause" Proto.Temporal.Api.Enums.V1.FailedCause.StartChildWorkflowExecutionFailedCause where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (StartChildWorkflowExecutionFailedCause
    -> f StartChildWorkflowExecutionFailedCause)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "cause"
_
    = ((StartChildWorkflowExecutionFailedCause
  -> f StartChildWorkflowExecutionFailedCause)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((StartChildWorkflowExecutionFailedCause
     -> f StartChildWorkflowExecutionFailedCause)
    -> StartChildWorkflowExecutionFailedCause
    -> f StartChildWorkflowExecutionFailedCause)
-> (StartChildWorkflowExecutionFailedCause
    -> f StartChildWorkflowExecutionFailedCause)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes
 -> StartChildWorkflowExecutionFailedCause)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> StartChildWorkflowExecutionFailedCause
    -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedCause
     StartChildWorkflowExecutionFailedCause
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedCause
_StartChildWorkflowExecutionFailedEventAttributes'cause
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ StartChildWorkflowExecutionFailedCause
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'cause = y__}))
        (StartChildWorkflowExecutionFailedCause
 -> f StartChildWorkflowExecutionFailedCause)
-> StartChildWorkflowExecutionFailedCause
-> f StartChildWorkflowExecutionFailedCause
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes -> Text)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Text -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'control
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "initiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiatedEventId"
-> (Int64 -> f Int64)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "initiatedEventId"
_
    = ((Int64 -> f Int64)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes -> Int64)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Int64 -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes -> Int64
_StartChildWorkflowExecutionFailedEventAttributes'initiatedEventId
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'initiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionFailedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> StartChildWorkflowExecutionFailedEventAttributes
 -> f StartChildWorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> StartChildWorkflowExecutionFailedEventAttributes
-> f StartChildWorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionFailedEventAttributes -> Int64)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> Int64 -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionFailedEventAttributes -> Int64
_StartChildWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
           (\ StartChildWorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> StartChildWorkflowExecutionFailedEventAttributes
x__
                   {_StartChildWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartChildWorkflowExecutionFailedEventAttributes where
  messageName :: Proxy StartChildWorkflowExecutionFailedEventAttributes -> Text
messageName Proxy StartChildWorkflowExecutionFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.StartChildWorkflowExecutionFailedEventAttributes"
  packedMessageDescriptor :: Proxy StartChildWorkflowExecutionFailedEventAttributes
-> ByteString
packedMessageDescriptor Proxy StartChildWorkflowExecutionFailedEventAttributes
_
    = ByteString
"\n\
      \0StartChildWorkflowExecutionFailedEventAttributes\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\b \SOH(\tR\vnamespaceId\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2S\n\
      \\ENQcause\CAN\EOT \SOH(\SO2=.temporal.api.enums.v1.StartChildWorkflowExecutionFailedCauseR\ENQcause\DC2\CAN\n\
      \\acontrol\CAN\ENQ \SOH(\tR\acontrol\DC2,\n\
      \\DC2initiated_event_id\CAN\ACK \SOH(\ETXR\DLEinitiatedEventId\DC2F\n\
      \ workflow_task_completed_event_id\CAN\a \SOH(\ETXR\FSworkflowTaskCompletedEventId"
  packedFileDescriptor :: Proxy StartChildWorkflowExecutionFailedEventAttributes
-> ByteString
packedFileDescriptor Proxy StartChildWorkflowExecutionFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
        workflowId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
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
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 StartChildWorkflowExecutionFailedEventAttributes
        workflowType__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes WorkflowType
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
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
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 StartChildWorkflowExecutionFailedEventAttributes
        cause__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
cause__field_descriptor
          = String
-> FieldTypeDescriptor StartChildWorkflowExecutionFailedCause
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedCause
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cause"
              (ScalarField StartChildWorkflowExecutionFailedCause
-> FieldTypeDescriptor StartChildWorkflowExecutionFailedCause
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField StartChildWorkflowExecutionFailedCause
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.FailedCause.StartChildWorkflowExecutionFailedCause)
              (WireDefault StartChildWorkflowExecutionFailedCause
-> Lens
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedCause
     StartChildWorkflowExecutionFailedCause
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedCause
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault StartChildWorkflowExecutionFailedCause
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 @"cause")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
        control__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
        initiatedEventId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiated_event_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
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 @"initiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     StartChildWorkflowExecutionFailedEventAttributes
     StartChildWorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor
     StartChildWorkflowExecutionFailedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
      in
        [(Tag,
  FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
cause__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
control__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
initiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, 
            FieldDescriptor StartChildWorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor)]
  unknownFields :: Lens' StartChildWorkflowExecutionFailedEventAttributes FieldSet
unknownFields
    = (StartChildWorkflowExecutionFailedEventAttributes -> FieldSet)
-> (StartChildWorkflowExecutionFailedEventAttributes
    -> FieldSet -> StartChildWorkflowExecutionFailedEventAttributes)
-> Lens' StartChildWorkflowExecutionFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartChildWorkflowExecutionFailedEventAttributes -> FieldSet
_StartChildWorkflowExecutionFailedEventAttributes'_unknownFields
        (\ StartChildWorkflowExecutionFailedEventAttributes
x__ FieldSet
y__
           -> StartChildWorkflowExecutionFailedEventAttributes
x__
                {_StartChildWorkflowExecutionFailedEventAttributes'_unknownFields = y__})
  defMessage :: StartChildWorkflowExecutionFailedEventAttributes
defMessage
    = StartChildWorkflowExecutionFailedEventAttributes'_constructor
        {_StartChildWorkflowExecutionFailedEventAttributes'namespace :: Text
_StartChildWorkflowExecutionFailedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'namespaceId :: Text
_StartChildWorkflowExecutionFailedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'workflowId :: Text
_StartChildWorkflowExecutionFailedEventAttributes'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'workflowType :: Maybe WorkflowType
_StartChildWorkflowExecutionFailedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionFailedEventAttributes'cause :: StartChildWorkflowExecutionFailedCause
_StartChildWorkflowExecutionFailedEventAttributes'cause = StartChildWorkflowExecutionFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'control :: Text
_StartChildWorkflowExecutionFailedEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'initiatedEventId :: Int64
_StartChildWorkflowExecutionFailedEventAttributes'initiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: Int64
_StartChildWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionFailedEventAttributes'_unknownFields :: FieldSet
_StartChildWorkflowExecutionFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser StartChildWorkflowExecutionFailedEventAttributes
parseMessage
    = let
        loop ::
          StartChildWorkflowExecutionFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser StartChildWorkflowExecutionFailedEventAttributes
        loop :: StartChildWorkflowExecutionFailedEventAttributes
-> Parser StartChildWorkflowExecutionFailedEventAttributes
loop StartChildWorkflowExecutionFailedEventAttributes
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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
66
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") 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
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> 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
32
                          -> do y <- Parser StartChildWorkflowExecutionFailedCause
-> String -> Parser StartChildWorkflowExecutionFailedCause
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> StartChildWorkflowExecutionFailedCause)
-> Parser Int -> Parser StartChildWorkflowExecutionFailedCause
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> StartChildWorkflowExecutionFailedCause
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
"cause"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cause") y x)
                        Word64
42
                          -> 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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") 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
"initiated_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"initiatedEventId") y x)
                        Word64
56
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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 StartChildWorkflowExecutionFailedEventAttributes
-> String
-> Parser StartChildWorkflowExecutionFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartChildWorkflowExecutionFailedEventAttributes
-> Parser StartChildWorkflowExecutionFailedEventAttributes
loop StartChildWorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"StartChildWorkflowExecutionFailedEventAttributes"
  buildMessage :: StartChildWorkflowExecutionFailedEventAttributes -> Builder
buildMessage
    = \ StartChildWorkflowExecutionFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionFailedEventAttributes -> 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 @"namespace") StartChildWorkflowExecutionFailedEventAttributes
_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
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionFailedEventAttributes -> 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 @"namespaceId") StartChildWorkflowExecutionFailedEventAttributes
_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
66)
                         ((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
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionFailedEventAttributes -> 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") StartChildWorkflowExecutionFailedEventAttributes
_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.<>)
                      (case
                           FoldLike
  (Maybe WorkflowType)
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> StartChildWorkflowExecutionFailedEventAttributes
-> 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") StartChildWorkflowExecutionFailedEventAttributes
_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
26)
                                ((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.<>)
                         (let
                            _v :: StartChildWorkflowExecutionFailedCause
_v = FoldLike
  StartChildWorkflowExecutionFailedCause
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedCause
  StartChildWorkflowExecutionFailedCause
-> StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedCause
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 @"cause") StartChildWorkflowExecutionFailedEventAttributes
_x
                          in
                            if StartChildWorkflowExecutionFailedCause
-> StartChildWorkflowExecutionFailedCause -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) StartChildWorkflowExecutionFailedCause
_v StartChildWorkflowExecutionFailedCause
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)
-> (StartChildWorkflowExecutionFailedCause -> Int)
-> StartChildWorkflowExecutionFailedCause
-> 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)
                                     StartChildWorkflowExecutionFailedCause -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum StartChildWorkflowExecutionFailedCause
_v))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (let
                               _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionFailedEventAttributes -> 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 @"control") StartChildWorkflowExecutionFailedEventAttributes
_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
42)
                                     ((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
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> StartChildWorkflowExecutionFailedEventAttributes -> 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 @"initiatedEventId") StartChildWorkflowExecutionFailedEventAttributes
_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 :: Int64
_v
                                       = FoldLike
  Int64
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> StartChildWorkflowExecutionFailedEventAttributes -> 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
                                              @"workflowTaskCompletedEventId")
                                           StartChildWorkflowExecutionFailedEventAttributes
_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
56)
                                           ((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))
                                  (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                     (FoldLike
  FieldSet
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
-> StartChildWorkflowExecutionFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  StartChildWorkflowExecutionFailedEventAttributes
  StartChildWorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartChildWorkflowExecutionFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields StartChildWorkflowExecutionFailedEventAttributes
_x)))))))))
instance Control.DeepSeq.NFData StartChildWorkflowExecutionFailedEventAttributes where
  rnf :: StartChildWorkflowExecutionFailedEventAttributes -> ()
rnf
    = \ StartChildWorkflowExecutionFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartChildWorkflowExecutionFailedEventAttributes -> FieldSet
_StartChildWorkflowExecutionFailedEventAttributes'_unknownFields
                StartChildWorkflowExecutionFailedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'namespace StartChildWorkflowExecutionFailedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'namespaceId StartChildWorkflowExecutionFailedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'workflowId StartChildWorkflowExecutionFailedEventAttributes
x__)
                      (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StartChildWorkflowExecutionFailedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionFailedEventAttributes'workflowType
                            StartChildWorkflowExecutionFailedEventAttributes
x__)
                         (StartChildWorkflowExecutionFailedCause -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (StartChildWorkflowExecutionFailedEventAttributes
-> StartChildWorkflowExecutionFailedCause
_StartChildWorkflowExecutionFailedEventAttributes'cause StartChildWorkflowExecutionFailedEventAttributes
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (StartChildWorkflowExecutionFailedEventAttributes -> Text
_StartChildWorkflowExecutionFailedEventAttributes'control StartChildWorkflowExecutionFailedEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (StartChildWorkflowExecutionFailedEventAttributes -> Int64
_StartChildWorkflowExecutionFailedEventAttributes'initiatedEventId
                                     StartChildWorkflowExecutionFailedEventAttributes
x__)
                                  (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (StartChildWorkflowExecutionFailedEventAttributes -> Int64
_StartChildWorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
                                        StartChildWorkflowExecutionFailedEventAttributes
x__)
                                     ()))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespace' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.namespaceId' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowId' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.taskQueue' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'taskQueue' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionTimeout' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionTimeout' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowRunTimeout' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowRunTimeout' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskTimeout' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskTimeout' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.parentClosePolicy' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.ParentClosePolicy@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.control' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowIdReusePolicy' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryPolicy' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'retryPolicy' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cronSchedule' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.memo' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'memo' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.searchAttributes' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'searchAttributes' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.inheritBuildId' @:: Lens' StartChildWorkflowExecutionInitiatedEventAttributes Prelude.Bool@ -}
data StartChildWorkflowExecutionInitiatedEventAttributes
  = StartChildWorkflowExecutionInitiatedEventAttributes'_constructor {StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespace :: !Data.Text.Text,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespaceId :: !Data.Text.Text,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowId :: !Data.Text.Text,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe TaskQueue
_StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_StartChildWorkflowExecutionInitiatedEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> ParentClosePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'parentClosePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.ParentClosePolicy,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'control :: !Data.Text.Text,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Int64
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> WorkflowIdReusePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowIdReusePolicy :: !Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe RetryPolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'cronSchedule :: !Data.Text.Text,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Header
_StartChildWorkflowExecutionInitiatedEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Memo
_StartChildWorkflowExecutionInitiatedEventAttributes'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe SearchAttributes
_StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
_StartChildWorkflowExecutionInitiatedEventAttributes'inheritBuildId :: !Prelude.Bool,
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes -> FieldSet
_StartChildWorkflowExecutionInitiatedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
(StartChildWorkflowExecutionInitiatedEventAttributes
 -> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> Eq StartChildWorkflowExecutionInitiatedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
== :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
$c/= :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
/= :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
Prelude.Eq, Eq StartChildWorkflowExecutionInitiatedEventAttributes
Eq StartChildWorkflowExecutionInitiatedEventAttributes =>
(StartChildWorkflowExecutionInitiatedEventAttributes
 -> StartChildWorkflowExecutionInitiatedEventAttributes -> Ordering)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Ord StartChildWorkflowExecutionInitiatedEventAttributes
StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Ordering
StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
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 :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Ordering
compare :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Ordering
$c< :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
< :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
$c<= :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
<= :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
$c> :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
> :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
$c>= :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
>= :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
$cmax :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
max :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
$cmin :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
min :: StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> StartChildWorkflowExecutionInitiatedEventAttributes
Prelude.Ord)
instance Prelude.Show StartChildWorkflowExecutionInitiatedEventAttributes where
  showsPrec :: Int -> StartChildWorkflowExecutionInitiatedEventAttributes -> ShowS
showsPrec Int
_ StartChildWorkflowExecutionInitiatedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (StartChildWorkflowExecutionInitiatedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort StartChildWorkflowExecutionInitiatedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "namespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespace"
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "namespace"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Text)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Text -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespace
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'namespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "namespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "namespaceId"
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "namespaceId"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Text)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Text -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespaceId
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'namespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Text)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Text -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowId
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe WorkflowType)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe WorkflowType
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowType
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe WorkflowType
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe WorkflowType)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe WorkflowType
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowType
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe WorkflowType
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe TaskQueue)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe TaskQueue
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe TaskQueue
_StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe TaskQueue
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe TaskQueue)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe TaskQueue
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe TaskQueue
_StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe TaskQueue
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Payloads)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Payloads
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_StartChildWorkflowExecutionInitiatedEventAttributes'input
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Payloads
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Payloads)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Payloads
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_StartChildWorkflowExecutionInitiatedEventAttributes'input
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Payloads
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Duration)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Duration
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Duration
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Duration)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Duration
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Duration
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Duration)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Duration
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Duration
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Duration)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Duration
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Duration
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Duration)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Duration
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Duration
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Duration)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Duration
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Duration
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "parentClosePolicy" Proto.Temporal.Api.Enums.V1.Workflow.ParentClosePolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentClosePolicy"
-> (ParentClosePolicy -> f ParentClosePolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "parentClosePolicy"
_
    = ((ParentClosePolicy -> f ParentClosePolicy)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((ParentClosePolicy -> f ParentClosePolicy)
    -> ParentClosePolicy -> f ParentClosePolicy)
-> (ParentClosePolicy -> f ParentClosePolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> ParentClosePolicy)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> ParentClosePolicy
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     ParentClosePolicy
     ParentClosePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> ParentClosePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'parentClosePolicy
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ ParentClosePolicy
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'parentClosePolicy = y__}))
        (ParentClosePolicy -> f ParentClosePolicy)
-> ParentClosePolicy -> f ParentClosePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "control" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "control"
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "control"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Text)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Text -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'control
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'control = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Int64)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Int64 -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Int64
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Int64
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "workflowIdReusePolicy" Proto.Temporal.Api.Enums.V1.Workflow.WorkflowIdReusePolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowIdReusePolicy"
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "workflowIdReusePolicy"
_
    = ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
    -> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> WorkflowIdReusePolicy)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> WorkflowIdReusePolicy
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> WorkflowIdReusePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowIdReusePolicy
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ WorkflowIdReusePolicy
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'workflowIdReusePolicy = y__}))
        (WorkflowIdReusePolicy -> f WorkflowIdReusePolicy)
-> WorkflowIdReusePolicy -> f WorkflowIdReusePolicy
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe RetryPolicy)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe RetryPolicy
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe RetryPolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe RetryPolicy
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe RetryPolicy)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe RetryPolicy
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe RetryPolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe RetryPolicy
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "cronSchedule" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "cronSchedule"
_
    = ((Text -> f Text)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Text)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Text -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'cronSchedule
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Text
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'cronSchedule = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Header)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Header
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Header
_StartChildWorkflowExecutionInitiatedEventAttributes'header
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Header
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe Header)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Header
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Header
_StartChildWorkflowExecutionInitiatedEventAttributes'header
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Header
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Memo)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Memo
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Memo
_StartChildWorkflowExecutionInitiatedEventAttributes'memo
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Memo
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Memo)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe Memo
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Memo
_StartChildWorkflowExecutionInitiatedEventAttributes'memo
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe Memo
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe SearchAttributes)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe SearchAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe SearchAttributes
_StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe SearchAttributes
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'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 StartChildWorkflowExecutionInitiatedEventAttributes "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))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes
 -> Maybe SearchAttributes)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Maybe SearchAttributes
    -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe SearchAttributes
_StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Maybe SearchAttributes
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField StartChildWorkflowExecutionInitiatedEventAttributes "inheritBuildId" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "inheritBuildId"
-> (Bool -> f Bool)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
fieldOf Proxy# "inheritBuildId"
_
    = ((Bool -> f Bool)
 -> StartChildWorkflowExecutionInitiatedEventAttributes
 -> f StartChildWorkflowExecutionInitiatedEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> f StartChildWorkflowExecutionInitiatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((StartChildWorkflowExecutionInitiatedEventAttributes -> Bool)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> Bool -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
_StartChildWorkflowExecutionInitiatedEventAttributes'inheritBuildId
           (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ Bool
y__
              -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                   {_StartChildWorkflowExecutionInitiatedEventAttributes'inheritBuildId = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message StartChildWorkflowExecutionInitiatedEventAttributes where
  messageName :: Proxy StartChildWorkflowExecutionInitiatedEventAttributes -> Text
messageName Proxy StartChildWorkflowExecutionInitiatedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.StartChildWorkflowExecutionInitiatedEventAttributes"
  packedMessageDescriptor :: Proxy StartChildWorkflowExecutionInitiatedEventAttributes
-> ByteString
packedMessageDescriptor Proxy StartChildWorkflowExecutionInitiatedEventAttributes
_
    = ByteString
"\n\
      \3StartChildWorkflowExecutionInitiatedEventAttributes\DC2\FS\n\
      \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
      \\fnamespace_id\CAN\DC2 \SOH(\tR\vnamespaceId\DC2\US\n\
      \\vworkflow_id\CAN\STX \SOH(\tR\n\
      \workflowId\DC2I\n\
      \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
      \\n\
      \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
      \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
      \\SUBworkflow_execution_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
      \\DC4workflow_run_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2X\n\
      \\DC3parent_close_policy\CAN\t \SOH(\SO2(.temporal.api.enums.v1.ParentClosePolicyR\DC1parentClosePolicy\DC2\CAN\n\
      \\acontrol\CAN\n\
      \ \SOH(\tR\acontrol\DC2F\n\
      \ workflow_task_completed_event_id\CAN\v \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2e\n\
      \\CANworkflow_id_reuse_policy\CAN\f \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2F\n\
      \\fretry_policy\CAN\r \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
      \\rcron_schedule\CAN\SO \SOH(\tR\fcronSchedule\DC26\n\
      \\ACKheader\CAN\SI \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC20\n\
      \\EOTmemo\CAN\DLE \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\DC1 \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2(\n\
      \\DLEinherit_build_id\CAN\DC3 \SOH(\bR\SOinheritBuildId"
  packedFileDescriptor :: Proxy StartChildWorkflowExecutionInitiatedEventAttributes
-> ByteString
packedFileDescriptor Proxy StartChildWorkflowExecutionInitiatedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes)
fieldsByTag
    = let
        namespace__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
namespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"namespace"
              (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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 @"namespace")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
        namespaceId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
namespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 @"namespaceId")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
        workflowId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        workflowType__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes WorkflowType
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        taskQueue__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes TaskQueue
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        input__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Payloads
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        workflowExecutionTimeout__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Duration
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        workflowRunTimeout__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Duration
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        workflowTaskTimeout__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Duration
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        parentClosePolicy__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
parentClosePolicy__field_descriptor
          = String
-> FieldTypeDescriptor ParentClosePolicy
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes
     ParentClosePolicy
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     ParentClosePolicy
     ParentClosePolicy
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes
     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 StartChildWorkflowExecutionInitiatedEventAttributes
        control__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
control__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"control"
              (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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 @"control")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Int64
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Int64
     Int64
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
        workflowIdReusePolicy__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowIdReusePolicy__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowIdReusePolicy
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes
     WorkflowIdReusePolicy
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     WorkflowIdReusePolicy
     WorkflowIdReusePolicy
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes
     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 StartChildWorkflowExecutionInitiatedEventAttributes
        retryPolicy__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes RetryPolicy
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        cronSchedule__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
cronSchedule__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Text
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Text
     Text
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        header__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Header
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        memo__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Memo
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 StartChildWorkflowExecutionInitiatedEventAttributes
        searchAttributes__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes
     SearchAttributes
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes
     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 StartChildWorkflowExecutionInitiatedEventAttributes
        inheritBuildId__field_descriptor :: FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
inheritBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes Bool
-> FieldDescriptor
     StartChildWorkflowExecutionInitiatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"inherit_build_id"
              (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
     StartChildWorkflowExecutionInitiatedEventAttributes
     StartChildWorkflowExecutionInitiatedEventAttributes
     Bool
     Bool
-> FieldAccessor
     StartChildWorkflowExecutionInitiatedEventAttributes 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 @"inheritBuildId")) ::
              Data.ProtoLens.FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
      in
        [(Tag,
  FieldDescriptor
    StartChildWorkflowExecutionInitiatedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        StartChildWorkflowExecutionInitiatedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
namespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
namespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
parentClosePolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
control__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, 
            FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
workflowIdReusePolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
cronSchedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, FieldDescriptor StartChildWorkflowExecutionInitiatedEventAttributes
inheritBuildId__field_descriptor)]
  unknownFields :: Lens' StartChildWorkflowExecutionInitiatedEventAttributes FieldSet
unknownFields
    = (StartChildWorkflowExecutionInitiatedEventAttributes -> FieldSet)
-> (StartChildWorkflowExecutionInitiatedEventAttributes
    -> FieldSet -> StartChildWorkflowExecutionInitiatedEventAttributes)
-> Lens'
     StartChildWorkflowExecutionInitiatedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        StartChildWorkflowExecutionInitiatedEventAttributes -> FieldSet
_StartChildWorkflowExecutionInitiatedEventAttributes'_unknownFields
        (\ StartChildWorkflowExecutionInitiatedEventAttributes
x__ FieldSet
y__
           -> StartChildWorkflowExecutionInitiatedEventAttributes
x__
                {_StartChildWorkflowExecutionInitiatedEventAttributes'_unknownFields = y__})
  defMessage :: StartChildWorkflowExecutionInitiatedEventAttributes
defMessage
    = StartChildWorkflowExecutionInitiatedEventAttributes'_constructor
        {_StartChildWorkflowExecutionInitiatedEventAttributes'namespace :: Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'namespaceId :: Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowId :: Text
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowType :: Maybe WorkflowType
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue :: Maybe TaskQueue
_StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'input :: Maybe Payloads
_StartChildWorkflowExecutionInitiatedEventAttributes'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout :: Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout :: Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout :: Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'parentClosePolicy :: ParentClosePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'parentClosePolicy = ParentClosePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'control :: Text
_StartChildWorkflowExecutionInitiatedEventAttributes'control = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId :: Int64
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'workflowIdReusePolicy :: WorkflowIdReusePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowIdReusePolicy = WorkflowIdReusePolicy
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy :: Maybe RetryPolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'cronSchedule :: Text
_StartChildWorkflowExecutionInitiatedEventAttributes'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'header :: Maybe Header
_StartChildWorkflowExecutionInitiatedEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'memo :: Maybe Memo
_StartChildWorkflowExecutionInitiatedEventAttributes'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes :: Maybe SearchAttributes
_StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _StartChildWorkflowExecutionInitiatedEventAttributes'inheritBuildId :: Bool
_StartChildWorkflowExecutionInitiatedEventAttributes'inheritBuildId = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _StartChildWorkflowExecutionInitiatedEventAttributes'_unknownFields :: FieldSet
_StartChildWorkflowExecutionInitiatedEventAttributes'_unknownFields = []}
  parseMessage :: Parser StartChildWorkflowExecutionInitiatedEventAttributes
parseMessage
    = let
        loop ::
          StartChildWorkflowExecutionInitiatedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser StartChildWorkflowExecutionInitiatedEventAttributes
        loop :: StartChildWorkflowExecutionInitiatedEventAttributes
-> Parser StartChildWorkflowExecutionInitiatedEventAttributes
loop StartChildWorkflowExecutionInitiatedEventAttributes
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
"namespace"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespace") y x)
                        Word64
146
                          -> 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
"namespace_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"namespaceId") 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
"workflow_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"workflowId") y x)
                        Word64
26
                          -> 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
34
                          -> 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
42
                          -> 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
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_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTimeout") 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_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") y x)
                        Word64
66
                          -> 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
72
                          -> 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
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
"control"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"control") y x)
                        Word64
88
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
96
                          -> 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
106
                          -> 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
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
"cron_schedule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronSchedule") y x)
                        Word64
122
                          -> 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
130
                          -> 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
138
                          -> 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
152
                          -> 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
"inherit_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"inheritBuildId") 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 StartChildWorkflowExecutionInitiatedEventAttributes
-> String
-> Parser StartChildWorkflowExecutionInitiatedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do StartChildWorkflowExecutionInitiatedEventAttributes
-> Parser StartChildWorkflowExecutionInitiatedEventAttributes
loop StartChildWorkflowExecutionInitiatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"StartChildWorkflowExecutionInitiatedEventAttributes"
  buildMessage :: StartChildWorkflowExecutionInitiatedEventAttributes -> Builder
buildMessage
    = \ StartChildWorkflowExecutionInitiatedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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 @"namespace") StartChildWorkflowExecutionInitiatedEventAttributes
_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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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 @"namespaceId") StartChildWorkflowExecutionInitiatedEventAttributes
_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
146)
                         ((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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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") StartChildWorkflowExecutionInitiatedEventAttributes
_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.<>)
                      (case
                           FoldLike
  (Maybe WorkflowType)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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") StartChildWorkflowExecutionInitiatedEventAttributes
_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
26)
                                ((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)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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") StartChildWorkflowExecutionInitiatedEventAttributes
_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
34)
                                   ((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)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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") StartChildWorkflowExecutionInitiatedEventAttributes
_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
42)
                                      ((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)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                      StartChildWorkflowExecutionInitiatedEventAttributes
_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)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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") StartChildWorkflowExecutionInitiatedEventAttributes
_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.<>)
                                     (case
                                          FoldLike
  (Maybe Duration)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                            StartChildWorkflowExecutionInitiatedEventAttributes
_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
66)
                                               ((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 :: ParentClosePolicy
_v
                                             = FoldLike
  ParentClosePolicy
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  ParentClosePolicy
  ParentClosePolicy
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                                 StartChildWorkflowExecutionInitiatedEventAttributes
_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
72)
                                                 ((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))
                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                           (let
                                              _v :: Text
_v
                                                = FoldLike
  Text
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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 @"control") StartChildWorkflowExecutionInitiatedEventAttributes
_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.<>)
                                              (let
                                                 _v :: Int64
_v
                                                   = FoldLike
  Int64
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Int64
  Int64
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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
                                                          @"workflowTaskCompletedEventId")
                                                       StartChildWorkflowExecutionInitiatedEventAttributes
_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
88)
                                                       ((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 :: WorkflowIdReusePolicy
_v
                                                      = FoldLike
  WorkflowIdReusePolicy
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  WorkflowIdReusePolicy
  WorkflowIdReusePolicy
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                                          StartChildWorkflowExecutionInitiatedEventAttributes
_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
96)
                                                          ((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)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                                           StartChildWorkflowExecutionInitiatedEventAttributes
_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
106)
                                                              ((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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Text
  Text
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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")
                                                                StartChildWorkflowExecutionInitiatedEventAttributes
_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
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))
                                                       (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (case
                                                               FoldLike
  (Maybe Header)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                                                 StartChildWorkflowExecutionInitiatedEventAttributes
_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
122)
                                                                    ((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))
                                                          (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                             (case
                                                                  FoldLike
  (Maybe Memo)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                                                    StartChildWorkflowExecutionInitiatedEventAttributes
_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
130)
                                                                       ((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)
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> StartChildWorkflowExecutionInitiatedEventAttributes
-> 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")
                                                                       StartChildWorkflowExecutionInitiatedEventAttributes
_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
138)
                                                                          ((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.<>)
                                                                   (let
                                                                      _v :: Bool
_v
                                                                        = FoldLike
  Bool
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  Bool
  Bool
-> StartChildWorkflowExecutionInitiatedEventAttributes -> 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
                                                                               @"inheritBuildId")
                                                                            StartChildWorkflowExecutionInitiatedEventAttributes
_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
152)
                                                                            ((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
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  FieldSet
  FieldSet
-> StartChildWorkflowExecutionInitiatedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                         FoldLike
  FieldSet
  StartChildWorkflowExecutionInitiatedEventAttributes
  StartChildWorkflowExecutionInitiatedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' StartChildWorkflowExecutionInitiatedEventAttributes FieldSet
Data.ProtoLens.unknownFields
                                                                         StartChildWorkflowExecutionInitiatedEventAttributes
_x))))))))))))))))))))
instance Control.DeepSeq.NFData StartChildWorkflowExecutionInitiatedEventAttributes where
  rnf :: StartChildWorkflowExecutionInitiatedEventAttributes -> ()
rnf
    = \ StartChildWorkflowExecutionInitiatedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (StartChildWorkflowExecutionInitiatedEventAttributes -> FieldSet
_StartChildWorkflowExecutionInitiatedEventAttributes'_unknownFields
                StartChildWorkflowExecutionInitiatedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespace
                   StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'namespaceId
                      StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowId
                         StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                      (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe WorkflowType
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowType
                            StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                         (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe TaskQueue
_StartChildWorkflowExecutionInitiatedEventAttributes'taskQueue
                               StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                            (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Payloads
_StartChildWorkflowExecutionInitiatedEventAttributes'input StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                               (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowExecutionTimeout
                                     StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowRunTimeout
                                        StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe Duration
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskTimeout
                                           StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                        (ParentClosePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (StartChildWorkflowExecutionInitiatedEventAttributes
-> ParentClosePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'parentClosePolicy
                                              StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                           (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'control
                                                 StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                              (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (StartChildWorkflowExecutionInitiatedEventAttributes -> Int64
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowTaskCompletedEventId
                                                    StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                 (WorkflowIdReusePolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (StartChildWorkflowExecutionInitiatedEventAttributes
-> WorkflowIdReusePolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'workflowIdReusePolicy
                                                       StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                    (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe RetryPolicy
_StartChildWorkflowExecutionInitiatedEventAttributes'retryPolicy
                                                          StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                       (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (StartChildWorkflowExecutionInitiatedEventAttributes -> Text
_StartChildWorkflowExecutionInitiatedEventAttributes'cronSchedule
                                                             StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                          (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Header
_StartChildWorkflowExecutionInitiatedEventAttributes'header
                                                                StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                             (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (StartChildWorkflowExecutionInitiatedEventAttributes -> Maybe Memo
_StartChildWorkflowExecutionInitiatedEventAttributes'memo
                                                                   StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                                (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                   (StartChildWorkflowExecutionInitiatedEventAttributes
-> Maybe SearchAttributes
_StartChildWorkflowExecutionInitiatedEventAttributes'searchAttributes
                                                                      StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                                   (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                      (StartChildWorkflowExecutionInitiatedEventAttributes -> Bool
_StartChildWorkflowExecutionInitiatedEventAttributes'inheritBuildId
                                                                         StartChildWorkflowExecutionInitiatedEventAttributes
x__)
                                                                      ())))))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timerId' @:: Lens' TimerCanceledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' TimerCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' TimerCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' TimerCanceledEventAttributes Data.Text.Text@ -}
data TimerCanceledEventAttributes
  = TimerCanceledEventAttributes'_constructor {TimerCanceledEventAttributes -> Text
_TimerCanceledEventAttributes'timerId :: !Data.Text.Text,
                                               TimerCanceledEventAttributes -> Int64
_TimerCanceledEventAttributes'startedEventId :: !Data.Int.Int64,
                                               TimerCanceledEventAttributes -> Int64
_TimerCanceledEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                               TimerCanceledEventAttributes -> Text
_TimerCanceledEventAttributes'identity :: !Data.Text.Text,
                                               TimerCanceledEventAttributes -> FieldSet
_TimerCanceledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
(TimerCanceledEventAttributes
 -> TimerCanceledEventAttributes -> Bool)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> Bool)
-> Eq TimerCanceledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
== :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
$c/= :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
/= :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
Prelude.Eq, Eq TimerCanceledEventAttributes
Eq TimerCanceledEventAttributes =>
(TimerCanceledEventAttributes
 -> TimerCanceledEventAttributes -> Ordering)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> Bool)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> Bool)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> Bool)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> Bool)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> TimerCanceledEventAttributes)
-> (TimerCanceledEventAttributes
    -> TimerCanceledEventAttributes -> TimerCanceledEventAttributes)
-> Ord TimerCanceledEventAttributes
TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Ordering
TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> TimerCanceledEventAttributes
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 :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Ordering
compare :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Ordering
$c< :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
< :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
$c<= :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
<= :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
$c> :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
> :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
$c>= :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
>= :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> Bool
$cmax :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> TimerCanceledEventAttributes
max :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> TimerCanceledEventAttributes
$cmin :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> TimerCanceledEventAttributes
min :: TimerCanceledEventAttributes
-> TimerCanceledEventAttributes -> TimerCanceledEventAttributes
Prelude.Ord)
instance Prelude.Show TimerCanceledEventAttributes where
  showsPrec :: Int -> TimerCanceledEventAttributes -> ShowS
showsPrec Int
_ TimerCanceledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TimerCanceledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TimerCanceledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField TimerCanceledEventAttributes "timerId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timerId"
-> (Text -> f Text)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
fieldOf Proxy# "timerId"
_
    = ((Text -> f Text)
 -> TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerCanceledEventAttributes -> Text)
-> (TimerCanceledEventAttributes
    -> Text -> TimerCanceledEventAttributes)
-> Lens
     TimerCanceledEventAttributes TimerCanceledEventAttributes Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerCanceledEventAttributes -> Text
_TimerCanceledEventAttributes'timerId
           (\ TimerCanceledEventAttributes
x__ Text
y__ -> TimerCanceledEventAttributes
x__ {_TimerCanceledEventAttributes'timerId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TimerCanceledEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerCanceledEventAttributes -> Int64)
-> (TimerCanceledEventAttributes
    -> Int64 -> TimerCanceledEventAttributes)
-> Lens
     TimerCanceledEventAttributes
     TimerCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerCanceledEventAttributes -> Int64
_TimerCanceledEventAttributes'startedEventId
           (\ TimerCanceledEventAttributes
x__ Int64
y__
              -> TimerCanceledEventAttributes
x__ {_TimerCanceledEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TimerCanceledEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerCanceledEventAttributes -> Int64)
-> (TimerCanceledEventAttributes
    -> Int64 -> TimerCanceledEventAttributes)
-> Lens
     TimerCanceledEventAttributes
     TimerCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerCanceledEventAttributes -> Int64
_TimerCanceledEventAttributes'workflowTaskCompletedEventId
           (\ TimerCanceledEventAttributes
x__ Int64
y__
              -> TimerCanceledEventAttributes
x__
                   {_TimerCanceledEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TimerCanceledEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> TimerCanceledEventAttributes -> f TimerCanceledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TimerCanceledEventAttributes
-> f TimerCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerCanceledEventAttributes -> Text)
-> (TimerCanceledEventAttributes
    -> Text -> TimerCanceledEventAttributes)
-> Lens
     TimerCanceledEventAttributes TimerCanceledEventAttributes Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerCanceledEventAttributes -> Text
_TimerCanceledEventAttributes'identity
           (\ TimerCanceledEventAttributes
x__ Text
y__ -> TimerCanceledEventAttributes
x__ {_TimerCanceledEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TimerCanceledEventAttributes where
  messageName :: Proxy TimerCanceledEventAttributes -> Text
messageName Proxy TimerCanceledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.TimerCanceledEventAttributes"
  packedMessageDescriptor :: Proxy TimerCanceledEventAttributes -> ByteString
packedMessageDescriptor Proxy TimerCanceledEventAttributes
_
    = ByteString
"\n\
      \\FSTimerCanceledEventAttributes\DC2\EM\n\
      \\btimer_id\CAN\SOH \SOH(\tR\atimerId\DC2(\n\
      \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2F\n\
      \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy TimerCanceledEventAttributes -> ByteString
packedFileDescriptor Proxy TimerCanceledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TimerCanceledEventAttributes)
fieldsByTag
    = let
        timerId__field_descriptor :: FieldDescriptor TimerCanceledEventAttributes
timerId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TimerCanceledEventAttributes Text
-> FieldDescriptor TimerCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timer_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
     TimerCanceledEventAttributes TimerCanceledEventAttributes Text Text
-> FieldAccessor TimerCanceledEventAttributes 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 @"timerId")) ::
              Data.ProtoLens.FieldDescriptor TimerCanceledEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor TimerCanceledEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TimerCanceledEventAttributes Int64
-> FieldDescriptor TimerCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     TimerCanceledEventAttributes
     TimerCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor TimerCanceledEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor TimerCanceledEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor TimerCanceledEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TimerCanceledEventAttributes Int64
-> FieldDescriptor TimerCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     TimerCanceledEventAttributes
     TimerCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor TimerCanceledEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor TimerCanceledEventAttributes
        identity__field_descriptor :: FieldDescriptor TimerCanceledEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TimerCanceledEventAttributes Text
-> FieldDescriptor TimerCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     TimerCanceledEventAttributes TimerCanceledEventAttributes Text Text
-> FieldAccessor TimerCanceledEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor TimerCanceledEventAttributes
      in
        [(Tag, FieldDescriptor TimerCanceledEventAttributes)]
-> Map Tag (FieldDescriptor TimerCanceledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor TimerCanceledEventAttributes
timerId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor TimerCanceledEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor TimerCanceledEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor TimerCanceledEventAttributes
identity__field_descriptor)]
  unknownFields :: Lens' TimerCanceledEventAttributes FieldSet
unknownFields
    = (TimerCanceledEventAttributes -> FieldSet)
-> (TimerCanceledEventAttributes
    -> FieldSet -> TimerCanceledEventAttributes)
-> Lens' TimerCanceledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TimerCanceledEventAttributes -> FieldSet
_TimerCanceledEventAttributes'_unknownFields
        (\ TimerCanceledEventAttributes
x__ FieldSet
y__
           -> TimerCanceledEventAttributes
x__ {_TimerCanceledEventAttributes'_unknownFields = y__})
  defMessage :: TimerCanceledEventAttributes
defMessage
    = TimerCanceledEventAttributes'_constructor
        {_TimerCanceledEventAttributes'timerId :: Text
_TimerCanceledEventAttributes'timerId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerCanceledEventAttributes'startedEventId :: Int64
_TimerCanceledEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerCanceledEventAttributes'workflowTaskCompletedEventId :: Int64
_TimerCanceledEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerCanceledEventAttributes'identity :: Text
_TimerCanceledEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerCanceledEventAttributes'_unknownFields :: FieldSet
_TimerCanceledEventAttributes'_unknownFields = []}
  parseMessage :: Parser TimerCanceledEventAttributes
parseMessage
    = let
        loop ::
          TimerCanceledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser TimerCanceledEventAttributes
        loop :: TimerCanceledEventAttributes -> Parser TimerCanceledEventAttributes
loop TimerCanceledEventAttributes
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
"timer_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"timerId") y x)
                        Word64
16
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") 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 TimerCanceledEventAttributes
-> String -> Parser TimerCanceledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TimerCanceledEventAttributes -> Parser TimerCanceledEventAttributes
loop TimerCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"TimerCanceledEventAttributes"
  buildMessage :: TimerCanceledEventAttributes -> Builder
buildMessage
    = \ TimerCanceledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  TimerCanceledEventAttributes
  TimerCanceledEventAttributes
  Text
  Text
-> TimerCanceledEventAttributes -> 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 @"timerId") TimerCanceledEventAttributes
_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 :: Int64
_v
                     = FoldLike
  Int64
  TimerCanceledEventAttributes
  TimerCanceledEventAttributes
  Int64
  Int64
-> TimerCanceledEventAttributes -> 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 @"startedEventId") TimerCanceledEventAttributes
_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
16)
                         ((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
  TimerCanceledEventAttributes
  TimerCanceledEventAttributes
  Int64
  Int64
-> TimerCanceledEventAttributes -> 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 @"workflowTaskCompletedEventId") TimerCanceledEventAttributes
_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.<>)
                      (let
                         _v :: Text
_v = FoldLike
  Text
  TimerCanceledEventAttributes
  TimerCanceledEventAttributes
  Text
  Text
-> TimerCanceledEventAttributes -> 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 @"identity") TimerCanceledEventAttributes
_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))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  TimerCanceledEventAttributes
  TimerCanceledEventAttributes
  FieldSet
  FieldSet
-> TimerCanceledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TimerCanceledEventAttributes
  TimerCanceledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' TimerCanceledEventAttributes FieldSet
Data.ProtoLens.unknownFields TimerCanceledEventAttributes
_x)))))
instance Control.DeepSeq.NFData TimerCanceledEventAttributes where
  rnf :: TimerCanceledEventAttributes -> ()
rnf
    = \ TimerCanceledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TimerCanceledEventAttributes -> FieldSet
_TimerCanceledEventAttributes'_unknownFields TimerCanceledEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TimerCanceledEventAttributes -> Text
_TimerCanceledEventAttributes'timerId TimerCanceledEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TimerCanceledEventAttributes -> Int64
_TimerCanceledEventAttributes'startedEventId TimerCanceledEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (TimerCanceledEventAttributes -> Int64
_TimerCanceledEventAttributes'workflowTaskCompletedEventId TimerCanceledEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (TimerCanceledEventAttributes -> Text
_TimerCanceledEventAttributes'identity TimerCanceledEventAttributes
x__) ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timerId' @:: Lens' TimerFiredEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' TimerFiredEventAttributes Data.Int.Int64@ -}
data TimerFiredEventAttributes
  = TimerFiredEventAttributes'_constructor {TimerFiredEventAttributes -> Text
_TimerFiredEventAttributes'timerId :: !Data.Text.Text,
                                            TimerFiredEventAttributes -> Int64
_TimerFiredEventAttributes'startedEventId :: !Data.Int.Int64,
                                            TimerFiredEventAttributes -> FieldSet
_TimerFiredEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
(TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool)
-> (TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool)
-> Eq TimerFiredEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
== :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
$c/= :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
/= :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
Prelude.Eq, Eq TimerFiredEventAttributes
Eq TimerFiredEventAttributes =>
(TimerFiredEventAttributes
 -> TimerFiredEventAttributes -> Ordering)
-> (TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool)
-> (TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool)
-> (TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool)
-> (TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool)
-> (TimerFiredEventAttributes
    -> TimerFiredEventAttributes -> TimerFiredEventAttributes)
-> (TimerFiredEventAttributes
    -> TimerFiredEventAttributes -> TimerFiredEventAttributes)
-> Ord TimerFiredEventAttributes
TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
TimerFiredEventAttributes -> TimerFiredEventAttributes -> Ordering
TimerFiredEventAttributes
-> TimerFiredEventAttributes -> TimerFiredEventAttributes
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 :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Ordering
compare :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Ordering
$c< :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
< :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
$c<= :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
<= :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
$c> :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
> :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
$c>= :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
>= :: TimerFiredEventAttributes -> TimerFiredEventAttributes -> Bool
$cmax :: TimerFiredEventAttributes
-> TimerFiredEventAttributes -> TimerFiredEventAttributes
max :: TimerFiredEventAttributes
-> TimerFiredEventAttributes -> TimerFiredEventAttributes
$cmin :: TimerFiredEventAttributes
-> TimerFiredEventAttributes -> TimerFiredEventAttributes
min :: TimerFiredEventAttributes
-> TimerFiredEventAttributes -> TimerFiredEventAttributes
Prelude.Ord)
instance Prelude.Show TimerFiredEventAttributes where
  showsPrec :: Int -> TimerFiredEventAttributes -> ShowS
showsPrec Int
_ TimerFiredEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TimerFiredEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TimerFiredEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField TimerFiredEventAttributes "timerId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timerId"
-> (Text -> f Text)
-> TimerFiredEventAttributes
-> f TimerFiredEventAttributes
fieldOf Proxy# "timerId"
_
    = ((Text -> f Text)
 -> TimerFiredEventAttributes -> f TimerFiredEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TimerFiredEventAttributes
-> f TimerFiredEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerFiredEventAttributes -> Text)
-> (TimerFiredEventAttributes -> Text -> TimerFiredEventAttributes)
-> Lens
     TimerFiredEventAttributes TimerFiredEventAttributes Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerFiredEventAttributes -> Text
_TimerFiredEventAttributes'timerId
           (\ TimerFiredEventAttributes
x__ Text
y__ -> TimerFiredEventAttributes
x__ {_TimerFiredEventAttributes'timerId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TimerFiredEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> TimerFiredEventAttributes
-> f TimerFiredEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> TimerFiredEventAttributes -> f TimerFiredEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TimerFiredEventAttributes
-> f TimerFiredEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerFiredEventAttributes -> Int64)
-> (TimerFiredEventAttributes
    -> Int64 -> TimerFiredEventAttributes)
-> Lens
     TimerFiredEventAttributes TimerFiredEventAttributes Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerFiredEventAttributes -> Int64
_TimerFiredEventAttributes'startedEventId
           (\ TimerFiredEventAttributes
x__ Int64
y__
              -> TimerFiredEventAttributes
x__ {_TimerFiredEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TimerFiredEventAttributes where
  messageName :: Proxy TimerFiredEventAttributes -> Text
messageName Proxy TimerFiredEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.TimerFiredEventAttributes"
  packedMessageDescriptor :: Proxy TimerFiredEventAttributes -> ByteString
packedMessageDescriptor Proxy TimerFiredEventAttributes
_
    = ByteString
"\n\
      \\EMTimerFiredEventAttributes\DC2\EM\n\
      \\btimer_id\CAN\SOH \SOH(\tR\atimerId\DC2(\n\
      \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId"
  packedFileDescriptor :: Proxy TimerFiredEventAttributes -> ByteString
packedFileDescriptor Proxy TimerFiredEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TimerFiredEventAttributes)
fieldsByTag
    = let
        timerId__field_descriptor :: FieldDescriptor TimerFiredEventAttributes
timerId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TimerFiredEventAttributes Text
-> FieldDescriptor TimerFiredEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timer_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
     TimerFiredEventAttributes TimerFiredEventAttributes Text Text
-> FieldAccessor TimerFiredEventAttributes 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 @"timerId")) ::
              Data.ProtoLens.FieldDescriptor TimerFiredEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor TimerFiredEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TimerFiredEventAttributes Int64
-> FieldDescriptor TimerFiredEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     TimerFiredEventAttributes TimerFiredEventAttributes Int64 Int64
-> FieldAccessor TimerFiredEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor TimerFiredEventAttributes
      in
        [(Tag, FieldDescriptor TimerFiredEventAttributes)]
-> Map Tag (FieldDescriptor TimerFiredEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor TimerFiredEventAttributes
timerId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor TimerFiredEventAttributes
startedEventId__field_descriptor)]
  unknownFields :: Lens' TimerFiredEventAttributes FieldSet
unknownFields
    = (TimerFiredEventAttributes -> FieldSet)
-> (TimerFiredEventAttributes
    -> FieldSet -> TimerFiredEventAttributes)
-> Lens' TimerFiredEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TimerFiredEventAttributes -> FieldSet
_TimerFiredEventAttributes'_unknownFields
        (\ TimerFiredEventAttributes
x__ FieldSet
y__
           -> TimerFiredEventAttributes
x__ {_TimerFiredEventAttributes'_unknownFields = y__})
  defMessage :: TimerFiredEventAttributes
defMessage
    = TimerFiredEventAttributes'_constructor
        {_TimerFiredEventAttributes'timerId :: Text
_TimerFiredEventAttributes'timerId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerFiredEventAttributes'startedEventId :: Int64
_TimerFiredEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerFiredEventAttributes'_unknownFields :: FieldSet
_TimerFiredEventAttributes'_unknownFields = []}
  parseMessage :: Parser TimerFiredEventAttributes
parseMessage
    = let
        loop ::
          TimerFiredEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser TimerFiredEventAttributes
        loop :: TimerFiredEventAttributes -> Parser TimerFiredEventAttributes
loop TimerFiredEventAttributes
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
"timer_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"timerId") y x)
                        Word64
16
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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 TimerFiredEventAttributes
-> String -> Parser TimerFiredEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TimerFiredEventAttributes -> Parser TimerFiredEventAttributes
loop TimerFiredEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"TimerFiredEventAttributes"
  buildMessage :: TimerFiredEventAttributes -> Builder
buildMessage
    = \ TimerFiredEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text TimerFiredEventAttributes TimerFiredEventAttributes Text Text
-> TimerFiredEventAttributes -> 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 @"timerId") TimerFiredEventAttributes
_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 :: Int64
_v
                     = FoldLike
  Int64
  TimerFiredEventAttributes
  TimerFiredEventAttributes
  Int64
  Int64
-> TimerFiredEventAttributes -> 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 @"startedEventId") TimerFiredEventAttributes
_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
16)
                         ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  TimerFiredEventAttributes
  TimerFiredEventAttributes
  FieldSet
  FieldSet
-> TimerFiredEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TimerFiredEventAttributes
  TimerFiredEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' TimerFiredEventAttributes FieldSet
Data.ProtoLens.unknownFields TimerFiredEventAttributes
_x)))
instance Control.DeepSeq.NFData TimerFiredEventAttributes where
  rnf :: TimerFiredEventAttributes -> ()
rnf
    = \ TimerFiredEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TimerFiredEventAttributes -> FieldSet
_TimerFiredEventAttributes'_unknownFields TimerFiredEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TimerFiredEventAttributes -> Text
_TimerFiredEventAttributes'timerId TimerFiredEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TimerFiredEventAttributes -> Int64
_TimerFiredEventAttributes'startedEventId TimerFiredEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timerId' @:: Lens' TimerStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startToFireTimeout' @:: Lens' TimerStartedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'startToFireTimeout' @:: Lens' TimerStartedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' TimerStartedEventAttributes Data.Int.Int64@ -}
data TimerStartedEventAttributes
  = TimerStartedEventAttributes'_constructor {TimerStartedEventAttributes -> Text
_TimerStartedEventAttributes'timerId :: !Data.Text.Text,
                                              TimerStartedEventAttributes -> Maybe Duration
_TimerStartedEventAttributes'startToFireTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                              TimerStartedEventAttributes -> Int64
_TimerStartedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                              TimerStartedEventAttributes -> FieldSet
_TimerStartedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
(TimerStartedEventAttributes
 -> TimerStartedEventAttributes -> Bool)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> Bool)
-> Eq TimerStartedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
== :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
$c/= :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
/= :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
Prelude.Eq, Eq TimerStartedEventAttributes
Eq TimerStartedEventAttributes =>
(TimerStartedEventAttributes
 -> TimerStartedEventAttributes -> Ordering)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> Bool)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> Bool)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> Bool)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> Bool)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> TimerStartedEventAttributes)
-> (TimerStartedEventAttributes
    -> TimerStartedEventAttributes -> TimerStartedEventAttributes)
-> Ord TimerStartedEventAttributes
TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
TimerStartedEventAttributes
-> TimerStartedEventAttributes -> Ordering
TimerStartedEventAttributes
-> TimerStartedEventAttributes -> TimerStartedEventAttributes
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 :: TimerStartedEventAttributes
-> TimerStartedEventAttributes -> Ordering
compare :: TimerStartedEventAttributes
-> TimerStartedEventAttributes -> Ordering
$c< :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
< :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
$c<= :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
<= :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
$c> :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
> :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
$c>= :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
>= :: TimerStartedEventAttributes -> TimerStartedEventAttributes -> Bool
$cmax :: TimerStartedEventAttributes
-> TimerStartedEventAttributes -> TimerStartedEventAttributes
max :: TimerStartedEventAttributes
-> TimerStartedEventAttributes -> TimerStartedEventAttributes
$cmin :: TimerStartedEventAttributes
-> TimerStartedEventAttributes -> TimerStartedEventAttributes
min :: TimerStartedEventAttributes
-> TimerStartedEventAttributes -> TimerStartedEventAttributes
Prelude.Ord)
instance Prelude.Show TimerStartedEventAttributes where
  showsPrec :: Int -> TimerStartedEventAttributes -> ShowS
showsPrec Int
_ TimerStartedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (TimerStartedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort TimerStartedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField TimerStartedEventAttributes "timerId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timerId"
-> (Text -> f Text)
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
fieldOf Proxy# "timerId"
_
    = ((Text -> f Text)
 -> TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerStartedEventAttributes -> Text)
-> (TimerStartedEventAttributes
    -> Text -> TimerStartedEventAttributes)
-> Lens
     TimerStartedEventAttributes TimerStartedEventAttributes Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerStartedEventAttributes -> Text
_TimerStartedEventAttributes'timerId
           (\ TimerStartedEventAttributes
x__ Text
y__ -> TimerStartedEventAttributes
x__ {_TimerStartedEventAttributes'timerId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TimerStartedEventAttributes "startToFireTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToFireTimeout"
-> (Duration -> f Duration)
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
fieldOf Proxy# "startToFireTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerStartedEventAttributes -> Maybe Duration)
-> (TimerStartedEventAttributes
    -> Maybe Duration -> TimerStartedEventAttributes)
-> Lens
     TimerStartedEventAttributes
     TimerStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerStartedEventAttributes -> Maybe Duration
_TimerStartedEventAttributes'startToFireTimeout
           (\ TimerStartedEventAttributes
x__ Maybe Duration
y__
              -> TimerStartedEventAttributes
x__ {_TimerStartedEventAttributes'startToFireTimeout = 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 TimerStartedEventAttributes "maybe'startToFireTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToFireTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
fieldOf Proxy# "maybe'startToFireTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerStartedEventAttributes -> Maybe Duration)
-> (TimerStartedEventAttributes
    -> Maybe Duration -> TimerStartedEventAttributes)
-> Lens
     TimerStartedEventAttributes
     TimerStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerStartedEventAttributes -> Maybe Duration
_TimerStartedEventAttributes'startToFireTimeout
           (\ TimerStartedEventAttributes
x__ Maybe Duration
y__
              -> TimerStartedEventAttributes
x__ {_TimerStartedEventAttributes'startToFireTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField TimerStartedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> TimerStartedEventAttributes -> f TimerStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> TimerStartedEventAttributes
-> f TimerStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((TimerStartedEventAttributes -> Int64)
-> (TimerStartedEventAttributes
    -> Int64 -> TimerStartedEventAttributes)
-> Lens
     TimerStartedEventAttributes TimerStartedEventAttributes Int64 Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           TimerStartedEventAttributes -> Int64
_TimerStartedEventAttributes'workflowTaskCompletedEventId
           (\ TimerStartedEventAttributes
x__ Int64
y__
              -> TimerStartedEventAttributes
x__
                   {_TimerStartedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message TimerStartedEventAttributes where
  messageName :: Proxy TimerStartedEventAttributes -> Text
messageName Proxy TimerStartedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.TimerStartedEventAttributes"
  packedMessageDescriptor :: Proxy TimerStartedEventAttributes -> ByteString
packedMessageDescriptor Proxy TimerStartedEventAttributes
_
    = ByteString
"\n\
      \\ESCTimerStartedEventAttributes\DC2\EM\n\
      \\btimer_id\CAN\SOH \SOH(\tR\atimerId\DC2L\n\
      \\NAKstart_to_fire_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\DC2startToFireTimeout\DC2F\n\
      \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId"
  packedFileDescriptor :: Proxy TimerStartedEventAttributes -> ByteString
packedFileDescriptor Proxy TimerStartedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor TimerStartedEventAttributes)
fieldsByTag
    = let
        timerId__field_descriptor :: FieldDescriptor TimerStartedEventAttributes
timerId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor TimerStartedEventAttributes Text
-> FieldDescriptor TimerStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timer_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
     TimerStartedEventAttributes TimerStartedEventAttributes Text Text
-> FieldAccessor TimerStartedEventAttributes 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 @"timerId")) ::
              Data.ProtoLens.FieldDescriptor TimerStartedEventAttributes
        startToFireTimeout__field_descriptor :: FieldDescriptor TimerStartedEventAttributes
startToFireTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor TimerStartedEventAttributes Duration
-> FieldDescriptor TimerStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_to_fire_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
  TimerStartedEventAttributes
  TimerStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor TimerStartedEventAttributes 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'startToFireTimeout")) ::
              Data.ProtoLens.FieldDescriptor TimerStartedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor TimerStartedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor TimerStartedEventAttributes Int64
-> FieldDescriptor TimerStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     TimerStartedEventAttributes TimerStartedEventAttributes Int64 Int64
-> FieldAccessor TimerStartedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor TimerStartedEventAttributes
      in
        [(Tag, FieldDescriptor TimerStartedEventAttributes)]
-> Map Tag (FieldDescriptor TimerStartedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor TimerStartedEventAttributes
timerId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor TimerStartedEventAttributes
startToFireTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor TimerStartedEventAttributes
workflowTaskCompletedEventId__field_descriptor)]
  unknownFields :: Lens' TimerStartedEventAttributes FieldSet
unknownFields
    = (TimerStartedEventAttributes -> FieldSet)
-> (TimerStartedEventAttributes
    -> FieldSet -> TimerStartedEventAttributes)
-> Lens' TimerStartedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        TimerStartedEventAttributes -> FieldSet
_TimerStartedEventAttributes'_unknownFields
        (\ TimerStartedEventAttributes
x__ FieldSet
y__
           -> TimerStartedEventAttributes
x__ {_TimerStartedEventAttributes'_unknownFields = y__})
  defMessage :: TimerStartedEventAttributes
defMessage
    = TimerStartedEventAttributes'_constructor
        {_TimerStartedEventAttributes'timerId :: Text
_TimerStartedEventAttributes'timerId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerStartedEventAttributes'startToFireTimeout :: Maybe Duration
_TimerStartedEventAttributes'startToFireTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _TimerStartedEventAttributes'workflowTaskCompletedEventId :: Int64
_TimerStartedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _TimerStartedEventAttributes'_unknownFields :: FieldSet
_TimerStartedEventAttributes'_unknownFields = []}
  parseMessage :: Parser TimerStartedEventAttributes
parseMessage
    = let
        loop ::
          TimerStartedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser TimerStartedEventAttributes
        loop :: TimerStartedEventAttributes -> Parser TimerStartedEventAttributes
loop TimerStartedEventAttributes
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
"timer_id"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"timerId") 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
"start_to_fire_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToFireTimeout") 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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 TimerStartedEventAttributes
-> String -> Parser TimerStartedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do TimerStartedEventAttributes -> Parser TimerStartedEventAttributes
loop TimerStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage) String
"TimerStartedEventAttributes"
  buildMessage :: TimerStartedEventAttributes -> Builder
buildMessage
    = \ TimerStartedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  TimerStartedEventAttributes
  TimerStartedEventAttributes
  Text
  Text
-> TimerStartedEventAttributes -> 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 @"timerId") TimerStartedEventAttributes
_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 Duration)
  TimerStartedEventAttributes
  TimerStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> TimerStartedEventAttributes -> 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'startToFireTimeout") TimerStartedEventAttributes
_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.<>)
                   (let
                      _v :: Int64
_v
                        = FoldLike
  Int64
  TimerStartedEventAttributes
  TimerStartedEventAttributes
  Int64
  Int64
-> TimerStartedEventAttributes -> 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 @"workflowTaskCompletedEventId") TimerStartedEventAttributes
_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))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  TimerStartedEventAttributes
  TimerStartedEventAttributes
  FieldSet
  FieldSet
-> TimerStartedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  TimerStartedEventAttributes
  TimerStartedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' TimerStartedEventAttributes FieldSet
Data.ProtoLens.unknownFields TimerStartedEventAttributes
_x))))
instance Control.DeepSeq.NFData TimerStartedEventAttributes where
  rnf :: TimerStartedEventAttributes -> ()
rnf
    = \ TimerStartedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (TimerStartedEventAttributes -> FieldSet
_TimerStartedEventAttributes'_unknownFields TimerStartedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (TimerStartedEventAttributes -> Text
_TimerStartedEventAttributes'timerId TimerStartedEventAttributes
x__)
                (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (TimerStartedEventAttributes -> Maybe Duration
_TimerStartedEventAttributes'startToFireTimeout TimerStartedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (TimerStartedEventAttributes -> Int64
_TimerStartedEventAttributes'workflowTaskCompletedEventId TimerStartedEventAttributes
x__)
                      ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' UpsertWorkflowSearchAttributesEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.searchAttributes' @:: Lens' UpsertWorkflowSearchAttributesEventAttributes Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'searchAttributes' @:: Lens' UpsertWorkflowSearchAttributesEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@ -}
data UpsertWorkflowSearchAttributesEventAttributes
  = UpsertWorkflowSearchAttributesEventAttributes'_constructor {UpsertWorkflowSearchAttributesEventAttributes -> Int64
_UpsertWorkflowSearchAttributesEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                UpsertWorkflowSearchAttributesEventAttributes
-> Maybe SearchAttributes
_UpsertWorkflowSearchAttributesEventAttributes'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                                                UpsertWorkflowSearchAttributesEventAttributes -> FieldSet
_UpsertWorkflowSearchAttributesEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
(UpsertWorkflowSearchAttributesEventAttributes
 -> UpsertWorkflowSearchAttributesEventAttributes -> Bool)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes -> Bool)
-> Eq UpsertWorkflowSearchAttributesEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
== :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
$c/= :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
/= :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
Prelude.Eq, Eq UpsertWorkflowSearchAttributesEventAttributes
Eq UpsertWorkflowSearchAttributesEventAttributes =>
(UpsertWorkflowSearchAttributesEventAttributes
 -> UpsertWorkflowSearchAttributesEventAttributes -> Ordering)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes -> Bool)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes -> Bool)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes -> Bool)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes -> Bool)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes)
-> Ord UpsertWorkflowSearchAttributesEventAttributes
UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Ordering
UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
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 :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Ordering
compare :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Ordering
$c< :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
< :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
$c<= :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
<= :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
$c> :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
> :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
$c>= :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
>= :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes -> Bool
$cmax :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
max :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
$cmin :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
min :: UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
-> UpsertWorkflowSearchAttributesEventAttributes
Prelude.Ord)
instance Prelude.Show UpsertWorkflowSearchAttributesEventAttributes where
  showsPrec :: Int -> UpsertWorkflowSearchAttributesEventAttributes -> ShowS
showsPrec Int
_ UpsertWorkflowSearchAttributesEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (UpsertWorkflowSearchAttributesEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort UpsertWorkflowSearchAttributesEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField UpsertWorkflowSearchAttributesEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> UpsertWorkflowSearchAttributesEventAttributes
-> f UpsertWorkflowSearchAttributesEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> UpsertWorkflowSearchAttributesEventAttributes
 -> f UpsertWorkflowSearchAttributesEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> UpsertWorkflowSearchAttributesEventAttributes
-> f UpsertWorkflowSearchAttributesEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributesEventAttributes -> Int64)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> Int64 -> UpsertWorkflowSearchAttributesEventAttributes)
-> Lens
     UpsertWorkflowSearchAttributesEventAttributes
     UpsertWorkflowSearchAttributesEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpsertWorkflowSearchAttributesEventAttributes -> Int64
_UpsertWorkflowSearchAttributesEventAttributes'workflowTaskCompletedEventId
           (\ UpsertWorkflowSearchAttributesEventAttributes
x__ Int64
y__
              -> UpsertWorkflowSearchAttributesEventAttributes
x__
                   {_UpsertWorkflowSearchAttributesEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField UpsertWorkflowSearchAttributesEventAttributes "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> UpsertWorkflowSearchAttributesEventAttributes
-> f UpsertWorkflowSearchAttributesEventAttributes
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> UpsertWorkflowSearchAttributesEventAttributes
 -> f UpsertWorkflowSearchAttributesEventAttributes)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> UpsertWorkflowSearchAttributesEventAttributes
-> f UpsertWorkflowSearchAttributesEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributesEventAttributes
 -> Maybe SearchAttributes)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> Maybe SearchAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes)
-> Lens
     UpsertWorkflowSearchAttributesEventAttributes
     UpsertWorkflowSearchAttributesEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpsertWorkflowSearchAttributesEventAttributes
-> Maybe SearchAttributes
_UpsertWorkflowSearchAttributesEventAttributes'searchAttributes
           (\ UpsertWorkflowSearchAttributesEventAttributes
x__ Maybe SearchAttributes
y__
              -> UpsertWorkflowSearchAttributesEventAttributes
x__
                   {_UpsertWorkflowSearchAttributesEventAttributes'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 UpsertWorkflowSearchAttributesEventAttributes "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))
-> UpsertWorkflowSearchAttributesEventAttributes
-> f UpsertWorkflowSearchAttributesEventAttributes
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> UpsertWorkflowSearchAttributesEventAttributes
 -> f UpsertWorkflowSearchAttributesEventAttributes)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> UpsertWorkflowSearchAttributesEventAttributes
-> f UpsertWorkflowSearchAttributesEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((UpsertWorkflowSearchAttributesEventAttributes
 -> Maybe SearchAttributes)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> Maybe SearchAttributes
    -> UpsertWorkflowSearchAttributesEventAttributes)
-> Lens
     UpsertWorkflowSearchAttributesEventAttributes
     UpsertWorkflowSearchAttributesEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           UpsertWorkflowSearchAttributesEventAttributes
-> Maybe SearchAttributes
_UpsertWorkflowSearchAttributesEventAttributes'searchAttributes
           (\ UpsertWorkflowSearchAttributesEventAttributes
x__ Maybe SearchAttributes
y__
              -> UpsertWorkflowSearchAttributesEventAttributes
x__
                   {_UpsertWorkflowSearchAttributesEventAttributes'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message UpsertWorkflowSearchAttributesEventAttributes where
  messageName :: Proxy UpsertWorkflowSearchAttributesEventAttributes -> Text
messageName Proxy UpsertWorkflowSearchAttributesEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.UpsertWorkflowSearchAttributesEventAttributes"
  packedMessageDescriptor :: Proxy UpsertWorkflowSearchAttributesEventAttributes -> ByteString
packedMessageDescriptor Proxy UpsertWorkflowSearchAttributesEventAttributes
_
    = ByteString
"\n\
      \-UpsertWorkflowSearchAttributesEventAttributes\DC2F\n\
      \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2U\n\
      \\DC1search_attributes\CAN\STX \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes"
  packedFileDescriptor :: Proxy UpsertWorkflowSearchAttributesEventAttributes -> ByteString
packedFileDescriptor Proxy UpsertWorkflowSearchAttributesEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes)
fieldsByTag
    = let
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     UpsertWorkflowSearchAttributesEventAttributes Int64
-> FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     UpsertWorkflowSearchAttributesEventAttributes
     UpsertWorkflowSearchAttributesEventAttributes
     Int64
     Int64
-> FieldAccessor
     UpsertWorkflowSearchAttributesEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
        searchAttributes__field_descriptor :: FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor
     UpsertWorkflowSearchAttributesEventAttributes SearchAttributes
-> FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
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
  UpsertWorkflowSearchAttributesEventAttributes
  UpsertWorkflowSearchAttributesEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor
     UpsertWorkflowSearchAttributesEventAttributes 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 UpsertWorkflowSearchAttributesEventAttributes
      in
        [(Tag,
  FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes)]
-> Map
     Tag (FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, 
            FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor UpsertWorkflowSearchAttributesEventAttributes
searchAttributes__field_descriptor)]
  unknownFields :: Lens' UpsertWorkflowSearchAttributesEventAttributes FieldSet
unknownFields
    = (UpsertWorkflowSearchAttributesEventAttributes -> FieldSet)
-> (UpsertWorkflowSearchAttributesEventAttributes
    -> FieldSet -> UpsertWorkflowSearchAttributesEventAttributes)
-> Lens' UpsertWorkflowSearchAttributesEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        UpsertWorkflowSearchAttributesEventAttributes -> FieldSet
_UpsertWorkflowSearchAttributesEventAttributes'_unknownFields
        (\ UpsertWorkflowSearchAttributesEventAttributes
x__ FieldSet
y__
           -> UpsertWorkflowSearchAttributesEventAttributes
x__
                {_UpsertWorkflowSearchAttributesEventAttributes'_unknownFields = y__})
  defMessage :: UpsertWorkflowSearchAttributesEventAttributes
defMessage
    = UpsertWorkflowSearchAttributesEventAttributes'_constructor
        {_UpsertWorkflowSearchAttributesEventAttributes'workflowTaskCompletedEventId :: Int64
_UpsertWorkflowSearchAttributesEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _UpsertWorkflowSearchAttributesEventAttributes'searchAttributes :: Maybe SearchAttributes
_UpsertWorkflowSearchAttributesEventAttributes'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _UpsertWorkflowSearchAttributesEventAttributes'_unknownFields :: FieldSet
_UpsertWorkflowSearchAttributesEventAttributes'_unknownFields = []}
  parseMessage :: Parser UpsertWorkflowSearchAttributesEventAttributes
parseMessage
    = let
        loop ::
          UpsertWorkflowSearchAttributesEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser UpsertWorkflowSearchAttributesEventAttributes
        loop :: UpsertWorkflowSearchAttributesEventAttributes
-> Parser UpsertWorkflowSearchAttributesEventAttributes
loop UpsertWorkflowSearchAttributesEventAttributes
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 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
18
                          -> 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
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 UpsertWorkflowSearchAttributesEventAttributes
-> String -> Parser UpsertWorkflowSearchAttributesEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do UpsertWorkflowSearchAttributesEventAttributes
-> Parser UpsertWorkflowSearchAttributesEventAttributes
loop UpsertWorkflowSearchAttributesEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"UpsertWorkflowSearchAttributesEventAttributes"
  buildMessage :: UpsertWorkflowSearchAttributesEventAttributes -> Builder
buildMessage
    = \ UpsertWorkflowSearchAttributesEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  UpsertWorkflowSearchAttributesEventAttributes
  UpsertWorkflowSearchAttributesEventAttributes
  Int64
  Int64
-> UpsertWorkflowSearchAttributesEventAttributes -> 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 @"workflowTaskCompletedEventId") UpsertWorkflowSearchAttributesEventAttributes
_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
8)
                      ((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 SearchAttributes)
  UpsertWorkflowSearchAttributesEventAttributes
  UpsertWorkflowSearchAttributesEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> UpsertWorkflowSearchAttributesEventAttributes
-> 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") UpsertWorkflowSearchAttributesEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  UpsertWorkflowSearchAttributesEventAttributes
  UpsertWorkflowSearchAttributesEventAttributes
  FieldSet
  FieldSet
-> UpsertWorkflowSearchAttributesEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  UpsertWorkflowSearchAttributesEventAttributes
  UpsertWorkflowSearchAttributesEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' UpsertWorkflowSearchAttributesEventAttributes FieldSet
Data.ProtoLens.unknownFields UpsertWorkflowSearchAttributesEventAttributes
_x)))
instance Control.DeepSeq.NFData UpsertWorkflowSearchAttributesEventAttributes where
  rnf :: UpsertWorkflowSearchAttributesEventAttributes -> ()
rnf
    = \ UpsertWorkflowSearchAttributesEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (UpsertWorkflowSearchAttributesEventAttributes -> FieldSet
_UpsertWorkflowSearchAttributesEventAttributes'_unknownFields UpsertWorkflowSearchAttributesEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (UpsertWorkflowSearchAttributesEventAttributes -> Int64
_UpsertWorkflowSearchAttributesEventAttributes'workflowTaskCompletedEventId
                   UpsertWorkflowSearchAttributesEventAttributes
x__)
                (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (UpsertWorkflowSearchAttributesEventAttributes
-> Maybe SearchAttributes
_UpsertWorkflowSearchAttributesEventAttributes'searchAttributes
                      UpsertWorkflowSearchAttributesEventAttributes
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cause' @:: Lens' WorkflowExecutionCancelRequestedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.externalInitiatedEventId' @:: Lens' WorkflowExecutionCancelRequestedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.externalWorkflowExecution' @:: Lens' WorkflowExecutionCancelRequestedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'externalWorkflowExecution' @:: Lens' WorkflowExecutionCancelRequestedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowExecutionCancelRequestedEventAttributes Data.Text.Text@ -}
data WorkflowExecutionCancelRequestedEventAttributes
  = WorkflowExecutionCancelRequestedEventAttributes'_constructor {WorkflowExecutionCancelRequestedEventAttributes -> Text
_WorkflowExecutionCancelRequestedEventAttributes'cause :: !Data.Text.Text,
                                                                  WorkflowExecutionCancelRequestedEventAttributes -> Int64
_WorkflowExecutionCancelRequestedEventAttributes'externalInitiatedEventId :: !Data.Int.Int64,
                                                                  WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                                  WorkflowExecutionCancelRequestedEventAttributes -> Text
_WorkflowExecutionCancelRequestedEventAttributes'identity :: !Data.Text.Text,
                                                                  WorkflowExecutionCancelRequestedEventAttributes -> FieldSet
_WorkflowExecutionCancelRequestedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
(WorkflowExecutionCancelRequestedEventAttributes
 -> WorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> Eq WorkflowExecutionCancelRequestedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
== :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
$c/= :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
/= :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionCancelRequestedEventAttributes
Eq WorkflowExecutionCancelRequestedEventAttributes =>
(WorkflowExecutionCancelRequestedEventAttributes
 -> WorkflowExecutionCancelRequestedEventAttributes -> Ordering)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes -> Bool)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes
    -> WorkflowExecutionCancelRequestedEventAttributes)
-> Ord WorkflowExecutionCancelRequestedEventAttributes
WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Ordering
WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
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 :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Ordering
compare :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Ordering
$c< :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
< :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
$c<= :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
<= :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
$c> :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
> :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
$c>= :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
>= :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes -> Bool
$cmax :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
max :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
$cmin :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
min :: WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
-> WorkflowExecutionCancelRequestedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionCancelRequestedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionCancelRequestedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionCancelRequestedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionCancelRequestedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionCancelRequestedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionCancelRequestedEventAttributes "cause" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (Text -> f Text)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "cause"
_
    = ((Text -> f Text)
 -> WorkflowExecutionCancelRequestedEventAttributes
 -> f WorkflowExecutionCancelRequestedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCancelRequestedEventAttributes -> Text)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> Text -> WorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCancelRequestedEventAttributes -> Text
_WorkflowExecutionCancelRequestedEventAttributes'cause
           (\ WorkflowExecutionCancelRequestedEventAttributes
x__ Text
y__
              -> WorkflowExecutionCancelRequestedEventAttributes
x__
                   {_WorkflowExecutionCancelRequestedEventAttributes'cause = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionCancelRequestedEventAttributes "externalInitiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "externalInitiatedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "externalInitiatedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionCancelRequestedEventAttributes
 -> f WorkflowExecutionCancelRequestedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCancelRequestedEventAttributes -> Int64)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> Int64 -> WorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCancelRequestedEventAttributes -> Int64
_WorkflowExecutionCancelRequestedEventAttributes'externalInitiatedEventId
           (\ WorkflowExecutionCancelRequestedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionCancelRequestedEventAttributes
x__
                   {_WorkflowExecutionCancelRequestedEventAttributes'externalInitiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionCancelRequestedEventAttributes "externalWorkflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "externalWorkflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "externalWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionCancelRequestedEventAttributes
 -> f WorkflowExecutionCancelRequestedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCancelRequestedEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution
           (\ WorkflowExecutionCancelRequestedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionCancelRequestedEventAttributes
x__
                   {_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution = 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 WorkflowExecutionCancelRequestedEventAttributes "maybe'externalWorkflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'externalWorkflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "maybe'externalWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionCancelRequestedEventAttributes
 -> f WorkflowExecutionCancelRequestedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCancelRequestedEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution
           (\ WorkflowExecutionCancelRequestedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionCancelRequestedEventAttributes
x__
                   {_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionCancelRequestedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowExecutionCancelRequestedEventAttributes
 -> f WorkflowExecutionCancelRequestedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionCancelRequestedEventAttributes
-> f WorkflowExecutionCancelRequestedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCancelRequestedEventAttributes -> Text)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> Text -> WorkflowExecutionCancelRequestedEventAttributes)
-> Lens
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCancelRequestedEventAttributes -> Text
_WorkflowExecutionCancelRequestedEventAttributes'identity
           (\ WorkflowExecutionCancelRequestedEventAttributes
x__ Text
y__
              -> WorkflowExecutionCancelRequestedEventAttributes
x__
                   {_WorkflowExecutionCancelRequestedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionCancelRequestedEventAttributes where
  messageName :: Proxy WorkflowExecutionCancelRequestedEventAttributes -> Text
messageName Proxy WorkflowExecutionCancelRequestedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionCancelRequestedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionCancelRequestedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionCancelRequestedEventAttributes
_
    = ByteString
"\n\
      \/WorkflowExecutionCancelRequestedEventAttributes\DC2\DC4\n\
      \\ENQcause\CAN\SOH \SOH(\tR\ENQcause\DC2=\n\
      \\ESCexternal_initiated_event_id\CAN\STX \SOH(\ETXR\CANexternalInitiatedEventId\DC2i\n\
      \\ESCexternal_workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\EMexternalWorkflowExecution\DC2\SUB\n\
      \\bidentity\CAN\EOT \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy WorkflowExecutionCancelRequestedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionCancelRequestedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes)
fieldsByTag
    = let
        cause__field_descriptor :: FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
cause__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes Text
-> FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cause"
              (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
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes 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 @"cause")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
        externalInitiatedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
externalInitiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"external_initiated_event_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
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     Int64
     Int64
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes 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 @"externalInitiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
        externalWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
externalWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes WorkflowExecution
-> FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"external_workflow_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
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes 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'externalWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes Text
-> FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowExecutionCancelRequestedEventAttributes
     WorkflowExecutionCancelRequestedEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionCancelRequestedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
      in
        [(Tag,
  FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
cause__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
externalInitiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
externalWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionCancelRequestedEventAttributes
identity__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionCancelRequestedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionCancelRequestedEventAttributes -> FieldSet)
-> (WorkflowExecutionCancelRequestedEventAttributes
    -> FieldSet -> WorkflowExecutionCancelRequestedEventAttributes)
-> Lens' WorkflowExecutionCancelRequestedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionCancelRequestedEventAttributes -> FieldSet
_WorkflowExecutionCancelRequestedEventAttributes'_unknownFields
        (\ WorkflowExecutionCancelRequestedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionCancelRequestedEventAttributes
x__
                {_WorkflowExecutionCancelRequestedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionCancelRequestedEventAttributes
defMessage
    = WorkflowExecutionCancelRequestedEventAttributes'_constructor
        {_WorkflowExecutionCancelRequestedEventAttributes'cause :: Text
_WorkflowExecutionCancelRequestedEventAttributes'cause = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionCancelRequestedEventAttributes'externalInitiatedEventId :: Int64
_WorkflowExecutionCancelRequestedEventAttributes'externalInitiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution :: Maybe WorkflowExecution
_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionCancelRequestedEventAttributes'identity :: Text
_WorkflowExecutionCancelRequestedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionCancelRequestedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionCancelRequestedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionCancelRequestedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionCancelRequestedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionCancelRequestedEventAttributes
        loop :: WorkflowExecutionCancelRequestedEventAttributes
-> Parser WorkflowExecutionCancelRequestedEventAttributes
loop WorkflowExecutionCancelRequestedEventAttributes
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
"cause"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cause") y x)
                        Word64
16
                          -> 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
"external_initiated_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"externalInitiatedEventId") y x)
                        Word64
26
                          -> 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
"external_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"externalWorkflowExecution") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") 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 WorkflowExecutionCancelRequestedEventAttributes
-> String -> Parser WorkflowExecutionCancelRequestedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionCancelRequestedEventAttributes
-> Parser WorkflowExecutionCancelRequestedEventAttributes
loop WorkflowExecutionCancelRequestedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionCancelRequestedEventAttributes"
  buildMessage :: WorkflowExecutionCancelRequestedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionCancelRequestedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  Text
  Text
-> WorkflowExecutionCancelRequestedEventAttributes -> 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 @"cause") WorkflowExecutionCancelRequestedEventAttributes
_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 :: Int64
_v
                     = FoldLike
  Int64
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  Int64
  Int64
-> WorkflowExecutionCancelRequestedEventAttributes -> 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 @"externalInitiatedEventId") WorkflowExecutionCancelRequestedEventAttributes
_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
16)
                         ((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 WorkflowExecution)
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> WorkflowExecutionCancelRequestedEventAttributes
-> 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'externalWorkflowExecution") WorkflowExecutionCancelRequestedEventAttributes
_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
26)
                             ((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
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  Text
  Text
-> WorkflowExecutionCancelRequestedEventAttributes -> 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 @"identity") WorkflowExecutionCancelRequestedEventAttributes
_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))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionCancelRequestedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionCancelRequestedEventAttributes
  WorkflowExecutionCancelRequestedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionCancelRequestedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionCancelRequestedEventAttributes
_x)))))
instance Control.DeepSeq.NFData WorkflowExecutionCancelRequestedEventAttributes where
  rnf :: WorkflowExecutionCancelRequestedEventAttributes -> ()
rnf
    = \ WorkflowExecutionCancelRequestedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionCancelRequestedEventAttributes -> FieldSet
_WorkflowExecutionCancelRequestedEventAttributes'_unknownFields
                WorkflowExecutionCancelRequestedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionCancelRequestedEventAttributes -> Text
_WorkflowExecutionCancelRequestedEventAttributes'cause WorkflowExecutionCancelRequestedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionCancelRequestedEventAttributes -> Int64
_WorkflowExecutionCancelRequestedEventAttributes'externalInitiatedEventId
                      WorkflowExecutionCancelRequestedEventAttributes
x__)
                   (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionCancelRequestedEventAttributes
-> Maybe WorkflowExecution
_WorkflowExecutionCancelRequestedEventAttributes'externalWorkflowExecution
                         WorkflowExecutionCancelRequestedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionCancelRequestedEventAttributes -> Text
_WorkflowExecutionCancelRequestedEventAttributes'identity WorkflowExecutionCancelRequestedEventAttributes
x__)
                         ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' WorkflowExecutionCanceledEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.details' @:: Lens' WorkflowExecutionCanceledEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'details' @:: Lens' WorkflowExecutionCanceledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@ -}
data WorkflowExecutionCanceledEventAttributes
  = WorkflowExecutionCanceledEventAttributes'_constructor {WorkflowExecutionCanceledEventAttributes -> Int64
_WorkflowExecutionCanceledEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                           WorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_WorkflowExecutionCanceledEventAttributes'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                           WorkflowExecutionCanceledEventAttributes -> FieldSet
_WorkflowExecutionCanceledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
(WorkflowExecutionCanceledEventAttributes
 -> WorkflowExecutionCanceledEventAttributes -> Bool)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes -> Bool)
-> Eq WorkflowExecutionCanceledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
== :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
$c/= :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
/= :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionCanceledEventAttributes
Eq WorkflowExecutionCanceledEventAttributes =>
(WorkflowExecutionCanceledEventAttributes
 -> WorkflowExecutionCanceledEventAttributes -> Ordering)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes -> Bool)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes -> Bool)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes -> Bool)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes -> Bool)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes)
-> (WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes
    -> WorkflowExecutionCanceledEventAttributes)
-> Ord WorkflowExecutionCanceledEventAttributes
WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Ordering
WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
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 :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Ordering
compare :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Ordering
$c< :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
< :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
$c<= :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
<= :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
$c> :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
> :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
$c>= :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
>= :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes -> Bool
$cmax :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
max :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
$cmin :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
min :: WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
-> WorkflowExecutionCanceledEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionCanceledEventAttributes where
  showsPrec :: Int -> WorkflowExecutionCanceledEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionCanceledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionCanceledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionCanceledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionCanceledEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionCanceledEventAttributes
-> f WorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionCanceledEventAttributes
 -> f WorkflowExecutionCanceledEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionCanceledEventAttributes
-> f WorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCanceledEventAttributes -> Int64)
-> (WorkflowExecutionCanceledEventAttributes
    -> Int64 -> WorkflowExecutionCanceledEventAttributes)
-> Lens
     WorkflowExecutionCanceledEventAttributes
     WorkflowExecutionCanceledEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCanceledEventAttributes -> Int64
_WorkflowExecutionCanceledEventAttributes'workflowTaskCompletedEventId
           (\ WorkflowExecutionCanceledEventAttributes
x__ Int64
y__
              -> WorkflowExecutionCanceledEventAttributes
x__
                   {_WorkflowExecutionCanceledEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionCanceledEventAttributes "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> WorkflowExecutionCanceledEventAttributes
-> f WorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionCanceledEventAttributes
 -> f WorkflowExecutionCanceledEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionCanceledEventAttributes
-> f WorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCanceledEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionCanceledEventAttributes
    -> Maybe Payloads -> WorkflowExecutionCanceledEventAttributes)
-> Lens
     WorkflowExecutionCanceledEventAttributes
     WorkflowExecutionCanceledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_WorkflowExecutionCanceledEventAttributes'details
           (\ WorkflowExecutionCanceledEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionCanceledEventAttributes
x__ {_WorkflowExecutionCanceledEventAttributes'details = 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 WorkflowExecutionCanceledEventAttributes "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionCanceledEventAttributes
-> f WorkflowExecutionCanceledEventAttributes
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionCanceledEventAttributes
 -> f WorkflowExecutionCanceledEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionCanceledEventAttributes
-> f WorkflowExecutionCanceledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCanceledEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionCanceledEventAttributes
    -> Maybe Payloads -> WorkflowExecutionCanceledEventAttributes)
-> Lens
     WorkflowExecutionCanceledEventAttributes
     WorkflowExecutionCanceledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_WorkflowExecutionCanceledEventAttributes'details
           (\ WorkflowExecutionCanceledEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionCanceledEventAttributes
x__ {_WorkflowExecutionCanceledEventAttributes'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionCanceledEventAttributes where
  messageName :: Proxy WorkflowExecutionCanceledEventAttributes -> Text
messageName Proxy WorkflowExecutionCanceledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionCanceledEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionCanceledEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionCanceledEventAttributes
_
    = ByteString
"\n\
      \(WorkflowExecutionCanceledEventAttributes\DC2F\n\
      \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2:\n\
      \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails"
  packedFileDescriptor :: Proxy WorkflowExecutionCanceledEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionCanceledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionCanceledEventAttributes)
fieldsByTag
    = let
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionCanceledEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionCanceledEventAttributes Int64
-> FieldDescriptor WorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     WorkflowExecutionCanceledEventAttributes
     WorkflowExecutionCanceledEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowExecutionCanceledEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCanceledEventAttributes
        details__field_descriptor :: FieldDescriptor WorkflowExecutionCanceledEventAttributes
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor WorkflowExecutionCanceledEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionCanceledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  WorkflowExecutionCanceledEventAttributes
  WorkflowExecutionCanceledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor WorkflowExecutionCanceledEventAttributes 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'details")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCanceledEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionCanceledEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowExecutionCanceledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, 
            FieldDescriptor WorkflowExecutionCanceledEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionCanceledEventAttributes
details__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionCanceledEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionCanceledEventAttributes -> FieldSet)
-> (WorkflowExecutionCanceledEventAttributes
    -> FieldSet -> WorkflowExecutionCanceledEventAttributes)
-> Lens' WorkflowExecutionCanceledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionCanceledEventAttributes -> FieldSet
_WorkflowExecutionCanceledEventAttributes'_unknownFields
        (\ WorkflowExecutionCanceledEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionCanceledEventAttributes
x__
                {_WorkflowExecutionCanceledEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionCanceledEventAttributes
defMessage
    = WorkflowExecutionCanceledEventAttributes'_constructor
        {_WorkflowExecutionCanceledEventAttributes'workflowTaskCompletedEventId :: Int64
_WorkflowExecutionCanceledEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionCanceledEventAttributes'details :: Maybe Payloads
_WorkflowExecutionCanceledEventAttributes'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionCanceledEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionCanceledEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionCanceledEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionCanceledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionCanceledEventAttributes
        loop :: WorkflowExecutionCanceledEventAttributes
-> Parser WorkflowExecutionCanceledEventAttributes
loop WorkflowExecutionCanceledEventAttributes
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 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
18
                          -> 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
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") 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 WorkflowExecutionCanceledEventAttributes
-> String -> Parser WorkflowExecutionCanceledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionCanceledEventAttributes
-> Parser WorkflowExecutionCanceledEventAttributes
loop WorkflowExecutionCanceledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionCanceledEventAttributes"
  buildMessage :: WorkflowExecutionCanceledEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionCanceledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  WorkflowExecutionCanceledEventAttributes
  WorkflowExecutionCanceledEventAttributes
  Int64
  Int64
-> WorkflowExecutionCanceledEventAttributes -> 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 @"workflowTaskCompletedEventId") WorkflowExecutionCanceledEventAttributes
_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
8)
                      ((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 Payloads)
  WorkflowExecutionCanceledEventAttributes
  WorkflowExecutionCanceledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionCanceledEventAttributes -> 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'details") WorkflowExecutionCanceledEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  WorkflowExecutionCanceledEventAttributes
  WorkflowExecutionCanceledEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionCanceledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionCanceledEventAttributes
  WorkflowExecutionCanceledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionCanceledEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionCanceledEventAttributes
_x)))
instance Control.DeepSeq.NFData WorkflowExecutionCanceledEventAttributes where
  rnf :: WorkflowExecutionCanceledEventAttributes -> ()
rnf
    = \ WorkflowExecutionCanceledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionCanceledEventAttributes -> FieldSet
_WorkflowExecutionCanceledEventAttributes'_unknownFields WorkflowExecutionCanceledEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionCanceledEventAttributes -> Int64
_WorkflowExecutionCanceledEventAttributes'workflowTaskCompletedEventId
                   WorkflowExecutionCanceledEventAttributes
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionCanceledEventAttributes -> Maybe Payloads
_WorkflowExecutionCanceledEventAttributes'details WorkflowExecutionCanceledEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.result' @:: Lens' WorkflowExecutionCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'result' @:: Lens' WorkflowExecutionCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' WorkflowExecutionCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newExecutionRunId' @:: Lens' WorkflowExecutionCompletedEventAttributes Data.Text.Text@ -}
data WorkflowExecutionCompletedEventAttributes
  = WorkflowExecutionCompletedEventAttributes'_constructor {WorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_WorkflowExecutionCompletedEventAttributes'result :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                            WorkflowExecutionCompletedEventAttributes -> Int64
_WorkflowExecutionCompletedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                            WorkflowExecutionCompletedEventAttributes -> Text
_WorkflowExecutionCompletedEventAttributes'newExecutionRunId :: !Data.Text.Text,
                                                            WorkflowExecutionCompletedEventAttributes -> FieldSet
_WorkflowExecutionCompletedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
(WorkflowExecutionCompletedEventAttributes
 -> WorkflowExecutionCompletedEventAttributes -> Bool)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes -> Bool)
-> Eq WorkflowExecutionCompletedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
== :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
$c/= :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
/= :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionCompletedEventAttributes
Eq WorkflowExecutionCompletedEventAttributes =>
(WorkflowExecutionCompletedEventAttributes
 -> WorkflowExecutionCompletedEventAttributes -> Ordering)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes -> Bool)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes -> Bool)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes -> Bool)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes -> Bool)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes)
-> (WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes
    -> WorkflowExecutionCompletedEventAttributes)
-> Ord WorkflowExecutionCompletedEventAttributes
WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Ordering
WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
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 :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Ordering
compare :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Ordering
$c< :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
< :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
$c<= :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
<= :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
$c> :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
> :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
$c>= :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
>= :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes -> Bool
$cmax :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
max :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
$cmin :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
min :: WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
-> WorkflowExecutionCompletedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionCompletedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionCompletedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionCompletedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionCompletedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionCompletedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionCompletedEventAttributes "result" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "result"
-> (Payloads -> f Payloads)
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionCompletedEventAttributes
 -> f WorkflowExecutionCompletedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCompletedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionCompletedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionCompletedEventAttributes)
-> Lens
     WorkflowExecutionCompletedEventAttributes
     WorkflowExecutionCompletedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_WorkflowExecutionCompletedEventAttributes'result
           (\ WorkflowExecutionCompletedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionCompletedEventAttributes
x__ {_WorkflowExecutionCompletedEventAttributes'result = 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 WorkflowExecutionCompletedEventAttributes "maybe'result" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'result"
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "maybe'result"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionCompletedEventAttributes
 -> f WorkflowExecutionCompletedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCompletedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionCompletedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionCompletedEventAttributes)
-> Lens
     WorkflowExecutionCompletedEventAttributes
     WorkflowExecutionCompletedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_WorkflowExecutionCompletedEventAttributes'result
           (\ WorkflowExecutionCompletedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionCompletedEventAttributes
x__ {_WorkflowExecutionCompletedEventAttributes'result = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionCompletedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionCompletedEventAttributes
 -> f WorkflowExecutionCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCompletedEventAttributes -> Int64)
-> (WorkflowExecutionCompletedEventAttributes
    -> Int64 -> WorkflowExecutionCompletedEventAttributes)
-> Lens
     WorkflowExecutionCompletedEventAttributes
     WorkflowExecutionCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCompletedEventAttributes -> Int64
_WorkflowExecutionCompletedEventAttributes'workflowTaskCompletedEventId
           (\ WorkflowExecutionCompletedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionCompletedEventAttributes
x__
                   {_WorkflowExecutionCompletedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionCompletedEventAttributes "newExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
fieldOf Proxy# "newExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionCompletedEventAttributes
 -> f WorkflowExecutionCompletedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionCompletedEventAttributes
-> f WorkflowExecutionCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionCompletedEventAttributes -> Text)
-> (WorkflowExecutionCompletedEventAttributes
    -> Text -> WorkflowExecutionCompletedEventAttributes)
-> Lens
     WorkflowExecutionCompletedEventAttributes
     WorkflowExecutionCompletedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionCompletedEventAttributes -> Text
_WorkflowExecutionCompletedEventAttributes'newExecutionRunId
           (\ WorkflowExecutionCompletedEventAttributes
x__ Text
y__
              -> WorkflowExecutionCompletedEventAttributes
x__
                   {_WorkflowExecutionCompletedEventAttributes'newExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionCompletedEventAttributes where
  messageName :: Proxy WorkflowExecutionCompletedEventAttributes -> Text
messageName Proxy WorkflowExecutionCompletedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionCompletedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionCompletedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionCompletedEventAttributes
_
    = ByteString
"\n\
      \)WorkflowExecutionCompletedEventAttributes\DC28\n\
      \\ACKresult\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2F\n\
      \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2/\n\
      \\DC4new_execution_run_id\CAN\ETX \SOH(\tR\DC1newExecutionRunId"
  packedFileDescriptor :: Proxy WorkflowExecutionCompletedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionCompletedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionCompletedEventAttributes)
fieldsByTag
    = let
        result__field_descriptor :: FieldDescriptor WorkflowExecutionCompletedEventAttributes
result__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor WorkflowExecutionCompletedEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"result"
              (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
  WorkflowExecutionCompletedEventAttributes
  WorkflowExecutionCompletedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor WorkflowExecutionCompletedEventAttributes 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'result")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCompletedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionCompletedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionCompletedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     WorkflowExecutionCompletedEventAttributes
     WorkflowExecutionCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowExecutionCompletedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCompletedEventAttributes
        newExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionCompletedEventAttributes
newExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionCompletedEventAttributes Text
-> FieldDescriptor WorkflowExecutionCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_execution_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
     WorkflowExecutionCompletedEventAttributes
     WorkflowExecutionCompletedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionCompletedEventAttributes 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 @"newExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionCompletedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionCompletedEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowExecutionCompletedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionCompletedEventAttributes
result__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, 
            FieldDescriptor WorkflowExecutionCompletedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionCompletedEventAttributes
newExecutionRunId__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionCompletedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionCompletedEventAttributes -> FieldSet)
-> (WorkflowExecutionCompletedEventAttributes
    -> FieldSet -> WorkflowExecutionCompletedEventAttributes)
-> Lens' WorkflowExecutionCompletedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionCompletedEventAttributes -> FieldSet
_WorkflowExecutionCompletedEventAttributes'_unknownFields
        (\ WorkflowExecutionCompletedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionCompletedEventAttributes
x__
                {_WorkflowExecutionCompletedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionCompletedEventAttributes
defMessage
    = WorkflowExecutionCompletedEventAttributes'_constructor
        {_WorkflowExecutionCompletedEventAttributes'result :: Maybe Payloads
_WorkflowExecutionCompletedEventAttributes'result = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionCompletedEventAttributes'workflowTaskCompletedEventId :: Int64
_WorkflowExecutionCompletedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionCompletedEventAttributes'newExecutionRunId :: Text
_WorkflowExecutionCompletedEventAttributes'newExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionCompletedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionCompletedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionCompletedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionCompletedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionCompletedEventAttributes
        loop :: WorkflowExecutionCompletedEventAttributes
-> Parser WorkflowExecutionCompletedEventAttributes
loop WorkflowExecutionCompletedEventAttributes
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 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
"result"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"result") y x)
                        Word64
16
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"new_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newExecutionRunId") 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 WorkflowExecutionCompletedEventAttributes
-> String -> Parser WorkflowExecutionCompletedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionCompletedEventAttributes
-> Parser WorkflowExecutionCompletedEventAttributes
loop WorkflowExecutionCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionCompletedEventAttributes"
  buildMessage :: WorkflowExecutionCompletedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionCompletedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Payloads)
  WorkflowExecutionCompletedEventAttributes
  WorkflowExecutionCompletedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionCompletedEventAttributes -> 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'result") WorkflowExecutionCompletedEventAttributes
_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
10)
                       ((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.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike
  Int64
  WorkflowExecutionCompletedEventAttributes
  WorkflowExecutionCompletedEventAttributes
  Int64
  Int64
-> WorkflowExecutionCompletedEventAttributes -> 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 @"workflowTaskCompletedEventId") WorkflowExecutionCompletedEventAttributes
_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
16)
                         ((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
  WorkflowExecutionCompletedEventAttributes
  WorkflowExecutionCompletedEventAttributes
  Text
  Text
-> WorkflowExecutionCompletedEventAttributes -> 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 @"newExecutionRunId") WorkflowExecutionCompletedEventAttributes
_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))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  WorkflowExecutionCompletedEventAttributes
  WorkflowExecutionCompletedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionCompletedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionCompletedEventAttributes
  WorkflowExecutionCompletedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionCompletedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionCompletedEventAttributes
_x))))
instance Control.DeepSeq.NFData WorkflowExecutionCompletedEventAttributes where
  rnf :: WorkflowExecutionCompletedEventAttributes -> ()
rnf
    = \ WorkflowExecutionCompletedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionCompletedEventAttributes -> FieldSet
_WorkflowExecutionCompletedEventAttributes'_unknownFields WorkflowExecutionCompletedEventAttributes
x__)
             (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionCompletedEventAttributes -> Maybe Payloads
_WorkflowExecutionCompletedEventAttributes'result WorkflowExecutionCompletedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionCompletedEventAttributes -> Int64
_WorkflowExecutionCompletedEventAttributes'workflowTaskCompletedEventId
                      WorkflowExecutionCompletedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionCompletedEventAttributes -> Text
_WorkflowExecutionCompletedEventAttributes'newExecutionRunId WorkflowExecutionCompletedEventAttributes
x__)
                      ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newExecutionRunId' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.taskQueue' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'taskQueue' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowRunTimeout' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowRunTimeout' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskTimeout' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskTimeout' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.backoffStartInterval' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'backoffStartInterval' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiator' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.lastCompletionResult' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'lastCompletionResult' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.memo' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'memo' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.searchAttributes' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'searchAttributes' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.inheritBuildId' @:: Lens' WorkflowExecutionContinuedAsNewEventAttributes Prelude.Bool@ -}
data WorkflowExecutionContinuedAsNewEventAttributes
  = WorkflowExecutionContinuedAsNewEventAttributes'_constructor {WorkflowExecutionContinuedAsNewEventAttributes -> Text
_WorkflowExecutionContinuedAsNewEventAttributes'newExecutionRunId :: !Data.Text.Text,
                                                                 WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowType
_WorkflowExecutionContinuedAsNewEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe TaskQueue
_WorkflowExecutionContinuedAsNewEventAttributes'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Int64
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes
-> ContinueAsNewInitiator
_WorkflowExecutionContinuedAsNewEventAttributes'initiator :: !Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator,
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Failure
_WorkflowExecutionContinuedAsNewEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Header
_WorkflowExecutionContinuedAsNewEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Memo
_WorkflowExecutionContinuedAsNewEventAttributes'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe SearchAttributes
_WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> Bool
_WorkflowExecutionContinuedAsNewEventAttributes'inheritBuildId :: !Prelude.Bool,
                                                                 WorkflowExecutionContinuedAsNewEventAttributes -> FieldSet
_WorkflowExecutionContinuedAsNewEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
(WorkflowExecutionContinuedAsNewEventAttributes
 -> WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> Eq WorkflowExecutionContinuedAsNewEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
== :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
$c/= :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
/= :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionContinuedAsNewEventAttributes
Eq WorkflowExecutionContinuedAsNewEventAttributes =>
(WorkflowExecutionContinuedAsNewEventAttributes
 -> WorkflowExecutionContinuedAsNewEventAttributes -> Ordering)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Ord WorkflowExecutionContinuedAsNewEventAttributes
WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Ordering
WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
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 :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Ordering
compare :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Ordering
$c< :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
< :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
$c<= :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
<= :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
$c> :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
> :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
$c>= :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
>= :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes -> Bool
$cmax :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
max :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
$cmin :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
min :: WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
-> WorkflowExecutionContinuedAsNewEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionContinuedAsNewEventAttributes where
  showsPrec :: Int -> WorkflowExecutionContinuedAsNewEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionContinuedAsNewEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionContinuedAsNewEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionContinuedAsNewEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "newExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "newExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Text)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Text -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Text
_WorkflowExecutionContinuedAsNewEventAttributes'newExecutionRunId
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Text
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'newExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes
 -> Maybe WorkflowType)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe WorkflowType
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowType
_WorkflowExecutionContinuedAsNewEventAttributes'workflowType
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe WorkflowType
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "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))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes
 -> Maybe WorkflowType)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe WorkflowType
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowType
_WorkflowExecutionContinuedAsNewEventAttributes'workflowType
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe WorkflowType
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe TaskQueue)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe TaskQueue
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe TaskQueue
_WorkflowExecutionContinuedAsNewEventAttributes'taskQueue
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe TaskQueue
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "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))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe TaskQueue)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe TaskQueue
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe TaskQueue
_WorkflowExecutionContinuedAsNewEventAttributes'taskQueue
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe TaskQueue
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Payloads
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'input
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "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))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Payloads
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'input
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Duration
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Duration
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Duration
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Duration
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Int64)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Int64 -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Int64
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskCompletedEventId
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Int64
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "backoffStartInterval" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "backoffStartInterval"
-> (Duration -> f Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "backoffStartInterval"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Duration
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval = 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 WorkflowExecutionContinuedAsNewEventAttributes "maybe'backoffStartInterval" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'backoffStartInterval"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'backoffStartInterval"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Duration
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "initiator" Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiator"
-> (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "initiator"
_
    = ((ContinueAsNewInitiator -> f ContinueAsNewInitiator)
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((ContinueAsNewInitiator -> f ContinueAsNewInitiator)
    -> ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes
 -> ContinueAsNewInitiator)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> ContinueAsNewInitiator
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     ContinueAsNewInitiator
     ContinueAsNewInitiator
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes
-> ContinueAsNewInitiator
_WorkflowExecutionContinuedAsNewEventAttributes'initiator
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ ContinueAsNewInitiator
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'initiator = y__}))
        (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> ContinueAsNewInitiator -> f ContinueAsNewInitiator
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Failure)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Failure -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Failure
_WorkflowExecutionContinuedAsNewEventAttributes'failure
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'failure = 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 WorkflowExecutionContinuedAsNewEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Failure)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Failure -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Failure
_WorkflowExecutionContinuedAsNewEventAttributes'failure
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "lastCompletionResult" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastCompletionResult"
-> (Payloads -> f Payloads)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Payloads
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult = 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 WorkflowExecutionContinuedAsNewEventAttributes "maybe'lastCompletionResult" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastCompletionResult"
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Payloads
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Header)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Header -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Header
_WorkflowExecutionContinuedAsNewEventAttributes'header
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Header
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "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))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Header)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Header -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Header
_WorkflowExecutionContinuedAsNewEventAttributes'header
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Header
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Memo)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Memo -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Memo
_WorkflowExecutionContinuedAsNewEventAttributes'memo
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Memo
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "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))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Memo)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe Memo -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Memo
_WorkflowExecutionContinuedAsNewEventAttributes'memo
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe Memo
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes
 -> Maybe SearchAttributes)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe SearchAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe SearchAttributes
_WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe SearchAttributes
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'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 WorkflowExecutionContinuedAsNewEventAttributes "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))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes
 -> Maybe SearchAttributes)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Maybe SearchAttributes
    -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe SearchAttributes
_WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Maybe SearchAttributes
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionContinuedAsNewEventAttributes "inheritBuildId" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "inheritBuildId"
-> (Bool -> f Bool)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
fieldOf Proxy# "inheritBuildId"
_
    = ((Bool -> f Bool)
 -> WorkflowExecutionContinuedAsNewEventAttributes
 -> f WorkflowExecutionContinuedAsNewEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> f WorkflowExecutionContinuedAsNewEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionContinuedAsNewEventAttributes -> Bool)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> Bool -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionContinuedAsNewEventAttributes -> Bool
_WorkflowExecutionContinuedAsNewEventAttributes'inheritBuildId
           (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ Bool
y__
              -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                   {_WorkflowExecutionContinuedAsNewEventAttributes'inheritBuildId = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionContinuedAsNewEventAttributes where
  messageName :: Proxy WorkflowExecutionContinuedAsNewEventAttributes -> Text
messageName Proxy WorkflowExecutionContinuedAsNewEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionContinuedAsNewEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionContinuedAsNewEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionContinuedAsNewEventAttributes
_
    = ByteString
"\n\
      \.WorkflowExecutionContinuedAsNewEventAttributes\DC2/\n\
      \\DC4new_execution_run_id\CAN\SOH \SOH(\tR\DC1newExecutionRunId\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\DC2K\n\
      \\DC4workflow_run_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2F\n\
      \ workflow_task_completed_event_id\CAN\a \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2O\n\
      \\SYNbackoff_start_interval\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC4backoffStartInterval\DC2K\n\
      \\tinitiator\CAN\t \SOH(\SO2-.temporal.api.enums.v1.ContinueAsNewInitiatorR\tinitiator\DC2:\n\
      \\afailure\CAN\n\
      \ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2V\n\
      \\SYNlast_completion_result\CAN\v \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC26\n\
      \\ACKheader\CAN\f \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC20\n\
      \\EOTmemo\CAN\r \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\SO \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2(\n\
      \\DLEinherit_build_id\CAN\SI \SOH(\bR\SOinheritBuildId"
  packedFileDescriptor :: Proxy WorkflowExecutionContinuedAsNewEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionContinuedAsNewEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes)
fieldsByTag
    = let
        newExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
newExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Text
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_execution_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
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 @"newExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
        workflowType__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes WorkflowType
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        taskQueue__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes TaskQueue
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        input__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        workflowRunTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Duration
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        workflowTaskTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Duration
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Int64
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     Int64
     Int64
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
        backoffStartInterval__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
backoffStartInterval__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Duration
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"backoff_start_interval"
              (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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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'backoffStartInterval")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
        initiator__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
initiator__field_descriptor
          = String
-> FieldTypeDescriptor ContinueAsNewInitiator
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes
     ContinueAsNewInitiator
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiator"
              (ScalarField ContinueAsNewInitiator
-> FieldTypeDescriptor ContinueAsNewInitiator
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ContinueAsNewInitiator
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator)
              (WireDefault ContinueAsNewInitiator
-> Lens
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     ContinueAsNewInitiator
     ContinueAsNewInitiator
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes
     ContinueAsNewInitiator
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ContinueAsNewInitiator
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 @"initiator")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
        failure__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Failure
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
        lastCompletionResult__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
lastCompletionResult__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"last_completion_result"
              (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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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'lastCompletionResult")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
        header__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Header
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        memo__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Memo
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        searchAttributes__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes SearchAttributes
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 WorkflowExecutionContinuedAsNewEventAttributes
        inheritBuildId__field_descriptor :: FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
inheritBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes Bool
-> FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"inherit_build_id"
              (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
     WorkflowExecutionContinuedAsNewEventAttributes
     WorkflowExecutionContinuedAsNewEventAttributes
     Bool
     Bool
-> FieldAccessor
     WorkflowExecutionContinuedAsNewEventAttributes 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 @"inheritBuildId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
      in
        [(Tag,
  FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes)]
-> Map
     Tag
     (FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
newExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, 
            FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
backoffStartInterval__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
initiator__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
lastCompletionResult__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor WorkflowExecutionContinuedAsNewEventAttributes
inheritBuildId__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionContinuedAsNewEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionContinuedAsNewEventAttributes -> FieldSet)
-> (WorkflowExecutionContinuedAsNewEventAttributes
    -> FieldSet -> WorkflowExecutionContinuedAsNewEventAttributes)
-> Lens' WorkflowExecutionContinuedAsNewEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionContinuedAsNewEventAttributes -> FieldSet
_WorkflowExecutionContinuedAsNewEventAttributes'_unknownFields
        (\ WorkflowExecutionContinuedAsNewEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionContinuedAsNewEventAttributes
x__
                {_WorkflowExecutionContinuedAsNewEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionContinuedAsNewEventAttributes
defMessage
    = WorkflowExecutionContinuedAsNewEventAttributes'_constructor
        {_WorkflowExecutionContinuedAsNewEventAttributes'newExecutionRunId :: Text
_WorkflowExecutionContinuedAsNewEventAttributes'newExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionContinuedAsNewEventAttributes'workflowType :: Maybe WorkflowType
_WorkflowExecutionContinuedAsNewEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'taskQueue :: Maybe TaskQueue
_WorkflowExecutionContinuedAsNewEventAttributes'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'input :: Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout :: Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout :: Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskCompletedEventId :: Int64
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval :: Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'initiator :: ContinueAsNewInitiator
_WorkflowExecutionContinuedAsNewEventAttributes'initiator = ContinueAsNewInitiator
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionContinuedAsNewEventAttributes'failure :: Maybe Failure
_WorkflowExecutionContinuedAsNewEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult :: Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'header :: Maybe Header
_WorkflowExecutionContinuedAsNewEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'memo :: Maybe Memo
_WorkflowExecutionContinuedAsNewEventAttributes'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes :: Maybe SearchAttributes
_WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionContinuedAsNewEventAttributes'inheritBuildId :: Bool
_WorkflowExecutionContinuedAsNewEventAttributes'inheritBuildId = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionContinuedAsNewEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionContinuedAsNewEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionContinuedAsNewEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionContinuedAsNewEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionContinuedAsNewEventAttributes
        loop :: WorkflowExecutionContinuedAsNewEventAttributes
-> Parser WorkflowExecutionContinuedAsNewEventAttributes
loop WorkflowExecutionContinuedAsNewEventAttributes
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
"new_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newExecutionRunId") 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_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowRunTimeout") 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_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskTimeout") y x)
                        Word64
56
                          -> 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
66
                          -> 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
"backoff_start_interval"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"backoffStartInterval") y x)
                        Word64
72
                          -> do y <- Parser ContinueAsNewInitiator
-> String -> Parser ContinueAsNewInitiator
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ContinueAsNewInitiator)
-> Parser Int -> Parser ContinueAsNewInitiator
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ContinueAsNewInitiator
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
"initiator"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"initiator") 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
90
                          -> 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
"last_completion_result"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"lastCompletionResult") y x)
                        Word64
98
                          -> 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
106
                          -> 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
114
                          -> 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
120
                          -> 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
"inherit_build_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"inheritBuildId") 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 WorkflowExecutionContinuedAsNewEventAttributes
-> String -> Parser WorkflowExecutionContinuedAsNewEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionContinuedAsNewEventAttributes
-> Parser WorkflowExecutionContinuedAsNewEventAttributes
loop WorkflowExecutionContinuedAsNewEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionContinuedAsNewEventAttributes"
  buildMessage :: WorkflowExecutionContinuedAsNewEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionContinuedAsNewEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  Text
  Text
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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 @"newExecutionRunId") WorkflowExecutionContinuedAsNewEventAttributes
_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)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> 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") WorkflowExecutionContinuedAsNewEventAttributes
_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)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> 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") WorkflowExecutionContinuedAsNewEventAttributes
_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)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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") WorkflowExecutionContinuedAsNewEventAttributes
_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)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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") WorkflowExecutionContinuedAsNewEventAttributes
_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)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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") WorkflowExecutionContinuedAsNewEventAttributes
_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.<>)
                               (let
                                  _v :: Int64
_v
                                    = FoldLike
  Int64
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  Int64
  Int64
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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 @"workflowTaskCompletedEventId")
                                        WorkflowExecutionContinuedAsNewEventAttributes
_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
56)
                                        ((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 Duration)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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'backoffStartInterval")
                                         WorkflowExecutionContinuedAsNewEventAttributes
_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
66)
                                            ((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 :: ContinueAsNewInitiator
_v
                                          = FoldLike
  ContinueAsNewInitiator
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  ContinueAsNewInitiator
  ContinueAsNewInitiator
-> WorkflowExecutionContinuedAsNewEventAttributes
-> ContinueAsNewInitiator
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 @"initiator") WorkflowExecutionContinuedAsNewEventAttributes
_x
                                      in
                                        if ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ContinueAsNewInitiator
_v ContinueAsNewInitiator
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
72)
                                              ((Int -> Builder)
-> (ContinueAsNewInitiator -> Int)
-> ContinueAsNewInitiator
-> 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)
                                                 ContinueAsNewInitiator -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ContinueAsNewInitiator
_v))
                                     (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                        (case
                                             FoldLike
  (Maybe Failure)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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'failure") WorkflowExecutionContinuedAsNewEventAttributes
_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 Payloads)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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'lastCompletionResult")
                                                  WorkflowExecutionContinuedAsNewEventAttributes
_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
90)
                                                     ((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 Header)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Header)
  (Maybe Header)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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") WorkflowExecutionContinuedAsNewEventAttributes
_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
98)
                                                        ((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))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (case
                                                      FoldLike
  (Maybe Memo)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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")
                                                        WorkflowExecutionContinuedAsNewEventAttributes
_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
106)
                                                           ((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)
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> WorkflowExecutionContinuedAsNewEventAttributes
-> 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")
                                                           WorkflowExecutionContinuedAsNewEventAttributes
_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
114)
                                                              ((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.<>)
                                                       (let
                                                          _v :: Bool
_v
                                                            = FoldLike
  Bool
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  Bool
  Bool
-> WorkflowExecutionContinuedAsNewEventAttributes -> 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
                                                                   @"inheritBuildId")
                                                                WorkflowExecutionContinuedAsNewEventAttributes
_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
120)
                                                                ((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
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionContinuedAsNewEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                             FoldLike
  FieldSet
  WorkflowExecutionContinuedAsNewEventAttributes
  WorkflowExecutionContinuedAsNewEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionContinuedAsNewEventAttributes FieldSet
Data.ProtoLens.unknownFields
                                                             WorkflowExecutionContinuedAsNewEventAttributes
_x))))))))))))))))
instance Control.DeepSeq.NFData WorkflowExecutionContinuedAsNewEventAttributes where
  rnf :: WorkflowExecutionContinuedAsNewEventAttributes -> ()
rnf
    = \ WorkflowExecutionContinuedAsNewEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionContinuedAsNewEventAttributes -> FieldSet
_WorkflowExecutionContinuedAsNewEventAttributes'_unknownFields
                WorkflowExecutionContinuedAsNewEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionContinuedAsNewEventAttributes -> Text
_WorkflowExecutionContinuedAsNewEventAttributes'newExecutionRunId
                   WorkflowExecutionContinuedAsNewEventAttributes
x__)
                (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe WorkflowType
_WorkflowExecutionContinuedAsNewEventAttributes'workflowType WorkflowExecutionContinuedAsNewEventAttributes
x__)
                   (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe TaskQueue
_WorkflowExecutionContinuedAsNewEventAttributes'taskQueue WorkflowExecutionContinuedAsNewEventAttributes
x__)
                      (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'input WorkflowExecutionContinuedAsNewEventAttributes
x__)
                         (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowRunTimeout
                               WorkflowExecutionContinuedAsNewEventAttributes
x__)
                            (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskTimeout
                                  WorkflowExecutionContinuedAsNewEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (WorkflowExecutionContinuedAsNewEventAttributes -> Int64
_WorkflowExecutionContinuedAsNewEventAttributes'workflowTaskCompletedEventId
                                     WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Duration
_WorkflowExecutionContinuedAsNewEventAttributes'backoffStartInterval
                                        WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                     (ContinueAsNewInitiator -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (WorkflowExecutionContinuedAsNewEventAttributes
-> ContinueAsNewInitiator
_WorkflowExecutionContinuedAsNewEventAttributes'initiator
                                           WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                        (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Failure
_WorkflowExecutionContinuedAsNewEventAttributes'failure
                                              WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                           (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Payloads
_WorkflowExecutionContinuedAsNewEventAttributes'lastCompletionResult
                                                 WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                              (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Header
_WorkflowExecutionContinuedAsNewEventAttributes'header
                                                    WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                                 (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (WorkflowExecutionContinuedAsNewEventAttributes -> Maybe Memo
_WorkflowExecutionContinuedAsNewEventAttributes'memo
                                                       WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                                    (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (WorkflowExecutionContinuedAsNewEventAttributes
-> Maybe SearchAttributes
_WorkflowExecutionContinuedAsNewEventAttributes'searchAttributes
                                                          WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                                       (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (WorkflowExecutionContinuedAsNewEventAttributes -> Bool
_WorkflowExecutionContinuedAsNewEventAttributes'inheritBuildId
                                                             WorkflowExecutionContinuedAsNewEventAttributes
x__)
                                                          ())))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' WorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' WorkflowExecutionFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryState' @:: Lens' WorkflowExecutionFailedEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.RetryState@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' WorkflowExecutionFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newExecutionRunId' @:: Lens' WorkflowExecutionFailedEventAttributes Data.Text.Text@ -}
data WorkflowExecutionFailedEventAttributes
  = WorkflowExecutionFailedEventAttributes'_constructor {WorkflowExecutionFailedEventAttributes -> Maybe Failure
_WorkflowExecutionFailedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                         WorkflowExecutionFailedEventAttributes -> RetryState
_WorkflowExecutionFailedEventAttributes'retryState :: !Proto.Temporal.Api.Enums.V1.Workflow.RetryState,
                                                         WorkflowExecutionFailedEventAttributes -> Int64
_WorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                         WorkflowExecutionFailedEventAttributes -> Text
_WorkflowExecutionFailedEventAttributes'newExecutionRunId :: !Data.Text.Text,
                                                         WorkflowExecutionFailedEventAttributes -> FieldSet
_WorkflowExecutionFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
(WorkflowExecutionFailedEventAttributes
 -> WorkflowExecutionFailedEventAttributes -> Bool)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes -> Bool)
-> Eq WorkflowExecutionFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
== :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
$c/= :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
/= :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionFailedEventAttributes
Eq WorkflowExecutionFailedEventAttributes =>
(WorkflowExecutionFailedEventAttributes
 -> WorkflowExecutionFailedEventAttributes -> Ordering)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes -> Bool)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes -> Bool)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes -> Bool)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes -> Bool)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes)
-> (WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes
    -> WorkflowExecutionFailedEventAttributes)
-> Ord WorkflowExecutionFailedEventAttributes
WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Ordering
WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
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 :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Ordering
compare :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Ordering
$c< :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
< :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
$c<= :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
<= :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
$c> :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
> :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
$c>= :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
>= :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes -> Bool
$cmax :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
max :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
$cmin :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
min :: WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
-> WorkflowExecutionFailedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionFailedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionFailedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionFailedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionFailedEventAttributes
 -> f WorkflowExecutionFailedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionFailedEventAttributes -> Maybe Failure)
-> (WorkflowExecutionFailedEventAttributes
    -> Maybe Failure -> WorkflowExecutionFailedEventAttributes)
-> Lens
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionFailedEventAttributes -> Maybe Failure
_WorkflowExecutionFailedEventAttributes'failure
           (\ WorkflowExecutionFailedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionFailedEventAttributes
x__ {_WorkflowExecutionFailedEventAttributes'failure = 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 WorkflowExecutionFailedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionFailedEventAttributes
 -> f WorkflowExecutionFailedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionFailedEventAttributes -> Maybe Failure)
-> (WorkflowExecutionFailedEventAttributes
    -> Maybe Failure -> WorkflowExecutionFailedEventAttributes)
-> Lens
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionFailedEventAttributes -> Maybe Failure
_WorkflowExecutionFailedEventAttributes'failure
           (\ WorkflowExecutionFailedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionFailedEventAttributes
x__ {_WorkflowExecutionFailedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionFailedEventAttributes "retryState" Proto.Temporal.Api.Enums.V1.Workflow.RetryState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryState"
-> (RetryState -> f RetryState)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
fieldOf Proxy# "retryState"
_
    = ((RetryState -> f RetryState)
 -> WorkflowExecutionFailedEventAttributes
 -> f WorkflowExecutionFailedEventAttributes)
-> ((RetryState -> f RetryState) -> RetryState -> f RetryState)
-> (RetryState -> f RetryState)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionFailedEventAttributes -> RetryState)
-> (WorkflowExecutionFailedEventAttributes
    -> RetryState -> WorkflowExecutionFailedEventAttributes)
-> Lens
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     RetryState
     RetryState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionFailedEventAttributes -> RetryState
_WorkflowExecutionFailedEventAttributes'retryState
           (\ WorkflowExecutionFailedEventAttributes
x__ RetryState
y__
              -> WorkflowExecutionFailedEventAttributes
x__ {_WorkflowExecutionFailedEventAttributes'retryState = y__}))
        (RetryState -> f RetryState) -> RetryState -> f RetryState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionFailedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionFailedEventAttributes
 -> f WorkflowExecutionFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionFailedEventAttributes -> Int64)
-> (WorkflowExecutionFailedEventAttributes
    -> Int64 -> WorkflowExecutionFailedEventAttributes)
-> Lens
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionFailedEventAttributes -> Int64
_WorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
           (\ WorkflowExecutionFailedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionFailedEventAttributes
x__
                   {_WorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionFailedEventAttributes "newExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
fieldOf Proxy# "newExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionFailedEventAttributes
 -> f WorkflowExecutionFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionFailedEventAttributes
-> f WorkflowExecutionFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionFailedEventAttributes -> Text)
-> (WorkflowExecutionFailedEventAttributes
    -> Text -> WorkflowExecutionFailedEventAttributes)
-> Lens
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionFailedEventAttributes -> Text
_WorkflowExecutionFailedEventAttributes'newExecutionRunId
           (\ WorkflowExecutionFailedEventAttributes
x__ Text
y__
              -> WorkflowExecutionFailedEventAttributes
x__
                   {_WorkflowExecutionFailedEventAttributes'newExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionFailedEventAttributes where
  messageName :: Proxy WorkflowExecutionFailedEventAttributes -> Text
messageName Proxy WorkflowExecutionFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionFailedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionFailedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionFailedEventAttributes
_
    = ByteString
"\n\
      \&WorkflowExecutionFailedEventAttributes\DC2:\n\
      \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2B\n\
      \\vretry_state\CAN\STX \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
      \retryState\DC2F\n\
      \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2/\n\
      \\DC4new_execution_run_id\CAN\EOT \SOH(\tR\DC1newExecutionRunId"
  packedFileDescriptor :: Proxy WorkflowExecutionFailedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionFailedEventAttributes)
fieldsByTag
    = let
        failure__field_descriptor :: FieldDescriptor WorkflowExecutionFailedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor WorkflowExecutionFailedEventAttributes Failure
-> FieldDescriptor WorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor WorkflowExecutionFailedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionFailedEventAttributes
        retryState__field_descriptor :: FieldDescriptor WorkflowExecutionFailedEventAttributes
retryState__field_descriptor
          = String
-> FieldTypeDescriptor RetryState
-> FieldAccessor WorkflowExecutionFailedEventAttributes RetryState
-> FieldDescriptor WorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"retry_state"
              (ScalarField RetryState -> FieldTypeDescriptor RetryState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RetryState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.RetryState)
              (WireDefault RetryState
-> Lens
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     RetryState
     RetryState
-> FieldAccessor WorkflowExecutionFailedEventAttributes RetryState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RetryState
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 @"retryState")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionFailedEventAttributes
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionFailedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowExecutionFailedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionFailedEventAttributes
        newExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionFailedEventAttributes
newExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionFailedEventAttributes Text
-> FieldDescriptor WorkflowExecutionFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_execution_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
     WorkflowExecutionFailedEventAttributes
     WorkflowExecutionFailedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionFailedEventAttributes 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 @"newExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionFailedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionFailedEventAttributes)]
-> Map Tag (FieldDescriptor WorkflowExecutionFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionFailedEventAttributes
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionFailedEventAttributes
retryState__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor WorkflowExecutionFailedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionFailedEventAttributes
newExecutionRunId__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionFailedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionFailedEventAttributes -> FieldSet)
-> (WorkflowExecutionFailedEventAttributes
    -> FieldSet -> WorkflowExecutionFailedEventAttributes)
-> Lens' WorkflowExecutionFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionFailedEventAttributes -> FieldSet
_WorkflowExecutionFailedEventAttributes'_unknownFields
        (\ WorkflowExecutionFailedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionFailedEventAttributes
x__
                {_WorkflowExecutionFailedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionFailedEventAttributes
defMessage
    = WorkflowExecutionFailedEventAttributes'_constructor
        {_WorkflowExecutionFailedEventAttributes'failure :: Maybe Failure
_WorkflowExecutionFailedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionFailedEventAttributes'retryState :: RetryState
_WorkflowExecutionFailedEventAttributes'retryState = RetryState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId :: Int64
_WorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionFailedEventAttributes'newExecutionRunId :: Text
_WorkflowExecutionFailedEventAttributes'newExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionFailedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionFailedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionFailedEventAttributes
        loop :: WorkflowExecutionFailedEventAttributes
-> Parser WorkflowExecutionFailedEventAttributes
loop WorkflowExecutionFailedEventAttributes
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 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
16
                          -> do y <- Parser RetryState -> String -> Parser RetryState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RetryState) -> Parser Int -> Parser RetryState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RetryState
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
"retry_state"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryState") 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") 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
"new_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newExecutionRunId") 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 WorkflowExecutionFailedEventAttributes
-> String -> Parser WorkflowExecutionFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionFailedEventAttributes
-> Parser WorkflowExecutionFailedEventAttributes
loop WorkflowExecutionFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionFailedEventAttributes"
  buildMessage :: WorkflowExecutionFailedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Failure)
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> WorkflowExecutionFailedEventAttributes -> 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'failure") WorkflowExecutionFailedEventAttributes
_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
10)
                       ((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 :: RetryState
_v
                     = FoldLike
  RetryState
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  RetryState
  RetryState
-> WorkflowExecutionFailedEventAttributes -> RetryState
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 @"retryState") WorkflowExecutionFailedEventAttributes
_x
                 in
                   if RetryState -> RetryState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RetryState
_v RetryState
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) -> (RetryState -> Int) -> RetryState -> 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)
                            RetryState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RetryState
_v))
                (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                   (let
                      _v :: Int64
_v
                        = FoldLike
  Int64
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  Int64
  Int64
-> WorkflowExecutionFailedEventAttributes -> 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 @"workflowTaskCompletedEventId") WorkflowExecutionFailedEventAttributes
_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.<>)
                      (let
                         _v :: Text
_v
                           = FoldLike
  Text
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  Text
  Text
-> WorkflowExecutionFailedEventAttributes -> 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 @"newExecutionRunId") WorkflowExecutionFailedEventAttributes
_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))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionFailedEventAttributes
  WorkflowExecutionFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionFailedEventAttributes
_x)))))
instance Control.DeepSeq.NFData WorkflowExecutionFailedEventAttributes where
  rnf :: WorkflowExecutionFailedEventAttributes -> ()
rnf
    = \ WorkflowExecutionFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionFailedEventAttributes -> FieldSet
_WorkflowExecutionFailedEventAttributes'_unknownFields WorkflowExecutionFailedEventAttributes
x__)
             (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionFailedEventAttributes -> Maybe Failure
_WorkflowExecutionFailedEventAttributes'failure WorkflowExecutionFailedEventAttributes
x__)
                (RetryState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionFailedEventAttributes -> RetryState
_WorkflowExecutionFailedEventAttributes'retryState WorkflowExecutionFailedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionFailedEventAttributes -> Int64
_WorkflowExecutionFailedEventAttributes'workflowTaskCompletedEventId
                         WorkflowExecutionFailedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionFailedEventAttributes -> Text
_WorkflowExecutionFailedEventAttributes'newExecutionRunId WorkflowExecutionFailedEventAttributes
x__)
                         ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.signalName' @:: Lens' WorkflowExecutionSignaledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' WorkflowExecutionSignaledEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' WorkflowExecutionSignaledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowExecutionSignaledEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' WorkflowExecutionSignaledEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' WorkflowExecutionSignaledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.skipGenerateWorkflowTask' @:: Lens' WorkflowExecutionSignaledEventAttributes Prelude.Bool@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.externalWorkflowExecution' @:: Lens' WorkflowExecutionSignaledEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'externalWorkflowExecution' @:: Lens' WorkflowExecutionSignaledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@ -}
data WorkflowExecutionSignaledEventAttributes
  = WorkflowExecutionSignaledEventAttributes'_constructor {WorkflowExecutionSignaledEventAttributes -> Text
_WorkflowExecutionSignaledEventAttributes'signalName :: !Data.Text.Text,
                                                           WorkflowExecutionSignaledEventAttributes -> Maybe Payloads
_WorkflowExecutionSignaledEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                           WorkflowExecutionSignaledEventAttributes -> Text
_WorkflowExecutionSignaledEventAttributes'identity :: !Data.Text.Text,
                                                           WorkflowExecutionSignaledEventAttributes -> Maybe Header
_WorkflowExecutionSignaledEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                           WorkflowExecutionSignaledEventAttributes -> Bool
_WorkflowExecutionSignaledEventAttributes'skipGenerateWorkflowTask :: !Prelude.Bool,
                                                           WorkflowExecutionSignaledEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                           WorkflowExecutionSignaledEventAttributes -> FieldSet
_WorkflowExecutionSignaledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
(WorkflowExecutionSignaledEventAttributes
 -> WorkflowExecutionSignaledEventAttributes -> Bool)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes -> Bool)
-> Eq WorkflowExecutionSignaledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
== :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
$c/= :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
/= :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionSignaledEventAttributes
Eq WorkflowExecutionSignaledEventAttributes =>
(WorkflowExecutionSignaledEventAttributes
 -> WorkflowExecutionSignaledEventAttributes -> Ordering)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes -> Bool)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes -> Bool)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes -> Bool)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes -> Bool)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes)
-> (WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes
    -> WorkflowExecutionSignaledEventAttributes)
-> Ord WorkflowExecutionSignaledEventAttributes
WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Ordering
WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
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 :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Ordering
compare :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Ordering
$c< :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
< :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
$c<= :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
<= :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
$c> :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
> :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
$c>= :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
>= :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes -> Bool
$cmax :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
max :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
$cmin :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
min :: WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
-> WorkflowExecutionSignaledEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionSignaledEventAttributes where
  showsPrec :: Int -> WorkflowExecutionSignaledEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionSignaledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionSignaledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionSignaledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionSignaledEventAttributes "signalName" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "signalName"
-> (Text -> f Text)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "signalName"
_
    = ((Text -> f Text)
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Text)
-> (WorkflowExecutionSignaledEventAttributes
    -> Text -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Text
_WorkflowExecutionSignaledEventAttributes'signalName
           (\ WorkflowExecutionSignaledEventAttributes
x__ Text
y__
              -> WorkflowExecutionSignaledEventAttributes
x__
                   {_WorkflowExecutionSignaledEventAttributes'signalName = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionSignaledEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionSignaledEventAttributes
    -> Maybe Payloads -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Maybe Payloads
_WorkflowExecutionSignaledEventAttributes'input
           (\ WorkflowExecutionSignaledEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionSignaledEventAttributes
x__ {_WorkflowExecutionSignaledEventAttributes'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 WorkflowExecutionSignaledEventAttributes "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))
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionSignaledEventAttributes
    -> Maybe Payloads -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Maybe Payloads
_WorkflowExecutionSignaledEventAttributes'input
           (\ WorkflowExecutionSignaledEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionSignaledEventAttributes
x__ {_WorkflowExecutionSignaledEventAttributes'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionSignaledEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Text)
-> (WorkflowExecutionSignaledEventAttributes
    -> Text -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Text
_WorkflowExecutionSignaledEventAttributes'identity
           (\ WorkflowExecutionSignaledEventAttributes
x__ Text
y__
              -> WorkflowExecutionSignaledEventAttributes
x__ {_WorkflowExecutionSignaledEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionSignaledEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Maybe Header)
-> (WorkflowExecutionSignaledEventAttributes
    -> Maybe Header -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Maybe Header
_WorkflowExecutionSignaledEventAttributes'header
           (\ WorkflowExecutionSignaledEventAttributes
x__ Maybe Header
y__
              -> WorkflowExecutionSignaledEventAttributes
x__ {_WorkflowExecutionSignaledEventAttributes'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 WorkflowExecutionSignaledEventAttributes "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))
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Maybe Header)
-> (WorkflowExecutionSignaledEventAttributes
    -> Maybe Header -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Maybe Header
_WorkflowExecutionSignaledEventAttributes'header
           (\ WorkflowExecutionSignaledEventAttributes
x__ Maybe Header
y__
              -> WorkflowExecutionSignaledEventAttributes
x__ {_WorkflowExecutionSignaledEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionSignaledEventAttributes "skipGenerateWorkflowTask" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "skipGenerateWorkflowTask"
-> (Bool -> f Bool)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "skipGenerateWorkflowTask"
_
    = ((Bool -> f Bool)
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes -> Bool)
-> (WorkflowExecutionSignaledEventAttributes
    -> Bool -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Bool
_WorkflowExecutionSignaledEventAttributes'skipGenerateWorkflowTask
           (\ WorkflowExecutionSignaledEventAttributes
x__ Bool
y__
              -> WorkflowExecutionSignaledEventAttributes
x__
                   {_WorkflowExecutionSignaledEventAttributes'skipGenerateWorkflowTask = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionSignaledEventAttributes "externalWorkflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "externalWorkflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "externalWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionSignaledEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution
           (\ WorkflowExecutionSignaledEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionSignaledEventAttributes
x__
                   {_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution = 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 WorkflowExecutionSignaledEventAttributes "maybe'externalWorkflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'externalWorkflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
fieldOf Proxy# "maybe'externalWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionSignaledEventAttributes
 -> f WorkflowExecutionSignaledEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionSignaledEventAttributes
-> f WorkflowExecutionSignaledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionSignaledEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionSignaledEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionSignaledEventAttributes)
-> Lens
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionSignaledEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution
           (\ WorkflowExecutionSignaledEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionSignaledEventAttributes
x__
                   {_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionSignaledEventAttributes where
  messageName :: Proxy WorkflowExecutionSignaledEventAttributes -> Text
messageName Proxy WorkflowExecutionSignaledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionSignaledEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionSignaledEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionSignaledEventAttributes
_
    = ByteString
"\n\
      \(WorkflowExecutionSignaledEventAttributes\DC2\US\n\
      \\vsignal_name\CAN\SOH \SOH(\tR\n\
      \signalName\DC26\n\
      \\ENQinput\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC26\n\
      \\ACKheader\CAN\EOT \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2=\n\
      \\ESCskip_generate_workflow_task\CAN\ENQ \SOH(\bR\CANskipGenerateWorkflowTask\DC2i\n\
      \\ESCexternal_workflow_execution\CAN\ACK \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\EMexternalWorkflowExecution"
  packedFileDescriptor :: Proxy WorkflowExecutionSignaledEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionSignaledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionSignaledEventAttributes)
fieldsByTag
    = let
        signalName__field_descriptor :: FieldDescriptor WorkflowExecutionSignaledEventAttributes
signalName__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionSignaledEventAttributes Text
-> FieldDescriptor WorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"signal_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
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionSignaledEventAttributes 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 @"signalName")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionSignaledEventAttributes
        input__field_descriptor :: FieldDescriptor WorkflowExecutionSignaledEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor WorkflowExecutionSignaledEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionSignaledEventAttributes
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
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor WorkflowExecutionSignaledEventAttributes 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 WorkflowExecutionSignaledEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowExecutionSignaledEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionSignaledEventAttributes Text
-> FieldDescriptor WorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionSignaledEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionSignaledEventAttributes
        header__field_descriptor :: FieldDescriptor WorkflowExecutionSignaledEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor WorkflowExecutionSignaledEventAttributes Header
-> FieldDescriptor WorkflowExecutionSignaledEventAttributes
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
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor WorkflowExecutionSignaledEventAttributes 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 WorkflowExecutionSignaledEventAttributes
        skipGenerateWorkflowTask__field_descriptor :: FieldDescriptor WorkflowExecutionSignaledEventAttributes
skipGenerateWorkflowTask__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor WorkflowExecutionSignaledEventAttributes Bool
-> FieldDescriptor WorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"skip_generate_workflow_task"
              (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
     WorkflowExecutionSignaledEventAttributes
     WorkflowExecutionSignaledEventAttributes
     Bool
     Bool
-> FieldAccessor WorkflowExecutionSignaledEventAttributes 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 @"skipGenerateWorkflowTask")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionSignaledEventAttributes
        externalWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowExecutionSignaledEventAttributes
externalWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     WorkflowExecutionSignaledEventAttributes WorkflowExecution
-> FieldDescriptor WorkflowExecutionSignaledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"external_workflow_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
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     WorkflowExecutionSignaledEventAttributes 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'externalWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionSignaledEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionSignaledEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowExecutionSignaledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionSignaledEventAttributes
signalName__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionSignaledEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionSignaledEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionSignaledEventAttributes
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowExecutionSignaledEventAttributes
skipGenerateWorkflowTask__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, 
            FieldDescriptor WorkflowExecutionSignaledEventAttributes
externalWorkflowExecution__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionSignaledEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionSignaledEventAttributes -> FieldSet)
-> (WorkflowExecutionSignaledEventAttributes
    -> FieldSet -> WorkflowExecutionSignaledEventAttributes)
-> Lens' WorkflowExecutionSignaledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionSignaledEventAttributes -> FieldSet
_WorkflowExecutionSignaledEventAttributes'_unknownFields
        (\ WorkflowExecutionSignaledEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionSignaledEventAttributes
x__
                {_WorkflowExecutionSignaledEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionSignaledEventAttributes
defMessage
    = WorkflowExecutionSignaledEventAttributes'_constructor
        {_WorkflowExecutionSignaledEventAttributes'signalName :: Text
_WorkflowExecutionSignaledEventAttributes'signalName = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionSignaledEventAttributes'input :: Maybe Payloads
_WorkflowExecutionSignaledEventAttributes'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionSignaledEventAttributes'identity :: Text
_WorkflowExecutionSignaledEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionSignaledEventAttributes'header :: Maybe Header
_WorkflowExecutionSignaledEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionSignaledEventAttributes'skipGenerateWorkflowTask :: Bool
_WorkflowExecutionSignaledEventAttributes'skipGenerateWorkflowTask = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution :: Maybe WorkflowExecution
_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionSignaledEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionSignaledEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionSignaledEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionSignaledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionSignaledEventAttributes
        loop :: WorkflowExecutionSignaledEventAttributes
-> Parser WorkflowExecutionSignaledEventAttributes
loop WorkflowExecutionSignaledEventAttributes
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
"signal_name"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"signalName") y x)
                        Word64
18
                          -> 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
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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
34
                          -> 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
40
                          -> 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
"skip_generate_workflow_task"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"skipGenerateWorkflowTask") y x)
                        Word64
50
                          -> 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
"external_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"externalWorkflowExecution") 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 WorkflowExecutionSignaledEventAttributes
-> String -> Parser WorkflowExecutionSignaledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionSignaledEventAttributes
-> Parser WorkflowExecutionSignaledEventAttributes
loop WorkflowExecutionSignaledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionSignaledEventAttributes"
  buildMessage :: WorkflowExecutionSignaledEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionSignaledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  Text
  Text
-> WorkflowExecutionSignaledEventAttributes -> 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 @"signalName") WorkflowExecutionSignaledEventAttributes
_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 Payloads)
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionSignaledEventAttributes -> 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") WorkflowExecutionSignaledEventAttributes
_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
18)
                          ((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.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  Text
  Text
-> WorkflowExecutionSignaledEventAttributes -> 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 @"identity") WorkflowExecutionSignaledEventAttributes
_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.<>)
                      (case
                           FoldLike
  (Maybe Header)
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  (Maybe Header)
  (Maybe Header)
-> WorkflowExecutionSignaledEventAttributes -> 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") WorkflowExecutionSignaledEventAttributes
_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
34)
                                ((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))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Bool
_v
                              = FoldLike
  Bool
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  Bool
  Bool
-> WorkflowExecutionSignaledEventAttributes -> 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 @"skipGenerateWorkflowTask") WorkflowExecutionSignaledEventAttributes
_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
40)
                                  ((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))
                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                            (case
                                 FoldLike
  (Maybe WorkflowExecution)
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> WorkflowExecutionSignaledEventAttributes
-> 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'externalWorkflowExecution")
                                   WorkflowExecutionSignaledEventAttributes
_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
50)
                                      ((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))
                            (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                               (FoldLike
  FieldSet
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionSignaledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionSignaledEventAttributes
  WorkflowExecutionSignaledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionSignaledEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionSignaledEventAttributes
_x)))))))
instance Control.DeepSeq.NFData WorkflowExecutionSignaledEventAttributes where
  rnf :: WorkflowExecutionSignaledEventAttributes -> ()
rnf
    = \ WorkflowExecutionSignaledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionSignaledEventAttributes -> FieldSet
_WorkflowExecutionSignaledEventAttributes'_unknownFields WorkflowExecutionSignaledEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionSignaledEventAttributes -> Text
_WorkflowExecutionSignaledEventAttributes'signalName WorkflowExecutionSignaledEventAttributes
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionSignaledEventAttributes -> Maybe Payloads
_WorkflowExecutionSignaledEventAttributes'input WorkflowExecutionSignaledEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionSignaledEventAttributes -> Text
_WorkflowExecutionSignaledEventAttributes'identity WorkflowExecutionSignaledEventAttributes
x__)
                      (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionSignaledEventAttributes -> Maybe Header
_WorkflowExecutionSignaledEventAttributes'header WorkflowExecutionSignaledEventAttributes
x__)
                         (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowExecutionSignaledEventAttributes -> Bool
_WorkflowExecutionSignaledEventAttributes'skipGenerateWorkflowTask
                               WorkflowExecutionSignaledEventAttributes
x__)
                            (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowExecutionSignaledEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionSignaledEventAttributes'externalWorkflowExecution
                                  WorkflowExecutionSignaledEventAttributes
x__)
                               ()))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowType' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowType@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowType' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.parentWorkflowNamespace' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.parentWorkflowNamespaceId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.parentWorkflowExecution' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'parentWorkflowExecution' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.parentInitiatedEventId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.taskQueue' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'taskQueue' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.input' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'input' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionTimeout' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionTimeout' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowRunTimeout' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowRunTimeout' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskTimeout' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowTaskTimeout' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.continuedExecutionRunId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.initiator' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.continuedFailure' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'continuedFailure' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.lastCompletionResult' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'lastCompletionResult' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.originalExecutionRunId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.firstExecutionRunId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryPolicy' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.RetryPolicy@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'retryPolicy' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.attempt' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Int.Int32@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowExecutionExpirationTime' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Google.Protobuf.Timestamp.Timestamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workflowExecutionExpirationTime' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cronSchedule' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.firstWorkflowTaskBackoff' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'firstWorkflowTaskBackoff' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.memo' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'memo' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.searchAttributes' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.SearchAttributes@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'searchAttributes' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.prevAutoResetPoints' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Workflow.V1.Message.ResetPoints@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'prevAutoResetPoints' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.ResetPoints)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.header' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.Header@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'header' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.parentInitiatedEventVersion' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.sourceVersionStamp' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'sourceVersionStamp' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.completionCallbacks' @:: Lens' WorkflowExecutionStartedEventAttributes [Proto.Temporal.Api.Common.V1.Message.Callback]@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.vec'completionCallbacks' @:: Lens' WorkflowExecutionStartedEventAttributes (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Callback)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.rootWorkflowExecution' @:: Lens' WorkflowExecutionStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkflowExecution@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'rootWorkflowExecution' @:: Lens' WorkflowExecutionStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.inheritedBuildId' @:: Lens' WorkflowExecutionStartedEventAttributes Data.Text.Text@ -}
data WorkflowExecutionStartedEventAttributes
  = WorkflowExecutionStartedEventAttributes'_constructor {WorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_WorkflowExecutionStartedEventAttributes'workflowType :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowType),
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespace :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespaceId :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                          WorkflowExecutionStartedEventAttributes -> Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventId :: !Data.Int.Int64,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe TaskQueue
_WorkflowExecutionStartedEventAttributes'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'input :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'continuedExecutionRunId :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> ContinueAsNewInitiator
_WorkflowExecutionStartedEventAttributes'initiator :: !Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Failure
_WorkflowExecutionStartedEventAttributes'continuedFailure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'lastCompletionResult :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'originalExecutionRunId :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'identity :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'firstExecutionRunId :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe RetryPolicy
_WorkflowExecutionStartedEventAttributes'retryPolicy :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.RetryPolicy),
                                                          WorkflowExecutionStartedEventAttributes -> Int32
_WorkflowExecutionStartedEventAttributes'attempt :: !Data.Int.Int32,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Timestamp
_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime :: !(Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp),
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'cronSchedule :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Memo
_WorkflowExecutionStartedEventAttributes'memo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe SearchAttributes
_WorkflowExecutionStartedEventAttributes'searchAttributes :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.SearchAttributes),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe ResetPoints
_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints :: !(Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.ResetPoints),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe Header
_WorkflowExecutionStartedEventAttributes'header :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Header),
                                                          WorkflowExecutionStartedEventAttributes -> Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventVersion :: !Data.Int.Int64,
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'workflowId :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowExecutionStartedEventAttributes'sourceVersionStamp :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                          WorkflowExecutionStartedEventAttributes -> Vector Callback
_WorkflowExecutionStartedEventAttributes'completionCallbacks :: !(Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Callback),
                                                          WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution),
                                                          WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'inheritedBuildId :: !Data.Text.Text,
                                                          WorkflowExecutionStartedEventAttributes -> FieldSet
_WorkflowExecutionStartedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
(WorkflowExecutionStartedEventAttributes
 -> WorkflowExecutionStartedEventAttributes -> Bool)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes -> Bool)
-> Eq WorkflowExecutionStartedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
== :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
$c/= :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
/= :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionStartedEventAttributes
Eq WorkflowExecutionStartedEventAttributes =>
(WorkflowExecutionStartedEventAttributes
 -> WorkflowExecutionStartedEventAttributes -> Ordering)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes -> Bool)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes -> Bool)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes -> Bool)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes -> Bool)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes)
-> (WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes
    -> WorkflowExecutionStartedEventAttributes)
-> Ord WorkflowExecutionStartedEventAttributes
WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Ordering
WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
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 :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Ordering
compare :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Ordering
$c< :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
< :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
$c<= :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
<= :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
$c> :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
> :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
$c>= :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
>= :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes -> Bool
$cmax :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
max :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
$cmin :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
min :: WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
-> WorkflowExecutionStartedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionStartedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionStartedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionStartedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionStartedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionStartedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "workflowType" Proto.Temporal.Api.Common.V1.Message.WorkflowType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowType"
-> (WorkflowType -> f WorkflowType)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((WorkflowType -> f WorkflowType)
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (WorkflowType -> f WorkflowType)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe WorkflowType)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowType -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_WorkflowExecutionStartedEventAttributes'workflowType
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowType
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowType"
_
    = ((Maybe WorkflowType -> f (Maybe WorkflowType))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe WorkflowType -> f (Maybe WorkflowType))
    -> Maybe WorkflowType -> f (Maybe WorkflowType))
-> (Maybe WorkflowType -> f (Maybe WorkflowType))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe WorkflowType)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowType -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkflowType)
     (Maybe WorkflowType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_WorkflowExecutionStartedEventAttributes'workflowType
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowType
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowType = y__}))
        (Maybe WorkflowType -> f (Maybe WorkflowType))
-> Maybe WorkflowType -> f (Maybe WorkflowType)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "parentWorkflowNamespace" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentWorkflowNamespace"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "parentWorkflowNamespace"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespace
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespace = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "parentWorkflowNamespaceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentWorkflowNamespaceId"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "parentWorkflowNamespaceId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespaceId
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespaceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "parentWorkflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentWorkflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "parentWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution = 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 WorkflowExecutionStartedEventAttributes "maybe'parentWorkflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'parentWorkflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'parentWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "parentInitiatedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentInitiatedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "parentInitiatedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Int64)
-> (WorkflowExecutionStartedEventAttributes
    -> Int64 -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventId
           (\ WorkflowExecutionStartedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'parentInitiatedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe TaskQueue)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe TaskQueue -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe TaskQueue
_WorkflowExecutionStartedEventAttributes'taskQueue
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe TaskQueue
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe TaskQueue)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe TaskQueue -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe TaskQueue
_WorkflowExecutionStartedEventAttributes'taskQueue
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe TaskQueue
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "input" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "input"
-> (Payloads -> f Payloads)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'input
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'input"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'input
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'input = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "workflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "maybe'workflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "workflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowRunTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowRunTimeout
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "maybe'workflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowRunTimeout
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "workflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskTimeout"
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowTaskTimeout
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "maybe'workflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowTaskTimeout
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "continuedExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continuedExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "continuedExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'continuedExecutionRunId
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'continuedExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "initiator" Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "initiator"
-> (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "initiator"
_
    = ((ContinueAsNewInitiator -> f ContinueAsNewInitiator)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((ContinueAsNewInitiator -> f ContinueAsNewInitiator)
    -> ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> ContinueAsNewInitiator)
-> (WorkflowExecutionStartedEventAttributes
    -> ContinueAsNewInitiator
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     ContinueAsNewInitiator
     ContinueAsNewInitiator
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> ContinueAsNewInitiator
_WorkflowExecutionStartedEventAttributes'initiator
           (\ WorkflowExecutionStartedEventAttributes
x__ ContinueAsNewInitiator
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'initiator = y__}))
        (ContinueAsNewInitiator -> f ContinueAsNewInitiator)
-> ContinueAsNewInitiator -> f ContinueAsNewInitiator
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "continuedFailure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "continuedFailure"
-> (Failure -> f Failure)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "continuedFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Failure)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Failure -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Failure
_WorkflowExecutionStartedEventAttributes'continuedFailure
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'continuedFailure = 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 WorkflowExecutionStartedEventAttributes "maybe'continuedFailure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'continuedFailure"
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'continuedFailure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Failure)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Failure -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Failure
_WorkflowExecutionStartedEventAttributes'continuedFailure
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'continuedFailure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "lastCompletionResult" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "lastCompletionResult"
-> (Payloads -> f Payloads)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'lastCompletionResult
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'lastCompletionResult = 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 WorkflowExecutionStartedEventAttributes "maybe'lastCompletionResult" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'lastCompletionResult"
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'lastCompletionResult"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'lastCompletionResult
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'lastCompletionResult = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "originalExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "originalExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "originalExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'originalExecutionRunId
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'originalExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'identity
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "firstExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "firstExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'firstExecutionRunId
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'firstExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "retryPolicy" Proto.Temporal.Api.Common.V1.Message.RetryPolicy where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryPolicy"
-> (RetryPolicy -> f RetryPolicy)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((RetryPolicy -> f RetryPolicy)
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (RetryPolicy -> f RetryPolicy)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe RetryPolicy)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe RetryPolicy -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe RetryPolicy
_WorkflowExecutionStartedEventAttributes'retryPolicy
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe RetryPolicy
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'retryPolicy"
_
    = ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe RetryPolicy -> f (Maybe RetryPolicy))
    -> Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe RetryPolicy)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe RetryPolicy -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe RetryPolicy)
     (Maybe RetryPolicy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe RetryPolicy
_WorkflowExecutionStartedEventAttributes'retryPolicy
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe RetryPolicy
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'retryPolicy = y__}))
        (Maybe RetryPolicy -> f (Maybe RetryPolicy))
-> Maybe RetryPolicy -> f (Maybe RetryPolicy)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "attempt" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "attempt"
_
    = ((Int32 -> f Int32)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Int32)
-> (WorkflowExecutionStartedEventAttributes
    -> Int32 -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Int32
_WorkflowExecutionStartedEventAttributes'attempt
           (\ WorkflowExecutionStartedEventAttributes
x__ Int32
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'attempt = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "workflowExecutionExpirationTime" Proto.Google.Protobuf.Timestamp.Timestamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowExecutionExpirationTime"
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowExecutionExpirationTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Timestamp -> f Timestamp)
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Timestamp -> f Timestamp)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Timestamp)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Timestamp -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Timestamp
_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Timestamp
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime = 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 WorkflowExecutionStartedEventAttributes "maybe'workflowExecutionExpirationTime" (Prelude.Maybe Proto.Google.Protobuf.Timestamp.Timestamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workflowExecutionExpirationTime"
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'workflowExecutionExpirationTime"
_
    = ((Maybe Timestamp -> f (Maybe Timestamp))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Timestamp -> f (Maybe Timestamp))
    -> Maybe Timestamp -> f (Maybe Timestamp))
-> (Maybe Timestamp -> f (Maybe Timestamp))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Timestamp)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Timestamp -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Timestamp)
     (Maybe Timestamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Timestamp
_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Timestamp
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime = y__}))
        (Maybe Timestamp -> f (Maybe Timestamp))
-> Maybe Timestamp -> f (Maybe Timestamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "cronSchedule" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cronSchedule"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "cronSchedule"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'cronSchedule
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'cronSchedule = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "firstWorkflowTaskBackoff" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "firstWorkflowTaskBackoff"
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "firstWorkflowTaskBackoff"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff = 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 WorkflowExecutionStartedEventAttributes "maybe'firstWorkflowTaskBackoff" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'firstWorkflowTaskBackoff"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'firstWorkflowTaskBackoff"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Duration)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Duration -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Duration
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "memo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "memo"
-> (Memo -> f Memo)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Memo)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Memo -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Memo
_WorkflowExecutionStartedEventAttributes'memo
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Memo
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'memo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Memo)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Memo -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Memo
_WorkflowExecutionStartedEventAttributes'memo
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Memo
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'memo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "searchAttributes" Proto.Temporal.Api.Common.V1.Message.SearchAttributes where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "searchAttributes"
-> (SearchAttributes -> f SearchAttributes)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((SearchAttributes -> f SearchAttributes)
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (SearchAttributes -> f SearchAttributes)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe SearchAttributes)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe SearchAttributes
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe SearchAttributes
_WorkflowExecutionStartedEventAttributes'searchAttributes
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe SearchAttributes
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'searchAttributes"
_
    = ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe SearchAttributes -> f (Maybe SearchAttributes))
    -> Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe SearchAttributes)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe SearchAttributes
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe SearchAttributes)
     (Maybe SearchAttributes)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe SearchAttributes
_WorkflowExecutionStartedEventAttributes'searchAttributes
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe SearchAttributes
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'searchAttributes = y__}))
        (Maybe SearchAttributes -> f (Maybe SearchAttributes))
-> Maybe SearchAttributes -> f (Maybe SearchAttributes)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "prevAutoResetPoints" Proto.Temporal.Api.Workflow.V1.Message.ResetPoints where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "prevAutoResetPoints"
-> (ResetPoints -> f ResetPoints)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "prevAutoResetPoints"
_
    = ((Maybe ResetPoints -> f (Maybe ResetPoints))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((ResetPoints -> f ResetPoints)
    -> Maybe ResetPoints -> f (Maybe ResetPoints))
-> (ResetPoints -> f ResetPoints)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe ResetPoints)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe ResetPoints -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe ResetPoints)
     (Maybe ResetPoints)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe ResetPoints
_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe ResetPoints
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints = 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 WorkflowExecutionStartedEventAttributes "maybe'prevAutoResetPoints" (Prelude.Maybe Proto.Temporal.Api.Workflow.V1.Message.ResetPoints) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'prevAutoResetPoints"
-> (Maybe ResetPoints -> f (Maybe ResetPoints))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'prevAutoResetPoints"
_
    = ((Maybe ResetPoints -> f (Maybe ResetPoints))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe ResetPoints -> f (Maybe ResetPoints))
    -> Maybe ResetPoints -> f (Maybe ResetPoints))
-> (Maybe ResetPoints -> f (Maybe ResetPoints))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe ResetPoints)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe ResetPoints -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe ResetPoints)
     (Maybe ResetPoints)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe ResetPoints
_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe ResetPoints
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints = y__}))
        (Maybe ResetPoints -> f (Maybe ResetPoints))
-> Maybe ResetPoints -> f (Maybe ResetPoints)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "header" Proto.Temporal.Api.Common.V1.Message.Header where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "header"
-> (Header -> f Header)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Header -> f Header) -> Maybe Header -> f (Maybe Header))
-> (Header -> f Header)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Header)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Header -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Header
_WorkflowExecutionStartedEventAttributes'header
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Header
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'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 WorkflowExecutionStartedEventAttributes "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))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'header"
_
    = ((Maybe Header -> f (Maybe Header))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe Header -> f (Maybe Header))
    -> Maybe Header -> f (Maybe Header))
-> (Maybe Header -> f (Maybe Header))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Maybe Header)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe Header -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe Header)
     (Maybe Header)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe Header
_WorkflowExecutionStartedEventAttributes'header
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe Header
y__
              -> WorkflowExecutionStartedEventAttributes
x__ {_WorkflowExecutionStartedEventAttributes'header = y__}))
        (Maybe Header -> f (Maybe Header))
-> Maybe Header -> f (Maybe Header)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "parentInitiatedEventVersion" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "parentInitiatedEventVersion"
-> (Int64 -> f Int64)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "parentInitiatedEventVersion"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Int64)
-> (WorkflowExecutionStartedEventAttributes
    -> Int64 -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventVersion
           (\ WorkflowExecutionStartedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'parentInitiatedEventVersion = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "workflowId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowId"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "workflowId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'workflowId
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'workflowId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "sourceVersionStamp" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sourceVersionStamp"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "sourceVersionStamp"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes
 -> Maybe WorkerVersionStamp)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkerVersionStamp
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowExecutionStartedEventAttributes'sourceVersionStamp
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'sourceVersionStamp = 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 WorkflowExecutionStartedEventAttributes "maybe'sourceVersionStamp" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'sourceVersionStamp"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'sourceVersionStamp"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes
 -> Maybe WorkerVersionStamp)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkerVersionStamp
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowExecutionStartedEventAttributes'sourceVersionStamp
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'sourceVersionStamp = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "completionCallbacks" [Proto.Temporal.Api.Common.V1.Message.Callback] where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "completionCallbacks"
-> ([Callback] -> f [Callback])
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "completionCallbacks"
_
    = ((Vector Callback -> f (Vector Callback))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> (([Callback] -> f [Callback])
    -> Vector Callback -> f (Vector Callback))
-> ([Callback] -> f [Callback])
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Vector Callback)
-> (WorkflowExecutionStartedEventAttributes
    -> Vector Callback -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Vector Callback)
     (Vector Callback)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Vector Callback
_WorkflowExecutionStartedEventAttributes'completionCallbacks
           (\ WorkflowExecutionStartedEventAttributes
x__ Vector Callback
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'completionCallbacks = y__}))
        ((Vector Callback -> [Callback])
-> (Vector Callback -> [Callback] -> Vector Callback)
-> Lens (Vector Callback) (Vector Callback) [Callback] [Callback]
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           Vector Callback -> [Callback]
forall (v :: * -> *) a. Vector v a => v a -> [a]
Data.Vector.Generic.toList
           (\ Vector Callback
_ [Callback]
y__ -> [Callback] -> Vector Callback
forall (v :: * -> *) a. Vector v a => [a] -> v a
Data.Vector.Generic.fromList [Callback]
y__))
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "vec'completionCallbacks" (Data.Vector.Vector Proto.Temporal.Api.Common.V1.Message.Callback) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "vec'completionCallbacks"
-> (Vector Callback -> f (Vector Callback))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "vec'completionCallbacks"
_
    = ((Vector Callback -> f (Vector Callback))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Vector Callback -> f (Vector Callback))
    -> Vector Callback -> f (Vector Callback))
-> (Vector Callback -> f (Vector Callback))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Vector Callback)
-> (WorkflowExecutionStartedEventAttributes
    -> Vector Callback -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Vector Callback)
     (Vector Callback)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Vector Callback
_WorkflowExecutionStartedEventAttributes'completionCallbacks
           (\ WorkflowExecutionStartedEventAttributes
x__ Vector Callback
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'completionCallbacks = y__}))
        (Vector Callback -> f (Vector Callback))
-> Vector Callback -> f (Vector Callback)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "rootWorkflowExecution" Proto.Temporal.Api.Common.V1.Message.WorkflowExecution where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rootWorkflowExecution"
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "rootWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((WorkflowExecution -> f WorkflowExecution)
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (WorkflowExecution -> f WorkflowExecution)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution = 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 WorkflowExecutionStartedEventAttributes "maybe'rootWorkflowExecution" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkflowExecution) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rootWorkflowExecution"
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "maybe'rootWorkflowExecution"
_
    = ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
    -> Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes
 -> Maybe WorkflowExecution)
-> (WorkflowExecutionStartedEventAttributes
    -> Maybe WorkflowExecution
    -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     (Maybe WorkflowExecution)
     (Maybe WorkflowExecution)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution
           (\ WorkflowExecutionStartedEventAttributes
x__ Maybe WorkflowExecution
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution = y__}))
        (Maybe WorkflowExecution -> f (Maybe WorkflowExecution))
-> Maybe WorkflowExecution -> f (Maybe WorkflowExecution)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionStartedEventAttributes "inheritedBuildId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "inheritedBuildId"
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
fieldOf Proxy# "inheritedBuildId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionStartedEventAttributes
 -> f WorkflowExecutionStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionStartedEventAttributes
-> f WorkflowExecutionStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionStartedEventAttributes -> Text)
-> (WorkflowExecutionStartedEventAttributes
    -> Text -> WorkflowExecutionStartedEventAttributes)
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'inheritedBuildId
           (\ WorkflowExecutionStartedEventAttributes
x__ Text
y__
              -> WorkflowExecutionStartedEventAttributes
x__
                   {_WorkflowExecutionStartedEventAttributes'inheritedBuildId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionStartedEventAttributes where
  messageName :: Proxy WorkflowExecutionStartedEventAttributes -> Text
messageName Proxy WorkflowExecutionStartedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionStartedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionStartedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionStartedEventAttributes
_
    = ByteString
"\n\
      \'WorkflowExecutionStartedEventAttributes\DC2I\n\
      \\rworkflow_type\CAN\SOH \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2:\n\
      \\EMparent_workflow_namespace\CAN\STX \SOH(\tR\ETBparentWorkflowNamespace\DC2?\n\
      \\FSparent_workflow_namespace_id\CAN\ESC \SOH(\tR\EMparentWorkflowNamespaceId\DC2e\n\
      \\EMparent_workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\ETBparentWorkflowExecution\DC29\n\
      \\EMparent_initiated_event_id\CAN\EOT \SOH(\ETXR\SYNparentInitiatedEventId\DC2C\n\
      \\n\
      \task_queue\CAN\ENQ \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
      \\ENQinput\CAN\ACK \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
      \\SUBworkflow_execution_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
      \\DC4workflow_run_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
      \\NAKworkflow_task_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2;\n\
      \\SUBcontinued_execution_run_id\CAN\n\
      \ \SOH(\tR\ETBcontinuedExecutionRunId\DC2K\n\
      \\tinitiator\CAN\v \SOH(\SO2-.temporal.api.enums.v1.ContinueAsNewInitiatorR\tinitiator\DC2M\n\
      \\DC1continued_failure\CAN\f \SOH(\v2 .temporal.api.failure.v1.FailureR\DLEcontinuedFailure\DC2V\n\
      \\SYNlast_completion_result\CAN\r \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC29\n\
      \\EMoriginal_execution_run_id\CAN\SO \SOH(\tR\SYNoriginalExecutionRunId\DC2\SUB\n\
      \\bidentity\CAN\SI \SOH(\tR\bidentity\DC23\n\
      \\SYNfirst_execution_run_id\CAN\DLE \SOH(\tR\DC3firstExecutionRunId\DC2F\n\
      \\fretry_policy\CAN\DC1 \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2\CAN\n\
      \\aattempt\CAN\DC2 \SOH(\ENQR\aattempt\DC2g\n\
      \\"workflow_execution_expiration_time\CAN\DC3 \SOH(\v2\SUB.google.protobuf.TimestampR\USworkflowExecutionExpirationTime\DC2#\n\
      \\rcron_schedule\CAN\DC4 \SOH(\tR\fcronSchedule\DC2X\n\
      \\ESCfirst_workflow_task_backoff\CAN\NAK \SOH(\v2\EM.google.protobuf.DurationR\CANfirstWorkflowTaskBackoff\DC20\n\
      \\EOTmemo\CAN\SYN \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
      \\DC1search_attributes\CAN\ETB \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2Z\n\
      \\SYNprev_auto_reset_points\CAN\CAN \SOH(\v2%.temporal.api.workflow.v1.ResetPointsR\DC3prevAutoResetPoints\DC26\n\
      \\ACKheader\CAN\EM \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2C\n\
      \\RSparent_initiated_event_version\CAN\SUB \SOH(\ETXR\ESCparentInitiatedEventVersion\DC2\US\n\
      \\vworkflow_id\CAN\FS \SOH(\tR\n\
      \workflowId\DC2\\\n\
      \\DC4source_version_stamp\CAN\GS \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\DC2sourceVersionStamp\DC2S\n\
      \\DC4completion_callbacks\CAN\RS \ETX(\v2 .temporal.api.common.v1.CallbackR\DC3completionCallbacks\DC2a\n\
      \\ETBroot_workflow_execution\CAN\US \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\NAKrootWorkflowExecution\DC2,\n\
      \\DC2inherited_build_id\CAN  \SOH(\tR\DLEinheritedBuildId"
  packedFileDescriptor :: Proxy WorkflowExecutionStartedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionStartedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionStartedEventAttributes)
fieldsByTag
    = let
        workflowType__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowType__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowType
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes WorkflowType
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        parentWorkflowNamespace__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
parentWorkflowNamespace__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_workflow_namespace"
              (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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"parentWorkflowNamespace")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        parentWorkflowNamespaceId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
parentWorkflowNamespaceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_workflow_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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"parentWorkflowNamespaceId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        parentWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
parentWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes WorkflowExecution
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_workflow_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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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'parentWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        parentInitiatedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
parentInitiatedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionStartedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_initiated_event_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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"parentInitiatedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        taskQueue__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor WorkflowExecutionStartedEventAttributes TaskQueue
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        input__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
input__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor WorkflowExecutionStartedEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        workflowExecutionTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionStartedEventAttributes Duration
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        workflowRunTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionStartedEventAttributes Duration
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        workflowTaskTimeout__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionStartedEventAttributes Duration
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        continuedExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
continuedExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continued_execution_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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"continuedExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        initiator__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
initiator__field_descriptor
          = String
-> FieldTypeDescriptor ContinueAsNewInitiator
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes ContinueAsNewInitiator
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"initiator"
              (ScalarField ContinueAsNewInitiator
-> FieldTypeDescriptor ContinueAsNewInitiator
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField ContinueAsNewInitiator
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.ContinueAsNewInitiator)
              (WireDefault ContinueAsNewInitiator
-> Lens
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     ContinueAsNewInitiator
     ContinueAsNewInitiator
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes ContinueAsNewInitiator
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault ContinueAsNewInitiator
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 @"initiator")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        continuedFailure__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
continuedFailure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor WorkflowExecutionStartedEventAttributes Failure
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"continued_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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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'continuedFailure")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        lastCompletionResult__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
lastCompletionResult__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor WorkflowExecutionStartedEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"last_completion_result"
              (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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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'lastCompletionResult")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        originalExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
originalExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"original_execution_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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"originalExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        firstExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
firstExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"first_execution_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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"firstExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        retryPolicy__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
retryPolicy__field_descriptor
          = String
-> FieldTypeDescriptor RetryPolicy
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes RetryPolicy
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        attempt__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor WorkflowExecutionStartedEventAttributes Int32
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Int32
     Int32
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        workflowExecutionExpirationTime__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowExecutionExpirationTime__field_descriptor
          = String
-> FieldTypeDescriptor Timestamp
-> FieldAccessor WorkflowExecutionStartedEventAttributes Timestamp
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_execution_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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Timestamp)
  (Maybe Timestamp)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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'workflowExecutionExpirationTime")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        cronSchedule__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
cronSchedule__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        firstWorkflowTaskBackoff__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
firstWorkflowTaskBackoff__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowExecutionStartedEventAttributes Duration
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"first_workflow_task_backoff"
              (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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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'firstWorkflowTaskBackoff")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        memo__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
memo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor WorkflowExecutionStartedEventAttributes Memo
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        searchAttributes__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
searchAttributes__field_descriptor
          = String
-> FieldTypeDescriptor SearchAttributes
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes SearchAttributes
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        prevAutoResetPoints__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
prevAutoResetPoints__field_descriptor
          = String
-> FieldTypeDescriptor ResetPoints
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes ResetPoints
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"prev_auto_reset_points"
              (MessageOrGroup -> FieldTypeDescriptor ResetPoints
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Workflow.V1.Message.ResetPoints)
              (Lens
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe ResetPoints)
  (Maybe ResetPoints)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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'prevAutoResetPoints")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        header__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
header__field_descriptor
          = String
-> FieldTypeDescriptor Header
-> FieldAccessor WorkflowExecutionStartedEventAttributes Header
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        parentInitiatedEventVersion__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
parentInitiatedEventVersion__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowExecutionStartedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"parent_initiated_event_version"
              (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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 @"parentInitiatedEventVersion")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        workflowId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
        sourceVersionStamp__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
sourceVersionStamp__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes WorkerVersionStamp
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"source_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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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'sourceVersionStamp")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        completionCallbacks__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
completionCallbacks__field_descriptor
          = String
-> FieldTypeDescriptor Callback
-> FieldAccessor WorkflowExecutionStartedEventAttributes Callback
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"completion_callbacks"
              (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)
              (Packing
-> Lens' WorkflowExecutionStartedEventAttributes [Callback]
-> FieldAccessor WorkflowExecutionStartedEventAttributes Callback
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 @"completionCallbacks")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        rootWorkflowExecution__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
rootWorkflowExecution__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowExecution
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes WorkflowExecution
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"root_workflow_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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> FieldAccessor
     WorkflowExecutionStartedEventAttributes 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'rootWorkflowExecution")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionStartedEventAttributes
        inheritedBuildId__field_descriptor :: FieldDescriptor WorkflowExecutionStartedEventAttributes
inheritedBuildId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes Text
-> FieldDescriptor WorkflowExecutionStartedEventAttributes
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
     WorkflowExecutionStartedEventAttributes
     WorkflowExecutionStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionStartedEventAttributes 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 WorkflowExecutionStartedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionStartedEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowExecutionStartedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowType__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionStartedEventAttributes
parentWorkflowNamespace__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
27, 
            FieldDescriptor WorkflowExecutionStartedEventAttributes
parentWorkflowNamespaceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionStartedEventAttributes
parentWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionStartedEventAttributes
parentInitiatedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowExecutionStartedEventAttributes
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowExecutionStartedEventAttributes
input__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor WorkflowExecutionStartedEventAttributes
continuedExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
11, FieldDescriptor WorkflowExecutionStartedEventAttributes
initiator__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
12, FieldDescriptor WorkflowExecutionStartedEventAttributes
continuedFailure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor WorkflowExecutionStartedEventAttributes
lastCompletionResult__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
14, FieldDescriptor WorkflowExecutionStartedEventAttributes
originalExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
15, FieldDescriptor WorkflowExecutionStartedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
16, FieldDescriptor WorkflowExecutionStartedEventAttributes
firstExecutionRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
17, FieldDescriptor WorkflowExecutionStartedEventAttributes
retryPolicy__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
18, FieldDescriptor WorkflowExecutionStartedEventAttributes
attempt__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
19, 
            FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowExecutionExpirationTime__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
20, FieldDescriptor WorkflowExecutionStartedEventAttributes
cronSchedule__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
21, 
            FieldDescriptor WorkflowExecutionStartedEventAttributes
firstWorkflowTaskBackoff__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
22, FieldDescriptor WorkflowExecutionStartedEventAttributes
memo__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
23, FieldDescriptor WorkflowExecutionStartedEventAttributes
searchAttributes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
24, FieldDescriptor WorkflowExecutionStartedEventAttributes
prevAutoResetPoints__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
25, FieldDescriptor WorkflowExecutionStartedEventAttributes
header__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
26, 
            FieldDescriptor WorkflowExecutionStartedEventAttributes
parentInitiatedEventVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
28, FieldDescriptor WorkflowExecutionStartedEventAttributes
workflowId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
29, FieldDescriptor WorkflowExecutionStartedEventAttributes
sourceVersionStamp__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
30, FieldDescriptor WorkflowExecutionStartedEventAttributes
completionCallbacks__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
31, FieldDescriptor WorkflowExecutionStartedEventAttributes
rootWorkflowExecution__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
32, FieldDescriptor WorkflowExecutionStartedEventAttributes
inheritedBuildId__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionStartedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionStartedEventAttributes -> FieldSet)
-> (WorkflowExecutionStartedEventAttributes
    -> FieldSet -> WorkflowExecutionStartedEventAttributes)
-> Lens' WorkflowExecutionStartedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionStartedEventAttributes -> FieldSet
_WorkflowExecutionStartedEventAttributes'_unknownFields
        (\ WorkflowExecutionStartedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionStartedEventAttributes
x__
                {_WorkflowExecutionStartedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionStartedEventAttributes
defMessage
    = WorkflowExecutionStartedEventAttributes'_constructor
        {_WorkflowExecutionStartedEventAttributes'workflowType :: Maybe WorkflowType
_WorkflowExecutionStartedEventAttributes'workflowType = Maybe WorkflowType
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'parentWorkflowNamespace :: Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespace = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'parentWorkflowNamespaceId :: Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespaceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'parentWorkflowExecution :: Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'parentInitiatedEventId :: Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'taskQueue :: Maybe TaskQueue
_WorkflowExecutionStartedEventAttributes'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'input :: Maybe Payloads
_WorkflowExecutionStartedEventAttributes'input = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout :: Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'workflowRunTimeout :: Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'workflowTaskTimeout :: Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'continuedExecutionRunId :: Text
_WorkflowExecutionStartedEventAttributes'continuedExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'initiator :: ContinueAsNewInitiator
_WorkflowExecutionStartedEventAttributes'initiator = ContinueAsNewInitiator
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'continuedFailure :: Maybe Failure
_WorkflowExecutionStartedEventAttributes'continuedFailure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'lastCompletionResult :: Maybe Payloads
_WorkflowExecutionStartedEventAttributes'lastCompletionResult = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'originalExecutionRunId :: Text
_WorkflowExecutionStartedEventAttributes'originalExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'identity :: Text
_WorkflowExecutionStartedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'firstExecutionRunId :: Text
_WorkflowExecutionStartedEventAttributes'firstExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'retryPolicy :: Maybe RetryPolicy
_WorkflowExecutionStartedEventAttributes'retryPolicy = Maybe RetryPolicy
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'attempt :: Int32
_WorkflowExecutionStartedEventAttributes'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime :: Maybe Timestamp
_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime = Maybe Timestamp
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'cronSchedule :: Text
_WorkflowExecutionStartedEventAttributes'cronSchedule = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff :: Maybe Duration
_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'memo :: Maybe Memo
_WorkflowExecutionStartedEventAttributes'memo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'searchAttributes :: Maybe SearchAttributes
_WorkflowExecutionStartedEventAttributes'searchAttributes = Maybe SearchAttributes
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'prevAutoResetPoints :: Maybe ResetPoints
_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints = Maybe ResetPoints
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'header :: Maybe Header
_WorkflowExecutionStartedEventAttributes'header = Maybe Header
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'parentInitiatedEventVersion :: Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventVersion = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'workflowId :: Text
_WorkflowExecutionStartedEventAttributes'workflowId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'sourceVersionStamp :: Maybe WorkerVersionStamp
_WorkflowExecutionStartedEventAttributes'sourceVersionStamp = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'completionCallbacks :: Vector Callback
_WorkflowExecutionStartedEventAttributes'completionCallbacks = Vector Callback
forall (v :: * -> *) a. Vector v a => v a
Data.Vector.Generic.empty,
         _WorkflowExecutionStartedEventAttributes'rootWorkflowExecution :: Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution = Maybe WorkflowExecution
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionStartedEventAttributes'inheritedBuildId :: Text
_WorkflowExecutionStartedEventAttributes'inheritedBuildId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionStartedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionStartedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionStartedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionStartedEventAttributes
          -> Data.ProtoLens.Encoding.Growing.Growing Data.Vector.Vector Data.ProtoLens.Encoding.Growing.RealWorld Proto.Temporal.Api.Common.V1.Message.Callback
             -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionStartedEventAttributes
        loop :: WorkflowExecutionStartedEventAttributes
-> Growing Vector RealWorld Callback
-> Parser WorkflowExecutionStartedEventAttributes
loop WorkflowExecutionStartedEventAttributes
x Growing Vector RealWorld Callback
mutable'completionCallbacks
          = do end <- Parser Bool
Data.ProtoLens.Encoding.Bytes.atEnd
               if end then
                   do frozen'completionCallbacks <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                                      (Data.ProtoLens.Encoding.Growing.unsafeFreeze
                                                         mutable'completionCallbacks)
                      (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'completionCallbacks")
                              frozen'completionCallbacks x))
               else
                   do tag <- Data.ProtoLens.Encoding.Bytes.getVarInt
                      case tag of
                        Word64
10
                          -> 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)
                                  mutable'completionCallbacks
                        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
"parent_workflow_namespace"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentWorkflowNamespace") y x)
                                  mutable'completionCallbacks
                        Word64
218
                          -> 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_workflow_namespace_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentWorkflowNamespaceId") y x)
                                  mutable'completionCallbacks
                        Word64
26
                          -> 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_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentWorkflowExecution") y x)
                                  mutable'completionCallbacks
                        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
"parent_initiated_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentInitiatedEventId") y x)
                                  mutable'completionCallbacks
                        Word64
42
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
50
                          -> 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)
                                  mutable'completionCallbacks
                        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_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionTimeout") y x)
                                  mutable'completionCallbacks
                        Word64
66
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
74
                          -> 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)
                                  mutable'completionCallbacks
                        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
"continued_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continuedExecutionRunId") y x)
                                  mutable'completionCallbacks
                        Word64
88
                          -> do y <- Parser ContinueAsNewInitiator
-> String -> Parser ContinueAsNewInitiator
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> ContinueAsNewInitiator)
-> Parser Int -> Parser ContinueAsNewInitiator
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> ContinueAsNewInitiator
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
"initiator"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"initiator") y x)
                                  mutable'completionCallbacks
                        Word64
98
                          -> 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
"continued_failure"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"continuedFailure") y x)
                                  mutable'completionCallbacks
                        Word64
106
                          -> 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
"last_completion_result"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"lastCompletionResult") y x)
                                  mutable'completionCallbacks
                        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
"original_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"originalExecutionRunId") y x)
                                  mutable'completionCallbacks
                        Word64
122
                          -> 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                                  mutable'completionCallbacks
                        Word64
130
                          -> 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
"first_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"firstExecutionRunId") y x)
                                  mutable'completionCallbacks
                        Word64
138
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
144
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
154
                          -> 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
"workflow_execution_expiration_time"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowExecutionExpirationTime")
                                     y x)
                                  mutable'completionCallbacks
                        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
"cron_schedule"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"cronSchedule") y x)
                                  mutable'completionCallbacks
                        Word64
170
                          -> 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
"first_workflow_task_backoff"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"firstWorkflowTaskBackoff") y x)
                                  mutable'completionCallbacks
                        Word64
178
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
186
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
194
                          -> 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
"prev_auto_reset_points"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"prevAutoResetPoints") y x)
                                  mutable'completionCallbacks
                        Word64
202
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
208
                          -> 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
"parent_initiated_event_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"parentInitiatedEventVersion") y
                                     x)
                                  mutable'completionCallbacks
                        Word64
226
                          -> 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)
                                  mutable'completionCallbacks
                        Word64
234
                          -> 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
"source_version_stamp"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"sourceVersionStamp") y x)
                                  mutable'completionCallbacks
                        Word64
242
                          -> 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
"completion_callbacks"
                                v <- Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                       (Data.ProtoLens.Encoding.Growing.append
                                          mutable'completionCallbacks y)
                                loop x v
                        Word64
250
                          -> 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_workflow_execution"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"rootWorkflowExecution") y x)
                                  mutable'completionCallbacks
                        Word64
258
                          -> 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)
                                  mutable'completionCallbacks
                        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'completionCallbacks
      in
        Parser WorkflowExecutionStartedEventAttributes
-> String -> Parser WorkflowExecutionStartedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do mutable'completionCallbacks <- IO (Growing Vector RealWorld Callback)
-> Parser (Growing Vector RealWorld Callback)
forall a. IO a -> Parser a
Data.ProtoLens.Encoding.Parser.Unsafe.unsafeLiftIO
                                               IO (Growing Vector RealWorld Callback)
IO (Growing Vector (PrimState IO) Callback)
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'completionCallbacks)
          String
"WorkflowExecutionStartedEventAttributes"
  buildMessage :: WorkflowExecutionStartedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionStartedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe WorkflowType)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkflowType)
  (Maybe WorkflowType)
-> WorkflowExecutionStartedEventAttributes -> 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") WorkflowExecutionStartedEventAttributes
_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
10)
                       ((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.<>)
                (let
                   _v :: Text
_v
                     = FoldLike
  Text
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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 @"parentWorkflowNamespace") WorkflowExecutionStartedEventAttributes
_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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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 @"parentWorkflowNamespaceId") WorkflowExecutionStartedEventAttributes
_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
218)
                            ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> WorkflowExecutionStartedEventAttributes
-> 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'parentWorkflowExecution") WorkflowExecutionStartedEventAttributes
_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
26)
                                ((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 :: Int64
_v
                              = FoldLike
  Int64
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Int64
  Int64
-> WorkflowExecutionStartedEventAttributes -> 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 @"parentInitiatedEventId") WorkflowExecutionStartedEventAttributes
_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.<>)
                            (case
                                 FoldLike
  (Maybe TaskQueue)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> WorkflowExecutionStartedEventAttributes -> 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") WorkflowExecutionStartedEventAttributes
_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
42)
                                      ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionStartedEventAttributes -> 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") WorkflowExecutionStartedEventAttributes
_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
50)
                                         ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionStartedEventAttributes -> 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")
                                         WorkflowExecutionStartedEventAttributes
_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.<>)
                                     (case
                                          FoldLike
  (Maybe Duration)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionStartedEventAttributes -> 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")
                                            WorkflowExecutionStartedEventAttributes
_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
66)
                                               ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionStartedEventAttributes -> 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")
                                               WorkflowExecutionStartedEventAttributes
_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
74)
                                                  ((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 :: Text
_v
                                                = FoldLike
  Text
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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
                                                       @"continuedExecutionRunId")
                                                    WorkflowExecutionStartedEventAttributes
_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.<>)
                                              (let
                                                 _v :: ContinueAsNewInitiator
_v
                                                   = FoldLike
  ContinueAsNewInitiator
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  ContinueAsNewInitiator
  ContinueAsNewInitiator
-> WorkflowExecutionStartedEventAttributes
-> ContinueAsNewInitiator
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 @"initiator") WorkflowExecutionStartedEventAttributes
_x
                                               in
                                                 if ContinueAsNewInitiator -> ContinueAsNewInitiator -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) ContinueAsNewInitiator
_v ContinueAsNewInitiator
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
88)
                                                       ((Int -> Builder)
-> (ContinueAsNewInitiator -> Int)
-> ContinueAsNewInitiator
-> 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)
                                                          ContinueAsNewInitiator -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum ContinueAsNewInitiator
_v))
                                              (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                 (case
                                                      FoldLike
  (Maybe Failure)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> WorkflowExecutionStartedEventAttributes -> 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'continuedFailure")
                                                        WorkflowExecutionStartedEventAttributes
_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
98)
                                                           ((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 Payloads)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionStartedEventAttributes -> 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'lastCompletionResult")
                                                           WorkflowExecutionStartedEventAttributes
_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
106)
                                                              ((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.<>)
                                                       (let
                                                          _v :: Text
_v
                                                            = FoldLike
  Text
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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
                                                                   @"originalExecutionRunId")
                                                                WorkflowExecutionStartedEventAttributes
_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
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))
                                                       (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                          (let
                                                             _v :: Text
_v
                                                               = FoldLike
  Text
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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
                                                                      @"identity")
                                                                   WorkflowExecutionStartedEventAttributes
_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
122)
                                                                   ((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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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
                                                                         @"firstExecutionRunId")
                                                                      WorkflowExecutionStartedEventAttributes
_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
130)
                                                                      ((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 RetryPolicy)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe RetryPolicy)
  (Maybe RetryPolicy)
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                       WorkflowExecutionStartedEventAttributes
_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
138)
                                                                          ((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 :: Int32
_v
                                                                        = FoldLike
  Int32
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Int32
  Int32
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                            WorkflowExecutionStartedEventAttributes
_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
144)
                                                                            ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Timestamp)
  (Maybe Timestamp)
-> WorkflowExecutionStartedEventAttributes -> 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'workflowExecutionExpirationTime")
                                                                             WorkflowExecutionStartedEventAttributes
_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
154)
                                                                                ((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 :: Text
_v
                                                                              = FoldLike
  Text
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                                  WorkflowExecutionStartedEventAttributes
_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))
                                                                         (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                            (case
                                                                                 FoldLike
  (Maybe Duration)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowExecutionStartedEventAttributes -> 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'firstWorkflowTaskBackoff")
                                                                                   WorkflowExecutionStartedEventAttributes
_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
170)
                                                                                      ((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 Memo)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                                      WorkflowExecutionStartedEventAttributes
_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
178)
                                                                                         ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe SearchAttributes)
  (Maybe SearchAttributes)
-> WorkflowExecutionStartedEventAttributes
-> 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")
                                                                                         WorkflowExecutionStartedEventAttributes
_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
186)
                                                                                            ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe ResetPoints)
  (Maybe ResetPoints)
-> WorkflowExecutionStartedEventAttributes -> 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'prevAutoResetPoints")
                                                                                            WorkflowExecutionStartedEventAttributes
_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
194)
                                                                                               ((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.<>)
                                                                                        (case
                                                                                             FoldLike
  (Maybe Header)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe Header)
  (Maybe Header)
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                                               WorkflowExecutionStartedEventAttributes
_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
202)
                                                                                                  ((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))
                                                                                        (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                           (let
                                                                                              _v :: Int64
_v
                                                                                                = FoldLike
  Int64
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Int64
  Int64
-> WorkflowExecutionStartedEventAttributes -> 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
                                                                                                       @"parentInitiatedEventVersion")
                                                                                                    WorkflowExecutionStartedEventAttributes
_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
208)
                                                                                                    ((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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                                                       WorkflowExecutionStartedEventAttributes
_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
226)
                                                                                                       ((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)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> WorkflowExecutionStartedEventAttributes
-> 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'sourceVersionStamp")
                                                                                                        WorkflowExecutionStartedEventAttributes
_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
234)
                                                                                                           ((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.<>)
                                                                                                    ((Callback -> Builder) -> Vector Callback -> Builder
forall (v :: * -> *) a.
Vector v a =>
(a -> Builder) -> v a -> Builder
Data.ProtoLens.Encoding.Bytes.foldMapBuilder
                                                                                                       (\ Callback
_v
                                                                                                          -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                                               (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt
                                                                                                                  Word64
242)
                                                                                                               ((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))
                                                                                                       (FoldLike
  (Vector Callback)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Vector Callback)
  (Vector Callback)
-> WorkflowExecutionStartedEventAttributes -> Vector 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
                                                                                                             @"vec'completionCallbacks")
                                                                                                          WorkflowExecutionStartedEventAttributes
_x))
                                                                                                    (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                                                                                       (case
                                                                                                            FoldLike
  (Maybe WorkflowExecution)
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  (Maybe WorkflowExecution)
  (Maybe WorkflowExecution)
-> WorkflowExecutionStartedEventAttributes
-> 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'rootWorkflowExecution")
                                                                                                              WorkflowExecutionStartedEventAttributes
_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
250)
                                                                                                                 ((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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  Text
  Text
-> WorkflowExecutionStartedEventAttributes -> 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")
                                                                                                                   WorkflowExecutionStartedEventAttributes
_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
258)
                                                                                                                   ((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
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionStartedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                                                                                                FoldLike
  FieldSet
  WorkflowExecutionStartedEventAttributes
  WorkflowExecutionStartedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionStartedEventAttributes FieldSet
Data.ProtoLens.unknownFields
                                                                                                                WorkflowExecutionStartedEventAttributes
_x)))))))))))))))))))))))))))))))))
instance Control.DeepSeq.NFData WorkflowExecutionStartedEventAttributes where
  rnf :: WorkflowExecutionStartedEventAttributes -> ()
rnf
    = \ WorkflowExecutionStartedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionStartedEventAttributes -> FieldSet
_WorkflowExecutionStartedEventAttributes'_unknownFields WorkflowExecutionStartedEventAttributes
x__)
             (Maybe WorkflowType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionStartedEventAttributes -> Maybe WorkflowType
_WorkflowExecutionStartedEventAttributes'workflowType WorkflowExecutionStartedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespace
                      WorkflowExecutionStartedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'parentWorkflowNamespaceId
                         WorkflowExecutionStartedEventAttributes
x__)
                      (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'parentWorkflowExecution
                            WorkflowExecutionStartedEventAttributes
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowExecutionStartedEventAttributes -> Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventId
                               WorkflowExecutionStartedEventAttributes
x__)
                            (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowExecutionStartedEventAttributes -> Maybe TaskQueue
_WorkflowExecutionStartedEventAttributes'taskQueue WorkflowExecutionStartedEventAttributes
x__)
                               (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'input WorkflowExecutionStartedEventAttributes
x__)
                                  (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowExecutionTimeout
                                        WorkflowExecutionStartedEventAttributes
x__)
                                     (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowRunTimeout
                                           WorkflowExecutionStartedEventAttributes
x__)
                                        (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'workflowTaskTimeout
                                              WorkflowExecutionStartedEventAttributes
x__)
                                           (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                              (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'continuedExecutionRunId
                                                 WorkflowExecutionStartedEventAttributes
x__)
                                              (ContinueAsNewInitiator -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                 (WorkflowExecutionStartedEventAttributes -> ContinueAsNewInitiator
_WorkflowExecutionStartedEventAttributes'initiator
                                                    WorkflowExecutionStartedEventAttributes
x__)
                                                 (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                    (WorkflowExecutionStartedEventAttributes -> Maybe Failure
_WorkflowExecutionStartedEventAttributes'continuedFailure
                                                       WorkflowExecutionStartedEventAttributes
x__)
                                                    (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                       (WorkflowExecutionStartedEventAttributes -> Maybe Payloads
_WorkflowExecutionStartedEventAttributes'lastCompletionResult
                                                          WorkflowExecutionStartedEventAttributes
x__)
                                                       (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                          (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'originalExecutionRunId
                                                             WorkflowExecutionStartedEventAttributes
x__)
                                                          (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                             (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'identity
                                                                WorkflowExecutionStartedEventAttributes
x__)
                                                             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'firstExecutionRunId
                                                                   WorkflowExecutionStartedEventAttributes
x__)
                                                                (Maybe RetryPolicy -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                   (WorkflowExecutionStartedEventAttributes -> Maybe RetryPolicy
_WorkflowExecutionStartedEventAttributes'retryPolicy
                                                                      WorkflowExecutionStartedEventAttributes
x__)
                                                                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                      (WorkflowExecutionStartedEventAttributes -> Int32
_WorkflowExecutionStartedEventAttributes'attempt
                                                                         WorkflowExecutionStartedEventAttributes
x__)
                                                                      (Maybe Timestamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                         (WorkflowExecutionStartedEventAttributes -> Maybe Timestamp
_WorkflowExecutionStartedEventAttributes'workflowExecutionExpirationTime
                                                                            WorkflowExecutionStartedEventAttributes
x__)
                                                                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                            (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'cronSchedule
                                                                               WorkflowExecutionStartedEventAttributes
x__)
                                                                            (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                               (WorkflowExecutionStartedEventAttributes -> Maybe Duration
_WorkflowExecutionStartedEventAttributes'firstWorkflowTaskBackoff
                                                                                  WorkflowExecutionStartedEventAttributes
x__)
                                                                               (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                  (WorkflowExecutionStartedEventAttributes -> Maybe Memo
_WorkflowExecutionStartedEventAttributes'memo
                                                                                     WorkflowExecutionStartedEventAttributes
x__)
                                                                                  (Maybe SearchAttributes -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                     (WorkflowExecutionStartedEventAttributes -> Maybe SearchAttributes
_WorkflowExecutionStartedEventAttributes'searchAttributes
                                                                                        WorkflowExecutionStartedEventAttributes
x__)
                                                                                     (Maybe ResetPoints -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                        (WorkflowExecutionStartedEventAttributes -> Maybe ResetPoints
_WorkflowExecutionStartedEventAttributes'prevAutoResetPoints
                                                                                           WorkflowExecutionStartedEventAttributes
x__)
                                                                                        (Maybe Header -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                           (WorkflowExecutionStartedEventAttributes -> Maybe Header
_WorkflowExecutionStartedEventAttributes'header
                                                                                              WorkflowExecutionStartedEventAttributes
x__)
                                                                                           (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                              (WorkflowExecutionStartedEventAttributes -> Int64
_WorkflowExecutionStartedEventAttributes'parentInitiatedEventVersion
                                                                                                 WorkflowExecutionStartedEventAttributes
x__)
                                                                                              (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                                 (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'workflowId
                                                                                                    WorkflowExecutionStartedEventAttributes
x__)
                                                                                                 (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                                    (WorkflowExecutionStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowExecutionStartedEventAttributes'sourceVersionStamp
                                                                                                       WorkflowExecutionStartedEventAttributes
x__)
                                                                                                    (Vector Callback -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                                       (WorkflowExecutionStartedEventAttributes -> Vector Callback
_WorkflowExecutionStartedEventAttributes'completionCallbacks
                                                                                                          WorkflowExecutionStartedEventAttributes
x__)
                                                                                                       (Maybe WorkflowExecution -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                                          (WorkflowExecutionStartedEventAttributes -> Maybe WorkflowExecution
_WorkflowExecutionStartedEventAttributes'rootWorkflowExecution
                                                                                                             WorkflowExecutionStartedEventAttributes
x__)
                                                                                                          (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                                                                                             (WorkflowExecutionStartedEventAttributes -> Text
_WorkflowExecutionStartedEventAttributes'inheritedBuildId
                                                                                                                WorkflowExecutionStartedEventAttributes
x__)
                                                                                                             ()))))))))))))))))))))))))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.reason' @:: Lens' WorkflowExecutionTerminatedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.details' @:: Lens' WorkflowExecutionTerminatedEventAttributes Proto.Temporal.Api.Common.V1.Message.Payloads@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'details' @:: Lens' WorkflowExecutionTerminatedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowExecutionTerminatedEventAttributes Data.Text.Text@ -}
data WorkflowExecutionTerminatedEventAttributes
  = WorkflowExecutionTerminatedEventAttributes'_constructor {WorkflowExecutionTerminatedEventAttributes -> Text
_WorkflowExecutionTerminatedEventAttributes'reason :: !Data.Text.Text,
                                                             WorkflowExecutionTerminatedEventAttributes -> Maybe Payloads
_WorkflowExecutionTerminatedEventAttributes'details :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads),
                                                             WorkflowExecutionTerminatedEventAttributes -> Text
_WorkflowExecutionTerminatedEventAttributes'identity :: !Data.Text.Text,
                                                             WorkflowExecutionTerminatedEventAttributes -> FieldSet
_WorkflowExecutionTerminatedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
(WorkflowExecutionTerminatedEventAttributes
 -> WorkflowExecutionTerminatedEventAttributes -> Bool)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes -> Bool)
-> Eq WorkflowExecutionTerminatedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
== :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
$c/= :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
/= :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionTerminatedEventAttributes
Eq WorkflowExecutionTerminatedEventAttributes =>
(WorkflowExecutionTerminatedEventAttributes
 -> WorkflowExecutionTerminatedEventAttributes -> Ordering)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes -> Bool)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes -> Bool)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes -> Bool)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes -> Bool)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes)
-> (WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes
    -> WorkflowExecutionTerminatedEventAttributes)
-> Ord WorkflowExecutionTerminatedEventAttributes
WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Ordering
WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
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 :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Ordering
compare :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Ordering
$c< :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
< :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
$c<= :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
<= :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
$c> :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
> :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
$c>= :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
>= :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes -> Bool
$cmax :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
max :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
$cmin :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
min :: WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
-> WorkflowExecutionTerminatedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionTerminatedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionTerminatedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionTerminatedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionTerminatedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionTerminatedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionTerminatedEventAttributes "reason" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "reason"
-> (Text -> f Text)
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "reason"
_
    = ((Text -> f Text)
 -> WorkflowExecutionTerminatedEventAttributes
 -> f WorkflowExecutionTerminatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionTerminatedEventAttributes -> Text)
-> (WorkflowExecutionTerminatedEventAttributes
    -> Text -> WorkflowExecutionTerminatedEventAttributes)
-> Lens
     WorkflowExecutionTerminatedEventAttributes
     WorkflowExecutionTerminatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionTerminatedEventAttributes -> Text
_WorkflowExecutionTerminatedEventAttributes'reason
           (\ WorkflowExecutionTerminatedEventAttributes
x__ Text
y__
              -> WorkflowExecutionTerminatedEventAttributes
x__ {_WorkflowExecutionTerminatedEventAttributes'reason = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionTerminatedEventAttributes "details" Proto.Temporal.Api.Common.V1.Message.Payloads where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "details"
-> (Payloads -> f Payloads)
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionTerminatedEventAttributes
 -> f WorkflowExecutionTerminatedEventAttributes)
-> ((Payloads -> f Payloads)
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Payloads -> f Payloads)
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionTerminatedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionTerminatedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionTerminatedEventAttributes)
-> Lens
     WorkflowExecutionTerminatedEventAttributes
     WorkflowExecutionTerminatedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionTerminatedEventAttributes -> Maybe Payloads
_WorkflowExecutionTerminatedEventAttributes'details
           (\ WorkflowExecutionTerminatedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionTerminatedEventAttributes
x__
                   {_WorkflowExecutionTerminatedEventAttributes'details = 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 WorkflowExecutionTerminatedEventAttributes "maybe'details" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Payloads) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'details"
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "maybe'details"
_
    = ((Maybe Payloads -> f (Maybe Payloads))
 -> WorkflowExecutionTerminatedEventAttributes
 -> f WorkflowExecutionTerminatedEventAttributes)
-> ((Maybe Payloads -> f (Maybe Payloads))
    -> Maybe Payloads -> f (Maybe Payloads))
-> (Maybe Payloads -> f (Maybe Payloads))
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionTerminatedEventAttributes -> Maybe Payloads)
-> (WorkflowExecutionTerminatedEventAttributes
    -> Maybe Payloads -> WorkflowExecutionTerminatedEventAttributes)
-> Lens
     WorkflowExecutionTerminatedEventAttributes
     WorkflowExecutionTerminatedEventAttributes
     (Maybe Payloads)
     (Maybe Payloads)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionTerminatedEventAttributes -> Maybe Payloads
_WorkflowExecutionTerminatedEventAttributes'details
           (\ WorkflowExecutionTerminatedEventAttributes
x__ Maybe Payloads
y__
              -> WorkflowExecutionTerminatedEventAttributes
x__
                   {_WorkflowExecutionTerminatedEventAttributes'details = y__}))
        (Maybe Payloads -> f (Maybe Payloads))
-> Maybe Payloads -> f (Maybe Payloads)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionTerminatedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowExecutionTerminatedEventAttributes
 -> f WorkflowExecutionTerminatedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionTerminatedEventAttributes
-> f WorkflowExecutionTerminatedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionTerminatedEventAttributes -> Text)
-> (WorkflowExecutionTerminatedEventAttributes
    -> Text -> WorkflowExecutionTerminatedEventAttributes)
-> Lens
     WorkflowExecutionTerminatedEventAttributes
     WorkflowExecutionTerminatedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionTerminatedEventAttributes -> Text
_WorkflowExecutionTerminatedEventAttributes'identity
           (\ WorkflowExecutionTerminatedEventAttributes
x__ Text
y__
              -> WorkflowExecutionTerminatedEventAttributes
x__
                   {_WorkflowExecutionTerminatedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionTerminatedEventAttributes where
  messageName :: Proxy WorkflowExecutionTerminatedEventAttributes -> Text
messageName Proxy WorkflowExecutionTerminatedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionTerminatedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionTerminatedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionTerminatedEventAttributes
_
    = ByteString
"\n\
      \*WorkflowExecutionTerminatedEventAttributes\DC2\SYN\n\
      \\ACKreason\CAN\SOH \SOH(\tR\ACKreason\DC2:\n\
      \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity"
  packedFileDescriptor :: Proxy WorkflowExecutionTerminatedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionTerminatedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag (FieldDescriptor WorkflowExecutionTerminatedEventAttributes)
fieldsByTag
    = let
        reason__field_descriptor :: FieldDescriptor WorkflowExecutionTerminatedEventAttributes
reason__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionTerminatedEventAttributes Text
-> FieldDescriptor WorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"reason"
              (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
     WorkflowExecutionTerminatedEventAttributes
     WorkflowExecutionTerminatedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionTerminatedEventAttributes 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 @"reason")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionTerminatedEventAttributes
        details__field_descriptor :: FieldDescriptor WorkflowExecutionTerminatedEventAttributes
details__field_descriptor
          = String
-> FieldTypeDescriptor Payloads
-> FieldAccessor
     WorkflowExecutionTerminatedEventAttributes Payloads
-> FieldDescriptor WorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  WorkflowExecutionTerminatedEventAttributes
  WorkflowExecutionTerminatedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> FieldAccessor
     WorkflowExecutionTerminatedEventAttributes 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'details")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionTerminatedEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowExecutionTerminatedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionTerminatedEventAttributes Text
-> FieldDescriptor WorkflowExecutionTerminatedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowExecutionTerminatedEventAttributes
     WorkflowExecutionTerminatedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionTerminatedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionTerminatedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionTerminatedEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowExecutionTerminatedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionTerminatedEventAttributes
reason__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionTerminatedEventAttributes
details__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionTerminatedEventAttributes
identity__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionTerminatedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionTerminatedEventAttributes -> FieldSet)
-> (WorkflowExecutionTerminatedEventAttributes
    -> FieldSet -> WorkflowExecutionTerminatedEventAttributes)
-> Lens' WorkflowExecutionTerminatedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionTerminatedEventAttributes -> FieldSet
_WorkflowExecutionTerminatedEventAttributes'_unknownFields
        (\ WorkflowExecutionTerminatedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionTerminatedEventAttributes
x__
                {_WorkflowExecutionTerminatedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionTerminatedEventAttributes
defMessage
    = WorkflowExecutionTerminatedEventAttributes'_constructor
        {_WorkflowExecutionTerminatedEventAttributes'reason :: Text
_WorkflowExecutionTerminatedEventAttributes'reason = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionTerminatedEventAttributes'details :: Maybe Payloads
_WorkflowExecutionTerminatedEventAttributes'details = Maybe Payloads
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionTerminatedEventAttributes'identity :: Text
_WorkflowExecutionTerminatedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionTerminatedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionTerminatedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionTerminatedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionTerminatedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionTerminatedEventAttributes
        loop :: WorkflowExecutionTerminatedEventAttributes
-> Parser WorkflowExecutionTerminatedEventAttributes
loop WorkflowExecutionTerminatedEventAttributes
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
"reason"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"reason") y x)
                        Word64
18
                          -> 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
"details"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"details") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") 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 WorkflowExecutionTerminatedEventAttributes
-> String -> Parser WorkflowExecutionTerminatedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionTerminatedEventAttributes
-> Parser WorkflowExecutionTerminatedEventAttributes
loop WorkflowExecutionTerminatedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionTerminatedEventAttributes"
  buildMessage :: WorkflowExecutionTerminatedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionTerminatedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v = FoldLike
  Text
  WorkflowExecutionTerminatedEventAttributes
  WorkflowExecutionTerminatedEventAttributes
  Text
  Text
-> WorkflowExecutionTerminatedEventAttributes -> 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 @"reason") WorkflowExecutionTerminatedEventAttributes
_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 Payloads)
  WorkflowExecutionTerminatedEventAttributes
  WorkflowExecutionTerminatedEventAttributes
  (Maybe Payloads)
  (Maybe Payloads)
-> WorkflowExecutionTerminatedEventAttributes -> 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'details") WorkflowExecutionTerminatedEventAttributes
_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
18)
                          ((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.<>)
                   (let
                      _v :: Text
_v = FoldLike
  Text
  WorkflowExecutionTerminatedEventAttributes
  WorkflowExecutionTerminatedEventAttributes
  Text
  Text
-> WorkflowExecutionTerminatedEventAttributes -> 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 @"identity") WorkflowExecutionTerminatedEventAttributes
_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))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  WorkflowExecutionTerminatedEventAttributes
  WorkflowExecutionTerminatedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionTerminatedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionTerminatedEventAttributes
  WorkflowExecutionTerminatedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionTerminatedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionTerminatedEventAttributes
_x))))
instance Control.DeepSeq.NFData WorkflowExecutionTerminatedEventAttributes where
  rnf :: WorkflowExecutionTerminatedEventAttributes -> ()
rnf
    = \ WorkflowExecutionTerminatedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionTerminatedEventAttributes -> FieldSet
_WorkflowExecutionTerminatedEventAttributes'_unknownFields WorkflowExecutionTerminatedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionTerminatedEventAttributes -> Text
_WorkflowExecutionTerminatedEventAttributes'reason WorkflowExecutionTerminatedEventAttributes
x__)
                (Maybe Payloads -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionTerminatedEventAttributes -> Maybe Payloads
_WorkflowExecutionTerminatedEventAttributes'details WorkflowExecutionTerminatedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionTerminatedEventAttributes -> Text
_WorkflowExecutionTerminatedEventAttributes'identity WorkflowExecutionTerminatedEventAttributes
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.retryState' @:: Lens' WorkflowExecutionTimedOutEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.RetryState@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newExecutionRunId' @:: Lens' WorkflowExecutionTimedOutEventAttributes Data.Text.Text@ -}
data WorkflowExecutionTimedOutEventAttributes
  = WorkflowExecutionTimedOutEventAttributes'_constructor {WorkflowExecutionTimedOutEventAttributes -> RetryState
_WorkflowExecutionTimedOutEventAttributes'retryState :: !Proto.Temporal.Api.Enums.V1.Workflow.RetryState,
                                                           WorkflowExecutionTimedOutEventAttributes -> Text
_WorkflowExecutionTimedOutEventAttributes'newExecutionRunId :: !Data.Text.Text,
                                                           WorkflowExecutionTimedOutEventAttributes -> FieldSet
_WorkflowExecutionTimedOutEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
(WorkflowExecutionTimedOutEventAttributes
 -> WorkflowExecutionTimedOutEventAttributes -> Bool)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes -> Bool)
-> Eq WorkflowExecutionTimedOutEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
== :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
$c/= :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
/= :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionTimedOutEventAttributes
Eq WorkflowExecutionTimedOutEventAttributes =>
(WorkflowExecutionTimedOutEventAttributes
 -> WorkflowExecutionTimedOutEventAttributes -> Ordering)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes -> Bool)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes -> Bool)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes -> Bool)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes -> Bool)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes)
-> (WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes
    -> WorkflowExecutionTimedOutEventAttributes)
-> Ord WorkflowExecutionTimedOutEventAttributes
WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Ordering
WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
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 :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Ordering
compare :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Ordering
$c< :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
< :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
$c<= :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
<= :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
$c> :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
> :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
$c>= :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
>= :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes -> Bool
$cmax :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
max :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
$cmin :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
min :: WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
-> WorkflowExecutionTimedOutEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionTimedOutEventAttributes where
  showsPrec :: Int -> WorkflowExecutionTimedOutEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionTimedOutEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionTimedOutEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionTimedOutEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionTimedOutEventAttributes "retryState" Proto.Temporal.Api.Enums.V1.Workflow.RetryState where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "retryState"
-> (RetryState -> f RetryState)
-> WorkflowExecutionTimedOutEventAttributes
-> f WorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "retryState"
_
    = ((RetryState -> f RetryState)
 -> WorkflowExecutionTimedOutEventAttributes
 -> f WorkflowExecutionTimedOutEventAttributes)
-> ((RetryState -> f RetryState) -> RetryState -> f RetryState)
-> (RetryState -> f RetryState)
-> WorkflowExecutionTimedOutEventAttributes
-> f WorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionTimedOutEventAttributes -> RetryState)
-> (WorkflowExecutionTimedOutEventAttributes
    -> RetryState -> WorkflowExecutionTimedOutEventAttributes)
-> Lens
     WorkflowExecutionTimedOutEventAttributes
     WorkflowExecutionTimedOutEventAttributes
     RetryState
     RetryState
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionTimedOutEventAttributes -> RetryState
_WorkflowExecutionTimedOutEventAttributes'retryState
           (\ WorkflowExecutionTimedOutEventAttributes
x__ RetryState
y__
              -> WorkflowExecutionTimedOutEventAttributes
x__
                   {_WorkflowExecutionTimedOutEventAttributes'retryState = y__}))
        (RetryState -> f RetryState) -> RetryState -> f RetryState
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionTimedOutEventAttributes "newExecutionRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newExecutionRunId"
-> (Text -> f Text)
-> WorkflowExecutionTimedOutEventAttributes
-> f WorkflowExecutionTimedOutEventAttributes
fieldOf Proxy# "newExecutionRunId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionTimedOutEventAttributes
 -> f WorkflowExecutionTimedOutEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionTimedOutEventAttributes
-> f WorkflowExecutionTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionTimedOutEventAttributes -> Text)
-> (WorkflowExecutionTimedOutEventAttributes
    -> Text -> WorkflowExecutionTimedOutEventAttributes)
-> Lens
     WorkflowExecutionTimedOutEventAttributes
     WorkflowExecutionTimedOutEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionTimedOutEventAttributes -> Text
_WorkflowExecutionTimedOutEventAttributes'newExecutionRunId
           (\ WorkflowExecutionTimedOutEventAttributes
x__ Text
y__
              -> WorkflowExecutionTimedOutEventAttributes
x__
                   {_WorkflowExecutionTimedOutEventAttributes'newExecutionRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionTimedOutEventAttributes where
  messageName :: Proxy WorkflowExecutionTimedOutEventAttributes -> Text
messageName Proxy WorkflowExecutionTimedOutEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionTimedOutEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionTimedOutEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionTimedOutEventAttributes
_
    = ByteString
"\n\
      \(WorkflowExecutionTimedOutEventAttributes\DC2B\n\
      \\vretry_state\CAN\SOH \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
      \retryState\DC2/\n\
      \\DC4new_execution_run_id\CAN\STX \SOH(\tR\DC1newExecutionRunId"
  packedFileDescriptor :: Proxy WorkflowExecutionTimedOutEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionTimedOutEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowExecutionTimedOutEventAttributes)
fieldsByTag
    = let
        retryState__field_descriptor :: FieldDescriptor WorkflowExecutionTimedOutEventAttributes
retryState__field_descriptor
          = String
-> FieldTypeDescriptor RetryState
-> FieldAccessor
     WorkflowExecutionTimedOutEventAttributes RetryState
-> FieldDescriptor WorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"retry_state"
              (ScalarField RetryState -> FieldTypeDescriptor RetryState
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField RetryState
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.RetryState)
              (WireDefault RetryState
-> Lens
     WorkflowExecutionTimedOutEventAttributes
     WorkflowExecutionTimedOutEventAttributes
     RetryState
     RetryState
-> FieldAccessor
     WorkflowExecutionTimedOutEventAttributes RetryState
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault RetryState
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 @"retryState")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionTimedOutEventAttributes
        newExecutionRunId__field_descriptor :: FieldDescriptor WorkflowExecutionTimedOutEventAttributes
newExecutionRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowExecutionTimedOutEventAttributes Text
-> FieldDescriptor WorkflowExecutionTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_execution_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
     WorkflowExecutionTimedOutEventAttributes
     WorkflowExecutionTimedOutEventAttributes
     Text
     Text
-> FieldAccessor WorkflowExecutionTimedOutEventAttributes 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 @"newExecutionRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionTimedOutEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowExecutionTimedOutEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowExecutionTimedOutEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionTimedOutEventAttributes
retryState__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionTimedOutEventAttributes
newExecutionRunId__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionTimedOutEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionTimedOutEventAttributes -> FieldSet)
-> (WorkflowExecutionTimedOutEventAttributes
    -> FieldSet -> WorkflowExecutionTimedOutEventAttributes)
-> Lens' WorkflowExecutionTimedOutEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionTimedOutEventAttributes -> FieldSet
_WorkflowExecutionTimedOutEventAttributes'_unknownFields
        (\ WorkflowExecutionTimedOutEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionTimedOutEventAttributes
x__
                {_WorkflowExecutionTimedOutEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionTimedOutEventAttributes
defMessage
    = WorkflowExecutionTimedOutEventAttributes'_constructor
        {_WorkflowExecutionTimedOutEventAttributes'retryState :: RetryState
_WorkflowExecutionTimedOutEventAttributes'retryState = RetryState
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionTimedOutEventAttributes'newExecutionRunId :: Text
_WorkflowExecutionTimedOutEventAttributes'newExecutionRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionTimedOutEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionTimedOutEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionTimedOutEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionTimedOutEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionTimedOutEventAttributes
        loop :: WorkflowExecutionTimedOutEventAttributes
-> Parser WorkflowExecutionTimedOutEventAttributes
loop WorkflowExecutionTimedOutEventAttributes
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 RetryState -> String -> Parser RetryState
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> RetryState) -> Parser Int -> Parser RetryState
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> RetryState
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
"retry_state"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"retryState") 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
"new_execution_run_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newExecutionRunId") 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 WorkflowExecutionTimedOutEventAttributes
-> String -> Parser WorkflowExecutionTimedOutEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionTimedOutEventAttributes
-> Parser WorkflowExecutionTimedOutEventAttributes
loop WorkflowExecutionTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionTimedOutEventAttributes"
  buildMessage :: WorkflowExecutionTimedOutEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionTimedOutEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: RetryState
_v
                  = FoldLike
  RetryState
  WorkflowExecutionTimedOutEventAttributes
  WorkflowExecutionTimedOutEventAttributes
  RetryState
  RetryState
-> WorkflowExecutionTimedOutEventAttributes -> RetryState
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 @"retryState") WorkflowExecutionTimedOutEventAttributes
_x
              in
                if RetryState -> RetryState -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) RetryState
_v RetryState
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) -> (RetryState -> Int) -> RetryState -> 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)
                         RetryState -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum RetryState
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Text
_v
                     = FoldLike
  Text
  WorkflowExecutionTimedOutEventAttributes
  WorkflowExecutionTimedOutEventAttributes
  Text
  Text
-> WorkflowExecutionTimedOutEventAttributes -> 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 @"newExecutionRunId") WorkflowExecutionTimedOutEventAttributes
_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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  WorkflowExecutionTimedOutEventAttributes
  WorkflowExecutionTimedOutEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionTimedOutEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionTimedOutEventAttributes
  WorkflowExecutionTimedOutEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionTimedOutEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionTimedOutEventAttributes
_x)))
instance Control.DeepSeq.NFData WorkflowExecutionTimedOutEventAttributes where
  rnf :: WorkflowExecutionTimedOutEventAttributes -> ()
rnf
    = \ WorkflowExecutionTimedOutEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionTimedOutEventAttributes -> FieldSet
_WorkflowExecutionTimedOutEventAttributes'_unknownFields WorkflowExecutionTimedOutEventAttributes
x__)
             (RetryState -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionTimedOutEventAttributes -> RetryState
_WorkflowExecutionTimedOutEventAttributes'retryState WorkflowExecutionTimedOutEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionTimedOutEventAttributes -> Text
_WorkflowExecutionTimedOutEventAttributes'newExecutionRunId WorkflowExecutionTimedOutEventAttributes
x__)
                   ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.protocolInstanceId' @:: Lens' WorkflowExecutionUpdateAcceptedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.acceptedRequestMessageId' @:: Lens' WorkflowExecutionUpdateAcceptedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.acceptedRequestSequencingEventId' @:: Lens' WorkflowExecutionUpdateAcceptedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.acceptedRequest' @:: Lens' WorkflowExecutionUpdateAcceptedEventAttributes Proto.Temporal.Api.Update.V1.Message.Request@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'acceptedRequest' @:: Lens' WorkflowExecutionUpdateAcceptedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request)@ -}
data WorkflowExecutionUpdateAcceptedEventAttributes
  = WorkflowExecutionUpdateAcceptedEventAttributes'_constructor {WorkflowExecutionUpdateAcceptedEventAttributes -> Text
_WorkflowExecutionUpdateAcceptedEventAttributes'protocolInstanceId :: !Data.Text.Text,
                                                                 WorkflowExecutionUpdateAcceptedEventAttributes -> Text
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestMessageId :: !Data.Text.Text,
                                                                 WorkflowExecutionUpdateAcceptedEventAttributes -> Int64
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestSequencingEventId :: !Data.Int.Int64,
                                                                 WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request),
                                                                 WorkflowExecutionUpdateAcceptedEventAttributes -> FieldSet
_WorkflowExecutionUpdateAcceptedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
(WorkflowExecutionUpdateAcceptedEventAttributes
 -> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool)
-> Eq WorkflowExecutionUpdateAcceptedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
== :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
$c/= :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
/= :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionUpdateAcceptedEventAttributes
Eq WorkflowExecutionUpdateAcceptedEventAttributes =>
(WorkflowExecutionUpdateAcceptedEventAttributes
 -> WorkflowExecutionUpdateAcceptedEventAttributes -> Ordering)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes
    -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Ord WorkflowExecutionUpdateAcceptedEventAttributes
WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Ordering
WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
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 :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Ordering
compare :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Ordering
$c< :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
< :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
$c<= :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
<= :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
$c> :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
> :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
$c>= :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
>= :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Bool
$cmax :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
max :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
$cmin :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
min :: WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> WorkflowExecutionUpdateAcceptedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionUpdateAcceptedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionUpdateAcceptedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionUpdateAcceptedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionUpdateAcceptedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionUpdateAcceptedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAcceptedEventAttributes "protocolInstanceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "protocolInstanceId"
-> (Text -> f Text)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
fieldOf Proxy# "protocolInstanceId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionUpdateAcceptedEventAttributes
 -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAcceptedEventAttributes -> Text)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> Text -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAcceptedEventAttributes -> Text
_WorkflowExecutionUpdateAcceptedEventAttributes'protocolInstanceId
           (\ WorkflowExecutionUpdateAcceptedEventAttributes
x__ Text
y__
              -> WorkflowExecutionUpdateAcceptedEventAttributes
x__
                   {_WorkflowExecutionUpdateAcceptedEventAttributes'protocolInstanceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAcceptedEventAttributes "acceptedRequestMessageId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "acceptedRequestMessageId"
-> (Text -> f Text)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
fieldOf Proxy# "acceptedRequestMessageId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionUpdateAcceptedEventAttributes
 -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAcceptedEventAttributes -> Text)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> Text -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAcceptedEventAttributes -> Text
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestMessageId
           (\ WorkflowExecutionUpdateAcceptedEventAttributes
x__ Text
y__
              -> WorkflowExecutionUpdateAcceptedEventAttributes
x__
                   {_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestMessageId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAcceptedEventAttributes "acceptedRequestSequencingEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "acceptedRequestSequencingEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
fieldOf Proxy# "acceptedRequestSequencingEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionUpdateAcceptedEventAttributes
 -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAcceptedEventAttributes -> Int64)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> Int64 -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAcceptedEventAttributes -> Int64
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestSequencingEventId
           (\ WorkflowExecutionUpdateAcceptedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionUpdateAcceptedEventAttributes
x__
                   {_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestSequencingEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAcceptedEventAttributes "acceptedRequest" Proto.Temporal.Api.Update.V1.Message.Request where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "acceptedRequest"
-> (Request -> f Request)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
fieldOf Proxy# "acceptedRequest"
_
    = ((Maybe Request -> f (Maybe Request))
 -> WorkflowExecutionUpdateAcceptedEventAttributes
 -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> ((Request -> f Request) -> Maybe Request -> f (Maybe Request))
-> (Request -> f Request)
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> Maybe Request -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest
           (\ WorkflowExecutionUpdateAcceptedEventAttributes
x__ Maybe Request
y__
              -> WorkflowExecutionUpdateAcceptedEventAttributes
x__
                   {_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest = y__}))
        (Request -> Lens' (Maybe Request) Request
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Request
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAcceptedEventAttributes "maybe'acceptedRequest" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'acceptedRequest"
-> (Maybe Request -> f (Maybe Request))
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
fieldOf Proxy# "maybe'acceptedRequest"
_
    = ((Maybe Request -> f (Maybe Request))
 -> WorkflowExecutionUpdateAcceptedEventAttributes
 -> f WorkflowExecutionUpdateAcceptedEventAttributes)
-> ((Maybe Request -> f (Maybe Request))
    -> Maybe Request -> f (Maybe Request))
-> (Maybe Request -> f (Maybe Request))
-> WorkflowExecutionUpdateAcceptedEventAttributes
-> f WorkflowExecutionUpdateAcceptedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> Maybe Request -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest
           (\ WorkflowExecutionUpdateAcceptedEventAttributes
x__ Maybe Request
y__
              -> WorkflowExecutionUpdateAcceptedEventAttributes
x__
                   {_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest = y__}))
        (Maybe Request -> f (Maybe Request))
-> Maybe Request -> f (Maybe Request)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionUpdateAcceptedEventAttributes where
  messageName :: Proxy WorkflowExecutionUpdateAcceptedEventAttributes -> Text
messageName Proxy WorkflowExecutionUpdateAcceptedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionUpdateAcceptedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionUpdateAcceptedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionUpdateAcceptedEventAttributes
_
    = ByteString
"\n\
      \.WorkflowExecutionUpdateAcceptedEventAttributes\DC20\n\
      \\DC4protocol_instance_id\CAN\SOH \SOH(\tR\DC2protocolInstanceId\DC2=\n\
      \\ESCaccepted_request_message_id\CAN\STX \SOH(\tR\CANacceptedRequestMessageId\DC2N\n\
      \$accepted_request_sequencing_event_id\CAN\ETX \SOH(\ETXR acceptedRequestSequencingEventId\DC2J\n\
      \\DLEaccepted_request\CAN\EOT \SOH(\v2\US.temporal.api.update.v1.RequestR\SIacceptedRequest"
  packedFileDescriptor :: Proxy WorkflowExecutionUpdateAcceptedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionUpdateAcceptedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes)
fieldsByTag
    = let
        protocolInstanceId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
protocolInstanceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes Text
-> FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"protocol_instance_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
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes 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 @"protocolInstanceId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
        acceptedRequestMessageId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
acceptedRequestMessageId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes Text
-> FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"accepted_request_message_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
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes 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 @"acceptedRequestMessageId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
        acceptedRequestSequencingEventId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
acceptedRequestSequencingEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"accepted_request_sequencing_event_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
     WorkflowExecutionUpdateAcceptedEventAttributes
     WorkflowExecutionUpdateAcceptedEventAttributes
     Int64
     Int64
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes 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
                    @"acceptedRequestSequencingEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
        acceptedRequest__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
acceptedRequest__field_descriptor
          = String
-> FieldTypeDescriptor Request
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes Request
-> FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"accepted_request"
              (MessageOrGroup -> FieldTypeDescriptor Request
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Request)
              (Lens
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  (Maybe Request)
  (Maybe Request)
-> FieldAccessor
     WorkflowExecutionUpdateAcceptedEventAttributes Request
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'acceptedRequest")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
      in
        [(Tag,
  FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
protocolInstanceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
acceptedRequestMessageId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
acceptedRequestSequencingEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionUpdateAcceptedEventAttributes
acceptedRequest__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionUpdateAcceptedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionUpdateAcceptedEventAttributes -> FieldSet)
-> (WorkflowExecutionUpdateAcceptedEventAttributes
    -> FieldSet -> WorkflowExecutionUpdateAcceptedEventAttributes)
-> Lens' WorkflowExecutionUpdateAcceptedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionUpdateAcceptedEventAttributes -> FieldSet
_WorkflowExecutionUpdateAcceptedEventAttributes'_unknownFields
        (\ WorkflowExecutionUpdateAcceptedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionUpdateAcceptedEventAttributes
x__
                {_WorkflowExecutionUpdateAcceptedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionUpdateAcceptedEventAttributes
defMessage
    = WorkflowExecutionUpdateAcceptedEventAttributes'_constructor
        {_WorkflowExecutionUpdateAcceptedEventAttributes'protocolInstanceId :: Text
_WorkflowExecutionUpdateAcceptedEventAttributes'protocolInstanceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestMessageId :: Text
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestMessageId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestSequencingEventId :: Int64
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestSequencingEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest :: Maybe Request
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest = Maybe Request
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionUpdateAcceptedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionUpdateAcceptedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionUpdateAcceptedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionUpdateAcceptedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionUpdateAcceptedEventAttributes
        loop :: WorkflowExecutionUpdateAcceptedEventAttributes
-> Parser WorkflowExecutionUpdateAcceptedEventAttributes
loop WorkflowExecutionUpdateAcceptedEventAttributes
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
"protocol_instance_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"protocolInstanceId") 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
"accepted_request_message_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"acceptedRequestMessageId") 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
"accepted_request_sequencing_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"acceptedRequestSequencingEventId")
                                     y x)
                        Word64
34
                          -> do y <- Parser Request -> String -> Parser Request
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
"accepted_request"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"acceptedRequest") 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 WorkflowExecutionUpdateAcceptedEventAttributes
-> String -> Parser WorkflowExecutionUpdateAcceptedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionUpdateAcceptedEventAttributes
-> Parser WorkflowExecutionUpdateAcceptedEventAttributes
loop WorkflowExecutionUpdateAcceptedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionUpdateAcceptedEventAttributes"
  buildMessage :: WorkflowExecutionUpdateAcceptedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionUpdateAcceptedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  Text
  Text
-> WorkflowExecutionUpdateAcceptedEventAttributes -> 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 @"protocolInstanceId") WorkflowExecutionUpdateAcceptedEventAttributes
_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
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  Text
  Text
-> WorkflowExecutionUpdateAcceptedEventAttributes -> 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 @"acceptedRequestMessageId") WorkflowExecutionUpdateAcceptedEventAttributes
_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
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  Int64
  Int64
-> WorkflowExecutionUpdateAcceptedEventAttributes -> 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 @"acceptedRequestSequencingEventId") WorkflowExecutionUpdateAcceptedEventAttributes
_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 Request)
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  (Maybe Request)
  (Maybe Request)
-> WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request
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'acceptedRequest") WorkflowExecutionUpdateAcceptedEventAttributes
_x
                       of
                         Maybe Request
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Request
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Request -> ByteString) -> Request -> 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))
                                   Request -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Request
_v))
                      (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                         (FoldLike
  FieldSet
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionUpdateAcceptedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionUpdateAcceptedEventAttributes
  WorkflowExecutionUpdateAcceptedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionUpdateAcceptedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionUpdateAcceptedEventAttributes
_x)))))
instance Control.DeepSeq.NFData WorkflowExecutionUpdateAcceptedEventAttributes where
  rnf :: WorkflowExecutionUpdateAcceptedEventAttributes -> ()
rnf
    = \ WorkflowExecutionUpdateAcceptedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionUpdateAcceptedEventAttributes -> FieldSet
_WorkflowExecutionUpdateAcceptedEventAttributes'_unknownFields
                WorkflowExecutionUpdateAcceptedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionUpdateAcceptedEventAttributes -> Text
_WorkflowExecutionUpdateAcceptedEventAttributes'protocolInstanceId
                   WorkflowExecutionUpdateAcceptedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionUpdateAcceptedEventAttributes -> Text
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestMessageId
                      WorkflowExecutionUpdateAcceptedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionUpdateAcceptedEventAttributes -> Int64
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequestSequencingEventId
                         WorkflowExecutionUpdateAcceptedEventAttributes
x__)
                      (Maybe Request -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionUpdateAcceptedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAcceptedEventAttributes'acceptedRequest
                            WorkflowExecutionUpdateAcceptedEventAttributes
x__)
                         ()))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.request' @:: Lens' WorkflowExecutionUpdateAdmittedEventAttributes Proto.Temporal.Api.Update.V1.Message.Request@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'request' @:: Lens' WorkflowExecutionUpdateAdmittedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.origin' @:: Lens' WorkflowExecutionUpdateAdmittedEventAttributes Proto.Temporal.Api.Enums.V1.Update.UpdateAdmittedEventOrigin@ -}
data WorkflowExecutionUpdateAdmittedEventAttributes
  = WorkflowExecutionUpdateAdmittedEventAttributes'_constructor {WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAdmittedEventAttributes'request :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request),
                                                                 WorkflowExecutionUpdateAdmittedEventAttributes
-> UpdateAdmittedEventOrigin
_WorkflowExecutionUpdateAdmittedEventAttributes'origin :: !Proto.Temporal.Api.Enums.V1.Update.UpdateAdmittedEventOrigin,
                                                                 WorkflowExecutionUpdateAdmittedEventAttributes -> FieldSet
_WorkflowExecutionUpdateAdmittedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
(WorkflowExecutionUpdateAdmittedEventAttributes
 -> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool)
-> Eq WorkflowExecutionUpdateAdmittedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
== :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
$c/= :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
/= :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionUpdateAdmittedEventAttributes
Eq WorkflowExecutionUpdateAdmittedEventAttributes =>
(WorkflowExecutionUpdateAdmittedEventAttributes
 -> WorkflowExecutionUpdateAdmittedEventAttributes -> Ordering)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes
    -> WorkflowExecutionUpdateAdmittedEventAttributes)
-> Ord WorkflowExecutionUpdateAdmittedEventAttributes
WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Ordering
WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
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 :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Ordering
compare :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Ordering
$c< :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
< :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
$c<= :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
<= :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
$c> :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
> :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
$c>= :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
>= :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Bool
$cmax :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
max :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
$cmin :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
min :: WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> WorkflowExecutionUpdateAdmittedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionUpdateAdmittedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionUpdateAdmittedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionUpdateAdmittedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionUpdateAdmittedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionUpdateAdmittedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAdmittedEventAttributes "request" Proto.Temporal.Api.Update.V1.Message.Request where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "request"
-> (Request -> f Request)
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> f WorkflowExecutionUpdateAdmittedEventAttributes
fieldOf Proxy# "request"
_
    = ((Maybe Request -> f (Maybe Request))
 -> WorkflowExecutionUpdateAdmittedEventAttributes
 -> f WorkflowExecutionUpdateAdmittedEventAttributes)
-> ((Request -> f Request) -> Maybe Request -> f (Maybe Request))
-> (Request -> f Request)
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> f WorkflowExecutionUpdateAdmittedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> Maybe Request -> WorkflowExecutionUpdateAdmittedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAdmittedEventAttributes
     WorkflowExecutionUpdateAdmittedEventAttributes
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAdmittedEventAttributes'request
           (\ WorkflowExecutionUpdateAdmittedEventAttributes
x__ Maybe Request
y__
              -> WorkflowExecutionUpdateAdmittedEventAttributes
x__
                   {_WorkflowExecutionUpdateAdmittedEventAttributes'request = y__}))
        (Request -> Lens' (Maybe Request) Request
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Request
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAdmittedEventAttributes "maybe'request" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'request"
-> (Maybe Request -> f (Maybe Request))
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> f WorkflowExecutionUpdateAdmittedEventAttributes
fieldOf Proxy# "maybe'request"
_
    = ((Maybe Request -> f (Maybe Request))
 -> WorkflowExecutionUpdateAdmittedEventAttributes
 -> f WorkflowExecutionUpdateAdmittedEventAttributes)
-> ((Maybe Request -> f (Maybe Request))
    -> Maybe Request -> f (Maybe Request))
-> (Maybe Request -> f (Maybe Request))
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> f WorkflowExecutionUpdateAdmittedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> Maybe Request -> WorkflowExecutionUpdateAdmittedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAdmittedEventAttributes
     WorkflowExecutionUpdateAdmittedEventAttributes
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAdmittedEventAttributes'request
           (\ WorkflowExecutionUpdateAdmittedEventAttributes
x__ Maybe Request
y__
              -> WorkflowExecutionUpdateAdmittedEventAttributes
x__
                   {_WorkflowExecutionUpdateAdmittedEventAttributes'request = y__}))
        (Maybe Request -> f (Maybe Request))
-> Maybe Request -> f (Maybe Request)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateAdmittedEventAttributes "origin" Proto.Temporal.Api.Enums.V1.Update.UpdateAdmittedEventOrigin where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "origin"
-> (UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin)
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> f WorkflowExecutionUpdateAdmittedEventAttributes
fieldOf Proxy# "origin"
_
    = ((UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin)
 -> WorkflowExecutionUpdateAdmittedEventAttributes
 -> f WorkflowExecutionUpdateAdmittedEventAttributes)
-> ((UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin)
    -> UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin)
-> (UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin)
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> f WorkflowExecutionUpdateAdmittedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateAdmittedEventAttributes
 -> UpdateAdmittedEventOrigin)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> UpdateAdmittedEventOrigin
    -> WorkflowExecutionUpdateAdmittedEventAttributes)
-> Lens
     WorkflowExecutionUpdateAdmittedEventAttributes
     WorkflowExecutionUpdateAdmittedEventAttributes
     UpdateAdmittedEventOrigin
     UpdateAdmittedEventOrigin
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateAdmittedEventAttributes
-> UpdateAdmittedEventOrigin
_WorkflowExecutionUpdateAdmittedEventAttributes'origin
           (\ WorkflowExecutionUpdateAdmittedEventAttributes
x__ UpdateAdmittedEventOrigin
y__
              -> WorkflowExecutionUpdateAdmittedEventAttributes
x__
                   {_WorkflowExecutionUpdateAdmittedEventAttributes'origin = y__}))
        (UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin)
-> UpdateAdmittedEventOrigin -> f UpdateAdmittedEventOrigin
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionUpdateAdmittedEventAttributes where
  messageName :: Proxy WorkflowExecutionUpdateAdmittedEventAttributes -> Text
messageName Proxy WorkflowExecutionUpdateAdmittedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionUpdateAdmittedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionUpdateAdmittedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionUpdateAdmittedEventAttributes
_
    = ByteString
"\n\
      \.WorkflowExecutionUpdateAdmittedEventAttributes\DC29\n\
      \\arequest\CAN\SOH \SOH(\v2\US.temporal.api.update.v1.RequestR\arequest\DC2H\n\
      \\ACKorigin\CAN\STX \SOH(\SO20.temporal.api.enums.v1.UpdateAdmittedEventOriginR\ACKorigin"
  packedFileDescriptor :: Proxy WorkflowExecutionUpdateAdmittedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionUpdateAdmittedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes)
fieldsByTag
    = let
        request__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
request__field_descriptor
          = String
-> FieldTypeDescriptor Request
-> FieldAccessor
     WorkflowExecutionUpdateAdmittedEventAttributes Request
-> FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request"
              (MessageOrGroup -> FieldTypeDescriptor Request
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Request)
              (Lens
  WorkflowExecutionUpdateAdmittedEventAttributes
  WorkflowExecutionUpdateAdmittedEventAttributes
  (Maybe Request)
  (Maybe Request)
-> FieldAccessor
     WorkflowExecutionUpdateAdmittedEventAttributes Request
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'request")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
        origin__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
origin__field_descriptor
          = String
-> FieldTypeDescriptor UpdateAdmittedEventOrigin
-> FieldAccessor
     WorkflowExecutionUpdateAdmittedEventAttributes
     UpdateAdmittedEventOrigin
-> FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"origin"
              (ScalarField UpdateAdmittedEventOrigin
-> FieldTypeDescriptor UpdateAdmittedEventOrigin
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField UpdateAdmittedEventOrigin
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Update.UpdateAdmittedEventOrigin)
              (WireDefault UpdateAdmittedEventOrigin
-> Lens
     WorkflowExecutionUpdateAdmittedEventAttributes
     WorkflowExecutionUpdateAdmittedEventAttributes
     UpdateAdmittedEventOrigin
     UpdateAdmittedEventOrigin
-> FieldAccessor
     WorkflowExecutionUpdateAdmittedEventAttributes
     UpdateAdmittedEventOrigin
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault UpdateAdmittedEventOrigin
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 @"origin")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
      in
        [(Tag,
  FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
request__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionUpdateAdmittedEventAttributes
origin__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionUpdateAdmittedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionUpdateAdmittedEventAttributes -> FieldSet)
-> (WorkflowExecutionUpdateAdmittedEventAttributes
    -> FieldSet -> WorkflowExecutionUpdateAdmittedEventAttributes)
-> Lens' WorkflowExecutionUpdateAdmittedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionUpdateAdmittedEventAttributes -> FieldSet
_WorkflowExecutionUpdateAdmittedEventAttributes'_unknownFields
        (\ WorkflowExecutionUpdateAdmittedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionUpdateAdmittedEventAttributes
x__
                {_WorkflowExecutionUpdateAdmittedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionUpdateAdmittedEventAttributes
defMessage
    = WorkflowExecutionUpdateAdmittedEventAttributes'_constructor
        {_WorkflowExecutionUpdateAdmittedEventAttributes'request :: Maybe Request
_WorkflowExecutionUpdateAdmittedEventAttributes'request = Maybe Request
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionUpdateAdmittedEventAttributes'origin :: UpdateAdmittedEventOrigin
_WorkflowExecutionUpdateAdmittedEventAttributes'origin = UpdateAdmittedEventOrigin
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateAdmittedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionUpdateAdmittedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionUpdateAdmittedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionUpdateAdmittedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionUpdateAdmittedEventAttributes
        loop :: WorkflowExecutionUpdateAdmittedEventAttributes
-> Parser WorkflowExecutionUpdateAdmittedEventAttributes
loop WorkflowExecutionUpdateAdmittedEventAttributes
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 Request -> String -> Parser Request
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
"request"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"request") y x)
                        Word64
16
                          -> do y <- Parser UpdateAdmittedEventOrigin
-> String -> Parser UpdateAdmittedEventOrigin
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> UpdateAdmittedEventOrigin)
-> Parser Int -> Parser UpdateAdmittedEventOrigin
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> UpdateAdmittedEventOrigin
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
"origin"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"origin") 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 WorkflowExecutionUpdateAdmittedEventAttributes
-> String -> Parser WorkflowExecutionUpdateAdmittedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionUpdateAdmittedEventAttributes
-> Parser WorkflowExecutionUpdateAdmittedEventAttributes
loop WorkflowExecutionUpdateAdmittedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionUpdateAdmittedEventAttributes"
  buildMessage :: WorkflowExecutionUpdateAdmittedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionUpdateAdmittedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Request)
  WorkflowExecutionUpdateAdmittedEventAttributes
  WorkflowExecutionUpdateAdmittedEventAttributes
  (Maybe Request)
  (Maybe Request)
-> WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request
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'request") WorkflowExecutionUpdateAdmittedEventAttributes
_x
              of
                Maybe Request
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just Request
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder)
-> (Request -> ByteString) -> Request -> 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))
                          Request -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Request
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: UpdateAdmittedEventOrigin
_v = FoldLike
  UpdateAdmittedEventOrigin
  WorkflowExecutionUpdateAdmittedEventAttributes
  WorkflowExecutionUpdateAdmittedEventAttributes
  UpdateAdmittedEventOrigin
  UpdateAdmittedEventOrigin
-> WorkflowExecutionUpdateAdmittedEventAttributes
-> UpdateAdmittedEventOrigin
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 @"origin") WorkflowExecutionUpdateAdmittedEventAttributes
_x
                 in
                   if UpdateAdmittedEventOrigin -> UpdateAdmittedEventOrigin -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) UpdateAdmittedEventOrigin
_v UpdateAdmittedEventOrigin
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)
-> (UpdateAdmittedEventOrigin -> Int)
-> UpdateAdmittedEventOrigin
-> 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)
                            UpdateAdmittedEventOrigin -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum UpdateAdmittedEventOrigin
_v))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  WorkflowExecutionUpdateAdmittedEventAttributes
  WorkflowExecutionUpdateAdmittedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionUpdateAdmittedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionUpdateAdmittedEventAttributes
  WorkflowExecutionUpdateAdmittedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionUpdateAdmittedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionUpdateAdmittedEventAttributes
_x)))
instance Control.DeepSeq.NFData WorkflowExecutionUpdateAdmittedEventAttributes where
  rnf :: WorkflowExecutionUpdateAdmittedEventAttributes -> ()
rnf
    = \ WorkflowExecutionUpdateAdmittedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionUpdateAdmittedEventAttributes -> FieldSet
_WorkflowExecutionUpdateAdmittedEventAttributes'_unknownFields
                WorkflowExecutionUpdateAdmittedEventAttributes
x__)
             (Maybe Request -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionUpdateAdmittedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateAdmittedEventAttributes'request WorkflowExecutionUpdateAdmittedEventAttributes
x__)
                (UpdateAdmittedEventOrigin -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionUpdateAdmittedEventAttributes
-> UpdateAdmittedEventOrigin
_WorkflowExecutionUpdateAdmittedEventAttributes'origin WorkflowExecutionUpdateAdmittedEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.meta' @:: Lens' WorkflowExecutionUpdateCompletedEventAttributes Proto.Temporal.Api.Update.V1.Message.Meta@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'meta' @:: Lens' WorkflowExecutionUpdateCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Meta)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.acceptedEventId' @:: Lens' WorkflowExecutionUpdateCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.outcome' @:: Lens' WorkflowExecutionUpdateCompletedEventAttributes Proto.Temporal.Api.Update.V1.Message.Outcome@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'outcome' @:: Lens' WorkflowExecutionUpdateCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome)@ -}
data WorkflowExecutionUpdateCompletedEventAttributes
  = WorkflowExecutionUpdateCompletedEventAttributes'_constructor {WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta
_WorkflowExecutionUpdateCompletedEventAttributes'meta :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Meta),
                                                                  WorkflowExecutionUpdateCompletedEventAttributes -> Int64
_WorkflowExecutionUpdateCompletedEventAttributes'acceptedEventId :: !Data.Int.Int64,
                                                                  WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome
_WorkflowExecutionUpdateCompletedEventAttributes'outcome :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome),
                                                                  WorkflowExecutionUpdateCompletedEventAttributes -> FieldSet
_WorkflowExecutionUpdateCompletedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
(WorkflowExecutionUpdateCompletedEventAttributes
 -> WorkflowExecutionUpdateCompletedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes -> Bool)
-> Eq WorkflowExecutionUpdateCompletedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
== :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
$c/= :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
/= :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionUpdateCompletedEventAttributes
Eq WorkflowExecutionUpdateCompletedEventAttributes =>
(WorkflowExecutionUpdateCompletedEventAttributes
 -> WorkflowExecutionUpdateCompletedEventAttributes -> Ordering)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes
    -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Ord WorkflowExecutionUpdateCompletedEventAttributes
WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Ordering
WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
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 :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Ordering
compare :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Ordering
$c< :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
< :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
$c<= :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
<= :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
$c> :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
> :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
$c>= :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
>= :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes -> Bool
$cmax :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
max :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
$cmin :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
min :: WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
-> WorkflowExecutionUpdateCompletedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionUpdateCompletedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionUpdateCompletedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionUpdateCompletedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionUpdateCompletedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionUpdateCompletedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateCompletedEventAttributes "meta" Proto.Temporal.Api.Update.V1.Message.Meta where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "meta"
-> (Meta -> f Meta)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
fieldOf Proxy# "meta"
_
    = ((Maybe Meta -> f (Maybe Meta))
 -> WorkflowExecutionUpdateCompletedEventAttributes
 -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> ((Meta -> f Meta) -> Maybe Meta -> f (Maybe Meta))
-> (Meta -> f Meta)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> Maybe Meta -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Lens
     WorkflowExecutionUpdateCompletedEventAttributes
     WorkflowExecutionUpdateCompletedEventAttributes
     (Maybe Meta)
     (Maybe Meta)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta
_WorkflowExecutionUpdateCompletedEventAttributes'meta
           (\ WorkflowExecutionUpdateCompletedEventAttributes
x__ Maybe Meta
y__
              -> WorkflowExecutionUpdateCompletedEventAttributes
x__
                   {_WorkflowExecutionUpdateCompletedEventAttributes'meta = y__}))
        (Meta -> Lens' (Maybe Meta) Meta
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Meta
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateCompletedEventAttributes "maybe'meta" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Meta) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'meta"
-> (Maybe Meta -> f (Maybe Meta))
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
fieldOf Proxy# "maybe'meta"
_
    = ((Maybe Meta -> f (Maybe Meta))
 -> WorkflowExecutionUpdateCompletedEventAttributes
 -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> ((Maybe Meta -> f (Maybe Meta)) -> Maybe Meta -> f (Maybe Meta))
-> (Maybe Meta -> f (Maybe Meta))
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> Maybe Meta -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Lens
     WorkflowExecutionUpdateCompletedEventAttributes
     WorkflowExecutionUpdateCompletedEventAttributes
     (Maybe Meta)
     (Maybe Meta)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta
_WorkflowExecutionUpdateCompletedEventAttributes'meta
           (\ WorkflowExecutionUpdateCompletedEventAttributes
x__ Maybe Meta
y__
              -> WorkflowExecutionUpdateCompletedEventAttributes
x__
                   {_WorkflowExecutionUpdateCompletedEventAttributes'meta = y__}))
        (Maybe Meta -> f (Maybe Meta)) -> Maybe Meta -> f (Maybe Meta)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateCompletedEventAttributes "acceptedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "acceptedEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
fieldOf Proxy# "acceptedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionUpdateCompletedEventAttributes
 -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateCompletedEventAttributes -> Int64)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> Int64 -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Lens
     WorkflowExecutionUpdateCompletedEventAttributes
     WorkflowExecutionUpdateCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateCompletedEventAttributes -> Int64
_WorkflowExecutionUpdateCompletedEventAttributes'acceptedEventId
           (\ WorkflowExecutionUpdateCompletedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionUpdateCompletedEventAttributes
x__
                   {_WorkflowExecutionUpdateCompletedEventAttributes'acceptedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateCompletedEventAttributes "outcome" Proto.Temporal.Api.Update.V1.Message.Outcome where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "outcome"
-> (Outcome -> f Outcome)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
fieldOf Proxy# "outcome"
_
    = ((Maybe Outcome -> f (Maybe Outcome))
 -> WorkflowExecutionUpdateCompletedEventAttributes
 -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> ((Outcome -> f Outcome) -> Maybe Outcome -> f (Maybe Outcome))
-> (Outcome -> f Outcome)
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> Maybe Outcome
    -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Lens
     WorkflowExecutionUpdateCompletedEventAttributes
     WorkflowExecutionUpdateCompletedEventAttributes
     (Maybe Outcome)
     (Maybe Outcome)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome
_WorkflowExecutionUpdateCompletedEventAttributes'outcome
           (\ WorkflowExecutionUpdateCompletedEventAttributes
x__ Maybe Outcome
y__
              -> WorkflowExecutionUpdateCompletedEventAttributes
x__
                   {_WorkflowExecutionUpdateCompletedEventAttributes'outcome = y__}))
        (Outcome -> Lens' (Maybe Outcome) Outcome
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Outcome
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateCompletedEventAttributes "maybe'outcome" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Outcome) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'outcome"
-> (Maybe Outcome -> f (Maybe Outcome))
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
fieldOf Proxy# "maybe'outcome"
_
    = ((Maybe Outcome -> f (Maybe Outcome))
 -> WorkflowExecutionUpdateCompletedEventAttributes
 -> f WorkflowExecutionUpdateCompletedEventAttributes)
-> ((Maybe Outcome -> f (Maybe Outcome))
    -> Maybe Outcome -> f (Maybe Outcome))
-> (Maybe Outcome -> f (Maybe Outcome))
-> WorkflowExecutionUpdateCompletedEventAttributes
-> f WorkflowExecutionUpdateCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> Maybe Outcome
    -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Lens
     WorkflowExecutionUpdateCompletedEventAttributes
     WorkflowExecutionUpdateCompletedEventAttributes
     (Maybe Outcome)
     (Maybe Outcome)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome
_WorkflowExecutionUpdateCompletedEventAttributes'outcome
           (\ WorkflowExecutionUpdateCompletedEventAttributes
x__ Maybe Outcome
y__
              -> WorkflowExecutionUpdateCompletedEventAttributes
x__
                   {_WorkflowExecutionUpdateCompletedEventAttributes'outcome = y__}))
        (Maybe Outcome -> f (Maybe Outcome))
-> Maybe Outcome -> f (Maybe Outcome)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionUpdateCompletedEventAttributes where
  messageName :: Proxy WorkflowExecutionUpdateCompletedEventAttributes -> Text
messageName Proxy WorkflowExecutionUpdateCompletedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionUpdateCompletedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionUpdateCompletedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionUpdateCompletedEventAttributes
_
    = ByteString
"\n\
      \/WorkflowExecutionUpdateCompletedEventAttributes\DC20\n\
      \\EOTmeta\CAN\SOH \SOH(\v2\FS.temporal.api.update.v1.MetaR\EOTmeta\DC2*\n\
      \\DC1accepted_event_id\CAN\ETX \SOH(\ETXR\SIacceptedEventId\DC29\n\
      \\aoutcome\CAN\STX \SOH(\v2\US.temporal.api.update.v1.OutcomeR\aoutcome"
  packedFileDescriptor :: Proxy WorkflowExecutionUpdateCompletedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionUpdateCompletedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes)
fieldsByTag
    = let
        meta__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
meta__field_descriptor
          = String
-> FieldTypeDescriptor Meta
-> FieldAccessor
     WorkflowExecutionUpdateCompletedEventAttributes Meta
-> FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"meta"
              (MessageOrGroup -> FieldTypeDescriptor Meta
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Meta)
              (Lens
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  (Maybe Meta)
  (Maybe Meta)
-> FieldAccessor
     WorkflowExecutionUpdateCompletedEventAttributes Meta
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'meta")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
        acceptedEventId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
acceptedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     WorkflowExecutionUpdateCompletedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"accepted_event_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
     WorkflowExecutionUpdateCompletedEventAttributes
     WorkflowExecutionUpdateCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor
     WorkflowExecutionUpdateCompletedEventAttributes 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 @"acceptedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
        outcome__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
outcome__field_descriptor
          = String
-> FieldTypeDescriptor Outcome
-> FieldAccessor
     WorkflowExecutionUpdateCompletedEventAttributes Outcome
-> FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"outcome"
              (MessageOrGroup -> FieldTypeDescriptor Outcome
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Outcome)
              (Lens
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  (Maybe Outcome)
  (Maybe Outcome)
-> FieldAccessor
     WorkflowExecutionUpdateCompletedEventAttributes Outcome
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'outcome")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
      in
        [(Tag,
  FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
meta__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
acceptedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionUpdateCompletedEventAttributes
outcome__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionUpdateCompletedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionUpdateCompletedEventAttributes -> FieldSet)
-> (WorkflowExecutionUpdateCompletedEventAttributes
    -> FieldSet -> WorkflowExecutionUpdateCompletedEventAttributes)
-> Lens' WorkflowExecutionUpdateCompletedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionUpdateCompletedEventAttributes -> FieldSet
_WorkflowExecutionUpdateCompletedEventAttributes'_unknownFields
        (\ WorkflowExecutionUpdateCompletedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionUpdateCompletedEventAttributes
x__
                {_WorkflowExecutionUpdateCompletedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionUpdateCompletedEventAttributes
defMessage
    = WorkflowExecutionUpdateCompletedEventAttributes'_constructor
        {_WorkflowExecutionUpdateCompletedEventAttributes'meta :: Maybe Meta
_WorkflowExecutionUpdateCompletedEventAttributes'meta = Maybe Meta
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionUpdateCompletedEventAttributes'acceptedEventId :: Int64
_WorkflowExecutionUpdateCompletedEventAttributes'acceptedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateCompletedEventAttributes'outcome :: Maybe Outcome
_WorkflowExecutionUpdateCompletedEventAttributes'outcome = Maybe Outcome
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionUpdateCompletedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionUpdateCompletedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionUpdateCompletedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionUpdateCompletedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionUpdateCompletedEventAttributes
        loop :: WorkflowExecutionUpdateCompletedEventAttributes
-> Parser WorkflowExecutionUpdateCompletedEventAttributes
loop WorkflowExecutionUpdateCompletedEventAttributes
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 Meta -> String -> Parser Meta
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
"meta"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"meta") 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
"accepted_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"acceptedEventId") y x)
                        Word64
18
                          -> do y <- Parser Outcome -> String -> Parser Outcome
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
"outcome"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"outcome") 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 WorkflowExecutionUpdateCompletedEventAttributes
-> String -> Parser WorkflowExecutionUpdateCompletedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionUpdateCompletedEventAttributes
-> Parser WorkflowExecutionUpdateCompletedEventAttributes
loop WorkflowExecutionUpdateCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionUpdateCompletedEventAttributes"
  buildMessage :: WorkflowExecutionUpdateCompletedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionUpdateCompletedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe Meta)
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  (Maybe Meta)
  (Maybe Meta)
-> WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta
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'meta") WorkflowExecutionUpdateCompletedEventAttributes
_x
              of
                Maybe Meta
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                (Prelude.Just Meta
_v)
                  -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                       (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
10)
                       ((ByteString -> Builder) -> (Meta -> ByteString) -> Meta -> 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))
                          Meta -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Meta
_v))
             (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                (let
                   _v :: Int64
_v
                     = FoldLike
  Int64
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  Int64
  Int64
-> WorkflowExecutionUpdateCompletedEventAttributes -> 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 @"acceptedEventId") WorkflowExecutionUpdateCompletedEventAttributes
_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 Outcome)
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  (Maybe Outcome)
  (Maybe Outcome)
-> WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome
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'outcome") WorkflowExecutionUpdateCompletedEventAttributes
_x
                    of
                      Maybe Outcome
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                      (Prelude.Just Outcome
_v)
                        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                             (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
18)
                             ((ByteString -> Builder)
-> (Outcome -> ByteString) -> Outcome -> 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))
                                Outcome -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Outcome
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionUpdateCompletedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionUpdateCompletedEventAttributes
  WorkflowExecutionUpdateCompletedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionUpdateCompletedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionUpdateCompletedEventAttributes
_x))))
instance Control.DeepSeq.NFData WorkflowExecutionUpdateCompletedEventAttributes where
  rnf :: WorkflowExecutionUpdateCompletedEventAttributes -> ()
rnf
    = \ WorkflowExecutionUpdateCompletedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionUpdateCompletedEventAttributes -> FieldSet
_WorkflowExecutionUpdateCompletedEventAttributes'_unknownFields
                WorkflowExecutionUpdateCompletedEventAttributes
x__)
             (Maybe Meta -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Meta
_WorkflowExecutionUpdateCompletedEventAttributes'meta WorkflowExecutionUpdateCompletedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionUpdateCompletedEventAttributes -> Int64
_WorkflowExecutionUpdateCompletedEventAttributes'acceptedEventId
                      WorkflowExecutionUpdateCompletedEventAttributes
x__)
                   (Maybe Outcome -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionUpdateCompletedEventAttributes -> Maybe Outcome
_WorkflowExecutionUpdateCompletedEventAttributes'outcome WorkflowExecutionUpdateCompletedEventAttributes
x__)
                      ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.protocolInstanceId' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.rejectedRequestMessageId' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.rejectedRequestSequencingEventId' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.rejectedRequest' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes Proto.Temporal.Api.Update.V1.Message.Request@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'rejectedRequest' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' WorkflowExecutionUpdateRejectedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@ -}
data WorkflowExecutionUpdateRejectedEventAttributes
  = WorkflowExecutionUpdateRejectedEventAttributes'_constructor {WorkflowExecutionUpdateRejectedEventAttributes -> Text
_WorkflowExecutionUpdateRejectedEventAttributes'protocolInstanceId :: !Data.Text.Text,
                                                                 WorkflowExecutionUpdateRejectedEventAttributes -> Text
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestMessageId :: !Data.Text.Text,
                                                                 WorkflowExecutionUpdateRejectedEventAttributes -> Int64
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestSequencingEventId :: !Data.Int.Int64,
                                                                 WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest :: !(Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request),
                                                                 WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Failure
_WorkflowExecutionUpdateRejectedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                                 WorkflowExecutionUpdateRejectedEventAttributes -> FieldSet
_WorkflowExecutionUpdateRejectedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
(WorkflowExecutionUpdateRejectedEventAttributes
 -> WorkflowExecutionUpdateRejectedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes -> Bool)
-> Eq WorkflowExecutionUpdateRejectedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
== :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
$c/= :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
/= :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowExecutionUpdateRejectedEventAttributes
Eq WorkflowExecutionUpdateRejectedEventAttributes =>
(WorkflowExecutionUpdateRejectedEventAttributes
 -> WorkflowExecutionUpdateRejectedEventAttributes -> Ordering)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes -> Bool)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes
    -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Ord WorkflowExecutionUpdateRejectedEventAttributes
WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Ordering
WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
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 :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Ordering
compare :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Ordering
$c< :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
< :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
$c<= :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
<= :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
$c> :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
> :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
$c>= :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
>= :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes -> Bool
$cmax :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
max :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
$cmin :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
min :: WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
-> WorkflowExecutionUpdateRejectedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowExecutionUpdateRejectedEventAttributes where
  showsPrec :: Int -> WorkflowExecutionUpdateRejectedEventAttributes -> ShowS
showsPrec Int
_ WorkflowExecutionUpdateRejectedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowExecutionUpdateRejectedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowExecutionUpdateRejectedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateRejectedEventAttributes "protocolInstanceId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "protocolInstanceId"
-> (Text -> f Text)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "protocolInstanceId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Text)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Text -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Text
_WorkflowExecutionUpdateRejectedEventAttributes'protocolInstanceId
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Text
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'protocolInstanceId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateRejectedEventAttributes "rejectedRequestMessageId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rejectedRequestMessageId"
-> (Text -> f Text)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "rejectedRequestMessageId"
_
    = ((Text -> f Text)
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Text)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Text -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Text
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestMessageId
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Text
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestMessageId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateRejectedEventAttributes "rejectedRequestSequencingEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rejectedRequestSequencingEventId"
-> (Int64 -> f Int64)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "rejectedRequestSequencingEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Int64)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Int64 -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Int64
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestSequencingEventId
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Int64
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestSequencingEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateRejectedEventAttributes "rejectedRequest" Proto.Temporal.Api.Update.V1.Message.Request where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "rejectedRequest"
-> (Request -> f Request)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "rejectedRequest"
_
    = ((Maybe Request -> f (Maybe Request))
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Request -> f Request) -> Maybe Request -> f (Maybe Request))
-> (Request -> f Request)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Maybe Request -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Maybe Request
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest = y__}))
        (Request -> Lens' (Maybe Request) Request
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens Request
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateRejectedEventAttributes "maybe'rejectedRequest" (Prelude.Maybe Proto.Temporal.Api.Update.V1.Message.Request) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'rejectedRequest"
-> (Maybe Request -> f (Maybe Request))
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "maybe'rejectedRequest"
_
    = ((Maybe Request -> f (Maybe Request))
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Maybe Request -> f (Maybe Request))
    -> Maybe Request -> f (Maybe Request))
-> (Maybe Request -> f (Maybe Request))
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Maybe Request -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     (Maybe Request)
     (Maybe Request)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Maybe Request
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest = y__}))
        (Maybe Request -> f (Maybe Request))
-> Maybe Request -> f (Maybe Request)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowExecutionUpdateRejectedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Failure)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Maybe Failure -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Failure
_WorkflowExecutionUpdateRejectedEventAttributes'failure
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'failure = 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 WorkflowExecutionUpdateRejectedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowExecutionUpdateRejectedEventAttributes
 -> f WorkflowExecutionUpdateRejectedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowExecutionUpdateRejectedEventAttributes
-> f WorkflowExecutionUpdateRejectedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Failure)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> Maybe Failure -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Failure
_WorkflowExecutionUpdateRejectedEventAttributes'failure
           (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                   {_WorkflowExecutionUpdateRejectedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowExecutionUpdateRejectedEventAttributes where
  messageName :: Proxy WorkflowExecutionUpdateRejectedEventAttributes -> Text
messageName Proxy WorkflowExecutionUpdateRejectedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowExecutionUpdateRejectedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowExecutionUpdateRejectedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowExecutionUpdateRejectedEventAttributes
_
    = ByteString
"\n\
      \.WorkflowExecutionUpdateRejectedEventAttributes\DC20\n\
      \\DC4protocol_instance_id\CAN\SOH \SOH(\tR\DC2protocolInstanceId\DC2=\n\
      \\ESCrejected_request_message_id\CAN\STX \SOH(\tR\CANrejectedRequestMessageId\DC2N\n\
      \$rejected_request_sequencing_event_id\CAN\ETX \SOH(\ETXR rejectedRequestSequencingEventId\DC2J\n\
      \\DLErejected_request\CAN\EOT \SOH(\v2\US.temporal.api.update.v1.RequestR\SIrejectedRequest\DC2:\n\
      \\afailure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure"
  packedFileDescriptor :: Proxy WorkflowExecutionUpdateRejectedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowExecutionUpdateRejectedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes)
fieldsByTag
    = let
        protocolInstanceId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
protocolInstanceId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes Text
-> FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"protocol_instance_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
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes 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 @"protocolInstanceId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
        rejectedRequestMessageId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
rejectedRequestMessageId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes Text
-> FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rejected_request_message_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
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes 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 @"rejectedRequestMessageId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
        rejectedRequestSequencingEventId__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
rejectedRequestSequencingEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes Int64
-> FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rejected_request_sequencing_event_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
     WorkflowExecutionUpdateRejectedEventAttributes
     WorkflowExecutionUpdateRejectedEventAttributes
     Int64
     Int64
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes 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
                    @"rejectedRequestSequencingEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
        rejectedRequest__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
rejectedRequest__field_descriptor
          = String
-> FieldTypeDescriptor Request
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes Request
-> FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"rejected_request"
              (MessageOrGroup -> FieldTypeDescriptor Request
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Update.V1.Message.Request)
              (Lens
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  (Maybe Request)
  (Maybe Request)
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes Request
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'rejectedRequest")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
        failure__field_descriptor :: FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes Failure
-> FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor
     WorkflowExecutionUpdateRejectedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
      in
        [(Tag,
  FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes)]
-> Map
     Tag
     (FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
protocolInstanceId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
rejectedRequestMessageId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, 
            FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
rejectedRequestSequencingEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
rejectedRequest__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowExecutionUpdateRejectedEventAttributes
failure__field_descriptor)]
  unknownFields :: Lens' WorkflowExecutionUpdateRejectedEventAttributes FieldSet
unknownFields
    = (WorkflowExecutionUpdateRejectedEventAttributes -> FieldSet)
-> (WorkflowExecutionUpdateRejectedEventAttributes
    -> FieldSet -> WorkflowExecutionUpdateRejectedEventAttributes)
-> Lens' WorkflowExecutionUpdateRejectedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowExecutionUpdateRejectedEventAttributes -> FieldSet
_WorkflowExecutionUpdateRejectedEventAttributes'_unknownFields
        (\ WorkflowExecutionUpdateRejectedEventAttributes
x__ FieldSet
y__
           -> WorkflowExecutionUpdateRejectedEventAttributes
x__
                {_WorkflowExecutionUpdateRejectedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowExecutionUpdateRejectedEventAttributes
defMessage
    = WorkflowExecutionUpdateRejectedEventAttributes'_constructor
        {_WorkflowExecutionUpdateRejectedEventAttributes'protocolInstanceId :: Text
_WorkflowExecutionUpdateRejectedEventAttributes'protocolInstanceId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestMessageId :: Text
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestMessageId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestSequencingEventId :: Int64
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestSequencingEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest :: Maybe Request
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest = Maybe Request
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionUpdateRejectedEventAttributes'failure :: Maybe Failure
_WorkflowExecutionUpdateRejectedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _WorkflowExecutionUpdateRejectedEventAttributes'_unknownFields :: FieldSet
_WorkflowExecutionUpdateRejectedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowExecutionUpdateRejectedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowExecutionUpdateRejectedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowExecutionUpdateRejectedEventAttributes
        loop :: WorkflowExecutionUpdateRejectedEventAttributes
-> Parser WorkflowExecutionUpdateRejectedEventAttributes
loop WorkflowExecutionUpdateRejectedEventAttributes
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
"protocol_instance_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"protocolInstanceId") 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
"rejected_request_message_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"rejectedRequestMessageId") 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
"rejected_request_sequencing_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field
                                        @"rejectedRequestSequencingEventId")
                                     y x)
                        Word64
34
                          -> do y <- Parser Request -> String -> Parser Request
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
"rejected_request"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"rejectedRequest") 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") 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 WorkflowExecutionUpdateRejectedEventAttributes
-> String -> Parser WorkflowExecutionUpdateRejectedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowExecutionUpdateRejectedEventAttributes
-> Parser WorkflowExecutionUpdateRejectedEventAttributes
loop WorkflowExecutionUpdateRejectedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowExecutionUpdateRejectedEventAttributes"
  buildMessage :: WorkflowExecutionUpdateRejectedEventAttributes -> Builder
buildMessage
    = \ WorkflowExecutionUpdateRejectedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  Text
  Text
-> WorkflowExecutionUpdateRejectedEventAttributes -> 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 @"protocolInstanceId") WorkflowExecutionUpdateRejectedEventAttributes
_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
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  Text
  Text
-> WorkflowExecutionUpdateRejectedEventAttributes -> 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 @"rejectedRequestMessageId") WorkflowExecutionUpdateRejectedEventAttributes
_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
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  Int64
  Int64
-> WorkflowExecutionUpdateRejectedEventAttributes -> 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 @"rejectedRequestSequencingEventId") WorkflowExecutionUpdateRejectedEventAttributes
_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 Request)
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  (Maybe Request)
  (Maybe Request)
-> WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request
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'rejectedRequest") WorkflowExecutionUpdateRejectedEventAttributes
_x
                       of
                         Maybe Request
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                         (Prelude.Just Request
_v)
                           -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
34)
                                ((ByteString -> Builder)
-> (Request -> ByteString) -> Request -> 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))
                                   Request -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage Request
_v))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Failure)
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> WorkflowExecutionUpdateRejectedEventAttributes -> 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'failure") WorkflowExecutionUpdateRejectedEventAttributes
_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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  FieldSet
  FieldSet
-> WorkflowExecutionUpdateRejectedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowExecutionUpdateRejectedEventAttributes
  WorkflowExecutionUpdateRejectedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowExecutionUpdateRejectedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowExecutionUpdateRejectedEventAttributes
_x))))))
instance Control.DeepSeq.NFData WorkflowExecutionUpdateRejectedEventAttributes where
  rnf :: WorkflowExecutionUpdateRejectedEventAttributes -> ()
rnf
    = \ WorkflowExecutionUpdateRejectedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowExecutionUpdateRejectedEventAttributes -> FieldSet
_WorkflowExecutionUpdateRejectedEventAttributes'_unknownFields
                WorkflowExecutionUpdateRejectedEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowExecutionUpdateRejectedEventAttributes -> Text
_WorkflowExecutionUpdateRejectedEventAttributes'protocolInstanceId
                   WorkflowExecutionUpdateRejectedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowExecutionUpdateRejectedEventAttributes -> Text
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestMessageId
                      WorkflowExecutionUpdateRejectedEventAttributes
x__)
                   (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowExecutionUpdateRejectedEventAttributes -> Int64
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequestSequencingEventId
                         WorkflowExecutionUpdateRejectedEventAttributes
x__)
                      (Maybe Request -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Request
_WorkflowExecutionUpdateRejectedEventAttributes'rejectedRequest
                            WorkflowExecutionUpdateRejectedEventAttributes
x__)
                         (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowExecutionUpdateRejectedEventAttributes -> Maybe Failure
_WorkflowExecutionUpdateRejectedEventAttributes'failure WorkflowExecutionUpdateRejectedEventAttributes
x__)
                            ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workflowTaskCompletedEventId' @:: Lens' WorkflowPropertiesModifiedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.upsertedMemo' @:: Lens' WorkflowPropertiesModifiedEventAttributes Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'upsertedMemo' @:: Lens' WorkflowPropertiesModifiedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@ -}
data WorkflowPropertiesModifiedEventAttributes
  = WorkflowPropertiesModifiedEventAttributes'_constructor {WorkflowPropertiesModifiedEventAttributes -> Int64
_WorkflowPropertiesModifiedEventAttributes'workflowTaskCompletedEventId :: !Data.Int.Int64,
                                                            WorkflowPropertiesModifiedEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedEventAttributes'upsertedMemo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                            WorkflowPropertiesModifiedEventAttributes -> FieldSet
_WorkflowPropertiesModifiedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
(WorkflowPropertiesModifiedEventAttributes
 -> WorkflowPropertiesModifiedEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes -> Bool)
-> Eq WorkflowPropertiesModifiedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
== :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
$c/= :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
/= :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowPropertiesModifiedEventAttributes
Eq WorkflowPropertiesModifiedEventAttributes =>
(WorkflowPropertiesModifiedEventAttributes
 -> WorkflowPropertiesModifiedEventAttributes -> Ordering)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes)
-> (WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes
    -> WorkflowPropertiesModifiedEventAttributes)
-> Ord WorkflowPropertiesModifiedEventAttributes
WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Ordering
WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
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 :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Ordering
compare :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Ordering
$c< :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
< :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
$c<= :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
<= :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
$c> :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
> :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
$c>= :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
>= :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes -> Bool
$cmax :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
max :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
$cmin :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
min :: WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
-> WorkflowPropertiesModifiedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowPropertiesModifiedEventAttributes where
  showsPrec :: Int -> WorkflowPropertiesModifiedEventAttributes -> ShowS
showsPrec Int
_ WorkflowPropertiesModifiedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowPropertiesModifiedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowPropertiesModifiedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedEventAttributes "workflowTaskCompletedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workflowTaskCompletedEventId"
-> (Int64 -> f Int64)
-> WorkflowPropertiesModifiedEventAttributes
-> f WorkflowPropertiesModifiedEventAttributes
fieldOf Proxy# "workflowTaskCompletedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowPropertiesModifiedEventAttributes
 -> f WorkflowPropertiesModifiedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowPropertiesModifiedEventAttributes
-> f WorkflowPropertiesModifiedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedEventAttributes -> Int64)
-> (WorkflowPropertiesModifiedEventAttributes
    -> Int64 -> WorkflowPropertiesModifiedEventAttributes)
-> Lens
     WorkflowPropertiesModifiedEventAttributes
     WorkflowPropertiesModifiedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedEventAttributes -> Int64
_WorkflowPropertiesModifiedEventAttributes'workflowTaskCompletedEventId
           (\ WorkflowPropertiesModifiedEventAttributes
x__ Int64
y__
              -> WorkflowPropertiesModifiedEventAttributes
x__
                   {_WorkflowPropertiesModifiedEventAttributes'workflowTaskCompletedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedEventAttributes "upsertedMemo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "upsertedMemo"
-> (Memo -> f Memo)
-> WorkflowPropertiesModifiedEventAttributes
-> f WorkflowPropertiesModifiedEventAttributes
fieldOf Proxy# "upsertedMemo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowPropertiesModifiedEventAttributes
 -> f WorkflowPropertiesModifiedEventAttributes)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> WorkflowPropertiesModifiedEventAttributes
-> f WorkflowPropertiesModifiedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedEventAttributes -> Maybe Memo)
-> (WorkflowPropertiesModifiedEventAttributes
    -> Maybe Memo -> WorkflowPropertiesModifiedEventAttributes)
-> Lens
     WorkflowPropertiesModifiedEventAttributes
     WorkflowPropertiesModifiedEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedEventAttributes'upsertedMemo
           (\ WorkflowPropertiesModifiedEventAttributes
x__ Maybe Memo
y__
              -> WorkflowPropertiesModifiedEventAttributes
x__
                   {_WorkflowPropertiesModifiedEventAttributes'upsertedMemo = 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 WorkflowPropertiesModifiedEventAttributes "maybe'upsertedMemo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'upsertedMemo"
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowPropertiesModifiedEventAttributes
-> f WorkflowPropertiesModifiedEventAttributes
fieldOf Proxy# "maybe'upsertedMemo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowPropertiesModifiedEventAttributes
 -> f WorkflowPropertiesModifiedEventAttributes)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowPropertiesModifiedEventAttributes
-> f WorkflowPropertiesModifiedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedEventAttributes -> Maybe Memo)
-> (WorkflowPropertiesModifiedEventAttributes
    -> Maybe Memo -> WorkflowPropertiesModifiedEventAttributes)
-> Lens
     WorkflowPropertiesModifiedEventAttributes
     WorkflowPropertiesModifiedEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedEventAttributes'upsertedMemo
           (\ WorkflowPropertiesModifiedEventAttributes
x__ Maybe Memo
y__
              -> WorkflowPropertiesModifiedEventAttributes
x__
                   {_WorkflowPropertiesModifiedEventAttributes'upsertedMemo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowPropertiesModifiedEventAttributes where
  messageName :: Proxy WorkflowPropertiesModifiedEventAttributes -> Text
messageName Proxy WorkflowPropertiesModifiedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowPropertiesModifiedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowPropertiesModifiedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowPropertiesModifiedEventAttributes
_
    = ByteString
"\n\
      \)WorkflowPropertiesModifiedEventAttributes\DC2F\n\
      \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2A\n\
      \\rupserted_memo\CAN\STX \SOH(\v2\FS.temporal.api.common.v1.MemoR\fupsertedMemo"
  packedFileDescriptor :: Proxy WorkflowPropertiesModifiedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowPropertiesModifiedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowPropertiesModifiedEventAttributes)
fieldsByTag
    = let
        workflowTaskCompletedEventId__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedEventAttributes
workflowTaskCompletedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowPropertiesModifiedEventAttributes Int64
-> FieldDescriptor WorkflowPropertiesModifiedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"workflow_task_completed_event_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
     WorkflowPropertiesModifiedEventAttributes
     WorkflowPropertiesModifiedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowPropertiesModifiedEventAttributes 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 @"workflowTaskCompletedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedEventAttributes
        upsertedMemo__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedEventAttributes
upsertedMemo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor WorkflowPropertiesModifiedEventAttributes Memo
-> FieldDescriptor WorkflowPropertiesModifiedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"upserted_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
  WorkflowPropertiesModifiedEventAttributes
  WorkflowPropertiesModifiedEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor WorkflowPropertiesModifiedEventAttributes 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'upsertedMemo")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowPropertiesModifiedEventAttributes)]
-> Map
     Tag (FieldDescriptor WorkflowPropertiesModifiedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, 
            FieldDescriptor WorkflowPropertiesModifiedEventAttributes
workflowTaskCompletedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowPropertiesModifiedEventAttributes
upsertedMemo__field_descriptor)]
  unknownFields :: Lens' WorkflowPropertiesModifiedEventAttributes FieldSet
unknownFields
    = (WorkflowPropertiesModifiedEventAttributes -> FieldSet)
-> (WorkflowPropertiesModifiedEventAttributes
    -> FieldSet -> WorkflowPropertiesModifiedEventAttributes)
-> Lens' WorkflowPropertiesModifiedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowPropertiesModifiedEventAttributes -> FieldSet
_WorkflowPropertiesModifiedEventAttributes'_unknownFields
        (\ WorkflowPropertiesModifiedEventAttributes
x__ FieldSet
y__
           -> WorkflowPropertiesModifiedEventAttributes
x__
                {_WorkflowPropertiesModifiedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowPropertiesModifiedEventAttributes
defMessage
    = WorkflowPropertiesModifiedEventAttributes'_constructor
        {_WorkflowPropertiesModifiedEventAttributes'workflowTaskCompletedEventId :: Int64
_WorkflowPropertiesModifiedEventAttributes'workflowTaskCompletedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowPropertiesModifiedEventAttributes'upsertedMemo :: Maybe Memo
_WorkflowPropertiesModifiedEventAttributes'upsertedMemo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _WorkflowPropertiesModifiedEventAttributes'_unknownFields :: FieldSet
_WorkflowPropertiesModifiedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowPropertiesModifiedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowPropertiesModifiedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowPropertiesModifiedEventAttributes
        loop :: WorkflowPropertiesModifiedEventAttributes
-> Parser WorkflowPropertiesModifiedEventAttributes
loop WorkflowPropertiesModifiedEventAttributes
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 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
"workflow_task_completed_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workflowTaskCompletedEventId") y
                                     x)
                        Word64
18
                          -> 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
"upserted_memo"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"upsertedMemo") 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 WorkflowPropertiesModifiedEventAttributes
-> String -> Parser WorkflowPropertiesModifiedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowPropertiesModifiedEventAttributes
-> Parser WorkflowPropertiesModifiedEventAttributes
loop WorkflowPropertiesModifiedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowPropertiesModifiedEventAttributes"
  buildMessage :: WorkflowPropertiesModifiedEventAttributes -> Builder
buildMessage
    = \ WorkflowPropertiesModifiedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  WorkflowPropertiesModifiedEventAttributes
  WorkflowPropertiesModifiedEventAttributes
  Int64
  Int64
-> WorkflowPropertiesModifiedEventAttributes -> 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 @"workflowTaskCompletedEventId") WorkflowPropertiesModifiedEventAttributes
_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
8)
                      ((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 Memo)
  WorkflowPropertiesModifiedEventAttributes
  WorkflowPropertiesModifiedEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> WorkflowPropertiesModifiedEventAttributes -> 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'upsertedMemo") WorkflowPropertiesModifiedEventAttributes
_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
18)
                          ((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))
                (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                   (FoldLike
  FieldSet
  WorkflowPropertiesModifiedEventAttributes
  WorkflowPropertiesModifiedEventAttributes
  FieldSet
  FieldSet
-> WorkflowPropertiesModifiedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowPropertiesModifiedEventAttributes
  WorkflowPropertiesModifiedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowPropertiesModifiedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowPropertiesModifiedEventAttributes
_x)))
instance Control.DeepSeq.NFData WorkflowPropertiesModifiedEventAttributes where
  rnf :: WorkflowPropertiesModifiedEventAttributes -> ()
rnf
    = \ WorkflowPropertiesModifiedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowPropertiesModifiedEventAttributes -> FieldSet
_WorkflowPropertiesModifiedEventAttributes'_unknownFields WorkflowPropertiesModifiedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowPropertiesModifiedEventAttributes -> Int64
_WorkflowPropertiesModifiedEventAttributes'workflowTaskCompletedEventId
                   WorkflowPropertiesModifiedEventAttributes
x__)
                (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowPropertiesModifiedEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedEventAttributes'upsertedMemo WorkflowPropertiesModifiedEventAttributes
x__) ()))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newTaskQueue' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newWorkflowTaskTimeout' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'newWorkflowTaskTimeout' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newWorkflowRunTimeout' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'newWorkflowRunTimeout' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newWorkflowExecutionTimeout' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'newWorkflowExecutionTimeout' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.upsertedMemo' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes Proto.Temporal.Api.Common.V1.Message.Memo@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'upsertedMemo' @:: Lens' WorkflowPropertiesModifiedExternallyEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo)@ -}
data WorkflowPropertiesModifiedExternallyEventAttributes
  = WorkflowPropertiesModifiedExternallyEventAttributes'_constructor {WorkflowPropertiesModifiedExternallyEventAttributes -> Text
_WorkflowPropertiesModifiedExternallyEventAttributes'newTaskQueue :: !Data.Text.Text,
                                                                      WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                      WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                      WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                                      WorkflowPropertiesModifiedExternallyEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo),
                                                                      WorkflowPropertiesModifiedExternallyEventAttributes -> FieldSet
_WorkflowPropertiesModifiedExternallyEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
(WorkflowPropertiesModifiedExternallyEventAttributes
 -> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool)
-> Eq WorkflowPropertiesModifiedExternallyEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
== :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
$c/= :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
/= :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
Prelude.Eq, Eq WorkflowPropertiesModifiedExternallyEventAttributes
Eq WorkflowPropertiesModifiedExternallyEventAttributes =>
(WorkflowPropertiesModifiedExternallyEventAttributes
 -> WorkflowPropertiesModifiedExternallyEventAttributes -> Ordering)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Ord WorkflowPropertiesModifiedExternallyEventAttributes
WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Ordering
WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
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 :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Ordering
compare :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Ordering
$c< :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
< :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
$c<= :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
<= :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
$c> :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
> :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
$c>= :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
>= :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes -> Bool
$cmax :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
max :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
$cmin :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
min :: WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> WorkflowPropertiesModifiedExternallyEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowPropertiesModifiedExternallyEventAttributes where
  showsPrec :: Int -> WorkflowPropertiesModifiedExternallyEventAttributes -> ShowS
showsPrec Int
_ WorkflowPropertiesModifiedExternallyEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowPropertiesModifiedExternallyEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowPropertiesModifiedExternallyEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedExternallyEventAttributes "newTaskQueue" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newTaskQueue"
-> (Text -> f Text)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "newTaskQueue"
_
    = ((Text -> f Text)
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes -> Text)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Text -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes -> Text
_WorkflowPropertiesModifiedExternallyEventAttributes'newTaskQueue
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Text
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newTaskQueue = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedExternallyEventAttributes "newWorkflowTaskTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newWorkflowTaskTimeout"
-> (Duration -> f Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "newWorkflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes
 -> Maybe Duration)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Duration
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Duration
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout = 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 WorkflowPropertiesModifiedExternallyEventAttributes "maybe'newWorkflowTaskTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'newWorkflowTaskTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "maybe'newWorkflowTaskTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes
 -> Maybe Duration)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Duration
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Duration
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedExternallyEventAttributes "newWorkflowRunTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newWorkflowRunTimeout"
-> (Duration -> f Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "newWorkflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes
 -> Maybe Duration)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Duration
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Duration
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout = 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 WorkflowPropertiesModifiedExternallyEventAttributes "maybe'newWorkflowRunTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'newWorkflowRunTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "maybe'newWorkflowRunTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes
 -> Maybe Duration)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Duration
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Duration
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedExternallyEventAttributes "newWorkflowExecutionTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newWorkflowExecutionTimeout"
-> (Duration -> f Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "newWorkflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes
 -> Maybe Duration)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Duration
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Duration
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout = 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 WorkflowPropertiesModifiedExternallyEventAttributes "maybe'newWorkflowExecutionTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'newWorkflowExecutionTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "maybe'newWorkflowExecutionTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes
 -> Maybe Duration)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Duration
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Duration
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowPropertiesModifiedExternallyEventAttributes "upsertedMemo" Proto.Temporal.Api.Common.V1.Message.Memo where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "upsertedMemo"
-> (Memo -> f Memo)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "upsertedMemo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Memo -> f Memo) -> Maybe Memo -> f (Maybe Memo))
-> (Memo -> f Memo)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes -> Maybe Memo)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Memo
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Memo
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo = 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 WorkflowPropertiesModifiedExternallyEventAttributes "maybe'upsertedMemo" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.Memo) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'upsertedMemo"
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
fieldOf Proxy# "maybe'upsertedMemo"
_
    = ((Maybe Memo -> f (Maybe Memo))
 -> WorkflowPropertiesModifiedExternallyEventAttributes
 -> f WorkflowPropertiesModifiedExternallyEventAttributes)
-> ((Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo))
-> (Maybe Memo -> f (Maybe Memo))
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> f WorkflowPropertiesModifiedExternallyEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowPropertiesModifiedExternallyEventAttributes -> Maybe Memo)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> Maybe Memo
    -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     (Maybe Memo)
     (Maybe Memo)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowPropertiesModifiedExternallyEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo
           (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ Maybe Memo
y__
              -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                   {_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo = y__}))
        (Maybe Memo -> f (Maybe Memo)) -> Maybe Memo -> f (Maybe Memo)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowPropertiesModifiedExternallyEventAttributes where
  messageName :: Proxy WorkflowPropertiesModifiedExternallyEventAttributes -> Text
messageName Proxy WorkflowPropertiesModifiedExternallyEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowPropertiesModifiedExternallyEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowPropertiesModifiedExternallyEventAttributes
-> ByteString
packedMessageDescriptor Proxy WorkflowPropertiesModifiedExternallyEventAttributes
_
    = ByteString
"\n\
      \3WorkflowPropertiesModifiedExternallyEventAttributes\DC2$\n\
      \\SOnew_task_queue\CAN\SOH \SOH(\tR\fnewTaskQueue\DC2T\n\
      \\EMnew_workflow_task_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\SYNnewWorkflowTaskTimeout\DC2R\n\
      \\CANnew_workflow_run_timeout\CAN\ETX \SOH(\v2\EM.google.protobuf.DurationR\NAKnewWorkflowRunTimeout\DC2^\n\
      \\RSnew_workflow_execution_timeout\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR\ESCnewWorkflowExecutionTimeout\DC2A\n\
      \\rupserted_memo\CAN\ENQ \SOH(\v2\FS.temporal.api.common.v1.MemoR\fupsertedMemo"
  packedFileDescriptor :: Proxy WorkflowPropertiesModifiedExternallyEventAttributes
-> ByteString
packedFileDescriptor Proxy WorkflowPropertiesModifiedExternallyEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map
  Tag
  (FieldDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes)
fieldsByTag
    = let
        newTaskQueue__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newTaskQueue__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes Text
-> FieldDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_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
     WorkflowPropertiesModifiedExternallyEventAttributes
     WorkflowPropertiesModifiedExternallyEventAttributes
     Text
     Text
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes 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 @"newTaskQueue")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
        newWorkflowTaskTimeout__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newWorkflowTaskTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes Duration
-> FieldDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_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
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes 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'newWorkflowTaskTimeout")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
        newWorkflowRunTimeout__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newWorkflowRunTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes Duration
-> FieldDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_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
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes 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'newWorkflowRunTimeout")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
        newWorkflowExecutionTimeout__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newWorkflowExecutionTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes Duration
-> FieldDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_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
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes 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'newWorkflowExecutionTimeout")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
        upsertedMemo__field_descriptor :: FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
upsertedMemo__field_descriptor
          = String
-> FieldTypeDescriptor Memo
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes Memo
-> FieldDescriptor
     WorkflowPropertiesModifiedExternallyEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"upserted_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
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> FieldAccessor
     WorkflowPropertiesModifiedExternallyEventAttributes 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'upsertedMemo")) ::
              Data.ProtoLens.FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
      in
        [(Tag,
  FieldDescriptor
    WorkflowPropertiesModifiedExternallyEventAttributes)]
-> Map
     Tag
     (FieldDescriptor
        WorkflowPropertiesModifiedExternallyEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newTaskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newWorkflowTaskTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newWorkflowRunTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, 
            FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
newWorkflowExecutionTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowPropertiesModifiedExternallyEventAttributes
upsertedMemo__field_descriptor)]
  unknownFields :: Lens' WorkflowPropertiesModifiedExternallyEventAttributes FieldSet
unknownFields
    = (WorkflowPropertiesModifiedExternallyEventAttributes -> FieldSet)
-> (WorkflowPropertiesModifiedExternallyEventAttributes
    -> FieldSet -> WorkflowPropertiesModifiedExternallyEventAttributes)
-> Lens'
     WorkflowPropertiesModifiedExternallyEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowPropertiesModifiedExternallyEventAttributes -> FieldSet
_WorkflowPropertiesModifiedExternallyEventAttributes'_unknownFields
        (\ WorkflowPropertiesModifiedExternallyEventAttributes
x__ FieldSet
y__
           -> WorkflowPropertiesModifiedExternallyEventAttributes
x__
                {_WorkflowPropertiesModifiedExternallyEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowPropertiesModifiedExternallyEventAttributes
defMessage
    = WorkflowPropertiesModifiedExternallyEventAttributes'_constructor
        {_WorkflowPropertiesModifiedExternallyEventAttributes'newTaskQueue :: Text
_WorkflowPropertiesModifiedExternallyEventAttributes'newTaskQueue = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout :: Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout :: Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout :: Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo :: Maybe Memo
_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo = Maybe Memo
forall a. Maybe a
Prelude.Nothing,
         _WorkflowPropertiesModifiedExternallyEventAttributes'_unknownFields :: FieldSet
_WorkflowPropertiesModifiedExternallyEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowPropertiesModifiedExternallyEventAttributes
parseMessage
    = let
        loop ::
          WorkflowPropertiesModifiedExternallyEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowPropertiesModifiedExternallyEventAttributes
        loop :: WorkflowPropertiesModifiedExternallyEventAttributes
-> Parser WorkflowPropertiesModifiedExternallyEventAttributes
loop WorkflowPropertiesModifiedExternallyEventAttributes
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
"new_task_queue"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newTaskQueue") 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
"new_workflow_task_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newWorkflowTaskTimeout") 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
"new_workflow_run_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newWorkflowRunTimeout") 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
"new_workflow_execution_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"newWorkflowExecutionTimeout") y
                                     x)
                        Word64
42
                          -> 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
"upserted_memo"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"upsertedMemo") 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 WorkflowPropertiesModifiedExternallyEventAttributes
-> String
-> Parser WorkflowPropertiesModifiedExternallyEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowPropertiesModifiedExternallyEventAttributes
-> Parser WorkflowPropertiesModifiedExternallyEventAttributes
loop WorkflowPropertiesModifiedExternallyEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowPropertiesModifiedExternallyEventAttributes"
  buildMessage :: WorkflowPropertiesModifiedExternallyEventAttributes -> Builder
buildMessage
    = \ WorkflowPropertiesModifiedExternallyEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Text
_v
                  = FoldLike
  Text
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  Text
  Text
-> WorkflowPropertiesModifiedExternallyEventAttributes -> 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 @"newTaskQueue") WorkflowPropertiesModifiedExternallyEventAttributes
_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 Duration)
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> 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'newWorkflowTaskTimeout") WorkflowPropertiesModifiedExternallyEventAttributes
_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)
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> 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'newWorkflowRunTimeout") WorkflowPropertiesModifiedExternallyEventAttributes
_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)
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> 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'newWorkflowExecutionTimeout")
                             WorkflowPropertiesModifiedExternallyEventAttributes
_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))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (case
                              FoldLike
  (Maybe Memo)
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  (Maybe Memo)
  (Maybe Memo)
-> WorkflowPropertiesModifiedExternallyEventAttributes
-> 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'upsertedMemo") WorkflowPropertiesModifiedExternallyEventAttributes
_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
42)
                                   ((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))
                         (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                            (FoldLike
  FieldSet
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  FieldSet
  FieldSet
-> WorkflowPropertiesModifiedExternallyEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowPropertiesModifiedExternallyEventAttributes
  WorkflowPropertiesModifiedExternallyEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowPropertiesModifiedExternallyEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowPropertiesModifiedExternallyEventAttributes
_x))))))
instance Control.DeepSeq.NFData WorkflowPropertiesModifiedExternallyEventAttributes where
  rnf :: WorkflowPropertiesModifiedExternallyEventAttributes -> ()
rnf
    = \ WorkflowPropertiesModifiedExternallyEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowPropertiesModifiedExternallyEventAttributes -> FieldSet
_WorkflowPropertiesModifiedExternallyEventAttributes'_unknownFields
                WorkflowPropertiesModifiedExternallyEventAttributes
x__)
             (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowPropertiesModifiedExternallyEventAttributes -> Text
_WorkflowPropertiesModifiedExternallyEventAttributes'newTaskQueue
                   WorkflowPropertiesModifiedExternallyEventAttributes
x__)
                (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowTaskTimeout
                      WorkflowPropertiesModifiedExternallyEventAttributes
x__)
                   (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowRunTimeout
                         WorkflowPropertiesModifiedExternallyEventAttributes
x__)
                      (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowPropertiesModifiedExternallyEventAttributes
-> Maybe Duration
_WorkflowPropertiesModifiedExternallyEventAttributes'newWorkflowExecutionTimeout
                            WorkflowPropertiesModifiedExternallyEventAttributes
x__)
                         (Maybe Memo -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowPropertiesModifiedExternallyEventAttributes -> Maybe Memo
_WorkflowPropertiesModifiedExternallyEventAttributes'upsertedMemo
                               WorkflowPropertiesModifiedExternallyEventAttributes
x__)
                            ())))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' WorkflowTaskCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' WorkflowTaskCompletedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowTaskCompletedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.binaryChecksum' @:: Lens' WorkflowTaskCompletedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' WorkflowTaskCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' WorkflowTaskCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.sdkMetadata' @:: Lens' WorkflowTaskCompletedEventAttributes Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'sdkMetadata' @:: Lens' WorkflowTaskCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.meteringMetadata' @:: Lens' WorkflowTaskCompletedEventAttributes Proto.Temporal.Api.Common.V1.Message.MeteringMetadata@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'meteringMetadata' @:: Lens' WorkflowTaskCompletedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.MeteringMetadata)@ -}
data WorkflowTaskCompletedEventAttributes
  = WorkflowTaskCompletedEventAttributes'_constructor {WorkflowTaskCompletedEventAttributes -> Int64
_WorkflowTaskCompletedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                       WorkflowTaskCompletedEventAttributes -> Int64
_WorkflowTaskCompletedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                       WorkflowTaskCompletedEventAttributes -> Text
_WorkflowTaskCompletedEventAttributes'identity :: !Data.Text.Text,
                                                       WorkflowTaskCompletedEventAttributes -> Text
_WorkflowTaskCompletedEventAttributes'binaryChecksum :: !Data.Text.Text,
                                                       WorkflowTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskCompletedEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                       WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedMetadata
_WorkflowTaskCompletedEventAttributes'sdkMetadata :: !(Prelude.Maybe Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata),
                                                       WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata
_WorkflowTaskCompletedEventAttributes'meteringMetadata :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.MeteringMetadata),
                                                       WorkflowTaskCompletedEventAttributes -> FieldSet
_WorkflowTaskCompletedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
(WorkflowTaskCompletedEventAttributes
 -> WorkflowTaskCompletedEventAttributes -> Bool)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes -> Bool)
-> Eq WorkflowTaskCompletedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
== :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
$c/= :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
/= :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowTaskCompletedEventAttributes
Eq WorkflowTaskCompletedEventAttributes =>
(WorkflowTaskCompletedEventAttributes
 -> WorkflowTaskCompletedEventAttributes -> Ordering)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes -> Bool)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes -> Bool)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes -> Bool)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes -> Bool)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes)
-> (WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes
    -> WorkflowTaskCompletedEventAttributes)
-> Ord WorkflowTaskCompletedEventAttributes
WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Ordering
WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
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 :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Ordering
compare :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Ordering
$c< :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
< :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
$c<= :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
<= :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
$c> :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
> :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
$c>= :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
>= :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes -> Bool
$cmax :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
max :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
$cmin :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
min :: WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
-> WorkflowTaskCompletedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowTaskCompletedEventAttributes where
  showsPrec :: Int -> WorkflowTaskCompletedEventAttributes -> ShowS
showsPrec Int
_ WorkflowTaskCompletedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowTaskCompletedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowTaskCompletedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Int64)
-> (WorkflowTaskCompletedEventAttributes
    -> Int64 -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Int64
_WorkflowTaskCompletedEventAttributes'scheduledEventId
           (\ WorkflowTaskCompletedEventAttributes
x__ Int64
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Int64)
-> (WorkflowTaskCompletedEventAttributes
    -> Int64 -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Int64
_WorkflowTaskCompletedEventAttributes'startedEventId
           (\ WorkflowTaskCompletedEventAttributes
x__ Int64
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Text)
-> (WorkflowTaskCompletedEventAttributes
    -> Text -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Text
_WorkflowTaskCompletedEventAttributes'identity
           (\ WorkflowTaskCompletedEventAttributes
x__ Text
y__
              -> WorkflowTaskCompletedEventAttributes
x__ {_WorkflowTaskCompletedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "binaryChecksum" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "binaryChecksum"
-> (Text -> f Text)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "binaryChecksum"
_
    = ((Text -> f Text)
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Text)
-> (WorkflowTaskCompletedEventAttributes
    -> Text -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Text
_WorkflowTaskCompletedEventAttributes'binaryChecksum
           (\ WorkflowTaskCompletedEventAttributes
x__ Text
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'binaryChecksum = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Maybe WorkerVersionStamp)
-> (WorkflowTaskCompletedEventAttributes
    -> Maybe WorkerVersionStamp
    -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskCompletedEventAttributes'workerVersion
           (\ WorkflowTaskCompletedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'workerVersion = 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 WorkflowTaskCompletedEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Maybe WorkerVersionStamp)
-> (WorkflowTaskCompletedEventAttributes
    -> Maybe WorkerVersionStamp
    -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskCompletedEventAttributes'workerVersion
           (\ WorkflowTaskCompletedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "sdkMetadata" Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "sdkMetadata"
-> (WorkflowTaskCompletedMetadata
    -> f WorkflowTaskCompletedMetadata)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "sdkMetadata"
_
    = ((Maybe WorkflowTaskCompletedMetadata
  -> f (Maybe WorkflowTaskCompletedMetadata))
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((WorkflowTaskCompletedMetadata
     -> f WorkflowTaskCompletedMetadata)
    -> Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> (WorkflowTaskCompletedMetadata
    -> f WorkflowTaskCompletedMetadata)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes
 -> Maybe WorkflowTaskCompletedMetadata)
-> (WorkflowTaskCompletedEventAttributes
    -> Maybe WorkflowTaskCompletedMetadata
    -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     (Maybe WorkflowTaskCompletedMetadata)
     (Maybe WorkflowTaskCompletedMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedMetadata
_WorkflowTaskCompletedEventAttributes'sdkMetadata
           (\ WorkflowTaskCompletedEventAttributes
x__ Maybe WorkflowTaskCompletedMetadata
y__
              -> WorkflowTaskCompletedEventAttributes
x__ {_WorkflowTaskCompletedEventAttributes'sdkMetadata = y__}))
        (WorkflowTaskCompletedMetadata
-> Lens'
     (Maybe WorkflowTaskCompletedMetadata) WorkflowTaskCompletedMetadata
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens WorkflowTaskCompletedMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "maybe'sdkMetadata" (Prelude.Maybe Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'sdkMetadata"
-> (Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "maybe'sdkMetadata"
_
    = ((Maybe WorkflowTaskCompletedMetadata
  -> f (Maybe WorkflowTaskCompletedMetadata))
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Maybe WorkflowTaskCompletedMetadata
     -> f (Maybe WorkflowTaskCompletedMetadata))
    -> Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> (Maybe WorkflowTaskCompletedMetadata
    -> f (Maybe WorkflowTaskCompletedMetadata))
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes
 -> Maybe WorkflowTaskCompletedMetadata)
-> (WorkflowTaskCompletedEventAttributes
    -> Maybe WorkflowTaskCompletedMetadata
    -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     (Maybe WorkflowTaskCompletedMetadata)
     (Maybe WorkflowTaskCompletedMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedMetadata
_WorkflowTaskCompletedEventAttributes'sdkMetadata
           (\ WorkflowTaskCompletedEventAttributes
x__ Maybe WorkflowTaskCompletedMetadata
y__
              -> WorkflowTaskCompletedEventAttributes
x__ {_WorkflowTaskCompletedEventAttributes'sdkMetadata = y__}))
        (Maybe WorkflowTaskCompletedMetadata
 -> f (Maybe WorkflowTaskCompletedMetadata))
-> Maybe WorkflowTaskCompletedMetadata
-> f (Maybe WorkflowTaskCompletedMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "meteringMetadata" Proto.Temporal.Api.Common.V1.Message.MeteringMetadata where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "meteringMetadata"
-> (MeteringMetadata -> f MeteringMetadata)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "meteringMetadata"
_
    = ((Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((MeteringMetadata -> f MeteringMetadata)
    -> Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> (MeteringMetadata -> f MeteringMetadata)
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata)
-> (WorkflowTaskCompletedEventAttributes
    -> Maybe MeteringMetadata -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     (Maybe MeteringMetadata)
     (Maybe MeteringMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata
_WorkflowTaskCompletedEventAttributes'meteringMetadata
           (\ WorkflowTaskCompletedEventAttributes
x__ Maybe MeteringMetadata
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'meteringMetadata = y__}))
        (MeteringMetadata -> Lens' (Maybe MeteringMetadata) MeteringMetadata
forall b. b -> Lens' (Maybe b) b
Data.ProtoLens.maybeLens MeteringMetadata
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
instance Data.ProtoLens.Field.HasField WorkflowTaskCompletedEventAttributes "maybe'meteringMetadata" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.MeteringMetadata) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'meteringMetadata"
-> (Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
fieldOf Proxy# "maybe'meteringMetadata"
_
    = ((Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
 -> WorkflowTaskCompletedEventAttributes
 -> f WorkflowTaskCompletedEventAttributes)
-> ((Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
    -> Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> (Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> WorkflowTaskCompletedEventAttributes
-> f WorkflowTaskCompletedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata)
-> (WorkflowTaskCompletedEventAttributes
    -> Maybe MeteringMetadata -> WorkflowTaskCompletedEventAttributes)
-> Lens
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     (Maybe MeteringMetadata)
     (Maybe MeteringMetadata)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata
_WorkflowTaskCompletedEventAttributes'meteringMetadata
           (\ WorkflowTaskCompletedEventAttributes
x__ Maybe MeteringMetadata
y__
              -> WorkflowTaskCompletedEventAttributes
x__
                   {_WorkflowTaskCompletedEventAttributes'meteringMetadata = y__}))
        (Maybe MeteringMetadata -> f (Maybe MeteringMetadata))
-> Maybe MeteringMetadata -> f (Maybe MeteringMetadata)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowTaskCompletedEventAttributes where
  messageName :: Proxy WorkflowTaskCompletedEventAttributes -> Text
messageName Proxy WorkflowTaskCompletedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowTaskCompletedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowTaskCompletedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowTaskCompletedEventAttributes
_
    = ByteString
"\n\
      \$WorkflowTaskCompletedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
      \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2'\n\
      \\SIbinary_checksum\CAN\EOT \SOH(\tR\SObinaryChecksum\DC2Q\n\
      \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\DC2U\n\
      \\fsdk_metadata\CAN\ACK \SOH(\v22.temporal.api.sdk.v1.WorkflowTaskCompletedMetadataR\vsdkMetadata\DC2U\n\
      \\DC1metering_metadata\CAN\r \SOH(\v2(.temporal.api.common.v1.MeteringMetadataR\DLEmeteringMetadata"
  packedFileDescriptor :: Proxy WorkflowTaskCompletedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowTaskCompletedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowTaskCompletedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskCompletedEventAttributes Int64
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskCompletedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskCompletedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskCompletedEventAttributes Int64
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskCompletedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskCompletedEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskCompletedEventAttributes Text
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskCompletedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskCompletedEventAttributes
        binaryChecksum__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
binaryChecksum__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskCompletedEventAttributes Text
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
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
     WorkflowTaskCompletedEventAttributes
     WorkflowTaskCompletedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskCompletedEventAttributes 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 WorkflowTaskCompletedEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     WorkflowTaskCompletedEventAttributes WorkerVersionStamp
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     WorkflowTaskCompletedEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskCompletedEventAttributes
        sdkMetadata__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
sdkMetadata__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskCompletedMetadata
-> FieldAccessor
     WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedMetadata
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"sdk_metadata"
              (MessageOrGroup -> FieldTypeDescriptor WorkflowTaskCompletedMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Sdk.V1.TaskCompleteMetadata.WorkflowTaskCompletedMetadata)
              (Lens
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  (Maybe WorkflowTaskCompletedMetadata)
  (Maybe WorkflowTaskCompletedMetadata)
-> FieldAccessor
     WorkflowTaskCompletedEventAttributes WorkflowTaskCompletedMetadata
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'sdkMetadata")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskCompletedEventAttributes
        meteringMetadata__field_descriptor :: FieldDescriptor WorkflowTaskCompletedEventAttributes
meteringMetadata__field_descriptor
          = String
-> FieldTypeDescriptor MeteringMetadata
-> FieldAccessor
     WorkflowTaskCompletedEventAttributes MeteringMetadata
-> FieldDescriptor WorkflowTaskCompletedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"metering_metadata"
              (MessageOrGroup -> FieldTypeDescriptor MeteringMetadata
forall value.
Message value =>
MessageOrGroup -> FieldTypeDescriptor value
Data.ProtoLens.MessageField MessageOrGroup
Data.ProtoLens.MessageType ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Common.V1.Message.MeteringMetadata)
              (Lens
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  (Maybe MeteringMetadata)
  (Maybe MeteringMetadata)
-> FieldAccessor
     WorkflowTaskCompletedEventAttributes MeteringMetadata
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'meteringMetadata")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskCompletedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowTaskCompletedEventAttributes)]
-> Map Tag (FieldDescriptor WorkflowTaskCompletedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowTaskCompletedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowTaskCompletedEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowTaskCompletedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowTaskCompletedEventAttributes
binaryChecksum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowTaskCompletedEventAttributes
workerVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowTaskCompletedEventAttributes
sdkMetadata__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
13, FieldDescriptor WorkflowTaskCompletedEventAttributes
meteringMetadata__field_descriptor)]
  unknownFields :: Lens' WorkflowTaskCompletedEventAttributes FieldSet
unknownFields
    = (WorkflowTaskCompletedEventAttributes -> FieldSet)
-> (WorkflowTaskCompletedEventAttributes
    -> FieldSet -> WorkflowTaskCompletedEventAttributes)
-> Lens' WorkflowTaskCompletedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowTaskCompletedEventAttributes -> FieldSet
_WorkflowTaskCompletedEventAttributes'_unknownFields
        (\ WorkflowTaskCompletedEventAttributes
x__ FieldSet
y__
           -> WorkflowTaskCompletedEventAttributes
x__
                {_WorkflowTaskCompletedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowTaskCompletedEventAttributes
defMessage
    = WorkflowTaskCompletedEventAttributes'_constructor
        {_WorkflowTaskCompletedEventAttributes'scheduledEventId :: Int64
_WorkflowTaskCompletedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskCompletedEventAttributes'startedEventId :: Int64
_WorkflowTaskCompletedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskCompletedEventAttributes'identity :: Text
_WorkflowTaskCompletedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskCompletedEventAttributes'binaryChecksum :: Text
_WorkflowTaskCompletedEventAttributes'binaryChecksum = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskCompletedEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_WorkflowTaskCompletedEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskCompletedEventAttributes'sdkMetadata :: Maybe WorkflowTaskCompletedMetadata
_WorkflowTaskCompletedEventAttributes'sdkMetadata = Maybe WorkflowTaskCompletedMetadata
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskCompletedEventAttributes'meteringMetadata :: Maybe MeteringMetadata
_WorkflowTaskCompletedEventAttributes'meteringMetadata = Maybe MeteringMetadata
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskCompletedEventAttributes'_unknownFields :: FieldSet
_WorkflowTaskCompletedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowTaskCompletedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowTaskCompletedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowTaskCompletedEventAttributes
        loop :: WorkflowTaskCompletedEventAttributes
-> Parser WorkflowTaskCompletedEventAttributes
loop WorkflowTaskCompletedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
16
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") 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
"binary_checksum"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"binaryChecksum") y x)
                        Word64
42
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                        Word64
50
                          -> do y <- Parser WorkflowTaskCompletedMetadata
-> String -> Parser WorkflowTaskCompletedMetadata
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
"sdk_metadata"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"sdkMetadata") y x)
                        Word64
106
                          -> do y <- Parser MeteringMetadata -> String -> Parser MeteringMetadata
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
"metering_metadata"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"meteringMetadata") 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 WorkflowTaskCompletedEventAttributes
-> String -> Parser WorkflowTaskCompletedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowTaskCompletedEventAttributes
-> Parser WorkflowTaskCompletedEventAttributes
loop WorkflowTaskCompletedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowTaskCompletedEventAttributes"
  buildMessage :: WorkflowTaskCompletedEventAttributes -> Builder
buildMessage
    = \ WorkflowTaskCompletedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  Int64
  Int64
-> WorkflowTaskCompletedEventAttributes -> 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 @"scheduledEventId") WorkflowTaskCompletedEventAttributes
_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
8)
                      ((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
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  Int64
  Int64
-> WorkflowTaskCompletedEventAttributes -> 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 @"startedEventId") WorkflowTaskCompletedEventAttributes
_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
16)
                         ((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
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  Text
  Text
-> WorkflowTaskCompletedEventAttributes -> 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 @"identity") WorkflowTaskCompletedEventAttributes
_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
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  Text
  Text
-> WorkflowTaskCompletedEventAttributes -> 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") WorkflowTaskCompletedEventAttributes
_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 WorkerVersionStamp)
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> WorkflowTaskCompletedEventAttributes -> 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'workerVersion") WorkflowTaskCompletedEventAttributes
_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
42)
                                   ((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 WorkflowTaskCompletedMetadata)
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  (Maybe WorkflowTaskCompletedMetadata)
  (Maybe WorkflowTaskCompletedMetadata)
-> WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedMetadata
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'sdkMetadata") WorkflowTaskCompletedEventAttributes
_x
                             of
                               Maybe WorkflowTaskCompletedMetadata
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                               (Prelude.Just WorkflowTaskCompletedMetadata
_v)
                                 -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                      (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
50)
                                      ((ByteString -> Builder)
-> (WorkflowTaskCompletedMetadata -> ByteString)
-> WorkflowTaskCompletedMetadata
-> 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))
                                         WorkflowTaskCompletedMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage WorkflowTaskCompletedMetadata
_v))
                            (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                               (case
                                    FoldLike
  (Maybe MeteringMetadata)
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  (Maybe MeteringMetadata)
  (Maybe MeteringMetadata)
-> WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata
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'meteringMetadata") WorkflowTaskCompletedEventAttributes
_x
                                of
                                  Maybe MeteringMetadata
Prelude.Nothing -> Builder
forall a. Monoid a => a
Data.Monoid.mempty
                                  (Prelude.Just MeteringMetadata
_v)
                                    -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                                         (Word64 -> Builder
Data.ProtoLens.Encoding.Bytes.putVarInt Word64
106)
                                         ((ByteString -> Builder)
-> (MeteringMetadata -> ByteString) -> MeteringMetadata -> 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))
                                            MeteringMetadata -> ByteString
forall msg. Message msg => msg -> ByteString
Data.ProtoLens.encodeMessage MeteringMetadata
_v))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  FieldSet
  FieldSet
-> WorkflowTaskCompletedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowTaskCompletedEventAttributes
  WorkflowTaskCompletedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowTaskCompletedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowTaskCompletedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData WorkflowTaskCompletedEventAttributes where
  rnf :: WorkflowTaskCompletedEventAttributes -> ()
rnf
    = \ WorkflowTaskCompletedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowTaskCompletedEventAttributes -> FieldSet
_WorkflowTaskCompletedEventAttributes'_unknownFields WorkflowTaskCompletedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowTaskCompletedEventAttributes -> Int64
_WorkflowTaskCompletedEventAttributes'scheduledEventId WorkflowTaskCompletedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowTaskCompletedEventAttributes -> Int64
_WorkflowTaskCompletedEventAttributes'startedEventId WorkflowTaskCompletedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowTaskCompletedEventAttributes -> Text
_WorkflowTaskCompletedEventAttributes'identity WorkflowTaskCompletedEventAttributes
x__)
                      (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowTaskCompletedEventAttributes -> Text
_WorkflowTaskCompletedEventAttributes'binaryChecksum WorkflowTaskCompletedEventAttributes
x__)
                         (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowTaskCompletedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskCompletedEventAttributes'workerVersion WorkflowTaskCompletedEventAttributes
x__)
                            (Maybe WorkflowTaskCompletedMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowTaskCompletedEventAttributes
-> Maybe WorkflowTaskCompletedMetadata
_WorkflowTaskCompletedEventAttributes'sdkMetadata WorkflowTaskCompletedEventAttributes
x__)
                               (Maybe MeteringMetadata -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (WorkflowTaskCompletedEventAttributes -> Maybe MeteringMetadata
_WorkflowTaskCompletedEventAttributes'meteringMetadata WorkflowTaskCompletedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' WorkflowTaskFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' WorkflowTaskFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.cause' @:: Lens' WorkflowTaskFailedEventAttributes Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.failure' @:: Lens' WorkflowTaskFailedEventAttributes Proto.Temporal.Api.Failure.V1.Message.Failure@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'failure' @:: Lens' WorkflowTaskFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowTaskFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.baseRunId' @:: Lens' WorkflowTaskFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.newRunId' @:: Lens' WorkflowTaskFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.forkEventVersion' @:: Lens' WorkflowTaskFailedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.binaryChecksum' @:: Lens' WorkflowTaskFailedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' WorkflowTaskFailedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' WorkflowTaskFailedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@ -}
data WorkflowTaskFailedEventAttributes
  = WorkflowTaskFailedEventAttributes'_constructor {WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                    WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'startedEventId :: !Data.Int.Int64,
                                                    WorkflowTaskFailedEventAttributes -> WorkflowTaskFailedCause
_WorkflowTaskFailedEventAttributes'cause :: !Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause,
                                                    WorkflowTaskFailedEventAttributes -> Maybe Failure
_WorkflowTaskFailedEventAttributes'failure :: !(Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure),
                                                    WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'identity :: !Data.Text.Text,
                                                    WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'baseRunId :: !Data.Text.Text,
                                                    WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'newRunId :: !Data.Text.Text,
                                                    WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'forkEventVersion :: !Data.Int.Int64,
                                                    WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'binaryChecksum :: !Data.Text.Text,
                                                    WorkflowTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskFailedEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                    WorkflowTaskFailedEventAttributes -> FieldSet
_WorkflowTaskFailedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
(WorkflowTaskFailedEventAttributes
 -> WorkflowTaskFailedEventAttributes -> Bool)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes -> Bool)
-> Eq WorkflowTaskFailedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
== :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
$c/= :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
/= :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowTaskFailedEventAttributes
Eq WorkflowTaskFailedEventAttributes =>
(WorkflowTaskFailedEventAttributes
 -> WorkflowTaskFailedEventAttributes -> Ordering)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes -> Bool)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes -> Bool)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes -> Bool)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes -> Bool)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedEventAttributes)
-> Ord WorkflowTaskFailedEventAttributes
WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Ordering
WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
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 :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Ordering
compare :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Ordering
$c< :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
< :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
$c<= :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
<= :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
$c> :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
> :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
$c>= :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
>= :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes -> Bool
$cmax :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
max :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
$cmin :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
min :: WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
-> WorkflowTaskFailedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowTaskFailedEventAttributes where
  showsPrec :: Int -> WorkflowTaskFailedEventAttributes -> ShowS
showsPrec Int
_ WorkflowTaskFailedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowTaskFailedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowTaskFailedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Int64)
-> (WorkflowTaskFailedEventAttributes
    -> Int64 -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'scheduledEventId
           (\ WorkflowTaskFailedEventAttributes
x__ Int64
y__
              -> WorkflowTaskFailedEventAttributes
x__
                   {_WorkflowTaskFailedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Int64)
-> (WorkflowTaskFailedEventAttributes
    -> Int64 -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'startedEventId
           (\ WorkflowTaskFailedEventAttributes
x__ Int64
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "cause" Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "cause"
-> (WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "cause"
_
    = ((WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
    -> WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> (WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> WorkflowTaskFailedCause)
-> (WorkflowTaskFailedEventAttributes
    -> WorkflowTaskFailedCause -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedCause
     WorkflowTaskFailedCause
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> WorkflowTaskFailedCause
_WorkflowTaskFailedEventAttributes'cause
           (\ WorkflowTaskFailedEventAttributes
x__ WorkflowTaskFailedCause
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'cause = y__}))
        (WorkflowTaskFailedCause -> f WorkflowTaskFailedCause)
-> WorkflowTaskFailedCause -> f WorkflowTaskFailedCause
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "failure" Proto.Temporal.Api.Failure.V1.Message.Failure where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "failure"
-> (Failure -> f Failure)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Failure -> f Failure) -> Maybe Failure -> f (Maybe Failure))
-> (Failure -> f Failure)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Maybe Failure)
-> (WorkflowTaskFailedEventAttributes
    -> Maybe Failure -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Maybe Failure
_WorkflowTaskFailedEventAttributes'failure
           (\ WorkflowTaskFailedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'failure = 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 WorkflowTaskFailedEventAttributes "maybe'failure" (Prelude.Maybe Proto.Temporal.Api.Failure.V1.Message.Failure) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'failure"
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "maybe'failure"
_
    = ((Maybe Failure -> f (Maybe Failure))
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Maybe Failure -> f (Maybe Failure))
    -> Maybe Failure -> f (Maybe Failure))
-> (Maybe Failure -> f (Maybe Failure))
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Maybe Failure)
-> (WorkflowTaskFailedEventAttributes
    -> Maybe Failure -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     (Maybe Failure)
     (Maybe Failure)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Maybe Failure
_WorkflowTaskFailedEventAttributes'failure
           (\ WorkflowTaskFailedEventAttributes
x__ Maybe Failure
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'failure = y__}))
        (Maybe Failure -> f (Maybe Failure))
-> Maybe Failure -> f (Maybe Failure)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Text)
-> (WorkflowTaskFailedEventAttributes
    -> Text -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'identity
           (\ WorkflowTaskFailedEventAttributes
x__ Text
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "baseRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "baseRunId"
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "baseRunId"
_
    = ((Text -> f Text)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Text)
-> (WorkflowTaskFailedEventAttributes
    -> Text -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'baseRunId
           (\ WorkflowTaskFailedEventAttributes
x__ Text
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'baseRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "newRunId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "newRunId"
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "newRunId"
_
    = ((Text -> f Text)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Text)
-> (WorkflowTaskFailedEventAttributes
    -> Text -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'newRunId
           (\ WorkflowTaskFailedEventAttributes
x__ Text
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'newRunId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "forkEventVersion" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "forkEventVersion"
-> (Int64 -> f Int64)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "forkEventVersion"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Int64)
-> (WorkflowTaskFailedEventAttributes
    -> Int64 -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'forkEventVersion
           (\ WorkflowTaskFailedEventAttributes
x__ Int64
y__
              -> WorkflowTaskFailedEventAttributes
x__
                   {_WorkflowTaskFailedEventAttributes'forkEventVersion = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "binaryChecksum" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "binaryChecksum"
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "binaryChecksum"
_
    = ((Text -> f Text)
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Text)
-> (WorkflowTaskFailedEventAttributes
    -> Text -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'binaryChecksum
           (\ WorkflowTaskFailedEventAttributes
x__ Text
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'binaryChecksum = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskFailedEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Maybe WorkerVersionStamp)
-> (WorkflowTaskFailedEventAttributes
    -> Maybe WorkerVersionStamp -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskFailedEventAttributes'workerVersion
           (\ WorkflowTaskFailedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'workerVersion = 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 WorkflowTaskFailedEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowTaskFailedEventAttributes
 -> f WorkflowTaskFailedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowTaskFailedEventAttributes
-> f WorkflowTaskFailedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskFailedEventAttributes -> Maybe WorkerVersionStamp)
-> (WorkflowTaskFailedEventAttributes
    -> Maybe WorkerVersionStamp -> WorkflowTaskFailedEventAttributes)
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskFailedEventAttributes'workerVersion
           (\ WorkflowTaskFailedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowTaskFailedEventAttributes where
  messageName :: Proxy WorkflowTaskFailedEventAttributes -> Text
messageName Proxy WorkflowTaskFailedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowTaskFailedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowTaskFailedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowTaskFailedEventAttributes
_
    = ByteString
"\n\
      \!WorkflowTaskFailedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2D\n\
      \\ENQcause\CAN\ETX \SOH(\SO2..temporal.api.enums.v1.WorkflowTaskFailedCauseR\ENQcause\DC2:\n\
      \\afailure\CAN\EOT \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
      \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\RS\n\
      \\vbase_run_id\CAN\ACK \SOH(\tR\tbaseRunId\DC2\FS\n\
      \\n\
      \new_run_id\CAN\a \SOH(\tR\bnewRunId\DC2,\n\
      \\DC2fork_event_version\CAN\b \SOH(\ETXR\DLEforkEventVersion\DC2'\n\
      \\SIbinary_checksum\CAN\t \SOH(\tR\SObinaryChecksum\DC2Q\n\
      \\SOworker_version\CAN\n\
      \ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion"
  packedFileDescriptor :: Proxy WorkflowTaskFailedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowTaskFailedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowTaskFailedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskFailedEventAttributes Int64
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskFailedEventAttributes Int64
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        cause__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
cause__field_descriptor
          = String
-> FieldTypeDescriptor WorkflowTaskFailedCause
-> FieldAccessor
     WorkflowTaskFailedEventAttributes WorkflowTaskFailedCause
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"cause"
              (ScalarField WorkflowTaskFailedCause
-> FieldTypeDescriptor WorkflowTaskFailedCause
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField WorkflowTaskFailedCause
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.FailedCause.WorkflowTaskFailedCause)
              (WireDefault WorkflowTaskFailedCause
-> Lens
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedCause
     WorkflowTaskFailedCause
-> FieldAccessor
     WorkflowTaskFailedEventAttributes WorkflowTaskFailedCause
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault WorkflowTaskFailedCause
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 @"cause")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        failure__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
failure__field_descriptor
          = String
-> FieldTypeDescriptor Failure
-> FieldAccessor WorkflowTaskFailedEventAttributes Failure
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> FieldAccessor WorkflowTaskFailedEventAttributes 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'failure")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskFailedEventAttributes Text
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        baseRunId__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
baseRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskFailedEventAttributes Text
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"base_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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 @"baseRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        newRunId__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
newRunId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskFailedEventAttributes Text
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"new_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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 @"newRunId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        forkEventVersion__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
forkEventVersion__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskFailedEventAttributes Int64
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"fork_event_version"
              (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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 @"forkEventVersion")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
        binaryChecksum__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
binaryChecksum__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskFailedEventAttributes Text
-> FieldDescriptor WorkflowTaskFailedEventAttributes
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
     WorkflowTaskFailedEventAttributes
     WorkflowTaskFailedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskFailedEventAttributes 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 WorkflowTaskFailedEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor WorkflowTaskFailedEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     WorkflowTaskFailedEventAttributes WorkerVersionStamp
-> FieldDescriptor WorkflowTaskFailedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     WorkflowTaskFailedEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskFailedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowTaskFailedEventAttributes)]
-> Map Tag (FieldDescriptor WorkflowTaskFailedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowTaskFailedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowTaskFailedEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowTaskFailedEventAttributes
cause__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowTaskFailedEventAttributes
failure__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowTaskFailedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowTaskFailedEventAttributes
baseRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowTaskFailedEventAttributes
newRunId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
8, FieldDescriptor WorkflowTaskFailedEventAttributes
forkEventVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
9, FieldDescriptor WorkflowTaskFailedEventAttributes
binaryChecksum__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
10, FieldDescriptor WorkflowTaskFailedEventAttributes
workerVersion__field_descriptor)]
  unknownFields :: Lens' WorkflowTaskFailedEventAttributes FieldSet
unknownFields
    = (WorkflowTaskFailedEventAttributes -> FieldSet)
-> (WorkflowTaskFailedEventAttributes
    -> FieldSet -> WorkflowTaskFailedEventAttributes)
-> Lens' WorkflowTaskFailedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowTaskFailedEventAttributes -> FieldSet
_WorkflowTaskFailedEventAttributes'_unknownFields
        (\ WorkflowTaskFailedEventAttributes
x__ FieldSet
y__
           -> WorkflowTaskFailedEventAttributes
x__ {_WorkflowTaskFailedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowTaskFailedEventAttributes
defMessage
    = WorkflowTaskFailedEventAttributes'_constructor
        {_WorkflowTaskFailedEventAttributes'scheduledEventId :: Int64
_WorkflowTaskFailedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'startedEventId :: Int64
_WorkflowTaskFailedEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'cause :: WorkflowTaskFailedCause
_WorkflowTaskFailedEventAttributes'cause = WorkflowTaskFailedCause
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'failure :: Maybe Failure
_WorkflowTaskFailedEventAttributes'failure = Maybe Failure
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskFailedEventAttributes'identity :: Text
_WorkflowTaskFailedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'baseRunId :: Text
_WorkflowTaskFailedEventAttributes'baseRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'newRunId :: Text
_WorkflowTaskFailedEventAttributes'newRunId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'forkEventVersion :: Int64
_WorkflowTaskFailedEventAttributes'forkEventVersion = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'binaryChecksum :: Text
_WorkflowTaskFailedEventAttributes'binaryChecksum = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskFailedEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_WorkflowTaskFailedEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskFailedEventAttributes'_unknownFields :: FieldSet
_WorkflowTaskFailedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowTaskFailedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowTaskFailedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowTaskFailedEventAttributes
        loop :: WorkflowTaskFailedEventAttributes
-> Parser WorkflowTaskFailedEventAttributes
loop WorkflowTaskFailedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
16
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                        Word64
24
                          -> do y <- Parser WorkflowTaskFailedCause
-> String -> Parser WorkflowTaskFailedCause
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> WorkflowTaskFailedCause)
-> Parser Int -> Parser WorkflowTaskFailedCause
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> WorkflowTaskFailedCause
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
"cause"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"cause") y x)
                        Word64
34
                          -> 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
"failure"
                                loop (Lens.Family2.set (Data.ProtoLens.Field.field @"failure") y x)
                        Word64
42
                          -> 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") y x)
                        Word64
50
                          -> 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
"base_run_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"baseRunId") 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
"new_run_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"newRunId") y x)
                        Word64
64
                          -> 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
"fork_event_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"forkEventVersion") y x)
                        Word64
74
                          -> 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
82
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") 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 WorkflowTaskFailedEventAttributes
-> String -> Parser WorkflowTaskFailedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowTaskFailedEventAttributes
-> Parser WorkflowTaskFailedEventAttributes
loop WorkflowTaskFailedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowTaskFailedEventAttributes"
  buildMessage :: WorkflowTaskFailedEventAttributes -> Builder
buildMessage
    = \ WorkflowTaskFailedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Int64
  Int64
-> WorkflowTaskFailedEventAttributes -> 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 @"scheduledEventId") WorkflowTaskFailedEventAttributes
_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
8)
                      ((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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Int64
  Int64
-> WorkflowTaskFailedEventAttributes -> 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 @"startedEventId") WorkflowTaskFailedEventAttributes
_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
16)
                         ((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 :: WorkflowTaskFailedCause
_v = FoldLike
  WorkflowTaskFailedCause
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedCause
  WorkflowTaskFailedCause
-> WorkflowTaskFailedEventAttributes -> WorkflowTaskFailedCause
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 @"cause") WorkflowTaskFailedEventAttributes
_x
                    in
                      if WorkflowTaskFailedCause -> WorkflowTaskFailedCause -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) WorkflowTaskFailedCause
_v WorkflowTaskFailedCause
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)
-> (WorkflowTaskFailedCause -> Int)
-> WorkflowTaskFailedCause
-> 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)
                               WorkflowTaskFailedCause -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum WorkflowTaskFailedCause
_v))
                   (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                      (case
                           FoldLike
  (Maybe Failure)
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  (Maybe Failure)
  (Maybe Failure)
-> WorkflowTaskFailedEventAttributes -> 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'failure") WorkflowTaskFailedEventAttributes
_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
34)
                                ((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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Text
  Text
-> WorkflowTaskFailedEventAttributes -> 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 @"identity") WorkflowTaskFailedEventAttributes
_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
42)
                                  ((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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Text
  Text
-> WorkflowTaskFailedEventAttributes -> 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 @"baseRunId") WorkflowTaskFailedEventAttributes
_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
50)
                                     ((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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Text
  Text
-> WorkflowTaskFailedEventAttributes -> 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 @"newRunId") WorkflowTaskFailedEventAttributes
_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 :: Int64
_v
                                       = FoldLike
  Int64
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Int64
  Int64
-> WorkflowTaskFailedEventAttributes -> 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 @"forkEventVersion") WorkflowTaskFailedEventAttributes
_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
64)
                                           ((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
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  Text
  Text
-> WorkflowTaskFailedEventAttributes -> 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") WorkflowTaskFailedEventAttributes
_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
74)
                                              ((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)
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> WorkflowTaskFailedEventAttributes -> 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'workerVersion")
                                               WorkflowTaskFailedEventAttributes
_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
82)
                                                  ((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))
                                        (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                           (FoldLike
  FieldSet
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  FieldSet
  FieldSet
-> WorkflowTaskFailedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view
                                              FoldLike
  FieldSet
  WorkflowTaskFailedEventAttributes
  WorkflowTaskFailedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowTaskFailedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowTaskFailedEventAttributes
_x)))))))))))
instance Control.DeepSeq.NFData WorkflowTaskFailedEventAttributes where
  rnf :: WorkflowTaskFailedEventAttributes -> ()
rnf
    = \ WorkflowTaskFailedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowTaskFailedEventAttributes -> FieldSet
_WorkflowTaskFailedEventAttributes'_unknownFields WorkflowTaskFailedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'scheduledEventId WorkflowTaskFailedEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'startedEventId WorkflowTaskFailedEventAttributes
x__)
                   (WorkflowTaskFailedCause -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowTaskFailedEventAttributes -> WorkflowTaskFailedCause
_WorkflowTaskFailedEventAttributes'cause WorkflowTaskFailedEventAttributes
x__)
                      (Maybe Failure -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowTaskFailedEventAttributes -> Maybe Failure
_WorkflowTaskFailedEventAttributes'failure WorkflowTaskFailedEventAttributes
x__)
                         (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'identity WorkflowTaskFailedEventAttributes
x__)
                            (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'baseRunId WorkflowTaskFailedEventAttributes
x__)
                               (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'newRunId WorkflowTaskFailedEventAttributes
x__)
                                  (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                     (WorkflowTaskFailedEventAttributes -> Int64
_WorkflowTaskFailedEventAttributes'forkEventVersion WorkflowTaskFailedEventAttributes
x__)
                                     (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                        (WorkflowTaskFailedEventAttributes -> Text
_WorkflowTaskFailedEventAttributes'binaryChecksum WorkflowTaskFailedEventAttributes
x__)
                                        (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                           (WorkflowTaskFailedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskFailedEventAttributes'workerVersion WorkflowTaskFailedEventAttributes
x__)
                                           ()))))))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.taskQueue' @:: Lens' WorkflowTaskScheduledEventAttributes Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'taskQueue' @:: Lens' WorkflowTaskScheduledEventAttributes (Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startToCloseTimeout' @:: Lens' WorkflowTaskScheduledEventAttributes Proto.Google.Protobuf.Duration.Duration@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'startToCloseTimeout' @:: Lens' WorkflowTaskScheduledEventAttributes (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.attempt' @:: Lens' WorkflowTaskScheduledEventAttributes Data.Int.Int32@ -}
data WorkflowTaskScheduledEventAttributes
  = WorkflowTaskScheduledEventAttributes'_constructor {WorkflowTaskScheduledEventAttributes -> Maybe TaskQueue
_WorkflowTaskScheduledEventAttributes'taskQueue :: !(Prelude.Maybe Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue),
                                                       WorkflowTaskScheduledEventAttributes -> Maybe Duration
_WorkflowTaskScheduledEventAttributes'startToCloseTimeout :: !(Prelude.Maybe Proto.Google.Protobuf.Duration.Duration),
                                                       WorkflowTaskScheduledEventAttributes -> Int32
_WorkflowTaskScheduledEventAttributes'attempt :: !Data.Int.Int32,
                                                       WorkflowTaskScheduledEventAttributes -> FieldSet
_WorkflowTaskScheduledEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
(WorkflowTaskScheduledEventAttributes
 -> WorkflowTaskScheduledEventAttributes -> Bool)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes -> Bool)
-> Eq WorkflowTaskScheduledEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
== :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
$c/= :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
/= :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
Prelude.Eq, Eq WorkflowTaskScheduledEventAttributes
Eq WorkflowTaskScheduledEventAttributes =>
(WorkflowTaskScheduledEventAttributes
 -> WorkflowTaskScheduledEventAttributes -> Ordering)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes -> Bool)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes -> Bool)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes -> Bool)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes -> Bool)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes)
-> (WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes
    -> WorkflowTaskScheduledEventAttributes)
-> Ord WorkflowTaskScheduledEventAttributes
WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Ordering
WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
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 :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Ordering
compare :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Ordering
$c< :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
< :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
$c<= :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
<= :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
$c> :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
> :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
$c>= :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
>= :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes -> Bool
$cmax :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
max :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
$cmin :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
min :: WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
-> WorkflowTaskScheduledEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowTaskScheduledEventAttributes where
  showsPrec :: Int -> WorkflowTaskScheduledEventAttributes -> ShowS
showsPrec Int
_ WorkflowTaskScheduledEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowTaskScheduledEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowTaskScheduledEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowTaskScheduledEventAttributes "taskQueue" Proto.Temporal.Api.Taskqueue.V1.Message.TaskQueue where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "taskQueue"
-> (TaskQueue -> f TaskQueue)
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
fieldOf Proxy# "taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> WorkflowTaskScheduledEventAttributes
 -> f WorkflowTaskScheduledEventAttributes)
-> ((TaskQueue -> f TaskQueue)
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (TaskQueue -> f TaskQueue)
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskScheduledEventAttributes -> Maybe TaskQueue)
-> (WorkflowTaskScheduledEventAttributes
    -> Maybe TaskQueue -> WorkflowTaskScheduledEventAttributes)
-> Lens
     WorkflowTaskScheduledEventAttributes
     WorkflowTaskScheduledEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskScheduledEventAttributes -> Maybe TaskQueue
_WorkflowTaskScheduledEventAttributes'taskQueue
           (\ WorkflowTaskScheduledEventAttributes
x__ Maybe TaskQueue
y__
              -> WorkflowTaskScheduledEventAttributes
x__ {_WorkflowTaskScheduledEventAttributes'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 WorkflowTaskScheduledEventAttributes "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))
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
fieldOf Proxy# "maybe'taskQueue"
_
    = ((Maybe TaskQueue -> f (Maybe TaskQueue))
 -> WorkflowTaskScheduledEventAttributes
 -> f WorkflowTaskScheduledEventAttributes)
-> ((Maybe TaskQueue -> f (Maybe TaskQueue))
    -> Maybe TaskQueue -> f (Maybe TaskQueue))
-> (Maybe TaskQueue -> f (Maybe TaskQueue))
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskScheduledEventAttributes -> Maybe TaskQueue)
-> (WorkflowTaskScheduledEventAttributes
    -> Maybe TaskQueue -> WorkflowTaskScheduledEventAttributes)
-> Lens
     WorkflowTaskScheduledEventAttributes
     WorkflowTaskScheduledEventAttributes
     (Maybe TaskQueue)
     (Maybe TaskQueue)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskScheduledEventAttributes -> Maybe TaskQueue
_WorkflowTaskScheduledEventAttributes'taskQueue
           (\ WorkflowTaskScheduledEventAttributes
x__ Maybe TaskQueue
y__
              -> WorkflowTaskScheduledEventAttributes
x__ {_WorkflowTaskScheduledEventAttributes'taskQueue = y__}))
        (Maybe TaskQueue -> f (Maybe TaskQueue))
-> Maybe TaskQueue -> f (Maybe TaskQueue)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskScheduledEventAttributes "startToCloseTimeout" Proto.Google.Protobuf.Duration.Duration where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startToCloseTimeout"
-> (Duration -> f Duration)
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
fieldOf Proxy# "startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowTaskScheduledEventAttributes
 -> f WorkflowTaskScheduledEventAttributes)
-> ((Duration -> f Duration)
    -> Maybe Duration -> f (Maybe Duration))
-> (Duration -> f Duration)
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskScheduledEventAttributes -> Maybe Duration)
-> (WorkflowTaskScheduledEventAttributes
    -> Maybe Duration -> WorkflowTaskScheduledEventAttributes)
-> Lens
     WorkflowTaskScheduledEventAttributes
     WorkflowTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskScheduledEventAttributes -> Maybe Duration
_WorkflowTaskScheduledEventAttributes'startToCloseTimeout
           (\ WorkflowTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> WorkflowTaskScheduledEventAttributes
x__
                   {_WorkflowTaskScheduledEventAttributes'startToCloseTimeout = 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 WorkflowTaskScheduledEventAttributes "maybe'startToCloseTimeout" (Prelude.Maybe Proto.Google.Protobuf.Duration.Duration) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'startToCloseTimeout"
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
fieldOf Proxy# "maybe'startToCloseTimeout"
_
    = ((Maybe Duration -> f (Maybe Duration))
 -> WorkflowTaskScheduledEventAttributes
 -> f WorkflowTaskScheduledEventAttributes)
-> ((Maybe Duration -> f (Maybe Duration))
    -> Maybe Duration -> f (Maybe Duration))
-> (Maybe Duration -> f (Maybe Duration))
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskScheduledEventAttributes -> Maybe Duration)
-> (WorkflowTaskScheduledEventAttributes
    -> Maybe Duration -> WorkflowTaskScheduledEventAttributes)
-> Lens
     WorkflowTaskScheduledEventAttributes
     WorkflowTaskScheduledEventAttributes
     (Maybe Duration)
     (Maybe Duration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskScheduledEventAttributes -> Maybe Duration
_WorkflowTaskScheduledEventAttributes'startToCloseTimeout
           (\ WorkflowTaskScheduledEventAttributes
x__ Maybe Duration
y__
              -> WorkflowTaskScheduledEventAttributes
x__
                   {_WorkflowTaskScheduledEventAttributes'startToCloseTimeout = y__}))
        (Maybe Duration -> f (Maybe Duration))
-> Maybe Duration -> f (Maybe Duration)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskScheduledEventAttributes "attempt" Data.Int.Int32 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "attempt"
-> (Int32 -> f Int32)
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
fieldOf Proxy# "attempt"
_
    = ((Int32 -> f Int32)
 -> WorkflowTaskScheduledEventAttributes
 -> f WorkflowTaskScheduledEventAttributes)
-> ((Int32 -> f Int32) -> Int32 -> f Int32)
-> (Int32 -> f Int32)
-> WorkflowTaskScheduledEventAttributes
-> f WorkflowTaskScheduledEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskScheduledEventAttributes -> Int32)
-> (WorkflowTaskScheduledEventAttributes
    -> Int32 -> WorkflowTaskScheduledEventAttributes)
-> Lens
     WorkflowTaskScheduledEventAttributes
     WorkflowTaskScheduledEventAttributes
     Int32
     Int32
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskScheduledEventAttributes -> Int32
_WorkflowTaskScheduledEventAttributes'attempt
           (\ WorkflowTaskScheduledEventAttributes
x__ Int32
y__
              -> WorkflowTaskScheduledEventAttributes
x__ {_WorkflowTaskScheduledEventAttributes'attempt = y__}))
        (Int32 -> f Int32) -> Int32 -> f Int32
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowTaskScheduledEventAttributes where
  messageName :: Proxy WorkflowTaskScheduledEventAttributes -> Text
messageName Proxy WorkflowTaskScheduledEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowTaskScheduledEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowTaskScheduledEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowTaskScheduledEventAttributes
_
    = ByteString
"\n\
      \$WorkflowTaskScheduledEventAttributes\DC2C\n\
      \\n\
      \task_queue\CAN\SOH \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2N\n\
      \\SYNstart_to_close_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2\CAN\n\
      \\aattempt\CAN\ETX \SOH(\ENQR\aattempt"
  packedFileDescriptor :: Proxy WorkflowTaskScheduledEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowTaskScheduledEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowTaskScheduledEventAttributes)
fieldsByTag
    = let
        taskQueue__field_descriptor :: FieldDescriptor WorkflowTaskScheduledEventAttributes
taskQueue__field_descriptor
          = String
-> FieldTypeDescriptor TaskQueue
-> FieldAccessor WorkflowTaskScheduledEventAttributes TaskQueue
-> FieldDescriptor WorkflowTaskScheduledEventAttributes
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
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> FieldAccessor WorkflowTaskScheduledEventAttributes 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 WorkflowTaskScheduledEventAttributes
        startToCloseTimeout__field_descriptor :: FieldDescriptor WorkflowTaskScheduledEventAttributes
startToCloseTimeout__field_descriptor
          = String
-> FieldTypeDescriptor Duration
-> FieldAccessor WorkflowTaskScheduledEventAttributes Duration
-> FieldDescriptor WorkflowTaskScheduledEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"start_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
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> FieldAccessor WorkflowTaskScheduledEventAttributes 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'startToCloseTimeout")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskScheduledEventAttributes
        attempt__field_descriptor :: FieldDescriptor WorkflowTaskScheduledEventAttributes
attempt__field_descriptor
          = String
-> FieldTypeDescriptor Int32
-> FieldAccessor WorkflowTaskScheduledEventAttributes Int32
-> FieldDescriptor WorkflowTaskScheduledEventAttributes
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
     WorkflowTaskScheduledEventAttributes
     WorkflowTaskScheduledEventAttributes
     Int32
     Int32
-> FieldAccessor WorkflowTaskScheduledEventAttributes 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 WorkflowTaskScheduledEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowTaskScheduledEventAttributes)]
-> Map Tag (FieldDescriptor WorkflowTaskScheduledEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowTaskScheduledEventAttributes
taskQueue__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowTaskScheduledEventAttributes
startToCloseTimeout__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowTaskScheduledEventAttributes
attempt__field_descriptor)]
  unknownFields :: Lens' WorkflowTaskScheduledEventAttributes FieldSet
unknownFields
    = (WorkflowTaskScheduledEventAttributes -> FieldSet)
-> (WorkflowTaskScheduledEventAttributes
    -> FieldSet -> WorkflowTaskScheduledEventAttributes)
-> Lens' WorkflowTaskScheduledEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowTaskScheduledEventAttributes -> FieldSet
_WorkflowTaskScheduledEventAttributes'_unknownFields
        (\ WorkflowTaskScheduledEventAttributes
x__ FieldSet
y__
           -> WorkflowTaskScheduledEventAttributes
x__
                {_WorkflowTaskScheduledEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowTaskScheduledEventAttributes
defMessage
    = WorkflowTaskScheduledEventAttributes'_constructor
        {_WorkflowTaskScheduledEventAttributes'taskQueue :: Maybe TaskQueue
_WorkflowTaskScheduledEventAttributes'taskQueue = Maybe TaskQueue
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskScheduledEventAttributes'startToCloseTimeout :: Maybe Duration
_WorkflowTaskScheduledEventAttributes'startToCloseTimeout = Maybe Duration
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskScheduledEventAttributes'attempt :: Int32
_WorkflowTaskScheduledEventAttributes'attempt = Int32
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskScheduledEventAttributes'_unknownFields :: FieldSet
_WorkflowTaskScheduledEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowTaskScheduledEventAttributes
parseMessage
    = let
        loop ::
          WorkflowTaskScheduledEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowTaskScheduledEventAttributes
        loop :: WorkflowTaskScheduledEventAttributes
-> Parser WorkflowTaskScheduledEventAttributes
loop WorkflowTaskScheduledEventAttributes
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
"start_to_close_timeout"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startToCloseTimeout") 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
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 WorkflowTaskScheduledEventAttributes
-> String -> Parser WorkflowTaskScheduledEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowTaskScheduledEventAttributes
-> Parser WorkflowTaskScheduledEventAttributes
loop WorkflowTaskScheduledEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowTaskScheduledEventAttributes"
  buildMessage :: WorkflowTaskScheduledEventAttributes -> Builder
buildMessage
    = \ WorkflowTaskScheduledEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (case
                  FoldLike
  (Maybe TaskQueue)
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  (Maybe TaskQueue)
  (Maybe TaskQueue)
-> WorkflowTaskScheduledEventAttributes -> 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") WorkflowTaskScheduledEventAttributes
_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)
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  (Maybe Duration)
  (Maybe Duration)
-> WorkflowTaskScheduledEventAttributes -> 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'startToCloseTimeout") WorkflowTaskScheduledEventAttributes
_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.<>)
                   (let
                      _v :: Int32
_v = FoldLike
  Int32
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  Int32
  Int32
-> WorkflowTaskScheduledEventAttributes -> 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") WorkflowTaskScheduledEventAttributes
_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))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  FieldSet
  FieldSet
-> WorkflowTaskScheduledEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowTaskScheduledEventAttributes
  WorkflowTaskScheduledEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowTaskScheduledEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowTaskScheduledEventAttributes
_x))))
instance Control.DeepSeq.NFData WorkflowTaskScheduledEventAttributes where
  rnf :: WorkflowTaskScheduledEventAttributes -> ()
rnf
    = \ WorkflowTaskScheduledEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowTaskScheduledEventAttributes -> FieldSet
_WorkflowTaskScheduledEventAttributes'_unknownFields WorkflowTaskScheduledEventAttributes
x__)
             (Maybe TaskQueue -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowTaskScheduledEventAttributes -> Maybe TaskQueue
_WorkflowTaskScheduledEventAttributes'taskQueue WorkflowTaskScheduledEventAttributes
x__)
                (Maybe Duration -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowTaskScheduledEventAttributes -> Maybe Duration
_WorkflowTaskScheduledEventAttributes'startToCloseTimeout WorkflowTaskScheduledEventAttributes
x__)
                   (Int32 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowTaskScheduledEventAttributes -> Int32
_WorkflowTaskScheduledEventAttributes'attempt WorkflowTaskScheduledEventAttributes
x__) ())))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' WorkflowTaskStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.identity' @:: Lens' WorkflowTaskStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.requestId' @:: Lens' WorkflowTaskStartedEventAttributes Data.Text.Text@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.suggestContinueAsNew' @:: Lens' WorkflowTaskStartedEventAttributes Prelude.Bool@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.historySizeBytes' @:: Lens' WorkflowTaskStartedEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.workerVersion' @:: Lens' WorkflowTaskStartedEventAttributes Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.maybe'workerVersion' @:: Lens' WorkflowTaskStartedEventAttributes (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp)@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.buildIdRedirectCounter' @:: Lens' WorkflowTaskStartedEventAttributes Data.Int.Int64@ -}
data WorkflowTaskStartedEventAttributes
  = WorkflowTaskStartedEventAttributes'_constructor {WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                     WorkflowTaskStartedEventAttributes -> Text
_WorkflowTaskStartedEventAttributes'identity :: !Data.Text.Text,
                                                     WorkflowTaskStartedEventAttributes -> Text
_WorkflowTaskStartedEventAttributes'requestId :: !Data.Text.Text,
                                                     WorkflowTaskStartedEventAttributes -> Bool
_WorkflowTaskStartedEventAttributes'suggestContinueAsNew :: !Prelude.Bool,
                                                     WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'historySizeBytes :: !Data.Int.Int64,
                                                     WorkflowTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskStartedEventAttributes'workerVersion :: !(Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp),
                                                     WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'buildIdRedirectCounter :: !Data.Int.Int64,
                                                     WorkflowTaskStartedEventAttributes -> FieldSet
_WorkflowTaskStartedEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
(WorkflowTaskStartedEventAttributes
 -> WorkflowTaskStartedEventAttributes -> Bool)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes -> Bool)
-> Eq WorkflowTaskStartedEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
== :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
$c/= :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
/= :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
Prelude.Eq, Eq WorkflowTaskStartedEventAttributes
Eq WorkflowTaskStartedEventAttributes =>
(WorkflowTaskStartedEventAttributes
 -> WorkflowTaskStartedEventAttributes -> Ordering)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes -> Bool)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes -> Bool)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes -> Bool)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes -> Bool)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes)
-> (WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes
    -> WorkflowTaskStartedEventAttributes)
-> Ord WorkflowTaskStartedEventAttributes
WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Ordering
WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
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 :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Ordering
compare :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Ordering
$c< :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
< :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
$c<= :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
<= :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
$c> :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
> :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
$c>= :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
>= :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes -> Bool
$cmax :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
max :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
$cmin :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
min :: WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
-> WorkflowTaskStartedEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowTaskStartedEventAttributes where
  showsPrec :: Int -> WorkflowTaskStartedEventAttributes -> ShowS
showsPrec Int
_ WorkflowTaskStartedEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowTaskStartedEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowTaskStartedEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Int64)
-> (WorkflowTaskStartedEventAttributes
    -> Int64 -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'scheduledEventId
           (\ WorkflowTaskStartedEventAttributes
x__ Int64
y__
              -> WorkflowTaskStartedEventAttributes
x__
                   {_WorkflowTaskStartedEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "identity" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "identity"
-> (Text -> f Text)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "identity"
_
    = ((Text -> f Text)
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Text)
-> (WorkflowTaskStartedEventAttributes
    -> Text -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Text
_WorkflowTaskStartedEventAttributes'identity
           (\ WorkflowTaskStartedEventAttributes
x__ Text
y__
              -> WorkflowTaskStartedEventAttributes
x__ {_WorkflowTaskStartedEventAttributes'identity = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "requestId" Data.Text.Text where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "requestId"
-> (Text -> f Text)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "requestId"
_
    = ((Text -> f Text)
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Text -> f Text) -> Text -> f Text)
-> (Text -> f Text)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Text)
-> (WorkflowTaskStartedEventAttributes
    -> Text -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Text
     Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Text
_WorkflowTaskStartedEventAttributes'requestId
           (\ WorkflowTaskStartedEventAttributes
x__ Text
y__
              -> WorkflowTaskStartedEventAttributes
x__ {_WorkflowTaskStartedEventAttributes'requestId = y__}))
        (Text -> f Text) -> Text -> f Text
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "suggestContinueAsNew" Prelude.Bool where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "suggestContinueAsNew"
-> (Bool -> f Bool)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "suggestContinueAsNew"
_
    = ((Bool -> f Bool)
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Bool -> f Bool) -> Bool -> f Bool)
-> (Bool -> f Bool)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Bool)
-> (WorkflowTaskStartedEventAttributes
    -> Bool -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Bool
     Bool
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Bool
_WorkflowTaskStartedEventAttributes'suggestContinueAsNew
           (\ WorkflowTaskStartedEventAttributes
x__ Bool
y__
              -> WorkflowTaskStartedEventAttributes
x__
                   {_WorkflowTaskStartedEventAttributes'suggestContinueAsNew = y__}))
        (Bool -> f Bool) -> Bool -> f Bool
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "historySizeBytes" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "historySizeBytes"
-> (Int64 -> f Int64)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "historySizeBytes"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Int64)
-> (WorkflowTaskStartedEventAttributes
    -> Int64 -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'historySizeBytes
           (\ WorkflowTaskStartedEventAttributes
x__ Int64
y__
              -> WorkflowTaskStartedEventAttributes
x__
                   {_WorkflowTaskStartedEventAttributes'historySizeBytes = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "workerVersion" Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "workerVersion"
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((WorkerVersionStamp -> f WorkerVersionStamp)
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (WorkerVersionStamp -> f WorkerVersionStamp)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Maybe WorkerVersionStamp)
-> (WorkflowTaskStartedEventAttributes
    -> Maybe WorkerVersionStamp -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskStartedEventAttributes'workerVersion
           (\ WorkflowTaskStartedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowTaskStartedEventAttributes
x__ {_WorkflowTaskStartedEventAttributes'workerVersion = 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 WorkflowTaskStartedEventAttributes "maybe'workerVersion" (Prelude.Maybe Proto.Temporal.Api.Common.V1.Message.WorkerVersionStamp) where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "maybe'workerVersion"
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "maybe'workerVersion"
_
    = ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
    -> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Maybe WorkerVersionStamp)
-> (WorkflowTaskStartedEventAttributes
    -> Maybe WorkerVersionStamp -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     (Maybe WorkerVersionStamp)
     (Maybe WorkerVersionStamp)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskStartedEventAttributes'workerVersion
           (\ WorkflowTaskStartedEventAttributes
x__ Maybe WorkerVersionStamp
y__
              -> WorkflowTaskStartedEventAttributes
x__ {_WorkflowTaskStartedEventAttributes'workerVersion = y__}))
        (Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp))
-> Maybe WorkerVersionStamp -> f (Maybe WorkerVersionStamp)
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskStartedEventAttributes "buildIdRedirectCounter" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "buildIdRedirectCounter"
-> (Int64 -> f Int64)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
fieldOf Proxy# "buildIdRedirectCounter"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskStartedEventAttributes
 -> f WorkflowTaskStartedEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskStartedEventAttributes
-> f WorkflowTaskStartedEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskStartedEventAttributes -> Int64)
-> (WorkflowTaskStartedEventAttributes
    -> Int64 -> WorkflowTaskStartedEventAttributes)
-> Lens
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'buildIdRedirectCounter
           (\ WorkflowTaskStartedEventAttributes
x__ Int64
y__
              -> WorkflowTaskStartedEventAttributes
x__
                   {_WorkflowTaskStartedEventAttributes'buildIdRedirectCounter = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowTaskStartedEventAttributes where
  messageName :: Proxy WorkflowTaskStartedEventAttributes -> Text
messageName Proxy WorkflowTaskStartedEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowTaskStartedEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowTaskStartedEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowTaskStartedEventAttributes
_
    = ByteString
"\n\
      \\"WorkflowTaskStartedEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2\SUB\n\
      \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
      \\n\
      \request_id\CAN\ETX \SOH(\tR\trequestId\DC25\n\
      \\ETBsuggest_continue_as_new\CAN\EOT \SOH(\bR\DC4suggestContinueAsNew\DC2,\n\
      \\DC2history_size_bytes\CAN\ENQ \SOH(\ETXR\DLEhistorySizeBytes\DC2Q\n\
      \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\DC29\n\
      \\EMbuild_id_redirect_counter\CAN\a \SOH(\ETXR\SYNbuildIdRedirectCounter"
  packedFileDescriptor :: Proxy WorkflowTaskStartedEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowTaskStartedEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowTaskStartedEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskStartedEventAttributes Int64
-> FieldDescriptor WorkflowTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskStartedEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskStartedEventAttributes
        identity__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
identity__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskStartedEventAttributes Text
-> FieldDescriptor WorkflowTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"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
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskStartedEventAttributes 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 @"identity")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskStartedEventAttributes
        requestId__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
requestId__field_descriptor
          = String
-> FieldTypeDescriptor Text
-> FieldAccessor WorkflowTaskStartedEventAttributes Text
-> FieldDescriptor WorkflowTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"request_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
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Text
     Text
-> FieldAccessor WorkflowTaskStartedEventAttributes 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 @"requestId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskStartedEventAttributes
        suggestContinueAsNew__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
suggestContinueAsNew__field_descriptor
          = String
-> FieldTypeDescriptor Bool
-> FieldAccessor WorkflowTaskStartedEventAttributes Bool
-> FieldDescriptor WorkflowTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"suggest_continue_as_new"
              (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
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Bool
     Bool
-> FieldAccessor WorkflowTaskStartedEventAttributes 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 @"suggestContinueAsNew")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskStartedEventAttributes
        historySizeBytes__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
historySizeBytes__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskStartedEventAttributes Int64
-> FieldDescriptor WorkflowTaskStartedEventAttributes
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
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskStartedEventAttributes 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 WorkflowTaskStartedEventAttributes
        workerVersion__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
workerVersion__field_descriptor
          = String
-> FieldTypeDescriptor WorkerVersionStamp
-> FieldAccessor
     WorkflowTaskStartedEventAttributes WorkerVersionStamp
-> FieldDescriptor WorkflowTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"worker_version"
              (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
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> FieldAccessor
     WorkflowTaskStartedEventAttributes 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'workerVersion")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskStartedEventAttributes
        buildIdRedirectCounter__field_descriptor :: FieldDescriptor WorkflowTaskStartedEventAttributes
buildIdRedirectCounter__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskStartedEventAttributes Int64
-> FieldDescriptor WorkflowTaskStartedEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"build_id_redirect_counter"
              (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
     WorkflowTaskStartedEventAttributes
     WorkflowTaskStartedEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskStartedEventAttributes 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 @"buildIdRedirectCounter")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskStartedEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowTaskStartedEventAttributes)]
-> Map Tag (FieldDescriptor WorkflowTaskStartedEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowTaskStartedEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowTaskStartedEventAttributes
identity__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowTaskStartedEventAttributes
requestId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
4, FieldDescriptor WorkflowTaskStartedEventAttributes
suggestContinueAsNew__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
5, FieldDescriptor WorkflowTaskStartedEventAttributes
historySizeBytes__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
6, FieldDescriptor WorkflowTaskStartedEventAttributes
workerVersion__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
7, FieldDescriptor WorkflowTaskStartedEventAttributes
buildIdRedirectCounter__field_descriptor)]
  unknownFields :: Lens' WorkflowTaskStartedEventAttributes FieldSet
unknownFields
    = (WorkflowTaskStartedEventAttributes -> FieldSet)
-> (WorkflowTaskStartedEventAttributes
    -> FieldSet -> WorkflowTaskStartedEventAttributes)
-> Lens' WorkflowTaskStartedEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowTaskStartedEventAttributes -> FieldSet
_WorkflowTaskStartedEventAttributes'_unknownFields
        (\ WorkflowTaskStartedEventAttributes
x__ FieldSet
y__
           -> WorkflowTaskStartedEventAttributes
x__ {_WorkflowTaskStartedEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowTaskStartedEventAttributes
defMessage
    = WorkflowTaskStartedEventAttributes'_constructor
        {_WorkflowTaskStartedEventAttributes'scheduledEventId :: Int64
_WorkflowTaskStartedEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskStartedEventAttributes'identity :: Text
_WorkflowTaskStartedEventAttributes'identity = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskStartedEventAttributes'requestId :: Text
_WorkflowTaskStartedEventAttributes'requestId = Text
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskStartedEventAttributes'suggestContinueAsNew :: Bool
_WorkflowTaskStartedEventAttributes'suggestContinueAsNew = Bool
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskStartedEventAttributes'historySizeBytes :: Int64
_WorkflowTaskStartedEventAttributes'historySizeBytes = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskStartedEventAttributes'workerVersion :: Maybe WorkerVersionStamp
_WorkflowTaskStartedEventAttributes'workerVersion = Maybe WorkerVersionStamp
forall a. Maybe a
Prelude.Nothing,
         _WorkflowTaskStartedEventAttributes'buildIdRedirectCounter :: Int64
_WorkflowTaskStartedEventAttributes'buildIdRedirectCounter = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskStartedEventAttributes'_unknownFields :: FieldSet
_WorkflowTaskStartedEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowTaskStartedEventAttributes
parseMessage
    = let
        loop ::
          WorkflowTaskStartedEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowTaskStartedEventAttributes
        loop :: WorkflowTaskStartedEventAttributes
-> Parser WorkflowTaskStartedEventAttributes
loop WorkflowTaskStartedEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") 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
"identity"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"identity") 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
"request_id"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"requestId") y x)
                        Word64
32
                          -> 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
"suggest_continue_as_new"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"suggestContinueAsNew") y x)
                        Word64
40
                          -> 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
50
                          -> 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
"worker_version"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"workerVersion") y x)
                        Word64
56
                          -> 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
"build_id_redirect_counter"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"buildIdRedirectCounter") 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 WorkflowTaskStartedEventAttributes
-> String -> Parser WorkflowTaskStartedEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowTaskStartedEventAttributes
-> Parser WorkflowTaskStartedEventAttributes
loop WorkflowTaskStartedEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowTaskStartedEventAttributes"
  buildMessage :: WorkflowTaskStartedEventAttributes -> Builder
buildMessage
    = \ WorkflowTaskStartedEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  Int64
  Int64
-> WorkflowTaskStartedEventAttributes -> 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 @"scheduledEventId") WorkflowTaskStartedEventAttributes
_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
8)
                      ((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
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  Text
  Text
-> WorkflowTaskStartedEventAttributes -> 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 @"identity") WorkflowTaskStartedEventAttributes
_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
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  Text
  Text
-> WorkflowTaskStartedEventAttributes -> 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 @"requestId") WorkflowTaskStartedEventAttributes
_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 :: Bool
_v
                           = FoldLike
  Bool
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  Bool
  Bool
-> WorkflowTaskStartedEventAttributes -> 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 @"suggestContinueAsNew") WorkflowTaskStartedEventAttributes
_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
32)
                               ((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))
                      (Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
                         (let
                            _v :: Int64
_v
                              = FoldLike
  Int64
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  Int64
  Int64
-> WorkflowTaskStartedEventAttributes -> 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") WorkflowTaskStartedEventAttributes
_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
40)
                                  ((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)
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  (Maybe WorkerVersionStamp)
  (Maybe WorkerVersionStamp)
-> WorkflowTaskStartedEventAttributes -> 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'workerVersion") WorkflowTaskStartedEventAttributes
_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
50)
                                      ((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.<>)
                               (let
                                  _v :: Int64
_v
                                    = FoldLike
  Int64
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  Int64
  Int64
-> WorkflowTaskStartedEventAttributes -> 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 @"buildIdRedirectCounter") WorkflowTaskStartedEventAttributes
_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
56)
                                        ((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))
                               (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                                  (FoldLike
  FieldSet
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  FieldSet
  FieldSet
-> WorkflowTaskStartedEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowTaskStartedEventAttributes
  WorkflowTaskStartedEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowTaskStartedEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowTaskStartedEventAttributes
_x))))))))
instance Control.DeepSeq.NFData WorkflowTaskStartedEventAttributes where
  rnf :: WorkflowTaskStartedEventAttributes -> ()
rnf
    = \ WorkflowTaskStartedEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowTaskStartedEventAttributes -> FieldSet
_WorkflowTaskStartedEventAttributes'_unknownFields WorkflowTaskStartedEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'scheduledEventId WorkflowTaskStartedEventAttributes
x__)
                (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowTaskStartedEventAttributes -> Text
_WorkflowTaskStartedEventAttributes'identity WorkflowTaskStartedEventAttributes
x__)
                   (Text -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowTaskStartedEventAttributes -> Text
_WorkflowTaskStartedEventAttributes'requestId WorkflowTaskStartedEventAttributes
x__)
                      (Bool -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                         (WorkflowTaskStartedEventAttributes -> Bool
_WorkflowTaskStartedEventAttributes'suggestContinueAsNew WorkflowTaskStartedEventAttributes
x__)
                         (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                            (WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'historySizeBytes WorkflowTaskStartedEventAttributes
x__)
                            (Maybe WorkerVersionStamp -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                               (WorkflowTaskStartedEventAttributes -> Maybe WorkerVersionStamp
_WorkflowTaskStartedEventAttributes'workerVersion WorkflowTaskStartedEventAttributes
x__)
                               (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                                  (WorkflowTaskStartedEventAttributes -> Int64
_WorkflowTaskStartedEventAttributes'buildIdRedirectCounter WorkflowTaskStartedEventAttributes
x__)
                                  ())))))))
{- | Fields :
     
         * 'Proto.Temporal.Api.History.V1.Message_Fields.scheduledEventId' @:: Lens' WorkflowTaskTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.startedEventId' @:: Lens' WorkflowTaskTimedOutEventAttributes Data.Int.Int64@
         * 'Proto.Temporal.Api.History.V1.Message_Fields.timeoutType' @:: Lens' WorkflowTaskTimedOutEventAttributes Proto.Temporal.Api.Enums.V1.Workflow.TimeoutType@ -}
data WorkflowTaskTimedOutEventAttributes
  = WorkflowTaskTimedOutEventAttributes'_constructor {WorkflowTaskTimedOutEventAttributes -> Int64
_WorkflowTaskTimedOutEventAttributes'scheduledEventId :: !Data.Int.Int64,
                                                      WorkflowTaskTimedOutEventAttributes -> Int64
_WorkflowTaskTimedOutEventAttributes'startedEventId :: !Data.Int.Int64,
                                                      WorkflowTaskTimedOutEventAttributes -> TimeoutType
_WorkflowTaskTimedOutEventAttributes'timeoutType :: !Proto.Temporal.Api.Enums.V1.Workflow.TimeoutType,
                                                      WorkflowTaskTimedOutEventAttributes -> FieldSet
_WorkflowTaskTimedOutEventAttributes'_unknownFields :: !Data.ProtoLens.FieldSet}
  deriving stock (WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
(WorkflowTaskTimedOutEventAttributes
 -> WorkflowTaskTimedOutEventAttributes -> Bool)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes -> Bool)
-> Eq WorkflowTaskTimedOutEventAttributes
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
== :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
$c/= :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
/= :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
Prelude.Eq, Eq WorkflowTaskTimedOutEventAttributes
Eq WorkflowTaskTimedOutEventAttributes =>
(WorkflowTaskTimedOutEventAttributes
 -> WorkflowTaskTimedOutEventAttributes -> Ordering)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes -> Bool)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes -> Bool)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes -> Bool)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes -> Bool)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes)
-> (WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes
    -> WorkflowTaskTimedOutEventAttributes)
-> Ord WorkflowTaskTimedOutEventAttributes
WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Ordering
WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
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 :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Ordering
compare :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Ordering
$c< :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
< :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
$c<= :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
<= :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
$c> :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
> :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
$c>= :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
>= :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes -> Bool
$cmax :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
max :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
$cmin :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
min :: WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
-> WorkflowTaskTimedOutEventAttributes
Prelude.Ord)
instance Prelude.Show WorkflowTaskTimedOutEventAttributes where
  showsPrec :: Int -> WorkflowTaskTimedOutEventAttributes -> ShowS
showsPrec Int
_ WorkflowTaskTimedOutEventAttributes
__x String
__s
    = Char -> ShowS
Prelude.showChar
        Char
'{'
        (String -> ShowS
Prelude.showString
           (WorkflowTaskTimedOutEventAttributes -> String
forall msg. Message msg => msg -> String
Data.ProtoLens.showMessageShort WorkflowTaskTimedOutEventAttributes
__x) (Char -> ShowS
Prelude.showChar Char
'}' String
__s))
instance Data.ProtoLens.Field.HasField WorkflowTaskTimedOutEventAttributes "scheduledEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "scheduledEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskTimedOutEventAttributes
-> f WorkflowTaskTimedOutEventAttributes
fieldOf Proxy# "scheduledEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskTimedOutEventAttributes
 -> f WorkflowTaskTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskTimedOutEventAttributes
-> f WorkflowTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskTimedOutEventAttributes -> Int64)
-> (WorkflowTaskTimedOutEventAttributes
    -> Int64 -> WorkflowTaskTimedOutEventAttributes)
-> Lens
     WorkflowTaskTimedOutEventAttributes
     WorkflowTaskTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskTimedOutEventAttributes -> Int64
_WorkflowTaskTimedOutEventAttributes'scheduledEventId
           (\ WorkflowTaskTimedOutEventAttributes
x__ Int64
y__
              -> WorkflowTaskTimedOutEventAttributes
x__
                   {_WorkflowTaskTimedOutEventAttributes'scheduledEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskTimedOutEventAttributes "startedEventId" Data.Int.Int64 where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "startedEventId"
-> (Int64 -> f Int64)
-> WorkflowTaskTimedOutEventAttributes
-> f WorkflowTaskTimedOutEventAttributes
fieldOf Proxy# "startedEventId"
_
    = ((Int64 -> f Int64)
 -> WorkflowTaskTimedOutEventAttributes
 -> f WorkflowTaskTimedOutEventAttributes)
-> ((Int64 -> f Int64) -> Int64 -> f Int64)
-> (Int64 -> f Int64)
-> WorkflowTaskTimedOutEventAttributes
-> f WorkflowTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskTimedOutEventAttributes -> Int64)
-> (WorkflowTaskTimedOutEventAttributes
    -> Int64 -> WorkflowTaskTimedOutEventAttributes)
-> Lens
     WorkflowTaskTimedOutEventAttributes
     WorkflowTaskTimedOutEventAttributes
     Int64
     Int64
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskTimedOutEventAttributes -> Int64
_WorkflowTaskTimedOutEventAttributes'startedEventId
           (\ WorkflowTaskTimedOutEventAttributes
x__ Int64
y__
              -> WorkflowTaskTimedOutEventAttributes
x__
                   {_WorkflowTaskTimedOutEventAttributes'startedEventId = y__}))
        (Int64 -> f Int64) -> Int64 -> f Int64
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Field.HasField WorkflowTaskTimedOutEventAttributes "timeoutType" Proto.Temporal.Api.Enums.V1.Workflow.TimeoutType where
  fieldOf :: forall (f :: * -> *).
Functor f =>
Proxy# "timeoutType"
-> (TimeoutType -> f TimeoutType)
-> WorkflowTaskTimedOutEventAttributes
-> f WorkflowTaskTimedOutEventAttributes
fieldOf Proxy# "timeoutType"
_
    = ((TimeoutType -> f TimeoutType)
 -> WorkflowTaskTimedOutEventAttributes
 -> f WorkflowTaskTimedOutEventAttributes)
-> ((TimeoutType -> f TimeoutType) -> TimeoutType -> f TimeoutType)
-> (TimeoutType -> f TimeoutType)
-> WorkflowTaskTimedOutEventAttributes
-> f WorkflowTaskTimedOutEventAttributes
forall b c a. (b -> c) -> (a -> b) -> a -> c
(Prelude..)
        ((WorkflowTaskTimedOutEventAttributes -> TimeoutType)
-> (WorkflowTaskTimedOutEventAttributes
    -> TimeoutType -> WorkflowTaskTimedOutEventAttributes)
-> Lens
     WorkflowTaskTimedOutEventAttributes
     WorkflowTaskTimedOutEventAttributes
     TimeoutType
     TimeoutType
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
           WorkflowTaskTimedOutEventAttributes -> TimeoutType
_WorkflowTaskTimedOutEventAttributes'timeoutType
           (\ WorkflowTaskTimedOutEventAttributes
x__ TimeoutType
y__
              -> WorkflowTaskTimedOutEventAttributes
x__ {_WorkflowTaskTimedOutEventAttributes'timeoutType = y__}))
        (TimeoutType -> f TimeoutType) -> TimeoutType -> f TimeoutType
forall a. a -> a
Prelude.id
instance Data.ProtoLens.Message WorkflowTaskTimedOutEventAttributes where
  messageName :: Proxy WorkflowTaskTimedOutEventAttributes -> Text
messageName Proxy WorkflowTaskTimedOutEventAttributes
_
    = String -> Text
Data.Text.pack
        String
"temporal.api.history.v1.WorkflowTaskTimedOutEventAttributes"
  packedMessageDescriptor :: Proxy WorkflowTaskTimedOutEventAttributes -> ByteString
packedMessageDescriptor Proxy WorkflowTaskTimedOutEventAttributes
_
    = ByteString
"\n\
      \#WorkflowTaskTimedOutEventAttributes\DC2,\n\
      \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
      \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2E\n\
      \\ftimeout_type\CAN\ETX \SOH(\SO2\".temporal.api.enums.v1.TimeoutTypeR\vtimeoutType"
  packedFileDescriptor :: Proxy WorkflowTaskTimedOutEventAttributes -> ByteString
packedFileDescriptor Proxy WorkflowTaskTimedOutEventAttributes
_ = ByteString
packedFileDescriptor
  fieldsByTag :: Map Tag (FieldDescriptor WorkflowTaskTimedOutEventAttributes)
fieldsByTag
    = let
        scheduledEventId__field_descriptor :: FieldDescriptor WorkflowTaskTimedOutEventAttributes
scheduledEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskTimedOutEventAttributes Int64
-> FieldDescriptor WorkflowTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"scheduled_event_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
     WorkflowTaskTimedOutEventAttributes
     WorkflowTaskTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskTimedOutEventAttributes 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 @"scheduledEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskTimedOutEventAttributes
        startedEventId__field_descriptor :: FieldDescriptor WorkflowTaskTimedOutEventAttributes
startedEventId__field_descriptor
          = String
-> FieldTypeDescriptor Int64
-> FieldAccessor WorkflowTaskTimedOutEventAttributes Int64
-> FieldDescriptor WorkflowTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"started_event_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
     WorkflowTaskTimedOutEventAttributes
     WorkflowTaskTimedOutEventAttributes
     Int64
     Int64
-> FieldAccessor WorkflowTaskTimedOutEventAttributes 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 @"startedEventId")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskTimedOutEventAttributes
        timeoutType__field_descriptor :: FieldDescriptor WorkflowTaskTimedOutEventAttributes
timeoutType__field_descriptor
          = String
-> FieldTypeDescriptor TimeoutType
-> FieldAccessor WorkflowTaskTimedOutEventAttributes TimeoutType
-> FieldDescriptor WorkflowTaskTimedOutEventAttributes
forall value msg.
String
-> FieldTypeDescriptor value
-> FieldAccessor msg value
-> FieldDescriptor msg
Data.ProtoLens.FieldDescriptor
              String
"timeout_type"
              (ScalarField TimeoutType -> FieldTypeDescriptor TimeoutType
forall value. ScalarField value -> FieldTypeDescriptor value
Data.ProtoLens.ScalarField ScalarField TimeoutType
forall t. MessageEnum t => ScalarField t
Data.ProtoLens.EnumField ::
                 Data.ProtoLens.FieldTypeDescriptor Proto.Temporal.Api.Enums.V1.Workflow.TimeoutType)
              (WireDefault TimeoutType
-> Lens
     WorkflowTaskTimedOutEventAttributes
     WorkflowTaskTimedOutEventAttributes
     TimeoutType
     TimeoutType
-> FieldAccessor WorkflowTaskTimedOutEventAttributes TimeoutType
forall value msg.
WireDefault value -> Lens' msg value -> FieldAccessor msg value
Data.ProtoLens.PlainField
                 WireDefault TimeoutType
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 @"timeoutType")) ::
              Data.ProtoLens.FieldDescriptor WorkflowTaskTimedOutEventAttributes
      in
        [(Tag, FieldDescriptor WorkflowTaskTimedOutEventAttributes)]
-> Map Tag (FieldDescriptor WorkflowTaskTimedOutEventAttributes)
forall k a. Ord k => [(k, a)] -> Map k a
Data.Map.fromList
          [(Int -> Tag
Data.ProtoLens.Tag Int
1, FieldDescriptor WorkflowTaskTimedOutEventAttributes
scheduledEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
2, FieldDescriptor WorkflowTaskTimedOutEventAttributes
startedEventId__field_descriptor),
           (Int -> Tag
Data.ProtoLens.Tag Int
3, FieldDescriptor WorkflowTaskTimedOutEventAttributes
timeoutType__field_descriptor)]
  unknownFields :: Lens' WorkflowTaskTimedOutEventAttributes FieldSet
unknownFields
    = (WorkflowTaskTimedOutEventAttributes -> FieldSet)
-> (WorkflowTaskTimedOutEventAttributes
    -> FieldSet -> WorkflowTaskTimedOutEventAttributes)
-> Lens' WorkflowTaskTimedOutEventAttributes FieldSet
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.Family2.Unchecked.lens
        WorkflowTaskTimedOutEventAttributes -> FieldSet
_WorkflowTaskTimedOutEventAttributes'_unknownFields
        (\ WorkflowTaskTimedOutEventAttributes
x__ FieldSet
y__
           -> WorkflowTaskTimedOutEventAttributes
x__ {_WorkflowTaskTimedOutEventAttributes'_unknownFields = y__})
  defMessage :: WorkflowTaskTimedOutEventAttributes
defMessage
    = WorkflowTaskTimedOutEventAttributes'_constructor
        {_WorkflowTaskTimedOutEventAttributes'scheduledEventId :: Int64
_WorkflowTaskTimedOutEventAttributes'scheduledEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskTimedOutEventAttributes'startedEventId :: Int64
_WorkflowTaskTimedOutEventAttributes'startedEventId = Int64
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskTimedOutEventAttributes'timeoutType :: TimeoutType
_WorkflowTaskTimedOutEventAttributes'timeoutType = TimeoutType
forall value. FieldDefault value => value
Data.ProtoLens.fieldDefault,
         _WorkflowTaskTimedOutEventAttributes'_unknownFields :: FieldSet
_WorkflowTaskTimedOutEventAttributes'_unknownFields = []}
  parseMessage :: Parser WorkflowTaskTimedOutEventAttributes
parseMessage
    = let
        loop ::
          WorkflowTaskTimedOutEventAttributes
          -> Data.ProtoLens.Encoding.Bytes.Parser WorkflowTaskTimedOutEventAttributes
        loop :: WorkflowTaskTimedOutEventAttributes
-> Parser WorkflowTaskTimedOutEventAttributes
loop WorkflowTaskTimedOutEventAttributes
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 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
"scheduled_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"scheduledEventId") y x)
                        Word64
16
                          -> 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
"started_event_id"
                                loop
                                  (Lens.Family2.set
                                     (Data.ProtoLens.Field.field @"startedEventId") y x)
                        Word64
24
                          -> do y <- Parser TimeoutType -> String -> Parser TimeoutType
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
                                       ((Int -> TimeoutType) -> Parser Int -> Parser TimeoutType
forall a b. (a -> b) -> Parser a -> Parser b
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.fmap
                                          Int -> TimeoutType
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
"timeout_type"
                                loop
                                  (Lens.Family2.set (Data.ProtoLens.Field.field @"timeoutType") 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 WorkflowTaskTimedOutEventAttributes
-> String -> Parser WorkflowTaskTimedOutEventAttributes
forall a. Parser a -> String -> Parser a
(Data.ProtoLens.Encoding.Bytes.<?>)
          (do WorkflowTaskTimedOutEventAttributes
-> Parser WorkflowTaskTimedOutEventAttributes
loop WorkflowTaskTimedOutEventAttributes
forall msg. Message msg => msg
Data.ProtoLens.defMessage)
          String
"WorkflowTaskTimedOutEventAttributes"
  buildMessage :: WorkflowTaskTimedOutEventAttributes -> Builder
buildMessage
    = \ WorkflowTaskTimedOutEventAttributes
_x
        -> Builder -> Builder -> Builder
forall a. Semigroup a => a -> a -> a
(Data.Monoid.<>)
             (let
                _v :: Int64
_v
                  = FoldLike
  Int64
  WorkflowTaskTimedOutEventAttributes
  WorkflowTaskTimedOutEventAttributes
  Int64
  Int64
-> WorkflowTaskTimedOutEventAttributes -> 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 @"scheduledEventId") WorkflowTaskTimedOutEventAttributes
_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
8)
                      ((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
  WorkflowTaskTimedOutEventAttributes
  WorkflowTaskTimedOutEventAttributes
  Int64
  Int64
-> WorkflowTaskTimedOutEventAttributes -> 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 @"startedEventId") WorkflowTaskTimedOutEventAttributes
_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
16)
                         ((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 :: TimeoutType
_v
                        = FoldLike
  TimeoutType
  WorkflowTaskTimedOutEventAttributes
  WorkflowTaskTimedOutEventAttributes
  TimeoutType
  TimeoutType
-> WorkflowTaskTimedOutEventAttributes -> TimeoutType
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 @"timeoutType") WorkflowTaskTimedOutEventAttributes
_x
                    in
                      if TimeoutType -> TimeoutType -> Bool
forall a. Eq a => a -> a -> Bool
(Prelude.==) TimeoutType
_v TimeoutType
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) -> (TimeoutType -> Int) -> TimeoutType -> 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)
                               TimeoutType -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum TimeoutType
_v))
                   (FieldSet -> Builder
Data.ProtoLens.Encoding.Wire.buildFieldSet
                      (FoldLike
  FieldSet
  WorkflowTaskTimedOutEventAttributes
  WorkflowTaskTimedOutEventAttributes
  FieldSet
  FieldSet
-> WorkflowTaskTimedOutEventAttributes -> FieldSet
forall a s t b. FoldLike a s t a b -> s -> a
Lens.Family2.view FoldLike
  FieldSet
  WorkflowTaskTimedOutEventAttributes
  WorkflowTaskTimedOutEventAttributes
  FieldSet
  FieldSet
forall msg. Message msg => Lens' msg FieldSet
Lens' WorkflowTaskTimedOutEventAttributes FieldSet
Data.ProtoLens.unknownFields WorkflowTaskTimedOutEventAttributes
_x))))
instance Control.DeepSeq.NFData WorkflowTaskTimedOutEventAttributes where
  rnf :: WorkflowTaskTimedOutEventAttributes -> ()
rnf
    = \ WorkflowTaskTimedOutEventAttributes
x__
        -> FieldSet -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
             (WorkflowTaskTimedOutEventAttributes -> FieldSet
_WorkflowTaskTimedOutEventAttributes'_unknownFields WorkflowTaskTimedOutEventAttributes
x__)
             (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                (WorkflowTaskTimedOutEventAttributes -> Int64
_WorkflowTaskTimedOutEventAttributes'scheduledEventId WorkflowTaskTimedOutEventAttributes
x__)
                (Int64 -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                   (WorkflowTaskTimedOutEventAttributes -> Int64
_WorkflowTaskTimedOutEventAttributes'startedEventId WorkflowTaskTimedOutEventAttributes
x__)
                   (TimeoutType -> () -> ()
forall a b. NFData a => a -> b -> b
Control.DeepSeq.deepseq
                      (WorkflowTaskTimedOutEventAttributes -> TimeoutType
_WorkflowTaskTimedOutEventAttributes'timeoutType WorkflowTaskTimedOutEventAttributes
x__) ())))
packedFileDescriptor :: Data.ByteString.ByteString
packedFileDescriptor :: ByteString
packedFileDescriptor
  = ByteString
"\n\
    \%temporal/api/history/v1/message.proto\DC2\ETBtemporal.api.history.v1\SUB\RSgoogle/protobuf/duration.proto\SUB\USgoogle/protobuf/timestamp.proto\SUB&temporal/api/enums/v1/event_type.proto\SUB(temporal/api/enums/v1/failed_cause.proto\SUB\"temporal/api/enums/v1/update.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\SUB$temporal/api/update/v1/message.proto\SUB&temporal/api/workflow/v1/message.proto\SUB0temporal/api/sdk/v1/task_complete_metadata.proto\"\211\DC1\n\
    \'WorkflowExecutionStartedEventAttributes\DC2I\n\
    \\rworkflow_type\CAN\SOH \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2:\n\
    \\EMparent_workflow_namespace\CAN\STX \SOH(\tR\ETBparentWorkflowNamespace\DC2?\n\
    \\FSparent_workflow_namespace_id\CAN\ESC \SOH(\tR\EMparentWorkflowNamespaceId\DC2e\n\
    \\EMparent_workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\ETBparentWorkflowExecution\DC29\n\
    \\EMparent_initiated_event_id\CAN\EOT \SOH(\ETXR\SYNparentInitiatedEventId\DC2C\n\
    \\n\
    \task_queue\CAN\ENQ \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
    \\ENQinput\CAN\ACK \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
    \\SUBworkflow_execution_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
    \\DC4workflow_run_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2;\n\
    \\SUBcontinued_execution_run_id\CAN\n\
    \ \SOH(\tR\ETBcontinuedExecutionRunId\DC2K\n\
    \\tinitiator\CAN\v \SOH(\SO2-.temporal.api.enums.v1.ContinueAsNewInitiatorR\tinitiator\DC2M\n\
    \\DC1continued_failure\CAN\f \SOH(\v2 .temporal.api.failure.v1.FailureR\DLEcontinuedFailure\DC2V\n\
    \\SYNlast_completion_result\CAN\r \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC29\n\
    \\EMoriginal_execution_run_id\CAN\SO \SOH(\tR\SYNoriginalExecutionRunId\DC2\SUB\n\
    \\bidentity\CAN\SI \SOH(\tR\bidentity\DC23\n\
    \\SYNfirst_execution_run_id\CAN\DLE \SOH(\tR\DC3firstExecutionRunId\DC2F\n\
    \\fretry_policy\CAN\DC1 \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2\CAN\n\
    \\aattempt\CAN\DC2 \SOH(\ENQR\aattempt\DC2g\n\
    \\"workflow_execution_expiration_time\CAN\DC3 \SOH(\v2\SUB.google.protobuf.TimestampR\USworkflowExecutionExpirationTime\DC2#\n\
    \\rcron_schedule\CAN\DC4 \SOH(\tR\fcronSchedule\DC2X\n\
    \\ESCfirst_workflow_task_backoff\CAN\NAK \SOH(\v2\EM.google.protobuf.DurationR\CANfirstWorkflowTaskBackoff\DC20\n\
    \\EOTmemo\CAN\SYN \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\ETB \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2Z\n\
    \\SYNprev_auto_reset_points\CAN\CAN \SOH(\v2%.temporal.api.workflow.v1.ResetPointsR\DC3prevAutoResetPoints\DC26\n\
    \\ACKheader\CAN\EM \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2C\n\
    \\RSparent_initiated_event_version\CAN\SUB \SOH(\ETXR\ESCparentInitiatedEventVersion\DC2\US\n\
    \\vworkflow_id\CAN\FS \SOH(\tR\n\
    \workflowId\DC2\\\n\
    \\DC4source_version_stamp\CAN\GS \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\DC2sourceVersionStamp\DC2S\n\
    \\DC4completion_callbacks\CAN\RS \ETX(\v2 .temporal.api.common.v1.CallbackR\DC3completionCallbacks\DC2a\n\
    \\ETBroot_workflow_execution\CAN\US \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\NAKrootWorkflowExecution\DC2,\n\
    \\DC2inherited_build_id\CAN  \SOH(\tR\DLEinheritedBuildId\"\222\SOH\n\
    \)WorkflowExecutionCompletedEventAttributes\DC28\n\
    \\ACKresult\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2F\n\
    \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2/\n\
    \\DC4new_execution_run_id\CAN\ETX \SOH(\tR\DC1newExecutionRunId\"\161\STX\n\
    \&WorkflowExecutionFailedEventAttributes\DC2:\n\
    \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2B\n\
    \\vretry_state\CAN\STX \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
    \retryState\DC2F\n\
    \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2/\n\
    \\DC4new_execution_run_id\CAN\EOT \SOH(\tR\DC1newExecutionRunId\"\159\SOH\n\
    \(WorkflowExecutionTimedOutEventAttributes\DC2B\n\
    \\vretry_state\CAN\SOH \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
    \retryState\DC2/\n\
    \\DC4new_execution_run_id\CAN\STX \SOH(\tR\DC1newExecutionRunId\"\170\b\n\
    \.WorkflowExecutionContinuedAsNewEventAttributes\DC2/\n\
    \\DC4new_execution_run_id\CAN\SOH \SOH(\tR\DC1newExecutionRunId\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\DC2K\n\
    \\DC4workflow_run_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2F\n\
    \ workflow_task_completed_event_id\CAN\a \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2O\n\
    \\SYNbackoff_start_interval\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC4backoffStartInterval\DC2K\n\
    \\tinitiator\CAN\t \SOH(\SO2-.temporal.api.enums.v1.ContinueAsNewInitiatorR\tinitiator\DC2:\n\
    \\afailure\CAN\n\
    \ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2V\n\
    \\SYNlast_completion_result\CAN\v \SOH(\v2 .temporal.api.common.v1.PayloadsR\DC4lastCompletionResult\DC26\n\
    \\ACKheader\CAN\f \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC20\n\
    \\EOTmemo\CAN\r \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\SO \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2(\n\
    \\DLEinherit_build_id\CAN\SI \SOH(\bR\SOinheritBuildId\"\213\SOH\n\
    \$WorkflowTaskScheduledEventAttributes\DC2C\n\
    \\n\
    \task_queue\CAN\SOH \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC2N\n\
    \\SYNstart_to_close_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2\CAN\n\
    \\aattempt\CAN\ETX \SOH(\ENQR\aattempt\"\128\ETX\n\
    \\"WorkflowTaskStartedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2\SUB\n\
    \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\ETX \SOH(\tR\trequestId\DC25\n\
    \\ETBsuggest_continue_as_new\CAN\EOT \SOH(\bR\DC4suggestContinueAsNew\DC2,\n\
    \\DC2history_size_bytes\CAN\ENQ \SOH(\ETXR\DLEhistorySizeBytes\DC2Q\n\
    \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\DC29\n\
    \\EMbuild_id_redirect_counter\CAN\a \SOH(\ETXR\SYNbuildIdRedirectCounter\"\196\ETX\n\
    \$WorkflowTaskCompletedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC2'\n\
    \\SIbinary_checksum\CAN\EOT \SOH(\tR\SObinaryChecksum\DC2Q\n\
    \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\DC2U\n\
    \\fsdk_metadata\CAN\ACK \SOH(\v22.temporal.api.sdk.v1.WorkflowTaskCompletedMetadataR\vsdkMetadata\DC2U\n\
    \\DC1metering_metadata\CAN\r \SOH(\v2(.temporal.api.common.v1.MeteringMetadataR\DLEmeteringMetadata\"\196\SOH\n\
    \#WorkflowTaskTimedOutEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2E\n\
    \\ftimeout_type\CAN\ETX \SOH(\SO2\".temporal.api.enums.v1.TimeoutTypeR\vtimeoutType\"\129\EOT\n\
    \!WorkflowTaskFailedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2D\n\
    \\ENQcause\CAN\ETX \SOH(\SO2..temporal.api.enums.v1.WorkflowTaskFailedCauseR\ENQcause\DC2:\n\
    \\afailure\CAN\EOT \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\SUB\n\
    \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2\RS\n\
    \\vbase_run_id\CAN\ACK \SOH(\tR\tbaseRunId\DC2\FS\n\
    \\n\
    \new_run_id\CAN\a \SOH(\tR\bnewRunId\DC2,\n\
    \\DC2fork_event_version\CAN\b \SOH(\ETXR\DLEforkEventVersion\DC2'\n\
    \\SIbinary_checksum\CAN\t \SOH(\tR\SObinaryChecksum\DC2Q\n\
    \\SOworker_version\CAN\n\
    \ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"\212\ACK\n\
    \$ActivityTaskScheduledEventAttributes\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\DC2C\n\
    \\n\
    \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
    \\ACKheader\CAN\ENQ \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC26\n\
    \\ENQinput\CAN\ACK \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2T\n\
    \\EMschedule_to_close_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2T\n\
    \\EMschedule_to_start_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToStartTimeout\DC2N\n\
    \\SYNstart_to_close_timeout\CAN\t \SOH(\v2\EM.google.protobuf.DurationR\DC3startToCloseTimeout\DC2F\n\
    \\DC1heartbeat_timeout\CAN\n\
    \ \SOH(\v2\EM.google.protobuf.DurationR\DLEheartbeatTimeout\DC2F\n\
    \ workflow_task_completed_event_id\CAN\v \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2F\n\
    \\fretry_policy\CAN\f \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC21\n\
    \\NAKuse_workflow_build_id\CAN\r \SOH(\bR\DC2useWorkflowBuildIdJ\EOT\b\ETX\DLE\EOT\"\250\STX\n\
    \\"ActivityTaskStartedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2\SUB\n\
    \\bidentity\CAN\STX \SOH(\tR\bidentity\DC2\GS\n\
    \\n\
    \request_id\CAN\ETX \SOH(\tR\trequestId\DC2\CAN\n\
    \\aattempt\CAN\EOT \SOH(\ENQR\aattempt\DC2C\n\
    \\flast_failure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\vlastFailure\DC2Q\n\
    \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\DC29\n\
    \\EMbuild_id_redirect_counter\CAN\a \SOH(\ETXR\SYNbuildIdRedirectCounter\"\167\STX\n\
    \$ActivityTaskCompletedEventAttributes\DC28\n\
    \\ACKresult\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2,\n\
    \\DC2scheduled_event_id\CAN\STX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ETX \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2Q\n\
    \\SOworker_version\CAN\ENQ \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"\234\STX\n\
    \!ActivityTaskFailedEventAttributes\DC2:\n\
    \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2,\n\
    \\DC2scheduled_event_id\CAN\STX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ETX \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\DC2B\n\
    \\vretry_state\CAN\ENQ \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
    \retryState\DC2Q\n\
    \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"\253\SOH\n\
    \#ActivityTaskTimedOutEventAttributes\DC2:\n\
    \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2,\n\
    \\DC2scheduled_event_id\CAN\STX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ETX \SOH(\ETXR\SOstartedEventId\DC2B\n\
    \\vretry_state\CAN\EOT \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
    \retryState\"\162\SOH\n\
    \*ActivityTaskCancelRequestedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2F\n\
    \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\"\240\STX\n\
    \#ActivityTaskCanceledEventAttributes\DC2:\n\
    \\adetails\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2F\n\
    \ latest_cancel_requested_event_id\CAN\STX \SOH(\ETXR\FSlatestCancelRequestedEventId\DC2,\n\
    \\DC2scheduled_event_id\CAN\ETX \SOH(\ETXR\DLEscheduledEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\EOT \SOH(\ETXR\SOstartedEventId\DC2\SUB\n\
    \\bidentity\CAN\ENQ \SOH(\tR\bidentity\DC2Q\n\
    \\SOworker_version\CAN\ACK \SOH(\v2*.temporal.api.common.v1.WorkerVersionStampR\rworkerVersion\"\206\SOH\n\
    \\ESCTimerStartedEventAttributes\DC2\EM\n\
    \\btimer_id\CAN\SOH \SOH(\tR\atimerId\DC2L\n\
    \\NAKstart_to_fire_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\DC2startToFireTimeout\DC2F\n\
    \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\"`\n\
    \\EMTimerFiredEventAttributes\DC2\EM\n\
    \\btimer_id\CAN\SOH \SOH(\tR\atimerId\DC2(\n\
    \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\"\199\SOH\n\
    \\FSTimerCanceledEventAttributes\DC2\EM\n\
    \\btimer_id\CAN\SOH \SOH(\tR\atimerId\DC2(\n\
    \\DLEstarted_event_id\CAN\STX \SOH(\ETXR\SOstartedEventId\DC2F\n\
    \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\"\141\STX\n\
    \/WorkflowExecutionCancelRequestedEventAttributes\DC2\DC4\n\
    \\ENQcause\CAN\SOH \SOH(\tR\ENQcause\DC2=\n\
    \\ESCexternal_initiated_event_id\CAN\STX \SOH(\ETXR\CANexternalInitiatedEventId\DC2i\n\
    \\ESCexternal_workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\EMexternalWorkflowExecution\DC2\SUB\n\
    \\bidentity\CAN\EOT \SOH(\tR\bidentity\"\174\SOH\n\
    \(WorkflowExecutionCanceledEventAttributes\DC2F\n\
    \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2:\n\
    \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\"\185\ETX\n\
    \\GSMarkerRecordedEventAttributes\DC2\US\n\
    \\vmarker_name\CAN\SOH \SOH(\tR\n\
    \markerName\DC2]\n\
    \\adetails\CAN\STX \ETX(\v2C.temporal.api.history.v1.MarkerRecordedEventAttributes.DetailsEntryR\adetails\DC2F\n\
    \ workflow_task_completed_event_id\CAN\ETX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC26\n\
    \\ACKheader\CAN\EOT \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2:\n\
    \\afailure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\SUB\\\n\
    \\fDetailsEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC26\n\
    \\ENQvalue\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQvalue:\STX8\SOH\"\129\ETX\n\
    \(WorkflowExecutionSignaledEventAttributes\DC2\US\n\
    \\vsignal_name\CAN\SOH \SOH(\tR\n\
    \signalName\DC26\n\
    \\ENQinput\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\DC26\n\
    \\ACKheader\CAN\EOT \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC2=\n\
    \\ESCskip_generate_workflow_task\CAN\ENQ \SOH(\bR\CANskipGenerateWorkflowTask\DC2i\n\
    \\ESCexternal_workflow_execution\CAN\ACK \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\EMexternalWorkflowExecution\"\156\SOH\n\
    \*WorkflowExecutionTerminatedEventAttributes\DC2\SYN\n\
    \\ACKreason\CAN\SOH \SOH(\tR\ACKreason\DC2:\n\
    \\adetails\CAN\STX \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\SUB\n\
    \\bidentity\CAN\ETX \SOH(\tR\bidentity\"\133\ETX\n\
    \>RequestCancelExternalWorkflowExecutionInitiatedEventAttributes\DC2F\n\
    \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\CAN\n\
    \\acontrol\CAN\EOT \SOH(\tR\acontrol\DC2.\n\
    \\DC3child_workflow_only\CAN\ENQ \SOH(\bR\DC1childWorkflowOnly\DC2\SYN\n\
    \\ACKreason\CAN\ACK \SOH(\tR\ACKreason\"\193\ETX\n\
    \;RequestCancelExternalWorkflowExecutionFailedEventAttributes\DC2W\n\
    \\ENQcause\CAN\SOH \SOH(\SO2A.temporal.api.enums.v1.CancelExternalWorkflowExecutionFailedCauseR\ENQcause\DC2F\n\
    \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
    \\tnamespace\CAN\ETX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\EOT \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2,\n\
    \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2\CAN\n\
    \\acontrol\CAN\ACK \SOH(\tR\acontrol\"\130\STX\n\
    \7ExternalWorkflowExecutionCancelRequestedEventAttributes\DC2,\n\
    \\DC2initiated_event_id\CAN\SOH \SOH(\ETXR\DLEinitiatedEventId\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\EOT \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\"\247\ETX\n\
    \7SignalExternalWorkflowExecutionInitiatedEventAttributes\DC2F\n\
    \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\t \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\US\n\
    \\vsignal_name\CAN\EOT \SOH(\tR\n\
    \signalName\DC26\n\
    \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2\CAN\n\
    \\acontrol\CAN\ACK \SOH(\tR\acontrol\DC2.\n\
    \\DC3child_workflow_only\CAN\a \SOH(\bR\DC1childWorkflowOnly\DC26\n\
    \\ACKheader\CAN\b \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\"\186\ETX\n\
    \4SignalExternalWorkflowExecutionFailedEventAttributes\DC2W\n\
    \\ENQcause\CAN\SOH \SOH(\SO2A.temporal.api.enums.v1.SignalExternalWorkflowExecutionFailedCauseR\ENQcause\DC2F\n\
    \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\FS\n\
    \\tnamespace\CAN\ETX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\EOT \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2,\n\
    \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2\CAN\n\
    \\acontrol\CAN\ACK \SOH(\tR\acontrol\"\149\STX\n\
    \0ExternalWorkflowExecutionSignaledEventAttributes\DC2,\n\
    \\DC2initiated_event_id\CAN\SOH \SOH(\ETXR\DLEinitiatedEventId\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\ENQ \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2\CAN\n\
    \\acontrol\CAN\EOT \SOH(\tR\acontrol\"\206\SOH\n\
    \-UpsertWorkflowSearchAttributesEventAttributes\DC2F\n\
    \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2U\n\
    \\DC1search_attributes\CAN\STX \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\"\182\SOH\n\
    \)WorkflowPropertiesModifiedEventAttributes\DC2F\n\
    \ workflow_task_completed_event_id\CAN\SOH \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2A\n\
    \\rupserted_memo\CAN\STX \SOH(\v2\FS.temporal.api.common.v1.MemoR\fupsertedMemo\"\207\t\n\
    \3StartChildWorkflowExecutionInitiatedEventAttributes\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\DC2 \SOH(\tR\vnamespaceId\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2C\n\
    \\n\
    \task_queue\CAN\EOT \SOH(\v2$.temporal.api.taskqueue.v1.TaskQueueR\ttaskQueue\DC26\n\
    \\ENQinput\CAN\ENQ \SOH(\v2 .temporal.api.common.v1.PayloadsR\ENQinput\DC2W\n\
    \\SUBworkflow_execution_timeout\CAN\ACK \SOH(\v2\EM.google.protobuf.DurationR\CANworkflowExecutionTimeout\DC2K\n\
    \\DC4workflow_run_timeout\CAN\a \SOH(\v2\EM.google.protobuf.DurationR\DC2workflowRunTimeout\DC2M\n\
    \\NAKworkflow_task_timeout\CAN\b \SOH(\v2\EM.google.protobuf.DurationR\DC3workflowTaskTimeout\DC2X\n\
    \\DC3parent_close_policy\CAN\t \SOH(\SO2(.temporal.api.enums.v1.ParentClosePolicyR\DC1parentClosePolicy\DC2\CAN\n\
    \\acontrol\CAN\n\
    \ \SOH(\tR\acontrol\DC2F\n\
    \ workflow_task_completed_event_id\CAN\v \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2e\n\
    \\CANworkflow_id_reuse_policy\CAN\f \SOH(\SO2,.temporal.api.enums.v1.WorkflowIdReusePolicyR\NAKworkflowIdReusePolicy\DC2F\n\
    \\fretry_policy\CAN\r \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\vretryPolicy\DC2#\n\
    \\rcron_schedule\CAN\SO \SOH(\tR\fcronSchedule\DC26\n\
    \\ACKheader\CAN\SI \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\DC20\n\
    \\EOTmemo\CAN\DLE \SOH(\v2\FS.temporal.api.common.v1.MemoR\EOTmemo\DC2U\n\
    \\DC1search_attributes\CAN\DC1 \SOH(\v2(.temporal.api.common.v1.SearchAttributesR\DLEsearchAttributes\DC2(\n\
    \\DLEinherit_build_id\CAN\DC3 \SOH(\bR\SOinheritBuildId\"\196\ETX\n\
    \0StartChildWorkflowExecutionFailedEventAttributes\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\b \SOH(\tR\vnamespaceId\DC2\US\n\
    \\vworkflow_id\CAN\STX \SOH(\tR\n\
    \workflowId\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2S\n\
    \\ENQcause\CAN\EOT \SOH(\SO2=.temporal.api.enums.v1.StartChildWorkflowExecutionFailedCauseR\ENQcause\DC2\CAN\n\
    \\acontrol\CAN\ENQ \SOH(\tR\acontrol\DC2,\n\
    \\DC2initiated_event_id\CAN\ACK \SOH(\ETXR\DLEinitiatedEventId\DC2F\n\
    \ workflow_task_completed_event_id\CAN\a \SOH(\ETXR\FSworkflowTaskCompletedEventId\"\250\STX\n\
    \,ChildWorkflowExecutionStartedEventAttributes\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\ACK \SOH(\tR\vnamespaceId\DC2,\n\
    \\DC2initiated_event_id\CAN\STX \SOH(\ETXR\DLEinitiatedEventId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC26\n\
    \\ACKheader\CAN\ENQ \SOH(\v2\RS.temporal.api.common.v1.HeaderR\ACKheader\"\168\ETX\n\
    \.ChildWorkflowExecutionCompletedEventAttributes\DC28\n\
    \\ACKresult\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\ACKresult\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
    \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ACK \SOH(\ETXR\SOstartedEventId\"\235\ETX\n\
    \+ChildWorkflowExecutionFailedEventAttributes\DC2:\n\
    \\afailure\CAN\SOH \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\b \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
    \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ACK \SOH(\ETXR\SOstartedEventId\DC2B\n\
    \\vretry_state\CAN\a \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
    \retryState\"\169\ETX\n\
    \-ChildWorkflowExecutionCanceledEventAttributes\DC2:\n\
    \\adetails\CAN\SOH \SOH(\v2 .temporal.api.common.v1.PayloadsR\adetails\DC2\FS\n\
    \\tnamespace\CAN\STX \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\ETX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\EOT \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
    \\DC2initiated_event_id\CAN\ENQ \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ACK \SOH(\ETXR\SOstartedEventId\"\177\ETX\n\
    \-ChildWorkflowExecutionTimedOutEventAttributes\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\a \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
    \\DC2initiated_event_id\CAN\EOT \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ENQ \SOH(\ETXR\SOstartedEventId\DC2B\n\
    \\vretry_state\CAN\ACK \SOH(\SO2!.temporal.api.enums.v1.RetryStateR\n\
    \retryState\"\239\STX\n\
    \/ChildWorkflowExecutionTerminatedEventAttributes\DC2\FS\n\
    \\tnamespace\CAN\SOH \SOH(\tR\tnamespace\DC2!\n\
    \\fnamespace_id\CAN\ACK \SOH(\tR\vnamespaceId\DC2X\n\
    \\DC2workflow_execution\CAN\STX \SOH(\v2).temporal.api.common.v1.WorkflowExecutionR\DC1workflowExecution\DC2I\n\
    \\rworkflow_type\CAN\ETX \SOH(\v2$.temporal.api.common.v1.WorkflowTypeR\fworkflowType\DC2,\n\
    \\DC2initiated_event_id\CAN\EOT \SOH(\ETXR\DLEinitiatedEventId\DC2(\n\
    \\DLEstarted_event_id\CAN\ENQ \SOH(\ETXR\SOstartedEventId\"\168\ETX\n\
    \3WorkflowPropertiesModifiedExternallyEventAttributes\DC2$\n\
    \\SOnew_task_queue\CAN\SOH \SOH(\tR\fnewTaskQueue\DC2T\n\
    \\EMnew_workflow_task_timeout\CAN\STX \SOH(\v2\EM.google.protobuf.DurationR\SYNnewWorkflowTaskTimeout\DC2R\n\
    \\CANnew_workflow_run_timeout\CAN\ETX \SOH(\v2\EM.google.protobuf.DurationR\NAKnewWorkflowRunTimeout\DC2^\n\
    \\RSnew_workflow_execution_timeout\CAN\EOT \SOH(\v2\EM.google.protobuf.DurationR\ESCnewWorkflowExecutionTimeout\DC2A\n\
    \\rupserted_memo\CAN\ENQ \SOH(\v2\FS.temporal.api.common.v1.MemoR\fupsertedMemo\"\178\SOH\n\
    \3ActivityPropertiesModifiedExternallyEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2M\n\
    \\DLEnew_retry_policy\CAN\STX \SOH(\v2#.temporal.api.common.v1.RetryPolicyR\SOnewRetryPolicy\"\189\STX\n\
    \.WorkflowExecutionUpdateAcceptedEventAttributes\DC20\n\
    \\DC4protocol_instance_id\CAN\SOH \SOH(\tR\DC2protocolInstanceId\DC2=\n\
    \\ESCaccepted_request_message_id\CAN\STX \SOH(\tR\CANacceptedRequestMessageId\DC2N\n\
    \$accepted_request_sequencing_event_id\CAN\ETX \SOH(\ETXR acceptedRequestSequencingEventId\DC2J\n\
    \\DLEaccepted_request\CAN\EOT \SOH(\v2\US.temporal.api.update.v1.RequestR\SIacceptedRequest\"\202\SOH\n\
    \/WorkflowExecutionUpdateCompletedEventAttributes\DC20\n\
    \\EOTmeta\CAN\SOH \SOH(\v2\FS.temporal.api.update.v1.MetaR\EOTmeta\DC2*\n\
    \\DC1accepted_event_id\CAN\ETX \SOH(\ETXR\SIacceptedEventId\DC29\n\
    \\aoutcome\CAN\STX \SOH(\v2\US.temporal.api.update.v1.OutcomeR\aoutcome\"\249\STX\n\
    \.WorkflowExecutionUpdateRejectedEventAttributes\DC20\n\
    \\DC4protocol_instance_id\CAN\SOH \SOH(\tR\DC2protocolInstanceId\DC2=\n\
    \\ESCrejected_request_message_id\CAN\STX \SOH(\tR\CANrejectedRequestMessageId\DC2N\n\
    \$rejected_request_sequencing_event_id\CAN\ETX \SOH(\ETXR rejectedRequestSequencingEventId\DC2J\n\
    \\DLErejected_request\CAN\EOT \SOH(\v2\US.temporal.api.update.v1.RequestR\SIrejectedRequest\DC2:\n\
    \\afailure\CAN\ENQ \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"\181\SOH\n\
    \.WorkflowExecutionUpdateAdmittedEventAttributes\DC29\n\
    \\arequest\CAN\SOH \SOH(\v2\US.temporal.api.update.v1.RequestR\arequest\DC2H\n\
    \\ACKorigin\CAN\STX \SOH(\SO20.temporal.api.enums.v1.UpdateAdmittedEventOriginR\ACKorigin\"\165\EOT\n\
    \&NexusOperationScheduledEventAttributes\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\DC25\n\
    \\ENQinput\CAN\EOT \SOH(\v2\US.temporal.api.common.v1.PayloadR\ENQinput\DC2T\n\
    \\EMschedule_to_close_timeout\CAN\ENQ \SOH(\v2\EM.google.protobuf.DurationR\SYNscheduleToCloseTimeout\DC2s\n\
    \\fnexus_header\CAN\ACK \ETX(\v2P.temporal.api.history.v1.NexusOperationScheduledEventAttributes.NexusHeaderEntryR\vnexusHeader\DC2F\n\
    \ workflow_task_completed_event_id\CAN\a \SOH(\ETXR\FSworkflowTaskCompletedEventId\DC2\GS\n\
    \\n\
    \request_id\CAN\b \SOH(\tR\trequestId\SUB>\n\
    \\DLENexusHeaderEntry\DC2\DLE\n\
    \\ETXkey\CAN\SOH \SOH(\tR\ETXkey\DC2\DC4\n\
    \\ENQvalue\CAN\STX \SOH(\tR\ENQvalue:\STX8\SOH\"w\n\
    \$NexusOperationStartedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2!\n\
    \\foperation_id\CAN\ETX \SOH(\tR\voperationId\"\143\SOH\n\
    \&NexusOperationCompletedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC27\n\
    \\ACKresult\CAN\STX \SOH(\v2\US.temporal.api.common.v1.PayloadR\ACKresult\"\143\SOH\n\
    \#NexusOperationFailedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2:\n\
    \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"\145\SOH\n\
    \%NexusOperationTimedOutEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2:\n\
    \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"\145\SOH\n\
    \%NexusOperationCanceledEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2:\n\
    \\afailure\CAN\STX \SOH(\v2 .temporal.api.failure.v1.FailureR\afailure\"\164\SOH\n\
    \,NexusOperationCancelRequestedEventAttributes\DC2,\n\
    \\DC2scheduled_event_id\CAN\SOH \SOH(\ETXR\DLEscheduledEventId\DC2F\n\
    \ workflow_task_completed_event_id\CAN\STX \SOH(\ETXR\FSworkflowTaskCompletedEventId\"\183J\n\
    \\fHistoryEvent\DC2\EM\n\
    \\bevent_id\CAN\SOH \SOH(\ETXR\aeventId\DC29\n\
    \\n\
    \event_time\CAN\STX \SOH(\v2\SUB.google.protobuf.TimestampR\teventTime\DC2?\n\
    \\n\
    \event_type\CAN\ETX \SOH(\SO2 .temporal.api.enums.v1.EventTypeR\teventType\DC2\CAN\n\
    \\aversion\CAN\EOT \SOH(\ETXR\aversion\DC2\ETB\n\
    \\atask_id\CAN\ENQ \SOH(\ETXR\ACKtaskId\DC2+\n\
    \\DC1worker_may_ignore\CAN\172\STX \SOH(\bR\SIworkerMayIgnore\DC2\160\SOH\n\
    \+workflow_execution_started_event_attributes\CAN\ACK \SOH(\v2@.temporal.api.history.v1.WorkflowExecutionStartedEventAttributesH\NULR'workflowExecutionStartedEventAttributes\DC2\166\SOH\n\
    \-workflow_execution_completed_event_attributes\CAN\a \SOH(\v2B.temporal.api.history.v1.WorkflowExecutionCompletedEventAttributesH\NULR)workflowExecutionCompletedEventAttributes\DC2\157\SOH\n\
    \*workflow_execution_failed_event_attributes\CAN\b \SOH(\v2?.temporal.api.history.v1.WorkflowExecutionFailedEventAttributesH\NULR&workflowExecutionFailedEventAttributes\DC2\164\SOH\n\
    \-workflow_execution_timed_out_event_attributes\CAN\t \SOH(\v2A.temporal.api.history.v1.WorkflowExecutionTimedOutEventAttributesH\NULR(workflowExecutionTimedOutEventAttributes\DC2\151\SOH\n\
    \(workflow_task_scheduled_event_attributes\CAN\n\
    \ \SOH(\v2=.temporal.api.history.v1.WorkflowTaskScheduledEventAttributesH\NULR$workflowTaskScheduledEventAttributes\DC2\145\SOH\n\
    \&workflow_task_started_event_attributes\CAN\v \SOH(\v2;.temporal.api.history.v1.WorkflowTaskStartedEventAttributesH\NULR\"workflowTaskStartedEventAttributes\DC2\151\SOH\n\
    \(workflow_task_completed_event_attributes\CAN\f \SOH(\v2=.temporal.api.history.v1.WorkflowTaskCompletedEventAttributesH\NULR$workflowTaskCompletedEventAttributes\DC2\149\SOH\n\
    \(workflow_task_timed_out_event_attributes\CAN\r \SOH(\v2<.temporal.api.history.v1.WorkflowTaskTimedOutEventAttributesH\NULR#workflowTaskTimedOutEventAttributes\DC2\142\SOH\n\
    \%workflow_task_failed_event_attributes\CAN\SO \SOH(\v2:.temporal.api.history.v1.WorkflowTaskFailedEventAttributesH\NULR!workflowTaskFailedEventAttributes\DC2\151\SOH\n\
    \(activity_task_scheduled_event_attributes\CAN\SI \SOH(\v2=.temporal.api.history.v1.ActivityTaskScheduledEventAttributesH\NULR$activityTaskScheduledEventAttributes\DC2\145\SOH\n\
    \&activity_task_started_event_attributes\CAN\DLE \SOH(\v2;.temporal.api.history.v1.ActivityTaskStartedEventAttributesH\NULR\"activityTaskStartedEventAttributes\DC2\151\SOH\n\
    \(activity_task_completed_event_attributes\CAN\DC1 \SOH(\v2=.temporal.api.history.v1.ActivityTaskCompletedEventAttributesH\NULR$activityTaskCompletedEventAttributes\DC2\142\SOH\n\
    \%activity_task_failed_event_attributes\CAN\DC2 \SOH(\v2:.temporal.api.history.v1.ActivityTaskFailedEventAttributesH\NULR!activityTaskFailedEventAttributes\DC2\149\SOH\n\
    \(activity_task_timed_out_event_attributes\CAN\DC3 \SOH(\v2<.temporal.api.history.v1.ActivityTaskTimedOutEventAttributesH\NULR#activityTaskTimedOutEventAttributes\DC2{\n\
    \\RStimer_started_event_attributes\CAN\DC4 \SOH(\v24.temporal.api.history.v1.TimerStartedEventAttributesH\NULR\ESCtimerStartedEventAttributes\DC2u\n\
    \\FStimer_fired_event_attributes\CAN\NAK \SOH(\v22.temporal.api.history.v1.TimerFiredEventAttributesH\NULR\EMtimerFiredEventAttributes\DC2\170\SOH\n\
    \/activity_task_cancel_requested_event_attributes\CAN\SYN \SOH(\v2C.temporal.api.history.v1.ActivityTaskCancelRequestedEventAttributesH\NULR*activityTaskCancelRequestedEventAttributes\DC2\148\SOH\n\
    \'activity_task_canceled_event_attributes\CAN\ETB \SOH(\v2<.temporal.api.history.v1.ActivityTaskCanceledEventAttributesH\NULR#activityTaskCanceledEventAttributes\DC2~\n\
    \\UStimer_canceled_event_attributes\CAN\CAN \SOH(\v25.temporal.api.history.v1.TimerCanceledEventAttributesH\NULR\FStimerCanceledEventAttributes\DC2\129\SOH\n\
    \ marker_recorded_event_attributes\CAN\EM \SOH(\v26.temporal.api.history.v1.MarkerRecordedEventAttributesH\NULR\GSmarkerRecordedEventAttributes\DC2\163\SOH\n\
    \,workflow_execution_signaled_event_attributes\CAN\SUB \SOH(\v2A.temporal.api.history.v1.WorkflowExecutionSignaledEventAttributesH\NULR(workflowExecutionSignaledEventAttributes\DC2\169\SOH\n\
    \.workflow_execution_terminated_event_attributes\CAN\ESC \SOH(\v2C.temporal.api.history.v1.WorkflowExecutionTerminatedEventAttributesH\NULR*workflowExecutionTerminatedEventAttributes\DC2\185\SOH\n\
    \4workflow_execution_cancel_requested_event_attributes\CAN\FS \SOH(\v2H.temporal.api.history.v1.WorkflowExecutionCancelRequestedEventAttributesH\NULR/workflowExecutionCancelRequestedEventAttributes\DC2\163\SOH\n\
    \,workflow_execution_canceled_event_attributes\CAN\GS \SOH(\v2A.temporal.api.history.v1.WorkflowExecutionCanceledEventAttributesH\NULR(workflowExecutionCanceledEventAttributes\DC2\232\SOH\n\
    \Erequest_cancel_external_workflow_execution_initiated_event_attributes\CAN\RS \SOH(\v2W.temporal.api.history.v1.RequestCancelExternalWorkflowExecutionInitiatedEventAttributesH\NULR>requestCancelExternalWorkflowExecutionInitiatedEventAttributes\DC2\223\SOH\n\
    \Brequest_cancel_external_workflow_execution_failed_event_attributes\CAN\US \SOH(\v2T.temporal.api.history.v1.RequestCancelExternalWorkflowExecutionFailedEventAttributesH\NULR;requestCancelExternalWorkflowExecutionFailedEventAttributes\DC2\210\SOH\n\
    \=external_workflow_execution_cancel_requested_event_attributes\CAN  \SOH(\v2P.temporal.api.history.v1.ExternalWorkflowExecutionCancelRequestedEventAttributesH\NULR7externalWorkflowExecutionCancelRequestedEventAttributes\DC2\183\SOH\n\
    \4workflow_execution_continued_as_new_event_attributes\CAN! \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionContinuedAsNewEventAttributesH\NULR.workflowExecutionContinuedAsNewEventAttributes\DC2\198\SOH\n\
    \9start_child_workflow_execution_initiated_event_attributes\CAN\" \SOH(\v2L.temporal.api.history.v1.StartChildWorkflowExecutionInitiatedEventAttributesH\NULR3startChildWorkflowExecutionInitiatedEventAttributes\DC2\189\SOH\n\
    \6start_child_workflow_execution_failed_event_attributes\CAN# \SOH(\v2I.temporal.api.history.v1.StartChildWorkflowExecutionFailedEventAttributesH\NULR0startChildWorkflowExecutionFailedEventAttributes\DC2\176\SOH\n\
    \1child_workflow_execution_started_event_attributes\CAN$ \SOH(\v2E.temporal.api.history.v1.ChildWorkflowExecutionStartedEventAttributesH\NULR,childWorkflowExecutionStartedEventAttributes\DC2\182\SOH\n\
    \3child_workflow_execution_completed_event_attributes\CAN% \SOH(\v2G.temporal.api.history.v1.ChildWorkflowExecutionCompletedEventAttributesH\NULR.childWorkflowExecutionCompletedEventAttributes\DC2\173\SOH\n\
    \0child_workflow_execution_failed_event_attributes\CAN& \SOH(\v2D.temporal.api.history.v1.ChildWorkflowExecutionFailedEventAttributesH\NULR+childWorkflowExecutionFailedEventAttributes\DC2\179\SOH\n\
    \2child_workflow_execution_canceled_event_attributes\CAN' \SOH(\v2F.temporal.api.history.v1.ChildWorkflowExecutionCanceledEventAttributesH\NULR-childWorkflowExecutionCanceledEventAttributes\DC2\180\SOH\n\
    \3child_workflow_execution_timed_out_event_attributes\CAN( \SOH(\v2F.temporal.api.history.v1.ChildWorkflowExecutionTimedOutEventAttributesH\NULR-childWorkflowExecutionTimedOutEventAttributes\DC2\185\SOH\n\
    \4child_workflow_execution_terminated_event_attributes\CAN) \SOH(\v2H.temporal.api.history.v1.ChildWorkflowExecutionTerminatedEventAttributesH\NULR/childWorkflowExecutionTerminatedEventAttributes\DC2\210\SOH\n\
    \=signal_external_workflow_execution_initiated_event_attributes\CAN* \SOH(\v2P.temporal.api.history.v1.SignalExternalWorkflowExecutionInitiatedEventAttributesH\NULR7signalExternalWorkflowExecutionInitiatedEventAttributes\DC2\201\SOH\n\
    \:signal_external_workflow_execution_failed_event_attributes\CAN+ \SOH(\v2M.temporal.api.history.v1.SignalExternalWorkflowExecutionFailedEventAttributesH\NULR4signalExternalWorkflowExecutionFailedEventAttributes\DC2\188\SOH\n\
    \5external_workflow_execution_signaled_event_attributes\CAN, \SOH(\v2I.temporal.api.history.v1.ExternalWorkflowExecutionSignaledEventAttributesH\NULR0externalWorkflowExecutionSignaledEventAttributes\DC2\179\SOH\n\
    \2upsert_workflow_search_attributes_event_attributes\CAN- \SOH(\v2F.temporal.api.history.v1.UpsertWorkflowSearchAttributesEventAttributesH\NULR-upsertWorkflowSearchAttributesEventAttributes\DC2\182\SOH\n\
    \3workflow_execution_update_accepted_event_attributes\CAN. \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionUpdateAcceptedEventAttributesH\NULR.workflowExecutionUpdateAcceptedEventAttributes\DC2\182\SOH\n\
    \3workflow_execution_update_rejected_event_attributes\CAN/ \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionUpdateRejectedEventAttributesH\NULR.workflowExecutionUpdateRejectedEventAttributes\DC2\185\SOH\n\
    \4workflow_execution_update_completed_event_attributes\CAN0 \SOH(\v2H.temporal.api.history.v1.WorkflowExecutionUpdateCompletedEventAttributesH\NULR/workflowExecutionUpdateCompletedEventAttributes\DC2\197\SOH\n\
    \8workflow_properties_modified_externally_event_attributes\CAN1 \SOH(\v2L.temporal.api.history.v1.WorkflowPropertiesModifiedExternallyEventAttributesH\NULR3workflowPropertiesModifiedExternallyEventAttributes\DC2\197\SOH\n\
    \8activity_properties_modified_externally_event_attributes\CAN2 \SOH(\v2L.temporal.api.history.v1.ActivityPropertiesModifiedExternallyEventAttributesH\NULR3activityPropertiesModifiedExternallyEventAttributes\DC2\166\SOH\n\
    \-workflow_properties_modified_event_attributes\CAN3 \SOH(\v2B.temporal.api.history.v1.WorkflowPropertiesModifiedEventAttributesH\NULR)workflowPropertiesModifiedEventAttributes\DC2\182\SOH\n\
    \3workflow_execution_update_admitted_event_attributes\CAN4 \SOH(\v2G.temporal.api.history.v1.WorkflowExecutionUpdateAdmittedEventAttributesH\NULR.workflowExecutionUpdateAdmittedEventAttributes\DC2\157\SOH\n\
    \*nexus_operation_scheduled_event_attributes\CAN5 \SOH(\v2?.temporal.api.history.v1.NexusOperationScheduledEventAttributesH\NULR&nexusOperationScheduledEventAttributes\DC2\151\SOH\n\
    \(nexus_operation_started_event_attributes\CAN6 \SOH(\v2=.temporal.api.history.v1.NexusOperationStartedEventAttributesH\NULR$nexusOperationStartedEventAttributes\DC2\157\SOH\n\
    \*nexus_operation_completed_event_attributes\CAN7 \SOH(\v2?.temporal.api.history.v1.NexusOperationCompletedEventAttributesH\NULR&nexusOperationCompletedEventAttributes\DC2\148\SOH\n\
    \'nexus_operation_failed_event_attributes\CAN8 \SOH(\v2<.temporal.api.history.v1.NexusOperationFailedEventAttributesH\NULR#nexusOperationFailedEventAttributes\DC2\154\SOH\n\
    \)nexus_operation_canceled_event_attributes\CAN9 \SOH(\v2>.temporal.api.history.v1.NexusOperationCanceledEventAttributesH\NULR%nexusOperationCanceledEventAttributes\DC2\155\SOH\n\
    \*nexus_operation_timed_out_event_attributes\CAN: \SOH(\v2>.temporal.api.history.v1.NexusOperationTimedOutEventAttributesH\NULR%nexusOperationTimedOutEventAttributes\DC2\176\SOH\n\
    \1nexus_operation_cancel_requested_event_attributes\CAN; \SOH(\v2E.temporal.api.history.v1.NexusOperationCancelRequestedEventAttributesH\NULR,nexusOperationCancelRequestedEventAttributesB\f\n\
    \\n\
    \attributes\"H\n\
    \\aHistory\DC2=\n\
    \\ACKevents\CAN\SOH \ETX(\v2%.temporal.api.history.v1.HistoryEventR\ACKeventsB\142\SOH\n\
    \\SUBio.temporal.api.history.v1B\fMessageProtoP\SOHZ%go.temporal.io/api/history/v1;history\170\STX\EMTemporalio.Api.History.V1\234\STX\FSTemporalio::Api::History::V1J\239\252\STX\n\
    \\a\DC2\ENQ\SYN\NUL\187\a\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\NUL3\n\
    \\t\n\
    \\STX\b\SOH\DC2\ETX\ESC\NUL3\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\NUL5\n\
    \\t\n\
    \\STX\b-\DC2\ETX\RS\NUL5\n\
    \\b\n\
    \\SOH\b\DC2\ETX\US\NUL6\n\
    \\t\n\
    \\STX\b%\DC2\ETX\US\NUL6\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$\NUL0\n\
    \\t\n\
    \\STX\ETX\ETX\DC2\ETX%\NUL2\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)\NUL/\n\
    \\t\n\
    \\STX\ETX\b\DC2\ETX*\NUL1\n\
    \\t\n\
    \\STX\ETX\t\DC2\ETX+\NUL.\n\
    \\t\n\
    \\STX\ETX\n\
    \\DC2\ETX,\NUL0\n\
    \\t\n\
    \\STX\ETX\v\DC2\ETX-\NUL:\n\
    \9\n\
    \\STX\EOT\NUL\DC2\ENQ0\NUL\130\SOH\SOH\SUB, Always the first event in workflow history\n\
    \\n\
    \\n\
    \\n\
    \\ETX\EOT\NUL\SOH\DC2\ETX0\b/\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\NUL\DC2\ETX1\EOT:\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ACK\DC2\ETX1\EOT'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\SOH\DC2\ETX1(5\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NUL\ETX\DC2\ETX189\n\
    \\200\SOH\n\
    \\EOT\EOT\NUL\STX\SOH\DC2\ETX4\EOT)\SUB\186\SOH If this workflow is a child, the namespace our parent lives in.\n\
    \ SDKs and UI tools should use `parent_workflow_namespace` field but server must use `parent_workflow_namespace_id` only.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ENQ\DC2\ETX4\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\SOH\DC2\ETX4\v$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SOH\ETX\DC2\ETX4'(\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\STX\DC2\ETX5\EOT-\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ENQ\DC2\ETX5\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\SOH\DC2\ETX5\v'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\STX\ETX\DC2\ETX5*,\n\
    \\128\STX\n\
    \\EOT\EOT\NUL\STX\ETX\DC2\ETX8\EOTK\SUB\242\SOH Contains information about parent workflow execution that initiated the child workflow these attributes belong to.\n\
    \ If the workflow these attributes belong to is not a child workflow of any other execution, this field will not be populated.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ACK\DC2\ETX8\EOT,\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\SOH\DC2\ETX8-F\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETX\ETX\DC2\ETX8IJ\n\
    \Q\n\
    \\EOT\EOT\NUL\STX\EOT\DC2\ETX:\EOT(\SUBD EventID of the child execution initiated event in parent workflow \n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ENQ\DC2\ETX:\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\SOH\DC2\ETX:\n\
    \#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EOT\ETX\DC2\ETX:&'\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ENQ\DC2\ETX;\EOT7\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ACK\DC2\ETX;\EOT'\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\SOH\DC2\ETX;(2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ENQ\ETX\DC2\ETX;56\n\
    \]\n\
    \\EOT\EOT\NUL\STX\ACK\DC2\ETX=\EOT.\SUBP SDK will deserialize this and provide it as arguments to the workflow function\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ACK\DC2\ETX=\EOT#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\SOH\DC2\ETX=$)\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ACK\ETX\DC2\ETX=,-\n\
    \V\n\
    \\EOT\EOT\NUL\STX\a\DC2\ETX?\EOT<\SUBI Total workflow execution timeout including retries and continue as new.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ACK\DC2\ETX?\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\SOH\DC2\ETX?\GS7\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\a\ETX\DC2\ETX?:;\n\
    \0\n\
    \\EOT\EOT\NUL\STX\b\DC2\ETXA\EOT6\SUB# Timeout of a single workflow run.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ACK\DC2\ETXA\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\SOH\DC2\ETXA\GS1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\b\ETX\DC2\ETXA45\n\
    \1\n\
    \\EOT\EOT\NUL\STX\t\DC2\ETXC\EOT7\SUB$ Timeout of a single workflow task.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ACK\DC2\ETXC\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\SOH\DC2\ETXC\GS2\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\t\ETX\DC2\ETXC56\n\
    \v\n\
    \\EOT\EOT\NUL\STX\n\
    \\DC2\ETXF\EOT+\SUBi Run id of the previous workflow which continued-as-new or retired or cron executed into this\n\
    \ workflow.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ENQ\DC2\ETXF\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\SOH\DC2\ETXF\v%\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\n\
    \\ETX\DC2\ETXF(*\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\v\DC2\ETXG\EOT@\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ACK\DC2\ETXG\EOT0\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\SOH\DC2\ETXG1:\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\v\ETX\DC2\ETXG=?\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\f\DC2\ETXH\EOT;\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ACK\DC2\ETXH\EOT#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\SOH\DC2\ETXH$5\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\f\ETX\DC2\ETXH8:\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\r\DC2\ETXI\EOT@\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\ACK\DC2\ETXI\EOT#\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\SOH\DC2\ETXI$:\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\r\ETX\DC2\ETXI=?\n\
    \\161\SOH\n\
    \\EOT\EOT\NUL\STX\SO\DC2\ETXL\EOT*\SUB\147\SOH This is the run id when the WorkflowExecutionStarted event was written.\n\
    \ A workflow reset changes the execution run_id, but preserves this field.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\ENQ\DC2\ETXL\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\SOH\DC2\ETXL\v$\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SO\ETX\DC2\ETXL')\n\
    \B\n\
    \\EOT\EOT\NUL\STX\SI\DC2\ETXN\EOT\EM\SUB5 Identity of the client who requested this execution\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\ENQ\DC2\ETXN\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\SOH\DC2\ETXN\v\DC3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SI\ETX\DC2\ETXN\SYN\CAN\n\
    \\DEL\n\
    \\EOT\EOT\NUL\STX\DLE\DC2\ETXQ\EOT'\SUBr This is the very first runId along the chain of ContinueAsNew, Retry, Cron and Reset.\n\
    \ Used to identify a chain.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\ENQ\DC2\ETXQ\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\SOH\DC2\ETXQ\v!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DLE\ETX\DC2\ETXQ$&\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\DC1\DC2\ETXR\EOT9\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC1\ACK\DC2\ETXR\EOT&\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC1\SOH\DC2\ETXR'3\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC1\ETX\DC2\ETXR68\n\
    \X\n\
    \\EOT\EOT\NUL\STX\DC2\DC2\ETXT\EOT\ETB\SUBK Starting at 1, the number of times we have tried to execute this workflow\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC2\ENQ\DC2\ETXT\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC2\SOH\DC2\ETXT\n\
    \\DC1\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC2\ETX\DC2\ETXT\DC4\SYN\n\
    \\142\SOH\n\
    \\EOT\EOT\NUL\STX\DC3\DC2\ETXW\EOTF\SUB\128\SOH The absolute time at which the workflow will be timed out.\n\
    \ This is passed without change to the next run/retry of a workflow.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC3\ACK\DC2\ETXW\EOT\GS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC3\SOH\DC2\ETXW\RS@\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC3\ETX\DC2\ETXWCE\n\
    \L\n\
    \\EOT\EOT\NUL\STX\DC4\DC2\ETXY\EOT\RS\SUB? If this workflow runs on a cron schedule, it will appear here\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC4\ENQ\DC2\ETXY\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC4\SOH\DC2\ETXY\v\CAN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\DC4\ETX\DC2\ETXY\ESC\GS\n\
    \\184\SOH\n\
    \\EOT\EOT\NUL\STX\NAK\DC2\ETX\\\EOT>\SUB\170\SOH For a cron workflow, this contains the amount of time between when this iteration of\n\
    \ the cron workflow was scheduled and when it should run next per its cron_schedule.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NAK\ACK\DC2\ETX\\\EOT\FS\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NAK\SOH\DC2\ETX\\\GS8\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\NAK\ETX\DC2\ETX\\;=\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\SYN\DC2\ETX]\EOT*\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SYN\ACK\DC2\ETX]\EOT\US\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SYN\SOH\DC2\ETX] $\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SYN\ETX\DC2\ETX]')\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\ETB\DC2\ETX^\EOTC\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETB\ACK\DC2\ETX^\EOT+\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETB\SOH\DC2\ETX^,=\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ETB\ETX\DC2\ETX^@B\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\CAN\DC2\ETX_\EOTE\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\CAN\ACK\DC2\ETX_\EOT(\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\CAN\SOH\DC2\ETX_)?\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\CAN\ETX\DC2\ETX_BD\n\
    \\v\n\
    \\EOT\EOT\NUL\STX\EM\DC2\ETX`\EOT.\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EM\ACK\DC2\ETX`\EOT!\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EM\SOH\DC2\ETX`\"(\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\EM\ETX\DC2\ETX`+-\n\
    \\198\SOH\n\
    \\EOT\EOT\NUL\STX\SUB\DC2\ETXd\EOT.\SUB\184\SOH Version of the child execution initiated event in parent workflow\n\
    \ It should be used together with parent_initiated_event_id to identify\n\
    \ a child initiated event for global namespace\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SUB\ENQ\DC2\ETXd\EOT\t\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SUB\SOH\DC2\ETXd\n\
    \(\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\SUB\ETX\DC2\ETXd+-\n\
    \)\n\
    \\EOT\EOT\NUL\STX\ESC\DC2\ETXf\EOT\FS\SUB\FS This field is new in 1.21.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ESC\ENQ\DC2\ETXf\EOT\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ESC\SOH\DC2\ETXf\v\SYN\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\ESC\ETX\DC2\ETXf\EM\ESC\n\
    \\190\SOH\n\
    \\EOT\EOT\NUL\STX\FS\DC2\ETXj\EOTH\SUB\176\SOH If this workflow intends to use anything other than the current overall default version for\n\
    \ the queue, then we include it here.\n\
    \ Deprecated. use `inherited_build_id` instead\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\FS\ACK\DC2\ETXj\EOT-\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\FS\SOH\DC2\ETXj.B\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\FS\ETX\DC2\ETXjEG\n\
    \L\n\
    \\EOT\EOT\NUL\STX\GS\DC2\ETXl\EOTG\SUB? Completion callbacks attached when this workflow was started.\n\
    \\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\GS\EOT\DC2\ETXl\EOT\f\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\GS\ACK\DC2\ETXl\r,\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\GS\SOH\DC2\ETXl-A\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\GS\ETX\DC2\ETXlDF\n\
    \\153\b\n\
    \\EOT\EOT\NUL\STX\RS\DC2\ETX\DEL\EOTJ\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\RS\ACK\DC2\ETX\DEL\EOT,\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\RS\SOH\DC2\ETX\DEL-D\n\
    \\f\n\
    \\ENQ\EOT\NUL\STX\RS\ETX\DC2\ETX\DELGI\n\
    \m\n\
    \\EOT\EOT\NUL\STX\US\DC2\EOT\129\SOH\EOT#\SUB_ When present, this execution is assigned to the build ID of its parent or previous execution.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NUL\STX\US\ENQ\DC2\EOT\129\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NUL\STX\US\SOH\DC2\EOT\129\SOH\v\GS\n\
    \\r\n\
    \\ENQ\EOT\NUL\STX\US\ETX\DC2\EOT\129\SOH \"\n\
    \\f\n\
    \\STX\EOT\SOH\DC2\ACK\132\SOH\NUL\139\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\SOH\SOH\DC2\EOT\132\SOH\b1\n\
    \h\n\
    \\EOT\EOT\SOH\STX\NUL\DC2\EOT\134\SOH\EOT/\SUBZ Serialized result of workflow completion (ie: The return value of the workflow function)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\ACK\DC2\EOT\134\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\SOH\DC2\EOT\134\SOH$*\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\NUL\ETX\DC2\EOT\134\SOH-.\n\
    \X\n\
    \\EOT\EOT\SOH\STX\SOH\DC2\EOT\136\SOH\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\ENQ\DC2\EOT\136\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\SOH\DC2\EOT\136\SOH\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\SOH\ETX\DC2\EOT\136\SOH-.\n\
    \P\n\
    \\EOT\EOT\SOH\STX\STX\DC2\EOT\138\SOH\EOT$\SUBB If another run is started by cron, this contains the new run id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\ENQ\DC2\EOT\138\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\SOH\DC2\EOT\138\SOH\v\US\n\
    \\r\n\
    \\ENQ\EOT\SOH\STX\STX\ETX\DC2\EOT\138\SOH\"#\n\
    \\f\n\
    \\STX\EOT\STX\DC2\ACK\141\SOH\NUL\149\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\STX\SOH\DC2\EOT\141\SOH\b.\n\
    \b\n\
    \\EOT\EOT\STX\STX\NUL\DC2\EOT\143\SOH\EOT0\SUBT Serialized result of workflow failure (ex: An exception thrown, or error returned)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\ACK\DC2\EOT\143\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\SOH\DC2\EOT\143\SOH$+\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\NUL\ETX\DC2\EOT\143\SOH./\n\
    \\f\n\
    \\EOT\EOT\STX\STX\SOH\DC2\EOT\144\SOH\EOT5\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\ACK\DC2\EOT\144\SOH\EOT$\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\SOH\DC2\EOT\144\SOH%0\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\SOH\ETX\DC2\EOT\144\SOH34\n\
    \X\n\
    \\EOT\EOT\STX\STX\STX\DC2\EOT\146\SOH\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\ENQ\DC2\EOT\146\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\SOH\DC2\EOT\146\SOH\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\STX\ETX\DC2\EOT\146\SOH-.\n\
    \Y\n\
    \\EOT\EOT\STX\STX\ETX\DC2\EOT\148\SOH\EOT$\SUBK If another run is started by cron or retry, this contains the new run id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\ENQ\DC2\EOT\148\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\SOH\DC2\EOT\148\SOH\v\US\n\
    \\r\n\
    \\ENQ\EOT\STX\STX\ETX\ETX\DC2\EOT\148\SOH\"#\n\
    \\f\n\
    \\STX\EOT\ETX\DC2\ACK\151\SOH\NUL\155\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\ETX\SOH\DC2\EOT\151\SOH\b0\n\
    \\f\n\
    \\EOT\EOT\ETX\STX\NUL\DC2\EOT\152\SOH\EOT5\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ACK\DC2\EOT\152\SOH\EOT$\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\SOH\DC2\EOT\152\SOH%0\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\NUL\ETX\DC2\EOT\152\SOH34\n\
    \Y\n\
    \\EOT\EOT\ETX\STX\SOH\DC2\EOT\154\SOH\EOT$\SUBK If another run is started by cron or retry, this contains the new run id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ENQ\DC2\EOT\154\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\SOH\DC2\EOT\154\SOH\v\US\n\
    \\r\n\
    \\ENQ\EOT\ETX\STX\SOH\ETX\DC2\EOT\154\SOH\"#\n\
    \\f\n\
    \\STX\EOT\EOT\DC2\ACK\157\SOH\NUL\187\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\EOT\SOH\DC2\EOT\157\SOH\b6\n\
    \N\n\
    \\EOT\EOT\EOT\STX\NUL\DC2\EOT\159\SOH\EOT$\SUB@ The run ID of the new workflow started by this continue-as-new\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ENQ\DC2\EOT\159\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\SOH\DC2\EOT\159\SOH\v\US\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\NUL\ETX\DC2\EOT\159\SOH\"#\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\SOH\DC2\EOT\160\SOH\EOT:\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ACK\DC2\EOT\160\SOH\EOT'\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\SOH\DC2\EOT\160\SOH(5\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SOH\ETX\DC2\EOT\160\SOH89\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\STX\DC2\EOT\161\SOH\EOT7\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\STX\ACK\DC2\EOT\161\SOH\EOT'\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\STX\SOH\DC2\EOT\161\SOH(2\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\STX\ETX\DC2\EOT\161\SOH56\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\ETX\DC2\EOT\162\SOH\EOT.\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ETX\ACK\DC2\EOT\162\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ETX\SOH\DC2\EOT\162\SOH$)\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ETX\ETX\DC2\EOT\162\SOH,-\n\
    \1\n\
    \\EOT\EOT\EOT\STX\EOT\DC2\EOT\164\SOH\EOT6\SUB# Timeout of a single workflow run.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\EOT\ACK\DC2\EOT\164\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\EOT\SOH\DC2\EOT\164\SOH\GS1\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\EOT\ETX\DC2\EOT\164\SOH45\n\
    \2\n\
    \\EOT\EOT\EOT\STX\ENQ\DC2\EOT\166\SOH\EOT7\SUB$ Timeout of a single workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ENQ\ACK\DC2\EOT\166\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ENQ\SOH\DC2\EOT\166\SOH\GS2\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ENQ\ETX\DC2\EOT\166\SOH56\n\
    \X\n\
    \\EOT\EOT\EOT\STX\ACK\DC2\EOT\168\SOH\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ACK\ENQ\DC2\EOT\168\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ACK\SOH\DC2\EOT\168\SOH\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\ACK\ETX\DC2\EOT\168\SOH-.\n\
    \+\n\
    \\EOT\EOT\EOT\STX\a\DC2\EOT\170\SOH\EOT8\SUB\GS TODO: How and is this used?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\a\ACK\DC2\EOT\170\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\a\SOH\DC2\EOT\170\SOH\GS3\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\a\ETX\DC2\EOT\170\SOH67\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\b\DC2\EOT\171\SOH\EOT?\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\b\ACK\DC2\EOT\171\SOH\EOT0\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\b\SOH\DC2\EOT\171\SOH1:\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\b\ETX\DC2\EOT\171\SOH=>\n\
    \\198\STX\n\
    \\EOT\EOT\EOT\STX\t\DC2\EOT\176\SOH\EOT1\SUB\183\STX TODO: David are these right?\n\
    \ Deprecated. If a workflow's retry policy would cause a new run to start when the current one\n\
    \ has failed, this field would be populated with that failure. Now (when supported by server\n\
    \ and sdk) the final event will be `WORKFLOW_EXECUTION_FAILED` with `new_execution_run_id` set.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\t\ACK\DC2\EOT\176\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\t\SOH\DC2\EOT\176\SOH$+\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\t\ETX\DC2\EOT\176\SOH.0\n\
    \S\n\
    \\EOT\EOT\EOT\STX\n\
    \\DC2\EOT\178\SOH\EOT@\SUBE TODO: Is this the result of *this* workflow as it continued-as-new?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\n\
    \\ACK\DC2\EOT\178\SOH\EOT#\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\n\
    \\SOH\DC2\EOT\178\SOH$:\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\n\
    \\ETX\DC2\EOT\178\SOH=?\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\v\DC2\EOT\179\SOH\EOT.\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\v\ACK\DC2\EOT\179\SOH\EOT!\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\v\SOH\DC2\EOT\179\SOH\"(\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\v\ETX\DC2\EOT\179\SOH+-\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\f\DC2\EOT\180\SOH\EOT*\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\f\ACK\DC2\EOT\180\SOH\EOT\US\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\f\SOH\DC2\EOT\180\SOH $\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\f\ETX\DC2\EOT\180\SOH')\n\
    \\f\n\
    \\EOT\EOT\EOT\STX\r\DC2\EOT\181\SOH\EOTC\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\r\ACK\DC2\EOT\181\SOH\EOT+\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\r\SOH\DC2\EOT\181\SOH,=\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\r\ETX\DC2\EOT\181\SOH@B\n\
    \\201\SOH\n\
    \\EOT\EOT\EOT\STX\SO\DC2\EOT\184\SOH\EOT\US\SUB\186\SOH If this is set, the new execution inherits the Build ID of the current execution. Otherwise,\n\
    \ the assignment rules will be used to independently assign a Build ID to the new execution.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SO\ENQ\DC2\EOT\184\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SO\SOH\DC2\EOT\184\SOH\t\EM\n\
    \\r\n\
    \\ENQ\EOT\EOT\STX\SO\ETX\DC2\EOT\184\SOH\FS\RS\n\
    \\f\n\
    \\STX\EOT\ENQ\DC2\ACK\189\SOH\NUL\199\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\ENQ\SOH\DC2\EOT\189\SOH\b,\n\
    \j\n\
    \\EOT\EOT\ENQ\STX\NUL\DC2\EOT\191\SOH\EOT7\SUB\\ The task queue this workflow task was enqueued in, which could be a normal or sticky queue\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ACK\DC2\EOT\191\SOH\EOT'\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\SOH\DC2\EOT\191\SOH(2\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\NUL\ETX\DC2\EOT\191\SOH56\n\
    \\218\SOH\n\
    \\EOT\EOT\ENQ\STX\SOH\DC2\EOT\196\SOH\EOT8\SUB\203\SOH How long the worker has to process this task once receiving it before it times out\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ACK\DC2\EOT\196\SOH\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\SOH\DC2\EOT\196\SOH\GS3\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\SOH\ETX\DC2\EOT\196\SOH67\n\
    \V\n\
    \\EOT\EOT\ENQ\STX\STX\DC2\EOT\198\SOH\EOT\SYN\SUBH Starting at 1, how many attempts there have been to complete this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\ENQ\DC2\EOT\198\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\SOH\DC2\EOT\198\SOH\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT\ENQ\STX\STX\ETX\DC2\EOT\198\SOH\DC4\NAK\n\
    \\f\n\
    \\STX\EOT\ACK\DC2\ACK\201\SOH\NUL\220\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\ACK\SOH\DC2\EOT\201\SOH\b*\n\
    \V\n\
    \\EOT\EOT\ACK\STX\NUL\DC2\EOT\203\SOH\EOT!\SUBH The id of the `WORKFLOW_TASK_SCHEDULED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ENQ\DC2\EOT\203\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\SOH\DC2\EOT\203\SOH\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\NUL\ETX\DC2\EOT\203\SOH\US \n\
    \>\n\
    \\EOT\EOT\ACK\STX\SOH\DC2\EOT\205\SOH\EOT\CAN\SUB0 Identity of the worker who picked up this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\ENQ\DC2\EOT\205\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\SOH\DC2\EOT\205\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\SOH\ETX\DC2\EOT\205\SOH\SYN\ETB\n\
    \'\n\
    \\EOT\EOT\ACK\STX\STX\DC2\EOT\207\SOH\EOT\SUB\SUB\EM TODO: ? Appears unused?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\STX\ENQ\DC2\EOT\207\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\STX\SOH\DC2\EOT\207\SOH\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\STX\ETX\DC2\EOT\207\SOH\CAN\EM\n\
    \\143\SOH\n\
    \\EOT\EOT\ACK\STX\ETX\DC2\EOT\210\SOH\EOT%\SUB\128\SOH True if this workflow should continue-as-new soon because its history size (in\n\
    \ either event count or bytes) is getting large.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ETX\ENQ\DC2\EOT\210\SOH\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ETX\SOH\DC2\EOT\210\SOH\t \n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ETX\ETX\DC2\EOT\210\SOH#$\n\
    \\246\SOH\n\
    \\EOT\EOT\ACK\STX\EOT\DC2\EOT\214\SOH\EOT!\SUB\231\SOH Total history size in bytes, which the workflow might use to decide when to\n\
    \ continue-as-new regardless of the suggestion. Note that history event count is\n\
    \ just the event id of this event, so we don't include it explicitly here.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\ENQ\DC2\EOT\214\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\SOH\DC2\EOT\214\SOH\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\EOT\ETX\DC2\EOT\214\SOH\US \n\
    \L\n\
    \\EOT\EOT\ACK\STX\ENQ\DC2\EOT\216\SOH\EOTA\SUB> Version info of the worker to whom this task was dispatched.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ENQ\ACK\DC2\EOT\216\SOH\EOT-\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ENQ\SOH\DC2\EOT\216\SOH.<\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ENQ\ETX\DC2\EOT\216\SOH?@\n\
    \\129\SOH\n\
    \\EOT\EOT\ACK\STX\ACK\DC2\EOT\219\SOH\EOT(\SUBs Used by server internally to properly reapply build ID redirects to an execution\n\
    \ when rebuilding it from events.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\ENQ\DC2\EOT\219\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\SOH\DC2\EOT\219\SOH\n\
    \#\n\
    \\r\n\
    \\ENQ\EOT\ACK\STX\ACK\ETX\DC2\EOT\219\SOH&'\n\
    \\f\n\
    \\STX\EOT\a\DC2\ACK\222\SOH\NUL\242\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\a\SOH\DC2\EOT\222\SOH\b,\n\
    \V\n\
    \\EOT\EOT\a\STX\NUL\DC2\EOT\224\SOH\EOT!\SUBH The id of the `WORKFLOW_TASK_SCHEDULED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ENQ\DC2\EOT\224\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\SOH\DC2\EOT\224\SOH\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\a\STX\NUL\ETX\DC2\EOT\224\SOH\US \n\
    \T\n\
    \\EOT\EOT\a\STX\SOH\DC2\EOT\226\SOH\EOT\US\SUBF The id of the `WORKFLOW_TASK_STARTED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ENQ\DC2\EOT\226\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\SOH\DC2\EOT\226\SOH\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\a\STX\SOH\ETX\DC2\EOT\226\SOH\GS\RS\n\
    \>\n\
    \\EOT\EOT\a\STX\STX\DC2\EOT\228\SOH\EOT\CAN\SUB0 Identity of the worker who completed this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ENQ\DC2\EOT\228\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\SOH\DC2\EOT\228\SOH\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\a\STX\STX\ETX\DC2\EOT\228\SOH\SYN\ETB\n\
    \?\n\
    \\EOT\EOT\a\STX\ETX\DC2\EOT\230\SOH\EOT\US\SUB1 Binary ID of the worker who completed this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ETX\ENQ\DC2\EOT\230\SOH\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ETX\SOH\DC2\EOT\230\SOH\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ETX\ETX\DC2\EOT\230\SOH\GS\RS\n\
    \\190\STX\n\
    \\EOT\EOT\a\STX\EOT\DC2\EOT\235\SOH\EOTA\SUB\175\STX Version info of the worker who processed this workflow task. If present, the `build_id` field\n\
    \ within is also used as `binary_checksum`, which may be omitted in that case (it may also be\n\
    \ populated to preserve compatibility).\n\
    \ Deprecated. Use the info inside the corresponding WorkflowTaskStartedEvent\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\ACK\DC2\EOT\235\SOH\EOT-\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\SOH\DC2\EOT\235\SOH.<\n\
    \\r\n\
    \\ENQ\EOT\a\STX\EOT\ETX\DC2\EOT\235\SOH?@\n\
    \\134\SOH\n\
    \\EOT\EOT\a\STX\ENQ\DC2\EOT\238\SOH\EOTG\SUBx Data the SDK wishes to record for itself, but server need not interpret, and does not\n\
    \ directly impact workflow state.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ENQ\ACK\DC2\EOT\238\SOH\EOT5\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ENQ\SOH\DC2\EOT\238\SOH6B\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ENQ\ETX\DC2\EOT\238\SOHEF\n\
    \e\n\
    \\EOT\EOT\a\STX\ACK\DC2\EOT\241\SOH\EOTC\SUBW Local usage data sent during workflow task completion and recorded here for posterity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ACK\ACK\DC2\EOT\241\SOH\EOT+\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ACK\SOH\DC2\EOT\241\SOH,=\n\
    \\r\n\
    \\ENQ\EOT\a\STX\ACK\ETX\DC2\EOT\241\SOH@B\n\
    \\f\n\
    \\STX\EOT\b\DC2\ACK\244\SOH\NUL\250\SOH\SOH\n\
    \\v\n\
    \\ETX\EOT\b\SOH\DC2\EOT\244\SOH\b+\n\
    \V\n\
    \\EOT\EOT\b\STX\NUL\DC2\EOT\246\SOH\EOT!\SUBH The id of the `WORKFLOW_TASK_SCHEDULED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ENQ\DC2\EOT\246\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\SOH\DC2\EOT\246\SOH\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\b\STX\NUL\ETX\DC2\EOT\246\SOH\US \n\
    \T\n\
    \\EOT\EOT\b\STX\SOH\DC2\EOT\248\SOH\EOT\US\SUBF The id of the `WORKFLOW_TASK_STARTED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\ENQ\DC2\EOT\248\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\SOH\DC2\EOT\248\SOH\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\b\STX\SOH\ETX\DC2\EOT\248\SOH\GS\RS\n\
    \\f\n\
    \\EOT\EOT\b\STX\STX\DC2\EOT\249\SOH\EOT7\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\ACK\DC2\EOT\249\SOH\EOT%\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\SOH\DC2\EOT\249\SOH&2\n\
    \\r\n\
    \\ENQ\EOT\b\STX\STX\ETX\DC2\EOT\249\SOH56\n\
    \\f\n\
    \\STX\EOT\t\DC2\ACK\252\SOH\NUL\148\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\t\SOH\DC2\EOT\252\SOH\b)\n\
    \V\n\
    \\EOT\EOT\t\STX\NUL\DC2\EOT\254\SOH\EOT!\SUBH The id of the `WORKFLOW_TASK_SCHEDULED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ENQ\DC2\EOT\254\SOH\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\SOH\DC2\EOT\254\SOH\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\t\STX\NUL\ETX\DC2\EOT\254\SOH\US \n\
    \T\n\
    \\EOT\EOT\t\STX\SOH\DC2\EOT\128\STX\EOT\US\SUBF The id of the `WORKFLOW_TASK_STARTED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ENQ\DC2\EOT\128\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\SOH\DC2\EOT\128\STX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\t\STX\SOH\ETX\DC2\EOT\128\STX\GS\RS\n\
    \\f\n\
    \\EOT\EOT\t\STX\STX\DC2\EOT\129\STX\EOT<\n\
    \\r\n\
    \\ENQ\EOT\t\STX\STX\ACK\DC2\EOT\129\STX\EOT1\n\
    \\r\n\
    \\ENQ\EOT\t\STX\STX\SOH\DC2\EOT\129\STX27\n\
    \\r\n\
    \\ENQ\EOT\t\STX\STX\ETX\DC2\EOT\129\STX:;\n\
    \#\n\
    \\EOT\EOT\t\STX\ETX\DC2\EOT\131\STX\EOT0\SUB\NAK The failure details\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ETX\ACK\DC2\EOT\131\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ETX\SOH\DC2\EOT\131\STX$+\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ETX\ETX\DC2\EOT\131\STX./\n\
    \{\n\
    \\EOT\EOT\t\STX\EOT\DC2\EOT\133\STX\EOT\CAN\SUBm If a worker explicitly failed this task, it's identity. TODO: What is this set to if server fails the task?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\EOT\ENQ\DC2\EOT\133\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\EOT\SOH\DC2\EOT\133\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\t\STX\EOT\ETX\DC2\EOT\133\STX\SYN\ETB\n\
    \H\n\
    \\EOT\EOT\t\STX\ENQ\DC2\EOT\135\STX\EOT\ESC\SUB: The original run id of the workflow. For reset workflow.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\ENQ\DC2\EOT\135\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\SOH\DC2\EOT\135\STX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ENQ\ETX\DC2\EOT\135\STX\EM\SUB\n\
    \?\n\
    \\EOT\EOT\t\STX\ACK\DC2\EOT\137\STX\EOT\SUB\SUB1 If the workflow is being reset, the new run id.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ACK\ENQ\DC2\EOT\137\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ACK\SOH\DC2\EOT\137\STX\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\t\STX\ACK\ETX\DC2\EOT\137\STX\CAN\EM\n\
    \\ETB\n\
    \\EOT\EOT\t\STX\a\DC2\EOT\139\STX\EOT!\SUB\t TODO: ?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\a\ENQ\DC2\EOT\139\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\t\STX\a\SOH\DC2\EOT\139\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\t\STX\a\ETX\DC2\EOT\139\STX\US \n\
    \}\n\
    \\EOT\EOT\t\STX\b\DC2\EOT\142\STX\EOT\US\SUBo DEPRECATED since 1.21 - use `worker_version` instead.\n\
    \ If a worker explicitly failed this task, its binary id\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\b\ENQ\DC2\EOT\142\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\b\SOH\DC2\EOT\142\STX\v\SUB\n\
    \\r\n\
    \\ENQ\EOT\t\STX\b\ETX\DC2\EOT\142\STX\GS\RS\n\
    \\190\STX\n\
    \\EOT\EOT\t\STX\t\DC2\EOT\147\STX\EOTB\SUB\175\STX Version info of the worker who processed this workflow task. If present, the `build_id` field\n\
    \ within is also used as `binary_checksum`, which may be omitted in that case (it may also be\n\
    \ populated to preserve compatibility).\n\
    \ Deprecated. Use the info inside the corresponding WorkflowTaskStartedEvent\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\t\STX\t\ACK\DC2\EOT\147\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\t\STX\t\SOH\DC2\EOT\147\STX.<\n\
    \\r\n\
    \\ENQ\EOT\t\STX\t\ETX\DC2\EOT\147\STX?A\n\
    \\f\n\
    \\STX\EOT\n\
    \\DC2\ACK\150\STX\NUL\191\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\n\
    \\SOH\DC2\EOT\150\STX\b,\n\
    \D\n\
    \\EOT\EOT\n\
    \\STX\NUL\DC2\EOT\152\STX\EOT\ESC\SUB6 The worker/user assigned identifier for the activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ENQ\DC2\EOT\152\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\SOH\DC2\EOT\152\STX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\NUL\ETX\DC2\EOT\152\STX\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\SOH\DC2\EOT\153\STX\EOT:\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ACK\DC2\EOT\153\STX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\SOH\DC2\EOT\153\STX(5\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\SOH\ETX\DC2\EOT\153\STX89\n\
    \k\n\
    \\ETX\EOT\n\
    \\t\DC2\EOT\155\STX\EOT\SI\SUB^ This used to be a `namespace` field which allowed to schedule activity in another namespace.\n\
    \\n\
    \\f\n\
    \\EOT\EOT\n\
    \\t\NUL\DC2\EOT\155\STX\r\SO\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\t\NUL\SOH\DC2\EOT\155\STX\r\SO\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\t\NUL\STX\DC2\EOT\155\STX\r\SO\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\STX\DC2\EOT\156\STX\EOT7\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ACK\DC2\EOT\156\STX\EOT'\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\SOH\DC2\EOT\156\STX(2\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\STX\ETX\DC2\EOT\156\STX56\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\ETX\DC2\EOT\157\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ACK\DC2\EOT\157\STX\EOT!\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\SOH\DC2\EOT\157\STX\"(\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ETX\ETX\DC2\EOT\157\STX+,\n\
    \\f\n\
    \\EOT\EOT\n\
    \\STX\EOT\DC2\EOT\158\STX\EOT.\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ACK\DC2\EOT\158\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\SOH\DC2\EOT\158\STX$)\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\EOT\ETX\DC2\EOT\158\STX,-\n\
    \\187\STX\n\
    \\EOT\EOT\n\
    \\STX\ENQ\DC2\EOT\164\STX\EOT;\SUB\172\STX Indicates how long the caller is willing to wait for an activity completion. Limits how long\n\
    \ retries will be attempted. Either this or `start_to_close_timeout` must be specified.\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ACK\DC2\EOT\164\STX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\SOH\DC2\EOT\164\STX\GS6\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ENQ\ETX\DC2\EOT\164\STX9:\n\
    \\159\ETX\n\
    \\EOT\EOT\n\
    \\STX\ACK\DC2\EOT\172\STX\EOT;\SUB\144\ETX Limits time an activity task can stay in a task queue before a worker picks it up. This\n\
    \ timeout is always non retryable, as all a retry would achieve is to put it back into the same\n\
    \ queue. Defaults to `schedule_to_close_timeout` or workflow execution timeout if not\n\
    \ specified.\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ACK\DC2\EOT\172\STX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\SOH\DC2\EOT\172\STX\GS6\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\ACK\ETX\DC2\EOT\172\STX9:\n\
    \\187\STX\n\
    \\EOT\EOT\n\
    \\STX\a\DC2\EOT\179\STX\EOT8\SUB\172\STX Maximum time an activity is allowed to execute after being picked up by a worker. This\n\
    \ timeout is always retryable. Either this or `schedule_to_close_timeout` must be\n\
    \ specified.\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ACK\DC2\EOT\179\STX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\SOH\DC2\EOT\179\STX\GS3\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\a\ETX\DC2\EOT\179\STX67\n\
    \L\n\
    \\EOT\EOT\n\
    \\STX\b\DC2\EOT\181\STX\EOT4\SUB> Maximum permitted time between successful worker heartbeats.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\ACK\DC2\EOT\181\STX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\SOH\DC2\EOT\181\STX\GS.\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\b\ETX\DC2\EOT\181\STX13\n\
    \X\n\
    \\EOT\EOT\n\
    \\STX\t\DC2\EOT\183\STX\EOT0\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\ENQ\DC2\EOT\183\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\SOH\DC2\EOT\183\STX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\t\ETX\DC2\EOT\183\STX-/\n\
    \\230\SOH\n\
    \\EOT\EOT\n\
    \\STX\n\
    \\DC2\EOT\187\STX\EOT9\SUB\215\SOH Activities are assigned a default retry policy controlled by the service's dynamic\n\
    \ configuration. Retries will happen up to `schedule_to_close_timeout`. To disable retries set\n\
    \ retry_policy.maximum_attempts to 1.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\ACK\DC2\EOT\187\STX\EOT&\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\SOH\DC2\EOT\187\STX'3\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\n\
    \\ETX\DC2\EOT\187\STX68\n\
    \\194\SOH\n\
    \\EOT\EOT\n\
    \\STX\v\DC2\EOT\190\STX\EOT$\SUB\179\SOH If this is set, the activity would be assigned to the Build ID of the workflow. Otherwise,\n\
    \ Assignment rules of the activity's Task Queue will be used to determine the Build ID.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\v\ENQ\DC2\EOT\190\STX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\v\SOH\DC2\EOT\190\STX\t\RS\n\
    \\r\n\
    \\ENQ\EOT\n\
    \\STX\v\ETX\DC2\EOT\190\STX!#\n\
    \\f\n\
    \\STX\EOT\v\DC2\ACK\193\STX\NUL\210\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\v\SOH\DC2\EOT\193\STX\b*\n\
    \V\n\
    \\EOT\EOT\v\STX\NUL\DC2\EOT\195\STX\EOT!\SUBH The id of the `ACTIVITY_TASK_SCHEDULED` event this task corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ENQ\DC2\EOT\195\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\SOH\DC2\EOT\195\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\v\STX\NUL\ETX\DC2\EOT\195\STX\US \n\
    \9\n\
    \\EOT\EOT\v\STX\SOH\DC2\EOT\197\STX\EOT\CAN\SUB+ id of the worker that picked up this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ENQ\DC2\EOT\197\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\SOH\DC2\EOT\197\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\v\STX\SOH\ETX\DC2\EOT\197\STX\SYN\ETB\n\
    \\ETB\n\
    \\EOT\EOT\v\STX\STX\DC2\EOT\199\STX\EOT\SUB\SUB\t TODO ??\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ENQ\DC2\EOT\199\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\SOH\DC2\EOT\199\STX\v\NAK\n\
    \\r\n\
    \\ENQ\EOT\v\STX\STX\ETX\DC2\EOT\199\STX\CAN\EM\n\
    \O\n\
    \\EOT\EOT\v\STX\ETX\DC2\EOT\201\STX\EOT\SYN\SUBA Starting at 1, the number of times this task has been attempted\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ENQ\DC2\EOT\201\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\SOH\DC2\EOT\201\STX\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ETX\ETX\DC2\EOT\201\STX\DC4\NAK\n\
    \z\n\
    \\EOT\EOT\v\STX\EOT\DC2\EOT\204\STX\EOT5\SUBl Will be set to the most recent failure details, if this task has previously failed and then\n\
    \ been retried.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\ACK\DC2\EOT\204\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\SOH\DC2\EOT\204\STX$0\n\
    \\r\n\
    \\ENQ\EOT\v\STX\EOT\ETX\DC2\EOT\204\STX34\n\
    \L\n\
    \\EOT\EOT\v\STX\ENQ\DC2\EOT\206\STX\EOTA\SUB> Version info of the worker to whom this task was dispatched.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\ACK\DC2\EOT\206\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\SOH\DC2\EOT\206\STX.<\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ENQ\ETX\DC2\EOT\206\STX?@\n\
    \\129\SOH\n\
    \\EOT\EOT\v\STX\ACK\DC2\EOT\209\STX\EOT(\SUBs Used by server internally to properly reapply build ID redirects to an execution\n\
    \ when rebuilding it from events.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\ENQ\DC2\EOT\209\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\SOH\DC2\EOT\209\STX\n\
    \#\n\
    \\r\n\
    \\ENQ\EOT\v\STX\ACK\ETX\DC2\EOT\209\STX&'\n\
    \\f\n\
    \\STX\EOT\f\DC2\ACK\212\STX\NUL\224\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\f\SOH\DC2\EOT\212\STX\b,\n\
    \a\n\
    \\EOT\EOT\f\STX\NUL\DC2\EOT\214\STX\EOT/\SUBS Serialized results of the activity. IE: The return value of the activity function\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ACK\DC2\EOT\214\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\SOH\DC2\EOT\214\STX$*\n\
    \\r\n\
    \\ENQ\EOT\f\STX\NUL\ETX\DC2\EOT\214\STX-.\n\
    \\\\n\
    \\EOT\EOT\f\STX\SOH\DC2\EOT\216\STX\EOT!\SUBN The id of the `ACTIVITY_TASK_SCHEDULED` event this completion corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\ENQ\DC2\EOT\216\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\SOH\DC2\EOT\216\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\f\STX\SOH\ETX\DC2\EOT\216\STX\US \n\
    \Z\n\
    \\EOT\EOT\f\STX\STX\DC2\EOT\218\STX\EOT\US\SUBL The id of the `ACTIVITY_TASK_STARTED` event this completion corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\ENQ\DC2\EOT\218\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\SOH\DC2\EOT\218\STX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\f\STX\STX\ETX\DC2\EOT\218\STX\GS\RS\n\
    \9\n\
    \\EOT\EOT\f\STX\ETX\DC2\EOT\220\STX\EOT\CAN\SUB+ id of the worker that completed this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\ENQ\DC2\EOT\220\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\SOH\DC2\EOT\220\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\f\STX\ETX\ETX\DC2\EOT\220\STX\SYN\ETB\n\
    \\153\SOH\n\
    \\EOT\EOT\f\STX\EOT\DC2\EOT\223\STX\EOTA\SUB\138\SOH Version info of the worker who processed this workflow task.\n\
    \ Deprecated. Use the info inside the corresponding ActivityTaskStartedEvent\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\ACK\DC2\EOT\223\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\SOH\DC2\EOT\223\STX.<\n\
    \\r\n\
    \\ENQ\EOT\f\STX\EOT\ETX\DC2\EOT\223\STX?@\n\
    \\f\n\
    \\STX\EOT\r\DC2\ACK\226\STX\NUL\239\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\r\SOH\DC2\EOT\226\STX\b)\n\
    \\US\n\
    \\EOT\EOT\r\STX\NUL\DC2\EOT\228\STX\EOT0\SUB\DC1 Failure details\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ACK\DC2\EOT\228\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\SOH\DC2\EOT\228\STX$+\n\
    \\r\n\
    \\ENQ\EOT\r\STX\NUL\ETX\DC2\EOT\228\STX./\n\
    \Y\n\
    \\EOT\EOT\r\STX\SOH\DC2\EOT\230\STX\EOT!\SUBK The id of the `ACTIVITY_TASK_SCHEDULED` event this failure corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ENQ\DC2\EOT\230\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\SOH\DC2\EOT\230\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\r\STX\SOH\ETX\DC2\EOT\230\STX\US \n\
    \W\n\
    \\EOT\EOT\r\STX\STX\DC2\EOT\232\STX\EOT\US\SUBI The id of the `ACTIVITY_TASK_STARTED` event this failure corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ENQ\DC2\EOT\232\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\SOH\DC2\EOT\232\STX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\r\STX\STX\ETX\DC2\EOT\232\STX\GS\RS\n\
    \6\n\
    \\EOT\EOT\r\STX\ETX\DC2\EOT\234\STX\EOT\CAN\SUB( id of the worker that failed this task\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ENQ\DC2\EOT\234\STX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\SOH\DC2\EOT\234\STX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ETX\ETX\DC2\EOT\234\STX\SYN\ETB\n\
    \\f\n\
    \\EOT\EOT\r\STX\EOT\DC2\EOT\235\STX\EOT5\n\
    \\r\n\
    \\ENQ\EOT\r\STX\EOT\ACK\DC2\EOT\235\STX\EOT$\n\
    \\r\n\
    \\ENQ\EOT\r\STX\EOT\SOH\DC2\EOT\235\STX%0\n\
    \\r\n\
    \\ENQ\EOT\r\STX\EOT\ETX\DC2\EOT\235\STX34\n\
    \\153\SOH\n\
    \\EOT\EOT\r\STX\ENQ\DC2\EOT\238\STX\EOTA\SUB\138\SOH Version info of the worker who processed this workflow task.\n\
    \ Deprecated. Use the info inside the corresponding ActivityTaskStartedEvent\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ENQ\ACK\DC2\EOT\238\STX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ENQ\SOH\DC2\EOT\238\STX.<\n\
    \\r\n\
    \\ENQ\EOT\r\STX\ENQ\ETX\DC2\EOT\238\STX?@\n\
    \\f\n\
    \\STX\EOT\SO\DC2\ACK\241\STX\NUL\250\STX\SOH\n\
    \\v\n\
    \\ETX\EOT\SO\SOH\DC2\EOT\241\STX\b+\n\
    \}\n\
    \\EOT\EOT\SO\STX\NUL\DC2\EOT\244\STX\EOT0\SUBo If this activity had failed, was retried, and then timed out, that failure is stored as the\n\
    \ `cause` in here.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ACK\DC2\EOT\244\STX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\SOH\DC2\EOT\244\STX$+\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\NUL\ETX\DC2\EOT\244\STX./\n\
    \Y\n\
    \\EOT\EOT\SO\STX\SOH\DC2\EOT\246\STX\EOT!\SUBK The id of the `ACTIVITY_TASK_SCHEDULED` event this timeout corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\ENQ\DC2\EOT\246\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\SOH\DC2\EOT\246\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\SOH\ETX\DC2\EOT\246\STX\US \n\
    \W\n\
    \\EOT\EOT\SO\STX\STX\DC2\EOT\248\STX\EOT\US\SUBI The id of the `ACTIVITY_TASK_STARTED` event this timeout corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\ENQ\DC2\EOT\248\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\SOH\DC2\EOT\248\STX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\STX\ETX\DC2\EOT\248\STX\GS\RS\n\
    \\f\n\
    \\EOT\EOT\SO\STX\ETX\DC2\EOT\249\STX\EOT5\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\ACK\DC2\EOT\249\STX\EOT$\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\SOH\DC2\EOT\249\STX%0\n\
    \\r\n\
    \\ENQ\EOT\SO\STX\ETX\ETX\DC2\EOT\249\STX34\n\
    \\f\n\
    \\STX\EOT\SI\DC2\ACK\252\STX\NUL\129\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\SI\SOH\DC2\EOT\252\STX\b2\n\
    \`\n\
    \\EOT\EOT\SI\STX\NUL\DC2\EOT\254\STX\EOT!\SUBR The id of the `ACTIVITY_TASK_SCHEDULED` event this cancel request corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ENQ\DC2\EOT\254\STX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\SOH\DC2\EOT\254\STX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\NUL\ETX\DC2\EOT\254\STX\US \n\
    \X\n\
    \\EOT\EOT\SI\STX\SOH\DC2\EOT\128\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\ENQ\DC2\EOT\128\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\SOH\DC2\EOT\128\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\SI\STX\SOH\ETX\DC2\EOT\128\ETX-.\n\
    \\f\n\
    \\STX\EOT\DLE\DC2\ACK\131\ETX\NUL\146\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\DLE\SOH\DC2\EOT\131\ETX\b+\n\
    \^\n\
    \\EOT\EOT\DLE\STX\NUL\DC2\EOT\133\ETX\EOT0\SUBP Additional information that the activity reported upon confirming cancellation\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ACK\DC2\EOT\133\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\SOH\DC2\EOT\133\ETX$+\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\NUL\ETX\DC2\EOT\133\ETX./\n\
    \o\n\
    \\EOT\EOT\DLE\STX\SOH\DC2\EOT\136\ETX\EOT/\SUBa id of the most recent `ACTIVITY_TASK_CANCEL_REQUESTED` event which refers to the same\n\
    \ activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ENQ\DC2\EOT\136\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\SOH\DC2\EOT\136\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\SOH\ETX\DC2\EOT\136\ETX-.\n\
    \e\n\
    \\EOT\EOT\DLE\STX\STX\DC2\EOT\138\ETX\EOT!\SUBW The id of the `ACTIVITY_TASK_SCHEDULED` event this cancel confirmation corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\ENQ\DC2\EOT\138\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\SOH\DC2\EOT\138\ETX\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\STX\ETX\DC2\EOT\138\ETX\US \n\
    \c\n\
    \\EOT\EOT\DLE\STX\ETX\DC2\EOT\140\ETX\EOT\US\SUBU The id of the `ACTIVITY_TASK_STARTED` event this cancel confirmation corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ETX\ENQ\DC2\EOT\140\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ETX\SOH\DC2\EOT\140\ETX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ETX\ETX\DC2\EOT\140\ETX\GS\RS\n\
    \;\n\
    \\EOT\EOT\DLE\STX\EOT\DC2\EOT\142\ETX\EOT\CAN\SUB- id of the worker who canceled this activity\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\EOT\ENQ\DC2\EOT\142\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\EOT\SOH\DC2\EOT\142\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\EOT\ETX\DC2\EOT\142\ETX\SYN\ETB\n\
    \\153\SOH\n\
    \\EOT\EOT\DLE\STX\ENQ\DC2\EOT\145\ETX\EOTA\SUB\138\SOH Version info of the worker who processed this workflow task.\n\
    \ Deprecated. Use the info inside the corresponding ActivityTaskStartedEvent\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ENQ\ACK\DC2\EOT\145\ETX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ENQ\SOH\DC2\EOT\145\ETX.<\n\
    \\r\n\
    \\ENQ\EOT\DLE\STX\ENQ\ETX\DC2\EOT\145\ETX?@\n\
    \\f\n\
    \\STX\EOT\DC1\DC2\ACK\148\ETX\NUL\158\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC1\SOH\DC2\EOT\148\ETX\b#\n\
    \:\n\
    \\EOT\EOT\DC1\STX\NUL\DC2\EOT\150\ETX\EOT\CAN\SUB, The worker/user assigned id for this timer\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ENQ\DC2\EOT\150\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\SOH\DC2\EOT\150\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\NUL\ETX\DC2\EOT\150\ETX\SYN\ETB\n\
    \\167\SOH\n\
    \\EOT\EOT\DC1\STX\SOH\DC2\EOT\155\ETX\EOT7\SUB\152\SOH How long until this timer fires\n\
    \\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ACK\DC2\EOT\155\ETX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\SOH\DC2\EOT\155\ETX\GS2\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\SOH\ETX\DC2\EOT\155\ETX56\n\
    \X\n\
    \\EOT\EOT\DC1\STX\STX\DC2\EOT\157\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ENQ\DC2\EOT\157\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\SOH\DC2\EOT\157\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\DC1\STX\STX\ETX\DC2\EOT\157\ETX-.\n\
    \\f\n\
    \\STX\EOT\DC2\DC2\ACK\160\ETX\NUL\165\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC2\SOH\DC2\EOT\160\ETX\b!\n\
    \S\n\
    \\EOT\EOT\DC2\STX\NUL\DC2\EOT\162\ETX\EOT\CAN\SUBE Will match the `timer_id` from `TIMER_STARTED` event for this timer\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ENQ\DC2\EOT\162\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\SOH\DC2\EOT\162\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\NUL\ETX\DC2\EOT\162\ETX\SYN\ETB\n\
    \:\n\
    \\EOT\EOT\DC2\STX\SOH\DC2\EOT\164\ETX\EOT\US\SUB, The id of the `TIMER_STARTED` event itself\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\ENQ\DC2\EOT\164\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\SOH\DC2\EOT\164\ETX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\DC2\STX\SOH\ETX\DC2\EOT\164\ETX\GS\RS\n\
    \\f\n\
    \\STX\EOT\DC3\DC2\ACK\167\ETX\NUL\176\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC3\SOH\DC2\EOT\167\ETX\b$\n\
    \S\n\
    \\EOT\EOT\DC3\STX\NUL\DC2\EOT\169\ETX\EOT\CAN\SUBE Will match the `timer_id` from `TIMER_STARTED` event for this timer\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\ENQ\DC2\EOT\169\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\SOH\DC2\EOT\169\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\NUL\ETX\DC2\EOT\169\ETX\SYN\ETB\n\
    \:\n\
    \\EOT\EOT\DC3\STX\SOH\DC2\EOT\171\ETX\EOT\US\SUB, The id of the `TIMER_STARTED` event itself\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\ENQ\DC2\EOT\171\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\SOH\DC2\EOT\171\ETX\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\SOH\ETX\DC2\EOT\171\ETX\GS\RS\n\
    \X\n\
    \\EOT\EOT\DC3\STX\STX\DC2\EOT\173\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\STX\ENQ\DC2\EOT\173\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\STX\SOH\DC2\EOT\173\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\STX\ETX\DC2\EOT\173\ETX-.\n\
    \>\n\
    \\EOT\EOT\DC3\STX\ETX\DC2\EOT\175\ETX\EOT\CAN\SUB0 The id of the worker who requested this cancel\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\ETX\ENQ\DC2\EOT\175\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\ETX\SOH\DC2\EOT\175\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC3\STX\ETX\ETX\DC2\EOT\175\ETX\SYN\ETB\n\
    \\f\n\
    \\STX\EOT\DC4\DC2\ACK\178\ETX\NUL\187\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\DC4\SOH\DC2\EOT\178\ETX\b7\n\
    \\144\SOH\n\
    \\EOT\EOT\DC4\STX\NUL\DC2\EOT\181\ETX\EOT\NAK\SUB\129\SOH User provided reason for requesting cancellation\n\
    \ TODO: shall we create a new field with name \"reason\" and deprecate this one? \n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\ENQ\DC2\EOT\181\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\SOH\DC2\EOT\181\ETX\v\DLE\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\NUL\ETX\DC2\EOT\181\ETX\DC3\DC4\n\
    \p\n\
    \\EOT\EOT\DC4\STX\SOH\DC2\EOT\183\ETX\EOT*\SUBb TODO: Is this the ID of the event in the workflow which initiated this cancel, if there was one?\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\SOH\ENQ\DC2\EOT\183\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\SOH\SOH\DC2\EOT\183\ETX\n\
    \%\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\SOH\ETX\DC2\EOT\183\ETX()\n\
    \\f\n\
    \\EOT\EOT\DC4\STX\STX\DC2\EOT\184\ETX\EOTM\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\STX\ACK\DC2\EOT\184\ETX\EOT,\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\STX\SOH\DC2\EOT\184\ETX-H\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\STX\ETX\DC2\EOT\184\ETXKL\n\
    \D\n\
    \\EOT\EOT\DC4\STX\ETX\DC2\EOT\186\ETX\EOT\CAN\SUB6 id of the worker or client who requested this cancel\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ETX\ENQ\DC2\EOT\186\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ETX\SOH\DC2\EOT\186\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\DC4\STX\ETX\ETX\DC2\EOT\186\ETX\SYN\ETB\n\
    \\f\n\
    \\STX\EOT\NAK\DC2\ACK\189\ETX\NUL\193\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\NAK\SOH\DC2\EOT\189\ETX\b0\n\
    \X\n\
    \\EOT\EOT\NAK\STX\NUL\DC2\EOT\191\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\NUL\ENQ\DC2\EOT\191\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\NUL\SOH\DC2\EOT\191\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\NUL\ETX\DC2\EOT\191\ETX-.\n\
    \\f\n\
    \\EOT\EOT\NAK\STX\SOH\DC2\EOT\192\ETX\EOT0\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\SOH\ACK\DC2\EOT\192\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\SOH\SOH\DC2\EOT\192\ETX$+\n\
    \\r\n\
    \\ENQ\EOT\NAK\STX\SOH\ETX\DC2\EOT\192\ETX./\n\
    \\f\n\
    \\STX\EOT\SYN\DC2\ACK\195\ETX\NUL\205\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\SYN\SOH\DC2\EOT\195\ETX\b%\n\
    \m\n\
    \\EOT\EOT\SYN\STX\NUL\DC2\EOT\197\ETX\EOT\ESC\SUB_ Workers use this to identify the \"types\" of various markers. Ex: Local activity, side effect.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\NUL\ENQ\DC2\EOT\197\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\NUL\SOH\DC2\EOT\197\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\NUL\ETX\DC2\EOT\197\ETX\EM\SUB\n\
    \=\n\
    \\EOT\EOT\SYN\STX\SOH\DC2\EOT\199\ETX\EOT=\SUB/ Serialized information recorded in the marker\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\SOH\ACK\DC2\EOT\199\ETX\EOT0\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\SOH\SOH\DC2\EOT\199\ETX18\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\SOH\ETX\DC2\EOT\199\ETX;<\n\
    \X\n\
    \\EOT\EOT\SYN\STX\STX\DC2\EOT\201\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\STX\ENQ\DC2\EOT\201\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\STX\SOH\DC2\EOT\201\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\STX\ETX\DC2\EOT\201\ETX-.\n\
    \\f\n\
    \\EOT\EOT\SYN\STX\ETX\DC2\EOT\202\ETX\EOT-\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\ETX\ACK\DC2\EOT\202\ETX\EOT!\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\ETX\SOH\DC2\EOT\202\ETX\"(\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\ETX\ETX\DC2\EOT\202\ETX+,\n\
    \m\n\
    \\EOT\EOT\SYN\STX\EOT\DC2\EOT\204\ETX\EOT0\SUB_ Some uses of markers, like a local activity, could \"fail\". If they did that is recorded here.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\EOT\ACK\DC2\EOT\204\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\EOT\SOH\DC2\EOT\204\ETX$+\n\
    \\r\n\
    \\ENQ\EOT\SYN\STX\EOT\ETX\DC2\EOT\204\ETX./\n\
    \\f\n\
    \\STX\EOT\ETB\DC2\ACK\207\ETX\NUL\221\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\ETB\SOH\DC2\EOT\207\ETX\b0\n\
    \3\n\
    \\EOT\EOT\ETB\STX\NUL\DC2\EOT\209\ETX\EOT\ESC\SUB% The name/type of the signal to fire\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\NUL\ENQ\DC2\EOT\209\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\NUL\SOH\DC2\EOT\209\ETX\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\NUL\ETX\DC2\EOT\209\ETX\EM\SUB\n\
    \V\n\
    \\EOT\EOT\ETB\STX\SOH\DC2\EOT\211\ETX\EOT.\SUBH Will be deserialized and provided as argument(s) to the signal handler\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SOH\ACK\DC2\EOT\211\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SOH\SOH\DC2\EOT\211\ETX$)\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\SOH\ETX\DC2\EOT\211\ETX,-\n\
    \<\n\
    \\EOT\EOT\ETB\STX\STX\DC2\EOT\213\ETX\EOT\CAN\SUB. id of the worker/client who sent this signal\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\STX\ENQ\DC2\EOT\213\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\STX\SOH\DC2\EOT\213\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\STX\ETX\DC2\EOT\213\ETX\SYN\ETB\n\
    \|\n\
    \\EOT\EOT\ETB\STX\ETX\DC2\EOT\216\ETX\EOT-\SUBn Headers that were passed by the sender of the signal and copied by temporal \n\
    \ server into the workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ETX\ACK\DC2\EOT\216\ETX\EOT!\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ETX\SOH\DC2\EOT\216\ETX\"(\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ETX\ETX\DC2\EOT\216\ETX+,\n\
    \X\n\
    \\EOT\EOT\ETB\STX\EOT\DC2\EOT\218\ETX\EOT)\SUBJ Indicates the signal did not generate a new workflow task when received.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\EOT\ENQ\DC2\EOT\218\ETX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\EOT\SOH\DC2\EOT\218\ETX\t$\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\EOT\ETX\DC2\EOT\218\ETX'(\n\
    \N\n\
    \\EOT\EOT\ETB\STX\ENQ\DC2\EOT\220\ETX\EOTM\SUB@ When signal origin is a workflow execution, this field is set.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ENQ\ACK\DC2\EOT\220\ETX\EOT,\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ENQ\SOH\DC2\EOT\220\ETX-H\n\
    \\r\n\
    \\ENQ\EOT\ETB\STX\ENQ\ETX\DC2\EOT\220\ETXKL\n\
    \\f\n\
    \\STX\EOT\CAN\DC2\ACK\223\ETX\NUL\229\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\CAN\SOH\DC2\EOT\223\ETX\b2\n\
    \;\n\
    \\EOT\EOT\CAN\STX\NUL\DC2\EOT\225\ETX\EOT\SYN\SUB- User/client provided reason for termination\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\NUL\ENQ\DC2\EOT\225\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\NUL\SOH\DC2\EOT\225\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\NUL\ETX\DC2\EOT\225\ETX\DC4\NAK\n\
    \\f\n\
    \\EOT\EOT\CAN\STX\SOH\DC2\EOT\226\ETX\EOT0\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\SOH\ACK\DC2\EOT\226\ETX\EOT#\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\SOH\SOH\DC2\EOT\226\ETX$+\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\SOH\ETX\DC2\EOT\226\ETX./\n\
    \:\n\
    \\EOT\EOT\CAN\STX\STX\DC2\EOT\228\ETX\EOT\CAN\SUB, id of the client who requested termination\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\STX\ENQ\DC2\EOT\228\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\STX\SOH\DC2\EOT\228\ETX\v\DC3\n\
    \\r\n\
    \\ENQ\EOT\CAN\STX\STX\ETX\DC2\EOT\228\ETX\SYN\ETB\n\
    \\f\n\
    \\STX\EOT\EM\DC2\ACK\231\ETX\NUL\246\ETX\SOH\n\
    \\v\n\
    \\ETX\EOT\EM\SOH\DC2\EOT\231\ETX\bF\n\
    \X\n\
    \\EOT\EOT\EM\STX\NUL\DC2\EOT\233\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\NUL\ENQ\DC2\EOT\233\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\NUL\SOH\DC2\EOT\233\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\NUL\ETX\DC2\EOT\233\ETX-.\n\
    \\158\SOH\n\
    \\EOT\EOT\EM\STX\SOH\DC2\EOT\236\ETX\EOT\EM\SUB\143\SOH The namespace the workflow to be cancelled lives in.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\SOH\ENQ\DC2\EOT\236\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\SOH\SOH\DC2\EOT\236\ETX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\SOH\ETX\DC2\EOT\236\ETX\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\EM\STX\STX\DC2\EOT\237\ETX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\STX\ENQ\DC2\EOT\237\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\STX\SOH\DC2\EOT\237\ETX\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\STX\ETX\DC2\EOT\237\ETX\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\EM\STX\ETX\DC2\EOT\238\ETX\EOTD\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ETX\ACK\DC2\EOT\238\ETX\EOT,\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ETX\SOH\DC2\EOT\238\ETX-?\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ETX\ETX\DC2\EOT\238\ETXBC\n\
    \\SUB\n\
    \\EOT\EOT\EM\STX\EOT\DC2\EOT\240\ETX\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\EOT\ENQ\DC2\EOT\240\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\EOT\SOH\DC2\EOT\240\ETX\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\EOT\ETX\DC2\EOT\240\ETX\NAK\SYN\n\
    \\156\SOH\n\
    \\EOT\EOT\EM\STX\ENQ\DC2\EOT\243\ETX\EOT!\SUB\141\SOH Workers are expected to set this to true if the workflow they are requesting to cancel is\n\
    \ a child of the workflow which issued the request\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ENQ\ENQ\DC2\EOT\243\ETX\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ENQ\SOH\DC2\EOT\243\ETX\t\FS\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ENQ\ETX\DC2\EOT\243\ETX\US \n\
    \6\n\
    \\EOT\EOT\EM\STX\ACK\DC2\EOT\245\ETX\EOT\SYN\SUB( Reason for requesting the cancellation\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ACK\ENQ\DC2\EOT\245\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ACK\SOH\DC2\EOT\245\ETX\v\DC1\n\
    \\r\n\
    \\ENQ\EOT\EM\STX\ACK\ETX\DC2\EOT\245\ETX\DC4\NAK\n\
    \\f\n\
    \\STX\EOT\SUB\DC2\ACK\248\ETX\NUL\134\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\SUB\SOH\DC2\EOT\248\ETX\bC\n\
    \\f\n\
    \\EOT\EOT\SUB\STX\NUL\DC2\EOT\249\ETX\EOTO\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\NUL\ACK\DC2\EOT\249\ETX\EOTD\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\NUL\SOH\DC2\EOT\249\ETXEJ\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\NUL\ETX\DC2\EOT\249\ETXMN\n\
    \X\n\
    \\EOT\EOT\SUB\STX\SOH\DC2\EOT\251\ETX\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\SOH\ENQ\DC2\EOT\251\ETX\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\SOH\SOH\DC2\EOT\251\ETX\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\SOH\ETX\DC2\EOT\251\ETX-.\n\
    \\155\SOH\n\
    \\EOT\EOT\SUB\STX\STX\DC2\EOT\254\ETX\EOT\EM\SUB\140\SOH Namespace of the workflow which failed to cancel.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\STX\ENQ\DC2\EOT\254\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\STX\SOH\DC2\EOT\254\ETX\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\STX\ETX\DC2\EOT\254\ETX\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\SUB\STX\ETX\DC2\EOT\255\ETX\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ETX\ENQ\DC2\EOT\255\ETX\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ETX\SOH\DC2\EOT\255\ETX\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ETX\ETX\DC2\EOT\255\ETX\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\SUB\STX\EOT\DC2\EOT\128\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\EOT\ACK\DC2\EOT\128\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\EOT\SOH\DC2\EOT\128\EOT-?\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\EOT\ETX\DC2\EOT\128\EOTBC\n\
    \s\n\
    \\EOT\EOT\SUB\STX\ENQ\DC2\EOT\131\EOT\EOT!\SUBe id of the `REQUEST_CANCEL_EXTERNAL_WORKFLOW_EXECUTION_INITIATED` event this failure\n\
    \ corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ENQ\ENQ\DC2\EOT\131\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ENQ\SOH\DC2\EOT\131\EOT\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ENQ\ETX\DC2\EOT\131\EOT\US \n\
    \\SUB\n\
    \\EOT\EOT\SUB\STX\ACK\DC2\EOT\133\EOT\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ACK\ENQ\DC2\EOT\133\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ACK\SOH\DC2\EOT\133\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\SUB\STX\ACK\ETX\DC2\EOT\133\EOT\NAK\SYN\n\
    \\f\n\
    \\STX\EOT\ESC\DC2\ACK\136\EOT\NUL\145\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\ESC\SOH\DC2\EOT\136\EOT\b?\n\
    \q\n\
    \\EOT\EOT\ESC\STX\NUL\DC2\EOT\139\EOT\EOT!\SUBc id of the `REQUEST_CANCEL_EXTERNAL_WORKFLOW_EXECUTION_INITIATED` event this event corresponds\n\
    \ to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\NUL\ENQ\DC2\EOT\139\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\NUL\SOH\DC2\EOT\139\EOT\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\NUL\ETX\DC2\EOT\139\EOT\US \n\
    \\148\SOH\n\
    \\EOT\EOT\ESC\STX\SOH\DC2\EOT\142\EOT\EOT\EM\SUB\133\SOH Namespace of the to-be-cancelled workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\SOH\ENQ\DC2\EOT\142\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\SOH\SOH\DC2\EOT\142\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\SOH\ETX\DC2\EOT\142\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\ESC\STX\STX\DC2\EOT\143\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\STX\ENQ\DC2\EOT\143\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\STX\SOH\DC2\EOT\143\EOT\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\STX\ETX\DC2\EOT\143\EOT\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\ESC\STX\ETX\DC2\EOT\144\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\ETX\ACK\DC2\EOT\144\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\ETX\SOH\DC2\EOT\144\EOT-?\n\
    \\r\n\
    \\ENQ\EOT\ESC\STX\ETX\ETX\DC2\EOT\144\EOTBC\n\
    \\f\n\
    \\STX\EOT\FS\DC2\ACK\147\EOT\NUL\165\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\FS\SOH\DC2\EOT\147\EOT\b?\n\
    \X\n\
    \\EOT\EOT\FS\STX\NUL\DC2\EOT\149\EOT\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\NUL\ENQ\DC2\EOT\149\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\NUL\SOH\DC2\EOT\149\EOT\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\NUL\ETX\DC2\EOT\149\EOT-.\n\
    \\148\SOH\n\
    \\EOT\EOT\FS\STX\SOH\DC2\EOT\152\EOT\EOT\EM\SUB\133\SOH Namespace of the to-be-signalled workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\SOH\ENQ\DC2\EOT\152\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\SOH\SOH\DC2\EOT\152\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\SOH\ETX\DC2\EOT\152\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\FS\STX\STX\DC2\EOT\153\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\STX\ENQ\DC2\EOT\153\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\STX\SOH\DC2\EOT\153\EOT\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\STX\ETX\DC2\EOT\153\EOT\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\FS\STX\ETX\DC2\EOT\154\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ETX\ACK\DC2\EOT\154\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ETX\SOH\DC2\EOT\154\EOT-?\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ETX\ETX\DC2\EOT\154\EOTBC\n\
    \H\n\
    \\EOT\EOT\FS\STX\EOT\DC2\EOT\156\EOT\EOT\ESC\SUB: name/type of the signal to fire in the external workflow\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\EOT\ENQ\DC2\EOT\156\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\EOT\SOH\DC2\EOT\156\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\EOT\ETX\DC2\EOT\156\EOT\EM\SUB\n\
    \E\n\
    \\EOT\EOT\FS\STX\ENQ\DC2\EOT\158\EOT\EOT.\SUB7 Serialized arguments to provide to the signal handler\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ENQ\ACK\DC2\EOT\158\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ENQ\SOH\DC2\EOT\158\EOT$)\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ENQ\ETX\DC2\EOT\158\EOT,-\n\
    \\SUB\n\
    \\EOT\EOT\FS\STX\ACK\DC2\EOT\160\EOT\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ACK\ENQ\DC2\EOT\160\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ACK\SOH\DC2\EOT\160\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\ACK\ETX\DC2\EOT\160\EOT\NAK\SYN\n\
    \\156\SOH\n\
    \\EOT\EOT\FS\STX\a\DC2\EOT\163\EOT\EOT!\SUB\141\SOH Workers are expected to set this to true if the workflow they are requesting to cancel is\n\
    \ a child of the workflow which issued the request\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\a\ENQ\DC2\EOT\163\EOT\EOT\b\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\a\SOH\DC2\EOT\163\EOT\t\FS\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\a\ETX\DC2\EOT\163\EOT\US \n\
    \\f\n\
    \\EOT\EOT\FS\STX\b\DC2\EOT\164\EOT\EOT-\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\b\ACK\DC2\EOT\164\EOT\EOT!\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\b\SOH\DC2\EOT\164\EOT\"(\n\
    \\r\n\
    \\ENQ\EOT\FS\STX\b\ETX\DC2\EOT\164\EOT+,\n\
    \\f\n\
    \\STX\EOT\GS\DC2\ACK\167\EOT\NUL\179\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\GS\SOH\DC2\EOT\167\EOT\b<\n\
    \\f\n\
    \\EOT\EOT\GS\STX\NUL\DC2\EOT\168\EOT\EOTO\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\NUL\ACK\DC2\EOT\168\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\NUL\SOH\DC2\EOT\168\EOTEJ\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\NUL\ETX\DC2\EOT\168\EOTMN\n\
    \X\n\
    \\EOT\EOT\GS\STX\SOH\DC2\EOT\170\EOT\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\SOH\ENQ\DC2\EOT\170\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\SOH\SOH\DC2\EOT\170\EOT\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\SOH\ETX\DC2\EOT\170\EOT-.\n\
    \\156\SOH\n\
    \\EOT\EOT\GS\STX\STX\DC2\EOT\173\EOT\EOT\EM\SUB\141\SOH Namespace of the workflow which failed the signal.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\STX\ENQ\DC2\EOT\173\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\STX\SOH\DC2\EOT\173\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\STX\ETX\DC2\EOT\173\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\GS\STX\ETX\DC2\EOT\174\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ETX\ENQ\DC2\EOT\174\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ETX\SOH\DC2\EOT\174\EOT\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ETX\ETX\DC2\EOT\174\EOT\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\GS\STX\EOT\DC2\EOT\175\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\EOT\ACK\DC2\EOT\175\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\EOT\SOH\DC2\EOT\175\EOT-?\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\EOT\ETX\DC2\EOT\175\EOTBC\n\
    \\f\n\
    \\EOT\EOT\GS\STX\ENQ\DC2\EOT\176\EOT\EOT!\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ENQ\ENQ\DC2\EOT\176\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ENQ\SOH\DC2\EOT\176\EOT\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ENQ\ETX\DC2\EOT\176\EOT\US \n\
    \\SUB\n\
    \\EOT\EOT\GS\STX\ACK\DC2\EOT\178\EOT\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ACK\ENQ\DC2\EOT\178\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ACK\SOH\DC2\EOT\178\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\GS\STX\ACK\ETX\DC2\EOT\178\EOT\NAK\SYN\n\
    \\f\n\
    \\STX\EOT\RS\DC2\ACK\181\EOT\NUL\191\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\RS\SOH\DC2\EOT\181\EOT\b8\n\
    \h\n\
    \\EOT\EOT\RS\STX\NUL\DC2\EOT\183\EOT\EOT!\SUBZ id of the `SIGNAL_EXTERNAL_WORKFLOW_EXECUTION_INITIATED` event this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\NUL\ENQ\DC2\EOT\183\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\NUL\SOH\DC2\EOT\183\EOT\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\NUL\ETX\DC2\EOT\183\EOT\US \n\
    \\151\SOH\n\
    \\EOT\EOT\RS\STX\SOH\DC2\EOT\186\EOT\EOT\EM\SUB\136\SOH Namespace of the workflow which was signaled.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\SOH\ENQ\DC2\EOT\186\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\SOH\SOH\DC2\EOT\186\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\SOH\ETX\DC2\EOT\186\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\RS\STX\STX\DC2\EOT\187\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\STX\ENQ\DC2\EOT\187\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\STX\SOH\DC2\EOT\187\EOT\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\STX\ETX\DC2\EOT\187\EOT\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\RS\STX\ETX\DC2\EOT\188\EOT\EOTD\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ETX\ACK\DC2\EOT\188\EOT\EOT,\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ETX\SOH\DC2\EOT\188\EOT-?\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\ETX\ETX\DC2\EOT\188\EOTBC\n\
    \\SUB\n\
    \\EOT\EOT\RS\STX\EOT\DC2\EOT\190\EOT\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\EOT\ENQ\DC2\EOT\190\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\EOT\SOH\DC2\EOT\190\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\RS\STX\EOT\ETX\DC2\EOT\190\EOT\NAK\SYN\n\
    \\f\n\
    \\STX\EOT\US\DC2\ACK\193\EOT\NUL\197\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT\US\SOH\DC2\EOT\193\EOT\b5\n\
    \X\n\
    \\EOT\EOT\US\STX\NUL\DC2\EOT\195\EOT\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\US\STX\NUL\ENQ\DC2\EOT\195\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\US\STX\NUL\SOH\DC2\EOT\195\EOT\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\US\STX\NUL\ETX\DC2\EOT\195\EOT-.\n\
    \\f\n\
    \\EOT\EOT\US\STX\SOH\DC2\EOT\196\EOT\EOTB\n\
    \\r\n\
    \\ENQ\EOT\US\STX\SOH\ACK\DC2\EOT\196\EOT\EOT+\n\
    \\r\n\
    \\ENQ\EOT\US\STX\SOH\SOH\DC2\EOT\196\EOT,=\n\
    \\r\n\
    \\ENQ\EOT\US\STX\SOH\ETX\DC2\EOT\196\EOT@A\n\
    \\f\n\
    \\STX\EOT \DC2\ACK\199\EOT\NUL\206\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT \SOH\DC2\EOT\199\EOT\b1\n\
    \X\n\
    \\EOT\EOT \STX\NUL\DC2\EOT\201\EOT\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\NUL\ENQ\DC2\EOT\201\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT \STX\NUL\SOH\DC2\EOT\201\EOT\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT \STX\NUL\ETX\DC2\EOT\201\EOT-.\n\
    \\242\SOH\n\
    \\EOT\EOT \STX\SOH\DC2\EOT\205\EOT\EOT2\SUB\227\SOH If set, update the workflow memo with the provided values. The values will be merged with\n\
    \ the existing memo. If the user wants to delete values, a default/empty Payload should be\n\
    \ used as the value for the key being deleted.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT \STX\SOH\ACK\DC2\EOT\205\EOT\EOT\US\n\
    \\r\n\
    \\ENQ\EOT \STX\SOH\SOH\DC2\EOT\205\EOT -\n\
    \\r\n\
    \\ENQ\EOT \STX\SOH\ETX\DC2\EOT\205\EOT01\n\
    \\f\n\
    \\STX\EOT!\DC2\ACK\208\EOT\NUL\240\EOT\SOH\n\
    \\v\n\
    \\ETX\EOT!\SOH\DC2\EOT\208\EOT\b;\n\
    \\137\SOH\n\
    \\EOT\EOT!\STX\NUL\DC2\EOT\211\EOT\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\ENQ\DC2\EOT\211\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\SOH\DC2\EOT\211\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT!\STX\NUL\ETX\DC2\EOT\211\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT!\STX\SOH\DC2\EOT\212\EOT\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT!\STX\SOH\ENQ\DC2\EOT\212\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\SOH\SOH\DC2\EOT\212\EOT\v\ETB\n\
    \\r\n\
    \\ENQ\EOT!\STX\SOH\ETX\DC2\EOT\212\EOT\SUB\FS\n\
    \\f\n\
    \\EOT\EOT!\STX\STX\DC2\EOT\213\EOT\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT!\STX\STX\ENQ\DC2\EOT\213\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\STX\SOH\DC2\EOT\213\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT!\STX\STX\ETX\DC2\EOT\213\EOT\EM\SUB\n\
    \\f\n\
    \\EOT\EOT!\STX\ETX\DC2\EOT\214\EOT\EOT:\n\
    \\r\n\
    \\ENQ\EOT!\STX\ETX\ACK\DC2\EOT\214\EOT\EOT'\n\
    \\r\n\
    \\ENQ\EOT!\STX\ETX\SOH\DC2\EOT\214\EOT(5\n\
    \\r\n\
    \\ENQ\EOT!\STX\ETX\ETX\DC2\EOT\214\EOT89\n\
    \\f\n\
    \\EOT\EOT!\STX\EOT\DC2\EOT\215\EOT\EOT7\n\
    \\r\n\
    \\ENQ\EOT!\STX\EOT\ACK\DC2\EOT\215\EOT\EOT'\n\
    \\r\n\
    \\ENQ\EOT!\STX\EOT\SOH\DC2\EOT\215\EOT(2\n\
    \\r\n\
    \\ENQ\EOT!\STX\EOT\ETX\DC2\EOT\215\EOT56\n\
    \\f\n\
    \\EOT\EOT!\STX\ENQ\DC2\EOT\216\EOT\EOT.\n\
    \\r\n\
    \\ENQ\EOT!\STX\ENQ\ACK\DC2\EOT\216\EOT\EOT#\n\
    \\r\n\
    \\ENQ\EOT!\STX\ENQ\SOH\DC2\EOT\216\EOT$)\n\
    \\r\n\
    \\ENQ\EOT!\STX\ENQ\ETX\DC2\EOT\216\EOT,-\n\
    \W\n\
    \\EOT\EOT!\STX\ACK\DC2\EOT\218\EOT\EOT<\SUBI Total workflow execution timeout including retries and continue as new.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\ACK\ACK\DC2\EOT\218\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT!\STX\ACK\SOH\DC2\EOT\218\EOT\GS7\n\
    \\r\n\
    \\ENQ\EOT!\STX\ACK\ETX\DC2\EOT\218\EOT:;\n\
    \1\n\
    \\EOT\EOT!\STX\a\DC2\EOT\220\EOT\EOT6\SUB# Timeout of a single workflow run.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\a\ACK\DC2\EOT\220\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT!\STX\a\SOH\DC2\EOT\220\EOT\GS1\n\
    \\r\n\
    \\ENQ\EOT!\STX\a\ETX\DC2\EOT\220\EOT45\n\
    \2\n\
    \\EOT\EOT!\STX\b\DC2\EOT\222\EOT\EOT7\SUB$ Timeout of a single workflow task.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\b\ACK\DC2\EOT\222\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT!\STX\b\SOH\DC2\EOT\222\EOT\GS2\n\
    \\r\n\
    \\ENQ\EOT!\STX\b\ETX\DC2\EOT\222\EOT56\n\
    \7\n\
    \\EOT\EOT!\STX\t\DC2\EOT\224\EOT\EOTD\SUB) Default: PARENT_CLOSE_POLICY_TERMINATE.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\t\ACK\DC2\EOT\224\EOT\EOT+\n\
    \\r\n\
    \\ENQ\EOT!\STX\t\SOH\DC2\EOT\224\EOT,?\n\
    \\r\n\
    \\ENQ\EOT!\STX\t\ETX\DC2\EOT\224\EOTBC\n\
    \\SUB\n\
    \\EOT\EOT!\STX\n\
    \\DC2\EOT\226\EOT\EOT\CAN\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\n\
    \\ENQ\DC2\EOT\226\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\n\
    \\SOH\DC2\EOT\226\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT!\STX\n\
    \\ETX\DC2\EOT\226\EOT\NAK\ETB\n\
    \X\n\
    \\EOT\EOT!\STX\v\DC2\EOT\228\EOT\EOT0\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\v\ENQ\DC2\EOT\228\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT!\STX\v\SOH\DC2\EOT\228\EOT\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT!\STX\v\ETX\DC2\EOT\228\EOT-/\n\
    \B\n\
    \\EOT\EOT!\STX\f\DC2\EOT\230\EOT\EOTN\SUB4 Default: WORKFLOW_ID_REUSE_POLICY_ALLOW_DUPLICATE.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\f\ACK\DC2\EOT\230\EOT\EOT/\n\
    \\r\n\
    \\ENQ\EOT!\STX\f\SOH\DC2\EOT\230\EOT0H\n\
    \\r\n\
    \\ENQ\EOT!\STX\f\ETX\DC2\EOT\230\EOTKM\n\
    \\f\n\
    \\EOT\EOT!\STX\r\DC2\EOT\231\EOT\EOT9\n\
    \\r\n\
    \\ENQ\EOT!\STX\r\ACK\DC2\EOT\231\EOT\EOT&\n\
    \\r\n\
    \\ENQ\EOT!\STX\r\SOH\DC2\EOT\231\EOT'3\n\
    \\r\n\
    \\ENQ\EOT!\STX\r\ETX\DC2\EOT\231\EOT68\n\
    \J\n\
    \\EOT\EOT!\STX\SO\DC2\EOT\233\EOT\EOT\RS\SUB< If this child runs on a cron schedule, it will appear here\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\SO\ENQ\DC2\EOT\233\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\SO\SOH\DC2\EOT\233\EOT\v\CAN\n\
    \\r\n\
    \\ENQ\EOT!\STX\SO\ETX\DC2\EOT\233\EOT\ESC\GS\n\
    \\f\n\
    \\EOT\EOT!\STX\SI\DC2\EOT\234\EOT\EOT.\n\
    \\r\n\
    \\ENQ\EOT!\STX\SI\ACK\DC2\EOT\234\EOT\EOT!\n\
    \\r\n\
    \\ENQ\EOT!\STX\SI\SOH\DC2\EOT\234\EOT\"(\n\
    \\r\n\
    \\ENQ\EOT!\STX\SI\ETX\DC2\EOT\234\EOT+-\n\
    \\f\n\
    \\EOT\EOT!\STX\DLE\DC2\EOT\235\EOT\EOT*\n\
    \\r\n\
    \\ENQ\EOT!\STX\DLE\ACK\DC2\EOT\235\EOT\EOT\US\n\
    \\r\n\
    \\ENQ\EOT!\STX\DLE\SOH\DC2\EOT\235\EOT $\n\
    \\r\n\
    \\ENQ\EOT!\STX\DLE\ETX\DC2\EOT\235\EOT')\n\
    \\f\n\
    \\EOT\EOT!\STX\DC1\DC2\EOT\236\EOT\EOTC\n\
    \\r\n\
    \\ENQ\EOT!\STX\DC1\ACK\DC2\EOT\236\EOT\EOT+\n\
    \\r\n\
    \\ENQ\EOT!\STX\DC1\SOH\DC2\EOT\236\EOT,=\n\
    \\r\n\
    \\ENQ\EOT!\STX\DC1\ETX\DC2\EOT\236\EOT@B\n\
    \\202\SOH\n\
    \\EOT\EOT!\STX\DC2\DC2\EOT\239\EOT\EOT\US\SUB\187\SOH If this is set, the child workflow inherits the Build ID of the parent. Otherwise, the assignment\n\
    \ rules of the child's Task Queue will be used to independently assign a Build ID to it.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT!\STX\DC2\ENQ\DC2\EOT\239\EOT\EOT\b\n\
    \\r\n\
    \\ENQ\EOT!\STX\DC2\SOH\DC2\EOT\239\EOT\t\EM\n\
    \\r\n\
    \\ENQ\EOT!\STX\DC2\ETX\DC2\EOT\239\EOT\FS\RS\n\
    \\f\n\
    \\STX\EOT\"\DC2\ACK\242\EOT\NUL\128\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT\"\SOH\DC2\EOT\242\EOT\b8\n\
    \\137\SOH\n\
    \\EOT\EOT\"\STX\NUL\DC2\EOT\245\EOT\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\NUL\ENQ\DC2\EOT\245\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\NUL\SOH\DC2\EOT\245\EOT\v\DC4\n\
    \\r\n\
    \\ENQ\EOT\"\STX\NUL\ETX\DC2\EOT\245\EOT\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT\"\STX\SOH\DC2\EOT\246\EOT\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT\"\STX\SOH\ENQ\DC2\EOT\246\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\SOH\SOH\DC2\EOT\246\EOT\v\ETB\n\
    \\r\n\
    \\ENQ\EOT\"\STX\SOH\ETX\DC2\EOT\246\EOT\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT\"\STX\STX\DC2\EOT\247\EOT\EOT\ESC\n\
    \\r\n\
    \\ENQ\EOT\"\STX\STX\ENQ\DC2\EOT\247\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\STX\SOH\DC2\EOT\247\EOT\v\SYN\n\
    \\r\n\
    \\ENQ\EOT\"\STX\STX\ETX\DC2\EOT\247\EOT\EM\SUB\n\
    \\f\n\
    \\EOT\EOT\"\STX\ETX\DC2\EOT\248\EOT\EOT:\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ETX\ACK\DC2\EOT\248\EOT\EOT'\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ETX\SOH\DC2\EOT\248\EOT(5\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ETX\ETX\DC2\EOT\248\EOT89\n\
    \\f\n\
    \\EOT\EOT\"\STX\EOT\DC2\EOT\249\EOT\EOTK\n\
    \\r\n\
    \\ENQ\EOT\"\STX\EOT\ACK\DC2\EOT\249\EOT\EOT@\n\
    \\r\n\
    \\ENQ\EOT\"\STX\EOT\SOH\DC2\EOT\249\EOTAF\n\
    \\r\n\
    \\ENQ\EOT\"\STX\EOT\ETX\DC2\EOT\249\EOTIJ\n\
    \\SUB\n\
    \\EOT\EOT\"\STX\ENQ\DC2\EOT\251\EOT\EOT\ETB\SUB\f Deprecated\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ENQ\ENQ\DC2\EOT\251\EOT\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ENQ\SOH\DC2\EOT\251\EOT\v\DC2\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ENQ\ETX\DC2\EOT\251\EOT\NAK\SYN\n\
    \j\n\
    \\EOT\EOT\"\STX\ACK\DC2\EOT\253\EOT\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ACK\ENQ\DC2\EOT\253\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ACK\SOH\DC2\EOT\253\EOT\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT\"\STX\ACK\ETX\DC2\EOT\253\EOT\US \n\
    \X\n\
    \\EOT\EOT\"\STX\a\DC2\EOT\255\EOT\EOT/\SUBJ The `WORKFLOW_TASK_COMPLETED` event which this command was reported with\n\
    \\n\
    \\r\n\
    \\ENQ\EOT\"\STX\a\ENQ\DC2\EOT\255\EOT\EOT\t\n\
    \\r\n\
    \\ENQ\EOT\"\STX\a\SOH\DC2\EOT\255\EOT\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT\"\STX\a\ETX\DC2\EOT\255\EOT-.\n\
    \\f\n\
    \\STX\EOT#\DC2\ACK\130\ENQ\NUL\140\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT#\SOH\DC2\EOT\130\ENQ\b4\n\
    \\137\SOH\n\
    \\EOT\EOT#\STX\NUL\DC2\EOT\133\ENQ\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\ENQ\DC2\EOT\133\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\SOH\DC2\EOT\133\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT#\STX\NUL\ETX\DC2\EOT\133\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT#\STX\SOH\DC2\EOT\134\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT#\STX\SOH\ENQ\DC2\EOT\134\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT#\STX\SOH\SOH\DC2\EOT\134\ENQ\v\ETB\n\
    \\r\n\
    \\ENQ\EOT#\STX\SOH\ETX\DC2\EOT\134\ENQ\SUB\ESC\n\
    \j\n\
    \\EOT\EOT#\STX\STX\DC2\EOT\136\ENQ\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT#\STX\STX\ENQ\DC2\EOT\136\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT#\STX\STX\SOH\DC2\EOT\136\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT#\STX\STX\ETX\DC2\EOT\136\ENQ\US \n\
    \\f\n\
    \\EOT\EOT#\STX\ETX\DC2\EOT\137\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT#\STX\ETX\ACK\DC2\EOT\137\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT#\STX\ETX\SOH\DC2\EOT\137\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT#\STX\ETX\ETX\DC2\EOT\137\ENQBC\n\
    \\f\n\
    \\EOT\EOT#\STX\EOT\DC2\EOT\138\ENQ\EOT:\n\
    \\r\n\
    \\ENQ\EOT#\STX\EOT\ACK\DC2\EOT\138\ENQ\EOT'\n\
    \\r\n\
    \\ENQ\EOT#\STX\EOT\SOH\DC2\EOT\138\ENQ(5\n\
    \\r\n\
    \\ENQ\EOT#\STX\EOT\ETX\DC2\EOT\138\ENQ89\n\
    \\f\n\
    \\EOT\EOT#\STX\ENQ\DC2\EOT\139\ENQ\EOT-\n\
    \\r\n\
    \\ENQ\EOT#\STX\ENQ\ACK\DC2\EOT\139\ENQ\EOT!\n\
    \\r\n\
    \\ENQ\EOT#\STX\ENQ\SOH\DC2\EOT\139\ENQ\"(\n\
    \\r\n\
    \\ENQ\EOT#\STX\ENQ\ETX\DC2\EOT\139\ENQ+,\n\
    \\f\n\
    \\STX\EOT$\DC2\ACK\142\ENQ\NUL\154\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT$\SOH\DC2\EOT\142\ENQ\b6\n\
    \\f\n\
    \\EOT\EOT$\STX\NUL\DC2\EOT\143\ENQ\EOT/\n\
    \\r\n\
    \\ENQ\EOT$\STX\NUL\ACK\DC2\EOT\143\ENQ\EOT#\n\
    \\r\n\
    \\ENQ\EOT$\STX\NUL\SOH\DC2\EOT\143\ENQ$*\n\
    \\r\n\
    \\ENQ\EOT$\STX\NUL\ETX\DC2\EOT\143\ENQ-.\n\
    \\137\SOH\n\
    \\EOT\EOT$\STX\SOH\DC2\EOT\146\ENQ\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\SOH\ENQ\DC2\EOT\146\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\SOH\SOH\DC2\EOT\146\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT$\STX\SOH\ETX\DC2\EOT\146\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT$\STX\STX\DC2\EOT\147\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT$\STX\STX\ENQ\DC2\EOT\147\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\STX\SOH\DC2\EOT\147\ENQ\v\ETB\n\
    \\r\n\
    \\ENQ\EOT$\STX\STX\ETX\DC2\EOT\147\ENQ\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT$\STX\ETX\DC2\EOT\148\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT$\STX\ETX\ACK\DC2\EOT\148\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT$\STX\ETX\SOH\DC2\EOT\148\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT$\STX\ETX\ETX\DC2\EOT\148\ENQBC\n\
    \\f\n\
    \\EOT\EOT$\STX\EOT\DC2\EOT\149\ENQ\EOT:\n\
    \\r\n\
    \\ENQ\EOT$\STX\EOT\ACK\DC2\EOT\149\ENQ\EOT'\n\
    \\r\n\
    \\ENQ\EOT$\STX\EOT\SOH\DC2\EOT\149\ENQ(5\n\
    \\r\n\
    \\ENQ\EOT$\STX\EOT\ETX\DC2\EOT\149\ENQ89\n\
    \j\n\
    \\EOT\EOT$\STX\ENQ\DC2\EOT\151\ENQ\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\ENQ\ENQ\DC2\EOT\151\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT$\STX\ENQ\SOH\DC2\EOT\151\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT$\STX\ENQ\ETX\DC2\EOT\151\ENQ\US \n\
    \b\n\
    \\EOT\EOT$\STX\ACK\DC2\EOT\153\ENQ\EOT\US\SUBT Id of the `CHILD_WORKFLOW_EXECUTION_STARTED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT$\STX\ACK\ENQ\DC2\EOT\153\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT$\STX\ACK\SOH\DC2\EOT\153\ENQ\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT$\STX\ACK\ETX\DC2\EOT\153\ENQ\GS\RS\n\
    \\f\n\
    \\STX\EOT%\DC2\ACK\156\ENQ\NUL\169\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT%\SOH\DC2\EOT\156\ENQ\b3\n\
    \\f\n\
    \\EOT\EOT%\STX\NUL\DC2\EOT\157\ENQ\EOT0\n\
    \\r\n\
    \\ENQ\EOT%\STX\NUL\ACK\DC2\EOT\157\ENQ\EOT#\n\
    \\r\n\
    \\ENQ\EOT%\STX\NUL\SOH\DC2\EOT\157\ENQ$+\n\
    \\r\n\
    \\ENQ\EOT%\STX\NUL\ETX\DC2\EOT\157\ENQ./\n\
    \\137\SOH\n\
    \\EOT\EOT%\STX\SOH\DC2\EOT\160\ENQ\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT%\STX\SOH\ENQ\DC2\EOT\160\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT%\STX\SOH\SOH\DC2\EOT\160\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT%\STX\SOH\ETX\DC2\EOT\160\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT%\STX\STX\DC2\EOT\161\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT%\STX\STX\ENQ\DC2\EOT\161\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT%\STX\STX\SOH\DC2\EOT\161\ENQ\v\ETB\n\
    \\r\n\
    \\ENQ\EOT%\STX\STX\ETX\DC2\EOT\161\ENQ\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT%\STX\ETX\DC2\EOT\162\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT%\STX\ETX\ACK\DC2\EOT\162\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT%\STX\ETX\SOH\DC2\EOT\162\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT%\STX\ETX\ETX\DC2\EOT\162\ENQBC\n\
    \\f\n\
    \\EOT\EOT%\STX\EOT\DC2\EOT\163\ENQ\EOT:\n\
    \\r\n\
    \\ENQ\EOT%\STX\EOT\ACK\DC2\EOT\163\ENQ\EOT'\n\
    \\r\n\
    \\ENQ\EOT%\STX\EOT\SOH\DC2\EOT\163\ENQ(5\n\
    \\r\n\
    \\ENQ\EOT%\STX\EOT\ETX\DC2\EOT\163\ENQ89\n\
    \j\n\
    \\EOT\EOT%\STX\ENQ\DC2\EOT\165\ENQ\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT%\STX\ENQ\ENQ\DC2\EOT\165\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT%\STX\ENQ\SOH\DC2\EOT\165\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT%\STX\ENQ\ETX\DC2\EOT\165\ENQ\US \n\
    \b\n\
    \\EOT\EOT%\STX\ACK\DC2\EOT\167\ENQ\EOT\US\SUBT Id of the `CHILD_WORKFLOW_EXECUTION_STARTED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT%\STX\ACK\ENQ\DC2\EOT\167\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT%\STX\ACK\SOH\DC2\EOT\167\ENQ\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT%\STX\ACK\ETX\DC2\EOT\167\ENQ\GS\RS\n\
    \\f\n\
    \\EOT\EOT%\STX\a\DC2\EOT\168\ENQ\EOT5\n\
    \\r\n\
    \\ENQ\EOT%\STX\a\ACK\DC2\EOT\168\ENQ\EOT$\n\
    \\r\n\
    \\ENQ\EOT%\STX\a\SOH\DC2\EOT\168\ENQ%0\n\
    \\r\n\
    \\ENQ\EOT%\STX\a\ETX\DC2\EOT\168\ENQ34\n\
    \\f\n\
    \\STX\EOT&\DC2\ACK\171\ENQ\NUL\183\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT&\SOH\DC2\EOT\171\ENQ\b5\n\
    \\f\n\
    \\EOT\EOT&\STX\NUL\DC2\EOT\172\ENQ\EOT0\n\
    \\r\n\
    \\ENQ\EOT&\STX\NUL\ACK\DC2\EOT\172\ENQ\EOT#\n\
    \\r\n\
    \\ENQ\EOT&\STX\NUL\SOH\DC2\EOT\172\ENQ$+\n\
    \\r\n\
    \\ENQ\EOT&\STX\NUL\ETX\DC2\EOT\172\ENQ./\n\
    \\137\SOH\n\
    \\EOT\EOT&\STX\SOH\DC2\EOT\175\ENQ\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\SOH\ENQ\DC2\EOT\175\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\SOH\SOH\DC2\EOT\175\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT&\STX\SOH\ETX\DC2\EOT\175\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT&\STX\STX\DC2\EOT\176\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT&\STX\STX\ENQ\DC2\EOT\176\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\STX\SOH\DC2\EOT\176\ENQ\v\ETB\n\
    \\r\n\
    \\ENQ\EOT&\STX\STX\ETX\DC2\EOT\176\ENQ\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT&\STX\ETX\DC2\EOT\177\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT&\STX\ETX\ACK\DC2\EOT\177\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT&\STX\ETX\SOH\DC2\EOT\177\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT&\STX\ETX\ETX\DC2\EOT\177\ENQBC\n\
    \\f\n\
    \\EOT\EOT&\STX\EOT\DC2\EOT\178\ENQ\EOT:\n\
    \\r\n\
    \\ENQ\EOT&\STX\EOT\ACK\DC2\EOT\178\ENQ\EOT'\n\
    \\r\n\
    \\ENQ\EOT&\STX\EOT\SOH\DC2\EOT\178\ENQ(5\n\
    \\r\n\
    \\ENQ\EOT&\STX\EOT\ETX\DC2\EOT\178\ENQ89\n\
    \j\n\
    \\EOT\EOT&\STX\ENQ\DC2\EOT\180\ENQ\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\ENQ\ENQ\DC2\EOT\180\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT&\STX\ENQ\SOH\DC2\EOT\180\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT&\STX\ENQ\ETX\DC2\EOT\180\ENQ\US \n\
    \b\n\
    \\EOT\EOT&\STX\ACK\DC2\EOT\182\ENQ\EOT\US\SUBT Id of the `CHILD_WORKFLOW_EXECUTION_STARTED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT&\STX\ACK\ENQ\DC2\EOT\182\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT&\STX\ACK\SOH\DC2\EOT\182\ENQ\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT&\STX\ACK\ETX\DC2\EOT\182\ENQ\GS\RS\n\
    \\f\n\
    \\STX\EOT'\DC2\ACK\185\ENQ\NUL\197\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT'\SOH\DC2\EOT\185\ENQ\b5\n\
    \\137\SOH\n\
    \\EOT\EOT'\STX\NUL\DC2\EOT\188\ENQ\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT'\STX\NUL\ENQ\DC2\EOT\188\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT'\STX\NUL\SOH\DC2\EOT\188\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT'\STX\NUL\ETX\DC2\EOT\188\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT'\STX\SOH\DC2\EOT\189\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT'\STX\SOH\ENQ\DC2\EOT\189\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT'\STX\SOH\SOH\DC2\EOT\189\ENQ\v\ETB\n\
    \\r\n\
    \\ENQ\EOT'\STX\SOH\ETX\DC2\EOT\189\ENQ\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT'\STX\STX\DC2\EOT\190\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT'\STX\STX\ACK\DC2\EOT\190\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT'\STX\STX\SOH\DC2\EOT\190\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT'\STX\STX\ETX\DC2\EOT\190\ENQBC\n\
    \\f\n\
    \\EOT\EOT'\STX\ETX\DC2\EOT\191\ENQ\EOT:\n\
    \\r\n\
    \\ENQ\EOT'\STX\ETX\ACK\DC2\EOT\191\ENQ\EOT'\n\
    \\r\n\
    \\ENQ\EOT'\STX\ETX\SOH\DC2\EOT\191\ENQ(5\n\
    \\r\n\
    \\ENQ\EOT'\STX\ETX\ETX\DC2\EOT\191\ENQ89\n\
    \j\n\
    \\EOT\EOT'\STX\EOT\DC2\EOT\193\ENQ\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT'\STX\EOT\ENQ\DC2\EOT\193\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT'\STX\EOT\SOH\DC2\EOT\193\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT'\STX\EOT\ETX\DC2\EOT\193\ENQ\US \n\
    \b\n\
    \\EOT\EOT'\STX\ENQ\DC2\EOT\195\ENQ\EOT\US\SUBT Id of the `CHILD_WORKFLOW_EXECUTION_STARTED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT'\STX\ENQ\ENQ\DC2\EOT\195\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT'\STX\ENQ\SOH\DC2\EOT\195\ENQ\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT'\STX\ENQ\ETX\DC2\EOT\195\ENQ\GS\RS\n\
    \\f\n\
    \\EOT\EOT'\STX\ACK\DC2\EOT\196\ENQ\EOT5\n\
    \\r\n\
    \\ENQ\EOT'\STX\ACK\ACK\DC2\EOT\196\ENQ\EOT$\n\
    \\r\n\
    \\ENQ\EOT'\STX\ACK\SOH\DC2\EOT\196\ENQ%0\n\
    \\r\n\
    \\ENQ\EOT'\STX\ACK\ETX\DC2\EOT\196\ENQ34\n\
    \\f\n\
    \\STX\EOT(\DC2\ACK\199\ENQ\NUL\210\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT(\SOH\DC2\EOT\199\ENQ\b7\n\
    \\137\SOH\n\
    \\EOT\EOT(\STX\NUL\DC2\EOT\202\ENQ\EOT\EM\SUB{ Namespace of the child workflow.\n\
    \ SDKs and UI tools should use `namespace` field but server must use `namespace_id` only.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\NUL\ENQ\DC2\EOT\202\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\NUL\SOH\DC2\EOT\202\ENQ\v\DC4\n\
    \\r\n\
    \\ENQ\EOT(\STX\NUL\ETX\DC2\EOT\202\ENQ\ETB\CAN\n\
    \\f\n\
    \\EOT\EOT(\STX\SOH\DC2\EOT\203\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT(\STX\SOH\ENQ\DC2\EOT\203\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\SOH\SOH\DC2\EOT\203\ENQ\v\ETB\n\
    \\r\n\
    \\ENQ\EOT(\STX\SOH\ETX\DC2\EOT\203\ENQ\SUB\ESC\n\
    \\f\n\
    \\EOT\EOT(\STX\STX\DC2\EOT\204\ENQ\EOTD\n\
    \\r\n\
    \\ENQ\EOT(\STX\STX\ACK\DC2\EOT\204\ENQ\EOT,\n\
    \\r\n\
    \\ENQ\EOT(\STX\STX\SOH\DC2\EOT\204\ENQ-?\n\
    \\r\n\
    \\ENQ\EOT(\STX\STX\ETX\DC2\EOT\204\ENQBC\n\
    \\f\n\
    \\EOT\EOT(\STX\ETX\DC2\EOT\205\ENQ\EOT:\n\
    \\r\n\
    \\ENQ\EOT(\STX\ETX\ACK\DC2\EOT\205\ENQ\EOT'\n\
    \\r\n\
    \\ENQ\EOT(\STX\ETX\SOH\DC2\EOT\205\ENQ(5\n\
    \\r\n\
    \\ENQ\EOT(\STX\ETX\ETX\DC2\EOT\205\ENQ89\n\
    \j\n\
    \\EOT\EOT(\STX\EOT\DC2\EOT\207\ENQ\EOT!\SUB\\ Id of the `START_CHILD_WORKFLOW_EXECUTION_INITIATED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\EOT\ENQ\DC2\EOT\207\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT(\STX\EOT\SOH\DC2\EOT\207\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT(\STX\EOT\ETX\DC2\EOT\207\ENQ\US \n\
    \b\n\
    \\EOT\EOT(\STX\ENQ\DC2\EOT\209\ENQ\EOT\US\SUBT Id of the `CHILD_WORKFLOW_EXECUTION_STARTED` event which this event corresponds to\n\
    \\n\
    \\r\n\
    \\ENQ\EOT(\STX\ENQ\ENQ\DC2\EOT\209\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT(\STX\ENQ\SOH\DC2\EOT\209\ENQ\n\
    \\SUB\n\
    \\r\n\
    \\ENQ\EOT(\STX\ENQ\ETX\DC2\EOT\209\ENQ\GS\RS\n\
    \\f\n\
    \\STX\EOT)\DC2\ACK\212\ENQ\NUL\226\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT)\SOH\DC2\EOT\212\ENQ\b;\n\
    \\128\SOH\n\
    \\EOT\EOT)\STX\NUL\DC2\EOT\215\ENQ\EOT\RS\SUBr If set to a nonempty string, future workflow tasks for this workflow shall be dispatched on\n\
    \ the provided queue.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT)\STX\NUL\ENQ\DC2\EOT\215\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT)\STX\NUL\SOH\DC2\EOT\215\ENQ\v\EM\n\
    \\r\n\
    \\ENQ\EOT)\STX\NUL\ETX\DC2\EOT\215\ENQ\FS\GS\n\
    \G\n\
    \\EOT\EOT)\STX\SOH\DC2\EOT\217\ENQ\EOT;\SUB9 If set, update the workflow task timeout to this value.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT)\STX\SOH\ACK\DC2\EOT\217\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT)\STX\SOH\SOH\DC2\EOT\217\ENQ\GS6\n\
    \\r\n\
    \\ENQ\EOT)\STX\SOH\ETX\DC2\EOT\217\ENQ9:\n\
    \f\n\
    \\EOT\EOT)\STX\STX\DC2\EOT\219\ENQ\EOT:\SUBX If set, update the workflow run timeout to this value. May be set to 0 for no timeout.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT)\STX\STX\ACK\DC2\EOT\219\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT)\STX\STX\SOH\DC2\EOT\219\ENQ\GS5\n\
    \\r\n\
    \\ENQ\EOT)\STX\STX\ETX\DC2\EOT\219\ENQ89\n\
    \l\n\
    \\EOT\EOT)\STX\ETX\DC2\EOT\221\ENQ\EOT@\SUB^ If set, update the workflow execution timeout to this value. May be set to 0 for no timeout.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT)\STX\ETX\ACK\DC2\EOT\221\ENQ\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT)\STX\ETX\SOH\DC2\EOT\221\ENQ\GS;\n\
    \\r\n\
    \\ENQ\EOT)\STX\ETX\ETX\DC2\EOT\221\ENQ>?\n\
    \\242\SOH\n\
    \\EOT\EOT)\STX\EOT\DC2\EOT\225\ENQ\EOT2\SUB\227\SOH If set, update the workflow memo with the provided values. The values will be merged with\n\
    \ the existing memo. If the user wants to delete values, a default/empty Payload should be\n\
    \ used as the value for the key being deleted.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT)\STX\EOT\ACK\DC2\EOT\225\ENQ\EOT\US\n\
    \\r\n\
    \\ENQ\EOT)\STX\EOT\SOH\DC2\EOT\225\ENQ -\n\
    \\r\n\
    \\ENQ\EOT)\STX\EOT\ETX\DC2\EOT\225\ENQ01\n\
    \\f\n\
    \\STX\EOT*\DC2\ACK\228\ENQ\NUL\234\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT*\SOH\DC2\EOT\228\ENQ\b;\n\
    \_\n\
    \\EOT\EOT*\STX\NUL\DC2\EOT\230\ENQ\EOT!\SUBQ The id of the `ACTIVITY_TASK_SCHEDULED` event this modification corresponds to.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\NUL\ENQ\DC2\EOT\230\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT*\STX\NUL\SOH\DC2\EOT\230\ENQ\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT*\STX\NUL\ETX\DC2\EOT\230\ENQ\US \n\
    \\156\SOH\n\
    \\EOT\EOT*\STX\SOH\DC2\EOT\233\ENQ\EOT<\SUB\141\SOH If set, update the retry policy of the activity, replacing it with the specified one.\n\
    \ The number of attempts at the activity is preserved.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT*\STX\SOH\ACK\DC2\EOT\233\ENQ\EOT&\n\
    \\r\n\
    \\ENQ\EOT*\STX\SOH\SOH\DC2\EOT\233\ENQ'7\n\
    \\r\n\
    \\ENQ\EOT*\STX\SOH\ETX\DC2\EOT\233\ENQ:;\n\
    \\f\n\
    \\STX\EOT+\DC2\ACK\236\ENQ\NUL\248\ENQ\SOH\n\
    \\v\n\
    \\ETX\EOT+\SOH\DC2\EOT\236\ENQ\b6\n\
    \Q\n\
    \\EOT\EOT+\STX\NUL\DC2\EOT\238\ENQ\EOT$\SUBC The instance ID of the update protocol that generated this event.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT+\STX\NUL\ENQ\DC2\EOT\238\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT+\STX\NUL\SOH\DC2\EOT\238\ENQ\v\US\n\
    \\r\n\
    \\ENQ\EOT+\STX\NUL\ETX\DC2\EOT\238\ENQ\"#\n\
    \\181\SOH\n\
    \\EOT\EOT+\STX\SOH\DC2\EOT\242\ENQ\EOT+\SUB\166\SOH The message ID of the original request message that initiated this\n\
    \ update. Needed so that the worker can recreate and deliver that same\n\
    \ message as part of replay.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT+\STX\SOH\ENQ\DC2\EOT\242\ENQ\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT+\STX\SOH\SOH\DC2\EOT\242\ENQ\v&\n\
    \\r\n\
    \\ENQ\EOT+\STX\SOH\ETX\DC2\EOT\242\ENQ)*\n\
    \K\n\
    \\EOT\EOT+\STX\STX\DC2\EOT\244\ENQ\EOT3\SUB= The event ID used to sequence the original request message.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT+\STX\STX\ENQ\DC2\EOT\244\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT+\STX\STX\SOH\DC2\EOT\244\ENQ\n\
    \.\n\
    \\r\n\
    \\ENQ\EOT+\STX\STX\ETX\DC2\EOT\244\ENQ12\n\
    \`\n\
    \\EOT\EOT+\STX\ETX\DC2\EOT\247\ENQ\EOT8\SUBR The message payload of the original request message that initiated this\n\
    \ update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT+\STX\ETX\ACK\DC2\EOT\247\ENQ\EOT\"\n\
    \\r\n\
    \\ENQ\EOT+\STX\ETX\SOH\DC2\EOT\247\ENQ#3\n\
    \\r\n\
    \\ENQ\EOT+\STX\ETX\ETX\DC2\EOT\247\ENQ67\n\
    \\f\n\
    \\STX\EOT,\DC2\ACK\250\ENQ\NUL\131\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT,\SOH\DC2\EOT\250\ENQ\b7\n\
    \/\n\
    \\EOT\EOT,\STX\NUL\DC2\EOT\252\ENQ\EOT)\SUB! The metadata about this update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\NUL\ACK\DC2\EOT\252\ENQ\EOT\US\n\
    \\r\n\
    \\ENQ\EOT,\STX\NUL\SOH\DC2\EOT\252\ENQ $\n\
    \\r\n\
    \\ENQ\EOT,\STX\NUL\ETX\DC2\EOT\252\ENQ'(\n\
    \F\n\
    \\EOT\EOT,\STX\SOH\DC2\EOT\255\ENQ\EOT \SUB8 The event ID indicating the acceptance of this update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\SOH\ENQ\DC2\EOT\255\ENQ\EOT\t\n\
    \\r\n\
    \\ENQ\EOT,\STX\SOH\SOH\DC2\EOT\255\ENQ\n\
    \\ESC\n\
    \\r\n\
    \\ENQ\EOT,\STX\SOH\ETX\DC2\EOT\255\ENQ\RS\US\n\
    \F\n\
    \\EOT\EOT,\STX\STX\DC2\EOT\130\ACK\EOT/\SUB8 The outcome of executing the workflow update function.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT,\STX\STX\ACK\DC2\EOT\130\ACK\EOT\"\n\
    \\r\n\
    \\ENQ\EOT,\STX\STX\SOH\DC2\EOT\130\ACK#*\n\
    \\r\n\
    \\ENQ\EOT,\STX\STX\ETX\DC2\EOT\130\ACK-.\n\
    \\f\n\
    \\STX\EOT-\DC2\ACK\133\ACK\NUL\147\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT-\SOH\DC2\EOT\133\ACK\b6\n\
    \Q\n\
    \\EOT\EOT-\STX\NUL\DC2\EOT\135\ACK\EOT$\SUBC The instance ID of the update protocol that generated this event.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\NUL\ENQ\DC2\EOT\135\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\NUL\SOH\DC2\EOT\135\ACK\v\US\n\
    \\r\n\
    \\ENQ\EOT-\STX\NUL\ETX\DC2\EOT\135\ACK\"#\n\
    \\181\SOH\n\
    \\EOT\EOT-\STX\SOH\DC2\EOT\139\ACK\EOT+\SUB\166\SOH The message ID of the original request message that initiated this\n\
    \ update. Needed so that the worker can recreate and deliver that same\n\
    \ message as part of replay.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\SOH\ENQ\DC2\EOT\139\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\SOH\SOH\DC2\EOT\139\ACK\v&\n\
    \\r\n\
    \\ENQ\EOT-\STX\SOH\ETX\DC2\EOT\139\ACK)*\n\
    \K\n\
    \\EOT\EOT-\STX\STX\DC2\EOT\141\ACK\EOT3\SUB= The event ID used to sequence the original request message.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\STX\ENQ\DC2\EOT\141\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT-\STX\STX\SOH\DC2\EOT\141\ACK\n\
    \.\n\
    \\r\n\
    \\ENQ\EOT-\STX\STX\ETX\DC2\EOT\141\ACK12\n\
    \`\n\
    \\EOT\EOT-\STX\ETX\DC2\EOT\144\ACK\EOT8\SUBR The message payload of the original request message that initiated this\n\
    \ update.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\ETX\ACK\DC2\EOT\144\ACK\EOT\"\n\
    \\r\n\
    \\ENQ\EOT-\STX\ETX\SOH\DC2\EOT\144\ACK#3\n\
    \\r\n\
    \\ENQ\EOT-\STX\ETX\ETX\DC2\EOT\144\ACK67\n\
    \'\n\
    \\EOT\EOT-\STX\EOT\DC2\EOT\146\ACK\EOT0\SUB\EM The cause of rejection.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT-\STX\EOT\ACK\DC2\EOT\146\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOT-\STX\EOT\SOH\DC2\EOT\146\ACK$+\n\
    \\r\n\
    \\ENQ\EOT-\STX\EOT\ETX\DC2\EOT\146\ACK./\n\
    \\f\n\
    \\STX\EOT.\DC2\ACK\149\ACK\NUL\154\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT.\SOH\DC2\EOT\149\ACK\b6\n\
    \>\n\
    \\EOT\EOT.\STX\NUL\DC2\EOT\151\ACK\EOT/\SUB0 The update request associated with this event.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\NUL\ACK\DC2\EOT\151\ACK\EOT\"\n\
    \\r\n\
    \\ENQ\EOT.\STX\NUL\SOH\DC2\EOT\151\ACK#*\n\
    \\r\n\
    \\ENQ\EOT.\STX\NUL\ETX\DC2\EOT\151\ACK-.\n\
    \H\n\
    \\EOT\EOT.\STX\SOH\DC2\EOT\153\ACK\EOT?\SUB: An explanation of why this event was written to history.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT.\STX\SOH\ACK\DC2\EOT\153\ACK\EOT3\n\
    \\r\n\
    \\ENQ\EOT.\STX\SOH\SOH\DC2\EOT\153\ACK4:\n\
    \\r\n\
    \\ENQ\EOT.\STX\SOH\ETX\DC2\EOT\153\ACK=>\n\
    \s\n\
    \\STX\EOT/\DC2\ACK\157\ACK\NUL\183\ACK\SOH\SUBe Event marking that an operation was scheduled by a workflow via the ScheduleNexusOperation command.\n\
    \\n\
    \\v\n\
    \\ETX\EOT/\SOH\DC2\EOT\157\ACK\b.\n\
    \C\n\
    \\EOT\EOT/\STX\NUL\DC2\EOT\159\ACK\EOT\CAN\SUB5 Endpoint name, must exist in the endpoint registry.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\NUL\ENQ\DC2\EOT\159\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\NUL\SOH\DC2\EOT\159\ACK\v\DC3\n\
    \\r\n\
    \\ENQ\EOT/\STX\NUL\ETX\DC2\EOT\159\ACK\SYN\ETB\n\
    \\GS\n\
    \\EOT\EOT/\STX\SOH\DC2\EOT\161\ACK\EOT\ETB\SUB\SI Service name.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\SOH\ENQ\DC2\EOT\161\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\SOH\SOH\DC2\EOT\161\ACK\v\DC2\n\
    \\r\n\
    \\ENQ\EOT/\STX\SOH\ETX\DC2\EOT\161\ACK\NAK\SYN\n\
    \\US\n\
    \\EOT\EOT/\STX\STX\DC2\EOT\163\ACK\EOT\EM\SUB\DC1 Operation name.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\STX\ENQ\DC2\EOT\163\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\STX\SOH\DC2\EOT\163\ACK\v\DC4\n\
    \\r\n\
    \\ENQ\EOT/\STX\STX\ETX\DC2\EOT\163\ACK\ETB\CAN\n\
    \\188\STX\n\
    \\EOT\EOT/\STX\ETX\DC2\EOT\167\ACK\EOT-\SUB\173\STX Input for the operation. The server converts this into Nexus request content and the appropriate content headers\n\
    \ internally when sending the StartOperation request. On the handler side, if it is also backed by Temporal, the\n\
    \ content is transformed back to the original Payload stored in this event.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\ETX\ACK\DC2\EOT\167\ACK\EOT\"\n\
    \\r\n\
    \\ENQ\EOT/\STX\ETX\SOH\DC2\EOT\167\ACK#(\n\
    \\r\n\
    \\ENQ\EOT/\STX\ETX\ETX\DC2\EOT\167\ACK+,\n\
    \\173\STX\n\
    \\EOT\EOT/\STX\EOT\DC2\EOT\173\ACK\EOT;\SUB\158\STX Schedule-to-close timeout for this operation.\n\
    \ Indicates how long the caller is willing to wait for operation completion.\n\
    \ Calls are retried internally by the server.\n\
    \ (-- api-linter: core::0140::prepositions=disabled\n\
    \     aip.dev/not-precedent: \"to\" is used to indicate interval. --)\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\EOT\ACK\DC2\EOT\173\ACK\EOT\FS\n\
    \\r\n\
    \\ENQ\EOT/\STX\EOT\SOH\DC2\EOT\173\ACK\GS6\n\
    \\r\n\
    \\ENQ\EOT/\STX\EOT\ETX\DC2\EOT\173\ACK9:\n\
    \\254\SOH\n\
    \\EOT\EOT/\STX\ENQ\DC2\EOT\177\ACK\EOT)\SUB\239\SOH Header to attach to the Nexus request. Note these headers are not the same as Temporal headers on internal\n\
    \ activities and child workflows, these are transmitted to Nexus operations that may be external and are not\n\
    \ traditional payloads.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\ENQ\ACK\DC2\EOT\177\ACK\EOT\ETB\n\
    \\r\n\
    \\ENQ\EOT/\STX\ENQ\SOH\DC2\EOT\177\ACK\CAN$\n\
    \\r\n\
    \\ENQ\EOT/\STX\ENQ\ETX\DC2\EOT\177\ACK'(\n\
    \|\n\
    \\EOT\EOT/\STX\ACK\DC2\EOT\179\ACK\EOT/\SUBn The `WORKFLOW_TASK_COMPLETED` event that the corresponding ScheduleNexusOperation command was reported with.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\ACK\ENQ\DC2\EOT\179\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT/\STX\ACK\SOH\DC2\EOT\179\ACK\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT/\STX\ACK\ETX\DC2\EOT\179\ACK-.\n\
    \\195\SOH\n\
    \\EOT\EOT/\STX\a\DC2\EOT\182\ACK\EOT\SUB\SUB\180\SOH A unique ID generated by the history service upon creation of this event.\n\
    \ The ID will be transmitted with all nexus StartOperation requests and is used as an idempotentency key.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\a\ENQ\DC2\EOT\182\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT/\STX\a\SOH\DC2\EOT\182\ACK\v\NAK\n\
    \\r\n\
    \\ENQ\EOT/\STX\a\ETX\DC2\EOT\182\ACK\CAN\EM\n\
    \\230\STX\n\
    \\STX\EOT0\DC2\ACK\189\ACK\NUL\195\ACK\SOH\SUB\215\STX Event marking an asynchronous operation was started by the responding Nexus handler.\n\
    \ If the operation completes synchronously, this event is not generated.\n\
    \ In rare situations, such as request timeouts, the service may fail to record the actual start time and will fabricate\n\
    \ this event upon receiving the operation completion via callback.\n\
    \\n\
    \\v\n\
    \\ETX\EOT0\SOH\DC2\EOT\189\ACK\b,\n\
    \Y\n\
    \\EOT\EOT0\STX\NUL\DC2\EOT\191\ACK\EOT!\SUBK The ID of the `NEXUS_OPERATION_SCHEDULED` event this task corresponds to.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\NUL\ENQ\DC2\EOT\191\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT0\STX\NUL\SOH\DC2\EOT\191\ACK\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT0\STX\NUL\ETX\DC2\EOT\191\ACK\US \n\
    \\157\SOH\n\
    \\EOT\EOT0\STX\SOH\DC2\EOT\194\ACK\EOT\FS\SUB\142\SOH The operation ID returned by the Nexus handler in the response to the StartOperation request.\n\
    \ This ID is used when canceling the operation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\SOH\ENQ\DC2\EOT\194\ACK\EOT\n\
    \\n\
    \\r\n\
    \\ENQ\EOT0\STX\SOH\SOH\DC2\EOT\194\ACK\v\ETB\n\
    \\r\n\
    \\ENQ\EOT0\STX\SOH\ETX\DC2\EOT\194\ACK\SUB\ESC\n\
    \7\n\
    \\STX\EOT1\DC2\ACK\198\ACK\NUL\204\ACK\SOH\SUB) Nexus operation completed successfully.\n\
    \\n\
    \\v\n\
    \\ETX\EOT1\SOH\DC2\EOT\198\ACK\b.\n\
    \d\n\
    \\EOT\EOT1\STX\NUL\DC2\EOT\200\ACK\EOT!\SUBV The ID of the `NEXUS_OPERATION_SCHEDULED` event. Uniquely identifies this operation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT1\STX\NUL\ENQ\DC2\EOT\200\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT1\STX\NUL\SOH\DC2\EOT\200\ACK\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT1\STX\NUL\ETX\DC2\EOT\200\ACK\US \n\
    \\182\SOH\n\
    \\EOT\EOT1\STX\SOH\DC2\EOT\203\ACK\EOT.\SUB\167\SOH Serialized result of the Nexus operation. The response of the Nexus handler.\n\
    \ Delivered either via a completion callback or as a response to a synchronous operation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT1\STX\SOH\ACK\DC2\EOT\203\ACK\EOT\"\n\
    \\r\n\
    \\ENQ\EOT1\STX\SOH\SOH\DC2\EOT\203\ACK#)\n\
    \\r\n\
    \\ENQ\EOT1\STX\SOH\ETX\DC2\EOT\203\ACK,-\n\
    \'\n\
    \\STX\EOT2\DC2\ACK\207\ACK\NUL\212\ACK\SOH\SUB\EM Nexus operation failed.\n\
    \\n\
    \\v\n\
    \\ETX\EOT2\SOH\DC2\EOT\207\ACK\b+\n\
    \d\n\
    \\EOT\EOT2\STX\NUL\DC2\EOT\209\ACK\EOT!\SUBV The ID of the `NEXUS_OPERATION_SCHEDULED` event. Uniquely identifies this operation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT2\STX\NUL\ENQ\DC2\EOT\209\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT2\STX\NUL\SOH\DC2\EOT\209\ACK\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT2\STX\NUL\ETX\DC2\EOT\209\ACK\US \n\
    \`\n\
    \\EOT\EOT2\STX\SOH\DC2\EOT\211\ACK\EOT0\SUBR Failure details. A NexusOperationFailureInfo wrapping an ApplicationFailureInfo.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT2\STX\SOH\ACK\DC2\EOT\211\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOT2\STX\SOH\SOH\DC2\EOT\211\ACK$+\n\
    \\r\n\
    \\ENQ\EOT2\STX\SOH\ETX\DC2\EOT\211\ACK./\n\
    \*\n\
    \\STX\EOT3\DC2\ACK\215\ACK\NUL\220\ACK\SOH\SUB\FS Nexus operation timed out.\n\
    \\n\
    \\v\n\
    \\ETX\EOT3\SOH\DC2\EOT\215\ACK\b-\n\
    \d\n\
    \\EOT\EOT3\STX\NUL\DC2\EOT\217\ACK\EOT!\SUBV The ID of the `NEXUS_OPERATION_SCHEDULED` event. Uniquely identifies this operation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT3\STX\NUL\ENQ\DC2\EOT\217\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT3\STX\NUL\SOH\DC2\EOT\217\ACK\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT3\STX\NUL\ETX\DC2\EOT\217\ACK\US \n\
    \\\\n\
    \\EOT\EOT3\STX\SOH\DC2\EOT\219\ACK\EOT0\SUBN Failure details. A NexusOperationFailureInfo wrapping a CanceledFailureInfo.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT3\STX\SOH\ACK\DC2\EOT\219\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOT3\STX\SOH\SOH\DC2\EOT\219\ACK$+\n\
    \\r\n\
    \\ENQ\EOT3\STX\SOH\ETX\DC2\EOT\219\ACK./\n\
    \~\n\
    \\STX\EOT4\DC2\ACK\223\ACK\NUL\228\ACK\SOH\SUBp Nexus operation completed as canceled. May or may not have been due to a cancellation request by the workflow.\n\
    \\n\
    \\v\n\
    \\ETX\EOT4\SOH\DC2\EOT\223\ACK\b-\n\
    \d\n\
    \\EOT\EOT4\STX\NUL\DC2\EOT\225\ACK\EOT!\SUBV The ID of the `NEXUS_OPERATION_SCHEDULED` event. Uniquely identifies this operation.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT4\STX\NUL\ENQ\DC2\EOT\225\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT4\STX\NUL\SOH\DC2\EOT\225\ACK\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT4\STX\NUL\ETX\DC2\EOT\225\ACK\US \n\
    \%\n\
    \\EOT\EOT4\STX\SOH\DC2\EOT\227\ACK\EOT0\SUB\ETB Cancellation details.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT4\STX\SOH\ACK\DC2\EOT\227\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOT4\STX\SOH\SOH\DC2\EOT\227\ACK$+\n\
    \\r\n\
    \\ENQ\EOT4\STX\SOH\ETX\DC2\EOT\227\ACK./\n\
    \\f\n\
    \\STX\EOT5\DC2\ACK\230\ACK\NUL\236\ACK\SOH\n\
    \\v\n\
    \\ETX\EOT5\SOH\DC2\EOT\230\ACK\b4\n\
    \c\n\
    \\EOT\EOT5\STX\NUL\DC2\EOT\232\ACK\EOT!\SUBU The id of the `NEXUS_OPERATION_SCHEDULED` event this cancel request corresponds to.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\ENQ\DC2\EOT\232\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\SOH\DC2\EOT\232\ACK\n\
    \\FS\n\
    \\r\n\
    \\ENQ\EOT5\STX\NUL\ETX\DC2\EOT\232\ACK\US \n\
    \\130\SOH\n\
    \\EOT\EOT5\STX\SOH\DC2\EOT\235\ACK\EOT/\SUBt The `WORKFLOW_TASK_COMPLETED` event that the corresponding RequestCancelNexusOperation command was reported\n\
    \ with.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT5\STX\SOH\ENQ\DC2\EOT\235\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT5\STX\SOH\SOH\DC2\EOT\235\ACK\n\
    \*\n\
    \\r\n\
    \\ENQ\EOT5\STX\SOH\ETX\DC2\EOT\235\ACK-.\n\
    \\177\SOH\n\
    \\STX\EOT6\DC2\ACK\240\ACK\NUL\183\a\SOH\SUB\162\SOH History events are the method by which Temporal SDKs advance (or recreate) workflow state.\n\
    \ See the `EventType` enum for more info about what each event is for.\n\
    \\n\
    \\v\n\
    \\ETX\EOT6\SOH\DC2\EOT\240\ACK\b\DC4\n\
    \C\n\
    \\EOT\EOT6\STX\NUL\DC2\EOT\242\ACK\EOT\ETB\SUB5 Monotonically increasing event number, starts at 1.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT6\STX\NUL\ENQ\DC2\EOT\242\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT6\STX\NUL\SOH\DC2\EOT\242\ACK\n\
    \\DC2\n\
    \\r\n\
    \\ENQ\EOT6\STX\NUL\ETX\DC2\EOT\242\ACK\NAK\SYN\n\
    \\f\n\
    \\EOT\EOT6\STX\SOH\DC2\EOT\243\ACK\EOT-\n\
    \\r\n\
    \\ENQ\EOT6\STX\SOH\ACK\DC2\EOT\243\ACK\EOT\GS\n\
    \\r\n\
    \\ENQ\EOT6\STX\SOH\SOH\DC2\EOT\243\ACK\RS(\n\
    \\r\n\
    \\ENQ\EOT6\STX\SOH\ETX\DC2\EOT\243\ACK+,\n\
    \\f\n\
    \\EOT\EOT6\STX\STX\DC2\EOT\244\ACK\EOT3\n\
    \\r\n\
    \\ENQ\EOT6\STX\STX\ACK\DC2\EOT\244\ACK\EOT#\n\
    \\r\n\
    \\ENQ\EOT6\STX\STX\SOH\DC2\EOT\244\ACK$.\n\
    \\r\n\
    \\ENQ\EOT6\STX\STX\ETX\DC2\EOT\244\ACK12\n\
    \:\n\
    \\EOT\EOT6\STX\ETX\DC2\EOT\246\ACK\EOT\SYN\SUB, TODO: What is this? Appears unused by SDKs\n\
    \\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETX\ENQ\DC2\EOT\246\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETX\SOH\DC2\EOT\246\ACK\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETX\ETX\DC2\EOT\246\ACK\DC4\NAK\n\
    \:\n\
    \\EOT\EOT6\STX\EOT\DC2\EOT\248\ACK\EOT\SYN\SUB, TODO: What is this? Appears unused by SDKs\n\
    \\n\
    \\r\n\
    \\ENQ\EOT6\STX\EOT\ENQ\DC2\EOT\248\ACK\EOT\t\n\
    \\r\n\
    \\ENQ\EOT6\STX\EOT\SOH\DC2\EOT\248\ACK\n\
    \\DC1\n\
    \\r\n\
    \\ENQ\EOT6\STX\EOT\ETX\DC2\EOT\248\ACK\DC4\NAK\n\
    \\228\STX\n\
    \\EOT\EOT6\STX\ENQ\DC2\EOT\253\ACK\EOT!\SUB\213\STX Set to true when the SDK may ignore the event as it does not impact workflow state or\n\
    \ information in any way that the SDK need be concerned with. If an SDK encounters an event\n\
    \ type which it does not understand, it must error unless this is true. If it is true, it's\n\
    \ acceptable for the event type and/or attributes to be uninterpretable.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT6\STX\ENQ\ENQ\DC2\EOT\253\ACK\EOT\b\n\
    \\r\n\
    \\ENQ\EOT6\STX\ENQ\SOH\DC2\EOT\253\ACK\t\SUB\n\
    \\r\n\
    \\ENQ\EOT6\STX\ENQ\ETX\DC2\EOT\253\ACK\GS \n\
    \N\n\
    \\EOT\EOT6\b\NUL\DC2\ACK\255\ACK\EOT\182\a\ENQ\SUB> The event details. The type must match that in `event_type`.\n\
    \\n\
    \\r\n\
    \\ENQ\EOT6\b\NUL\SOH\DC2\EOT\255\ACK\n\
    \\DC4\n\
    \\f\n\
    \\EOT\EOT6\STX\ACK\DC2\EOT\128\a\b`\n\
    \\r\n\
    \\ENQ\EOT6\STX\ACK\ACK\DC2\EOT\128\a\b/\n\
    \\r\n\
    \\ENQ\EOT6\STX\ACK\SOH\DC2\EOT\128\a0[\n\
    \\r\n\
    \\ENQ\EOT6\STX\ACK\ETX\DC2\EOT\128\a^_\n\
    \\f\n\
    \\EOT\EOT6\STX\a\DC2\EOT\129\a\bd\n\
    \\r\n\
    \\ENQ\EOT6\STX\a\ACK\DC2\EOT\129\a\b1\n\
    \\r\n\
    \\ENQ\EOT6\STX\a\SOH\DC2\EOT\129\a2_\n\
    \\r\n\
    \\ENQ\EOT6\STX\a\ETX\DC2\EOT\129\abc\n\
    \\f\n\
    \\EOT\EOT6\STX\b\DC2\EOT\130\a\b^\n\
    \\r\n\
    \\ENQ\EOT6\STX\b\ACK\DC2\EOT\130\a\b.\n\
    \\r\n\
    \\ENQ\EOT6\STX\b\SOH\DC2\EOT\130\a/Y\n\
    \\r\n\
    \\ENQ\EOT6\STX\b\ETX\DC2\EOT\130\a\\]\n\
    \\f\n\
    \\EOT\EOT6\STX\t\DC2\EOT\131\a\bc\n\
    \\r\n\
    \\ENQ\EOT6\STX\t\ACK\DC2\EOT\131\a\b0\n\
    \\r\n\
    \\ENQ\EOT6\STX\t\SOH\DC2\EOT\131\a1^\n\
    \\r\n\
    \\ENQ\EOT6\STX\t\ETX\DC2\EOT\131\aab\n\
    \\f\n\
    \\EOT\EOT6\STX\n\
    \\DC2\EOT\132\a\b[\n\
    \\r\n\
    \\ENQ\EOT6\STX\n\
    \\ACK\DC2\EOT\132\a\b,\n\
    \\r\n\
    \\ENQ\EOT6\STX\n\
    \\SOH\DC2\EOT\132\a-U\n\
    \\r\n\
    \\ENQ\EOT6\STX\n\
    \\ETX\DC2\EOT\132\aXZ\n\
    \\f\n\
    \\EOT\EOT6\STX\v\DC2\EOT\133\a\bW\n\
    \\r\n\
    \\ENQ\EOT6\STX\v\ACK\DC2\EOT\133\a\b*\n\
    \\r\n\
    \\ENQ\EOT6\STX\v\SOH\DC2\EOT\133\a+Q\n\
    \\r\n\
    \\ENQ\EOT6\STX\v\ETX\DC2\EOT\133\aTV\n\
    \\f\n\
    \\EOT\EOT6\STX\f\DC2\EOT\134\a\b[\n\
    \\r\n\
    \\ENQ\EOT6\STX\f\ACK\DC2\EOT\134\a\b,\n\
    \\r\n\
    \\ENQ\EOT6\STX\f\SOH\DC2\EOT\134\a-U\n\
    \\r\n\
    \\ENQ\EOT6\STX\f\ETX\DC2\EOT\134\aXZ\n\
    \\f\n\
    \\EOT\EOT6\STX\r\DC2\EOT\135\a\bZ\n\
    \\r\n\
    \\ENQ\EOT6\STX\r\ACK\DC2\EOT\135\a\b+\n\
    \\r\n\
    \\ENQ\EOT6\STX\r\SOH\DC2\EOT\135\a,T\n\
    \\r\n\
    \\ENQ\EOT6\STX\r\ETX\DC2\EOT\135\aWY\n\
    \\f\n\
    \\EOT\EOT6\STX\SO\DC2\EOT\136\a\bU\n\
    \\r\n\
    \\ENQ\EOT6\STX\SO\ACK\DC2\EOT\136\a\b)\n\
    \\r\n\
    \\ENQ\EOT6\STX\SO\SOH\DC2\EOT\136\a*O\n\
    \\r\n\
    \\ENQ\EOT6\STX\SO\ETX\DC2\EOT\136\aRT\n\
    \\f\n\
    \\EOT\EOT6\STX\SI\DC2\EOT\137\a\b[\n\
    \\r\n\
    \\ENQ\EOT6\STX\SI\ACK\DC2\EOT\137\a\b,\n\
    \\r\n\
    \\ENQ\EOT6\STX\SI\SOH\DC2\EOT\137\a-U\n\
    \\r\n\
    \\ENQ\EOT6\STX\SI\ETX\DC2\EOT\137\aXZ\n\
    \\f\n\
    \\EOT\EOT6\STX\DLE\DC2\EOT\138\a\bW\n\
    \\r\n\
    \\ENQ\EOT6\STX\DLE\ACK\DC2\EOT\138\a\b*\n\
    \\r\n\
    \\ENQ\EOT6\STX\DLE\SOH\DC2\EOT\138\a+Q\n\
    \\r\n\
    \\ENQ\EOT6\STX\DLE\ETX\DC2\EOT\138\aTV\n\
    \\f\n\
    \\EOT\EOT6\STX\DC1\DC2\EOT\139\a\b[\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC1\ACK\DC2\EOT\139\a\b,\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC1\SOH\DC2\EOT\139\a-U\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC1\ETX\DC2\EOT\139\aXZ\n\
    \\f\n\
    \\EOT\EOT6\STX\DC2\DC2\EOT\140\a\bU\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC2\ACK\DC2\EOT\140\a\b)\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC2\SOH\DC2\EOT\140\a*O\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC2\ETX\DC2\EOT\140\aRT\n\
    \\f\n\
    \\EOT\EOT6\STX\DC3\DC2\EOT\141\a\bZ\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC3\ACK\DC2\EOT\141\a\b+\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC3\SOH\DC2\EOT\141\a,T\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC3\ETX\DC2\EOT\141\aWY\n\
    \\f\n\
    \\EOT\EOT6\STX\DC4\DC2\EOT\142\a\bH\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC4\ACK\DC2\EOT\142\a\b#\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC4\SOH\DC2\EOT\142\a$B\n\
    \\r\n\
    \\ENQ\EOT6\STX\DC4\ETX\DC2\EOT\142\aEG\n\
    \\f\n\
    \\EOT\EOT6\STX\NAK\DC2\EOT\143\a\bD\n\
    \\r\n\
    \\ENQ\EOT6\STX\NAK\ACK\DC2\EOT\143\a\b!\n\
    \\r\n\
    \\ENQ\EOT6\STX\NAK\SOH\DC2\EOT\143\a\">\n\
    \\r\n\
    \\ENQ\EOT6\STX\NAK\ETX\DC2\EOT\143\aAC\n\
    \\f\n\
    \\EOT\EOT6\STX\SYN\DC2\EOT\144\a\bh\n\
    \\r\n\
    \\ENQ\EOT6\STX\SYN\ACK\DC2\EOT\144\a\b2\n\
    \\r\n\
    \\ENQ\EOT6\STX\SYN\SOH\DC2\EOT\144\a3b\n\
    \\r\n\
    \\ENQ\EOT6\STX\SYN\ETX\DC2\EOT\144\aeg\n\
    \\f\n\
    \\EOT\EOT6\STX\ETB\DC2\EOT\145\a\bY\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETB\ACK\DC2\EOT\145\a\b+\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETB\SOH\DC2\EOT\145\a,S\n\
    \\r\n\
    \\ENQ\EOT6\STX\ETB\ETX\DC2\EOT\145\aVX\n\
    \\f\n\
    \\EOT\EOT6\STX\CAN\DC2\EOT\146\a\bJ\n\
    \\r\n\
    \\ENQ\EOT6\STX\CAN\ACK\DC2\EOT\146\a\b$\n\
    \\r\n\
    \\ENQ\EOT6\STX\CAN\SOH\DC2\EOT\146\a%D\n\
    \\r\n\
    \\ENQ\EOT6\STX\CAN\ETX\DC2\EOT\146\aGI\n\
    \\f\n\
    \\EOT\EOT6\STX\EM\DC2\EOT\147\a\bL\n\
    \\r\n\
    \\ENQ\EOT6\STX\EM\ACK\DC2\EOT\147\a\b%\n\
    \\r\n\
    \\ENQ\EOT6\STX\EM\SOH\DC2\EOT\147\a&F\n\
    \\r\n\
    \\ENQ\EOT6\STX\EM\ETX\DC2\EOT\147\aIK\n\
    \\f\n\
    \\EOT\EOT6\STX\SUB\DC2\EOT\148\a\bc\n\
    \\r\n\
    \\ENQ\EOT6\STX\SUB\ACK\DC2\EOT\148\a\b0\n\
    \\r\n\
    \\ENQ\EOT6\STX\SUB\SOH\DC2\EOT\148\a1]\n\
    \\r\n\
    \\ENQ\EOT6\STX\SUB\ETX\DC2\EOT\148\a`b\n\
    \\f\n\
    \\EOT\EOT6\STX\ESC\DC2\EOT\149\a\bg\n\
    \\r\n\
    \\ENQ\EOT6\STX\ESC\ACK\DC2\EOT\149\a\b2\n\
    \\r\n\
    \\ENQ\EOT6\STX\ESC\SOH\DC2\EOT\149\a3a\n\
    \\r\n\
    \\ENQ\EOT6\STX\ESC\ETX\DC2\EOT\149\adf\n\
    \\f\n\
    \\EOT\EOT6\STX\FS\DC2\EOT\150\a\br\n\
    \\r\n\
    \\ENQ\EOT6\STX\FS\ACK\DC2\EOT\150\a\b7\n\
    \\r\n\
    \\ENQ\EOT6\STX\FS\SOH\DC2\EOT\150\a8l\n\
    \\r\n\
    \\ENQ\EOT6\STX\FS\ETX\DC2\EOT\150\aoq\n\
    \\f\n\
    \\EOT\EOT6\STX\GS\DC2\EOT\151\a\bc\n\
    \\r\n\
    \\ENQ\EOT6\STX\GS\ACK\DC2\EOT\151\a\b0\n\
    \\r\n\
    \\ENQ\EOT6\STX\GS\SOH\DC2\EOT\151\a1]\n\
    \\r\n\
    \\ENQ\EOT6\STX\GS\ETX\DC2\EOT\151\a`b\n\
    \\r\n\
    \\EOT\EOT6\STX\RS\DC2\ENQ\152\a\b\146\SOH\n\
    \\r\n\
    \\ENQ\EOT6\STX\RS\ACK\DC2\EOT\152\a\bF\n\
    \\SO\n\
    \\ENQ\EOT6\STX\RS\SOH\DC2\ENQ\152\aG\140\SOH\n\
    \\SI\n\
    \\ENQ\EOT6\STX\RS\ETX\DC2\ACK\152\a\143\SOH\145\SOH\n\
    \\r\n\
    \\EOT\EOT6\STX\US\DC2\ENQ\153\a\b\140\SOH\n\
    \\r\n\
    \\ENQ\EOT6\STX\US\ACK\DC2\EOT\153\a\bC\n\
    \\SO\n\
    \\ENQ\EOT6\STX\US\SOH\DC2\ENQ\153\aD\134\SOH\n\
    \\SI\n\
    \\ENQ\EOT6\STX\US\ETX\DC2\ACK\153\a\137\SOH\139\SOH\n\
    \\r\n\
    \\EOT\EOT6\STX \DC2\ENQ\154\a\b\131\SOH\n\
    \\r\n\
    \\ENQ\EOT6\STX \ACK\DC2\EOT\154\a\b?\n\
    \\r\n\
    \\ENQ\EOT6\STX \SOH\DC2\EOT\154\a@}\n\
    \\SI\n\
    \\ENQ\EOT6\STX \ETX\DC2\ACK\154\a\128\SOH\130\SOH\n\
    \\f\n\
    \\EOT\EOT6\STX!\DC2\EOT\155\a\bq\n\
    \\r\n\
    \\ENQ\EOT6\STX!\ACK\DC2\EOT\155\a\b6\n\
    \\r\n\
    \\ENQ\EOT6\STX!\SOH\DC2\EOT\155\a7k\n\
    \\r\n\
    \\ENQ\EOT6\STX!\ETX\DC2\EOT\155\anp\n\
    \\f\n\
    \\EOT\EOT6\STX\"\DC2\EOT\156\a\b{\n\
    \\r\n\
    \\ENQ\EOT6\STX\"\ACK\DC2\EOT\156\a\b;\n\
    \\r\n\
    \\ENQ\EOT6\STX\"\SOH\DC2\EOT\156\a<u\n\
    \\r\n\
    \\ENQ\EOT6\STX\"\ETX\DC2\EOT\156\axz\n\
    \\f\n\
    \\EOT\EOT6\STX#\DC2\EOT\157\a\bu\n\
    \\r\n\
    \\ENQ\EOT6\STX#\ACK\DC2\EOT\157\a\b8\n\
    \\r\n\
    \\ENQ\EOT6\STX#\SOH\DC2\EOT\157\a9o\n\
    \\r\n\
    \\ENQ\EOT6\STX#\ETX\DC2\EOT\157\art\n\
    \\f\n\
    \\EOT\EOT6\STX$\DC2\EOT\158\a\bl\n\
    \\r\n\
    \\ENQ\EOT6\STX$\ACK\DC2\EOT\158\a\b4\n\
    \\r\n\
    \\ENQ\EOT6\STX$\SOH\DC2\EOT\158\a5f\n\
    \\r\n\
    \\ENQ\EOT6\STX$\ETX\DC2\EOT\158\aik\n\
    \\f\n\
    \\EOT\EOT6\STX%\DC2\EOT\159\a\bp\n\
    \\r\n\
    \\ENQ\EOT6\STX%\ACK\DC2\EOT\159\a\b6\n\
    \\r\n\
    \\ENQ\EOT6\STX%\SOH\DC2\EOT\159\a7j\n\
    \\r\n\
    \\ENQ\EOT6\STX%\ETX\DC2\EOT\159\amo\n\
    \\f\n\
    \\EOT\EOT6\STX&\DC2\EOT\160\a\bj\n\
    \\r\n\
    \\ENQ\EOT6\STX&\ACK\DC2\EOT\160\a\b3\n\
    \\r\n\
    \\ENQ\EOT6\STX&\SOH\DC2\EOT\160\a4d\n\
    \\r\n\
    \\ENQ\EOT6\STX&\ETX\DC2\EOT\160\agi\n\
    \\f\n\
    \\EOT\EOT6\STX'\DC2\EOT\161\a\bn\n\
    \\r\n\
    \\ENQ\EOT6\STX'\ACK\DC2\EOT\161\a\b5\n\
    \\r\n\
    \\ENQ\EOT6\STX'\SOH\DC2\EOT\161\a6h\n\
    \\r\n\
    \\ENQ\EOT6\STX'\ETX\DC2\EOT\161\akm\n\
    \\f\n\
    \\EOT\EOT6\STX(\DC2\EOT\162\a\bo\n\
    \\r\n\
    \\ENQ\EOT6\STX(\ACK\DC2\EOT\162\a\b5\n\
    \\r\n\
    \\ENQ\EOT6\STX(\SOH\DC2\EOT\162\a6i\n\
    \\r\n\
    \\ENQ\EOT6\STX(\ETX\DC2\EOT\162\aln\n\
    \\f\n\
    \\EOT\EOT6\STX)\DC2\EOT\163\a\br\n\
    \\r\n\
    \\ENQ\EOT6\STX)\ACK\DC2\EOT\163\a\b7\n\
    \\r\n\
    \\ENQ\EOT6\STX)\SOH\DC2\EOT\163\a8l\n\
    \\r\n\
    \\ENQ\EOT6\STX)\ETX\DC2\EOT\163\aoq\n\
    \\r\n\
    \\EOT\EOT6\STX*\DC2\ENQ\164\a\b\131\SOH\n\
    \\r\n\
    \\ENQ\EOT6\STX*\ACK\DC2\EOT\164\a\b?\n\
    \\r\n\
    \\ENQ\EOT6\STX*\SOH\DC2\EOT\164\a@}\n\
    \\SI\n\
    \\ENQ\EOT6\STX*\ETX\DC2\ACK\164\a\128\SOH\130\SOH\n\
    \\f\n\
    \\EOT\EOT6\STX+\DC2\EOT\165\a\b}\n\
    \\r\n\
    \\ENQ\EOT6\STX+\ACK\DC2\EOT\165\a\b<\n\
    \\r\n\
    \\ENQ\EOT6\STX+\SOH\DC2\EOT\165\a=w\n\
    \\r\n\
    \\ENQ\EOT6\STX+\ETX\DC2\EOT\165\az|\n\
    \\f\n\
    \\EOT\EOT6\STX,\DC2\EOT\166\a\bt\n\
    \\r\n\
    \\ENQ\EOT6\STX,\ACK\DC2\EOT\166\a\b8\n\
    \\r\n\
    \\ENQ\EOT6\STX,\SOH\DC2\EOT\166\a9n\n\
    \\r\n\
    \\ENQ\EOT6\STX,\ETX\DC2\EOT\166\aqs\n\
    \\f\n\
    \\EOT\EOT6\STX-\DC2\EOT\167\a\bn\n\
    \\r\n\
    \\ENQ\EOT6\STX-\ACK\DC2\EOT\167\a\b5\n\
    \\r\n\
    \\ENQ\EOT6\STX-\SOH\DC2\EOT\167\a6h\n\
    \\r\n\
    \\ENQ\EOT6\STX-\ETX\DC2\EOT\167\akm\n\
    \\f\n\
    \\EOT\EOT6\STX.\DC2\EOT\168\a\bp\n\
    \\r\n\
    \\ENQ\EOT6\STX.\ACK\DC2\EOT\168\a\b6\n\
    \\r\n\
    \\ENQ\EOT6\STX.\SOH\DC2\EOT\168\a7j\n\
    \\r\n\
    \\ENQ\EOT6\STX.\ETX\DC2\EOT\168\amo\n\
    \\f\n\
    \\EOT\EOT6\STX/\DC2\EOT\169\a\bp\n\
    \\r\n\
    \\ENQ\EOT6\STX/\ACK\DC2\EOT\169\a\b6\n\
    \\r\n\
    \\ENQ\EOT6\STX/\SOH\DC2\EOT\169\a7j\n\
    \\r\n\
    \\ENQ\EOT6\STX/\ETX\DC2\EOT\169\amo\n\
    \\f\n\
    \\EOT\EOT6\STX0\DC2\EOT\170\a\br\n\
    \\r\n\
    \\ENQ\EOT6\STX0\ACK\DC2\EOT\170\a\b7\n\
    \\r\n\
    \\ENQ\EOT6\STX0\SOH\DC2\EOT\170\a8l\n\
    \\r\n\
    \\ENQ\EOT6\STX0\ETX\DC2\EOT\170\aoq\n\
    \\f\n\
    \\EOT\EOT6\STX1\DC2\EOT\171\a\bz\n\
    \\r\n\
    \\ENQ\EOT6\STX1\ACK\DC2\EOT\171\a\b;\n\
    \\r\n\
    \\ENQ\EOT6\STX1\SOH\DC2\EOT\171\a<t\n\
    \\r\n\
    \\ENQ\EOT6\STX1\ETX\DC2\EOT\171\awy\n\
    \\f\n\
    \\EOT\EOT6\STX2\DC2\EOT\172\a\bz\n\
    \\r\n\
    \\ENQ\EOT6\STX2\ACK\DC2\EOT\172\a\b;\n\
    \\r\n\
    \\ENQ\EOT6\STX2\SOH\DC2\EOT\172\a<t\n\
    \\r\n\
    \\ENQ\EOT6\STX2\ETX\DC2\EOT\172\awy\n\
    \\f\n\
    \\EOT\EOT6\STX3\DC2\EOT\173\a\be\n\
    \\r\n\
    \\ENQ\EOT6\STX3\ACK\DC2\EOT\173\a\b1\n\
    \\r\n\
    \\ENQ\EOT6\STX3\SOH\DC2\EOT\173\a2_\n\
    \\r\n\
    \\ENQ\EOT6\STX3\ETX\DC2\EOT\173\abd\n\
    \\f\n\
    \\EOT\EOT6\STX4\DC2\EOT\174\a\bp\n\
    \\r\n\
    \\ENQ\EOT6\STX4\ACK\DC2\EOT\174\a\b6\n\
    \\r\n\
    \\ENQ\EOT6\STX4\SOH\DC2\EOT\174\a7j\n\
    \\r\n\
    \\ENQ\EOT6\STX4\ETX\DC2\EOT\174\amo\n\
    \\f\n\
    \\EOT\EOT6\STX5\DC2\EOT\175\a\b_\n\
    \\r\n\
    \\ENQ\EOT6\STX5\ACK\DC2\EOT\175\a\b.\n\
    \\r\n\
    \\ENQ\EOT6\STX5\SOH\DC2\EOT\175\a/Y\n\
    \\r\n\
    \\ENQ\EOT6\STX5\ETX\DC2\EOT\175\a\\^\n\
    \\f\n\
    \\EOT\EOT6\STX6\DC2\EOT\176\a\b[\n\
    \\r\n\
    \\ENQ\EOT6\STX6\ACK\DC2\EOT\176\a\b,\n\
    \\r\n\
    \\ENQ\EOT6\STX6\SOH\DC2\EOT\176\a-U\n\
    \\r\n\
    \\ENQ\EOT6\STX6\ETX\DC2\EOT\176\aXZ\n\
    \\f\n\
    \\EOT\EOT6\STX7\DC2\EOT\177\a\b_\n\
    \\r\n\
    \\ENQ\EOT6\STX7\ACK\DC2\EOT\177\a\b.\n\
    \\r\n\
    \\ENQ\EOT6\STX7\SOH\DC2\EOT\177\a/Y\n\
    \\r\n\
    \\ENQ\EOT6\STX7\ETX\DC2\EOT\177\a\\^\n\
    \\f\n\
    \\EOT\EOT6\STX8\DC2\EOT\178\a\bY\n\
    \\r\n\
    \\ENQ\EOT6\STX8\ACK\DC2\EOT\178\a\b+\n\
    \\r\n\
    \\ENQ\EOT6\STX8\SOH\DC2\EOT\178\a,S\n\
    \\r\n\
    \\ENQ\EOT6\STX8\ETX\DC2\EOT\178\aVX\n\
    \\f\n\
    \\EOT\EOT6\STX9\DC2\EOT\179\a\b]\n\
    \\r\n\
    \\ENQ\EOT6\STX9\ACK\DC2\EOT\179\a\b-\n\
    \\r\n\
    \\ENQ\EOT6\STX9\SOH\DC2\EOT\179\a.W\n\
    \\r\n\
    \\ENQ\EOT6\STX9\ETX\DC2\EOT\179\aZ\\\n\
    \\f\n\
    \\EOT\EOT6\STX:\DC2\EOT\180\a\b^\n\
    \\r\n\
    \\ENQ\EOT6\STX:\ACK\DC2\EOT\180\a\b-\n\
    \\r\n\
    \\ENQ\EOT6\STX:\SOH\DC2\EOT\180\a.X\n\
    \\r\n\
    \\ENQ\EOT6\STX:\ETX\DC2\EOT\180\a[]\n\
    \\f\n\
    \\EOT\EOT6\STX;\DC2\EOT\181\a\bl\n\
    \\r\n\
    \\ENQ\EOT6\STX;\ACK\DC2\EOT\181\a\b4\n\
    \\r\n\
    \\ENQ\EOT6\STX;\SOH\DC2\EOT\181\a5f\n\
    \\r\n\
    \\ENQ\EOT6\STX;\ETX\DC2\EOT\181\aik\n\
    \\f\n\
    \\STX\EOT7\DC2\ACK\185\a\NUL\187\a\SOH\n\
    \\v\n\
    \\ETX\EOT7\SOH\DC2\EOT\185\a\b\SI\n\
    \\f\n\
    \\EOT\EOT7\STX\NUL\DC2\EOT\186\a\EOT%\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\EOT\DC2\EOT\186\a\EOT\f\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\ACK\DC2\EOT\186\a\r\EM\n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\SOH\DC2\EOT\186\a\SUB \n\
    \\r\n\
    \\ENQ\EOT7\STX\NUL\ETX\DC2\EOT\186\a#$b\ACKproto3"